diff --git a/GI/WebKit.hs b/GI/WebKit.hs --- a/GI/WebKit.hs +++ b/GI/WebKit.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -16,6 +17,10 @@ module GI.WebKit.Structs , + + module Data.GI.Base , + + ) where import GI.WebKit.Callbacks @@ -37,4 +42,5 @@ import GI.WebKit.Types import GI.WebKit.Callbacks +import Data.GI.Base diff --git a/GI/WebKit/Callbacks.hs b/GI/WebKit/Callbacks.hs --- a/GI/WebKit/Callbacks.hs +++ b/GI/WebKit/Callbacks.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 diff --git a/GI/WebKit/Constants.hs b/GI/WebKit/Constants.hs --- a/GI/WebKit/Constants.hs +++ b/GI/WebKit/Constants.hs @@ -1,5 +1,6 @@ {-# LANGUAGE PatternSynonyms, ScopedTypeVariables, ViewPatterns #-} + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 diff --git a/GI/WebKit/Enums.hs b/GI/WebKit/Enums.hs --- a/GI/WebKit/Enums.hs +++ b/GI/WebKit/Enums.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 diff --git a/GI/WebKit/Flags.hs b/GI/WebKit/Flags.hs --- a/GI/WebKit/Flags.hs +++ b/GI/WebKit/Flags.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 diff --git a/GI/WebKit/Functions.hs b/GI/WebKit/Functions.hs --- a/GI/WebKit/Functions.hs +++ b/GI/WebKit/Functions.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -73,18 +74,6 @@ minorVersion , --- ** networkErrorQuark - networkErrorQuark , - - --- ** pluginErrorQuark - pluginErrorQuark , - - --- ** policyErrorQuark - policyErrorQuark , - - -- ** removeAllWebDatabases removeAllWebDatabases , @@ -127,9 +116,8 @@ import qualified GI.Soup as Soup -- function webkit_set_web_database_directory_path --- Args : [Arg {argName = "path", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "path", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "path", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -141,8 +129,8 @@ setWebDatabaseDirectoryPath :: (MonadIO m) => - T.Text -> -- path - m () + T.Text -- path + -> m () -- result setWebDatabaseDirectoryPath path = liftIO $ do path' <- textToCString path webkit_set_web_database_directory_path path' @@ -151,9 +139,8 @@ -- function webkit_set_text_checker --- Args : [Arg {argName = "checker", argType = TInterface "GObject" "Object", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "checker", argType = TInterface "GObject" "Object", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "checker", argType = TInterface "GObject" "Object", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -165,8 +152,8 @@ setTextChecker :: (MonadIO m, GObject.ObjectK a) => - a -> -- checker - m () + a -- checker + -> m () -- result setTextChecker checker = liftIO $ do let checker' = unsafeManagedPtrCastPtr checker webkit_set_text_checker checker' @@ -175,9 +162,8 @@ -- function webkit_set_security_policy_for_uri_scheme --- Args : [Arg {argName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "policy", argType = TInterface "WebKit" "SecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "policy", argType = TInterface "WebKit" "SecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "policy", argType = TInterface "WebKit" "SecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -190,9 +176,9 @@ setSecurityPolicyForUriScheme :: (MonadIO m) => - T.Text -> -- scheme - [SecurityPolicy] -> -- policy - m () + T.Text -- scheme + -> [SecurityPolicy] -- policy + -> m () -- result setSecurityPolicyForUriScheme scheme policy = liftIO $ do scheme' <- textToCString scheme let policy' = gflagsToWord policy @@ -202,9 +188,8 @@ -- function webkit_set_default_web_database_quota --- Args : [Arg {argName = "defaultQuota", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "defaultQuota", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "defaultQuota", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -216,17 +201,16 @@ setDefaultWebDatabaseQuota :: (MonadIO m) => - Word64 -> -- defaultQuota - m () + Word64 -- defaultQuota + -> m () -- result setDefaultWebDatabaseQuota defaultQuota = liftIO $ do webkit_set_default_web_database_quota defaultQuota return () -- function webkit_set_cache_model --- Args : [Arg {argName = "cache_model", argType = TInterface "WebKit" "CacheModel", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "cache_model", argType = TInterface "WebKit" "CacheModel", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "cache_model", argType = TInterface "WebKit" "CacheModel", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -238,18 +222,17 @@ setCacheModel :: (MonadIO m) => - CacheModel -> -- cache_model - m () -setCacheModel cache_model = liftIO $ do - let cache_model' = (fromIntegral . fromEnum) cache_model - webkit_set_cache_model cache_model' + CacheModel -- cacheModel + -> m () -- result +setCacheModel cacheModel = liftIO $ do + let cacheModel' = (fromIntegral . fromEnum) cacheModel + webkit_set_cache_model cacheModel' return () -- function webkit_remove_all_web_databases -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -260,76 +243,15 @@ removeAllWebDatabases :: (MonadIO m) => - m () + m () -- result removeAllWebDatabases = liftIO $ do webkit_remove_all_web_databases return () --- function webkit_policy_error_quark --- Args : [] --- Lengths : [] --- hInArgs : [] --- returnType : TBasicType TUInt32 --- throws : False --- Skip return : False - -foreign import ccall "webkit_policy_error_quark" webkit_policy_error_quark :: - IO Word32 - - -policyErrorQuark :: - (MonadIO m) => - m Word32 -policyErrorQuark = liftIO $ do - result <- webkit_policy_error_quark - return result - - --- function webkit_plugin_error_quark --- Args : [] --- Lengths : [] --- hInArgs : [] --- returnType : TBasicType TUInt32 --- throws : False --- Skip return : False - -foreign import ccall "webkit_plugin_error_quark" webkit_plugin_error_quark :: - IO Word32 - - -pluginErrorQuark :: - (MonadIO m) => - m Word32 -pluginErrorQuark = liftIO $ do - result <- webkit_plugin_error_quark - return result - - --- function webkit_network_error_quark --- Args : [] --- Lengths : [] --- hInArgs : [] --- returnType : TBasicType TUInt32 --- throws : False --- Skip return : False - -foreign import ccall "webkit_network_error_quark" webkit_network_error_quark :: - IO Word32 - - -networkErrorQuark :: - (MonadIO m) => - m Word32 -networkErrorQuark = liftIO $ do - result <- webkit_network_error_quark - return result - - -- function webkit_minor_version -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TBasicType TUInt32 -- throws : False -- Skip return : False @@ -340,7 +262,7 @@ minorVersion :: (MonadIO m) => - m Word32 + m Word32 -- result minorVersion = liftIO $ do result <- webkit_minor_version return result @@ -349,7 +271,6 @@ -- function webkit_micro_version -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TBasicType TUInt32 -- throws : False -- Skip return : False @@ -360,7 +281,7 @@ microVersion :: (MonadIO m) => - m Word32 + m Word32 -- result microVersion = liftIO $ do result <- webkit_micro_version return result @@ -369,7 +290,6 @@ -- function webkit_major_version -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TBasicType TUInt32 -- throws : False -- Skip return : False @@ -380,7 +300,7 @@ majorVersion :: (MonadIO m) => - m Word32 + m Word32 -- result majorVersion = liftIO $ do result <- webkit_major_version return result @@ -389,7 +309,6 @@ -- function webkit_get_web_plugin_database -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TInterface "WebKit" "WebPluginDatabase" -- throws : False -- Skip return : False @@ -400,7 +319,7 @@ getWebPluginDatabase :: (MonadIO m) => - m WebPluginDatabase + m WebPluginDatabase -- result getWebPluginDatabase = liftIO $ do result <- webkit_get_web_plugin_database checkUnexpectedReturnNULL "webkit_get_web_plugin_database" result @@ -411,7 +330,6 @@ -- function webkit_get_web_database_directory_path -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -422,7 +340,7 @@ getWebDatabaseDirectoryPath :: (MonadIO m) => - m T.Text + m T.Text -- result getWebDatabaseDirectoryPath = liftIO $ do result <- webkit_get_web_database_directory_path checkUnexpectedReturnNULL "webkit_get_web_database_directory_path" result @@ -433,7 +351,6 @@ -- function webkit_get_text_checker -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TInterface "GObject" "Object" -- throws : False -- Skip return : False @@ -444,7 +361,7 @@ getTextChecker :: (MonadIO m) => - m GObject.Object + m GObject.Object -- result getTextChecker = liftIO $ do result <- webkit_get_text_checker checkUnexpectedReturnNULL "webkit_get_text_checker" result @@ -453,9 +370,8 @@ -- function webkit_get_security_policy_for_uri_scheme --- Args : [Arg {argName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "SecurityPolicy" -- throws : False -- Skip return : False @@ -467,8 +383,8 @@ getSecurityPolicyForUriScheme :: (MonadIO m) => - T.Text -> -- scheme - m [SecurityPolicy] + T.Text -- scheme + -> m [SecurityPolicy] -- result getSecurityPolicyForUriScheme scheme = liftIO $ do scheme' <- textToCString scheme result <- webkit_get_security_policy_for_uri_scheme scheme' @@ -480,7 +396,6 @@ -- function webkit_get_icon_database -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TInterface "WebKit" "IconDatabase" -- throws : False -- Skip return : False @@ -491,7 +406,7 @@ {-# DEPRECATED getIconDatabase ["(Since version 1.8)","Use webkit_get_favicon_database() instead"]#-} getIconDatabase :: (MonadIO m) => - m IconDatabase + m IconDatabase -- result getIconDatabase = liftIO $ do result <- webkit_get_icon_database checkUnexpectedReturnNULL "webkit_get_icon_database" result @@ -502,7 +417,6 @@ -- function webkit_get_favicon_database -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TInterface "WebKit" "FaviconDatabase" -- throws : False -- Skip return : False @@ -513,7 +427,7 @@ getFaviconDatabase :: (MonadIO m) => - m FaviconDatabase + m FaviconDatabase -- result getFaviconDatabase = liftIO $ do result <- webkit_get_favicon_database checkUnexpectedReturnNULL "webkit_get_favicon_database" result @@ -524,7 +438,6 @@ -- function webkit_get_default_web_database_quota -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -535,7 +448,7 @@ getDefaultWebDatabaseQuota :: (MonadIO m) => - m Word64 + m Word64 -- result getDefaultWebDatabaseQuota = liftIO $ do result <- webkit_get_default_web_database_quota return result @@ -544,7 +457,6 @@ -- function webkit_get_default_session -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TInterface "Soup" "Session" -- throws : False -- Skip return : False @@ -555,7 +467,7 @@ getDefaultSession :: (MonadIO m) => - m Soup.Session + m Soup.Session -- result getDefaultSession = liftIO $ do result <- webkit_get_default_session checkUnexpectedReturnNULL "webkit_get_default_session" result @@ -566,7 +478,6 @@ -- function webkit_get_cache_model -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TInterface "WebKit" "CacheModel" -- throws : False -- Skip return : False @@ -577,7 +488,7 @@ getCacheModel :: (MonadIO m) => - m CacheModel + m CacheModel -- result getCacheModel = liftIO $ do result <- webkit_get_cache_model let result' = (toEnum . fromIntegral) result @@ -585,9 +496,8 @@ -- function webkit_geolocation_policy_deny --- Args : [Arg {argName = "decision", argType = TInterface "WebKit" "GeolocationPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "decision", argType = TInterface "WebKit" "GeolocationPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "decision", argType = TInterface "WebKit" "GeolocationPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -599,8 +509,8 @@ geolocationPolicyDeny :: (MonadIO m, GeolocationPolicyDecisionK a) => - a -> -- decision - m () + a -- decision + -> m () -- result geolocationPolicyDeny decision = liftIO $ do let decision' = unsafeManagedPtrCastPtr decision webkit_geolocation_policy_deny decision' @@ -609,9 +519,8 @@ -- function webkit_geolocation_policy_allow --- Args : [Arg {argName = "decision", argType = TInterface "WebKit" "GeolocationPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "decision", argType = TInterface "WebKit" "GeolocationPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "decision", argType = TInterface "WebKit" "GeolocationPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -623,8 +532,8 @@ geolocationPolicyAllow :: (MonadIO m, GeolocationPolicyDecisionK a) => - a -> -- decision - m () + a -- decision + -> m () -- result geolocationPolicyAllow decision = liftIO $ do let decision' = unsafeManagedPtrCastPtr decision webkit_geolocation_policy_allow decision' @@ -633,9 +542,8 @@ -- function webkit_context_menu_item_get_action --- Args : [Arg {argName = "item", argType = TInterface "Gtk" "MenuItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "item", argType = TInterface "Gtk" "MenuItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "item", argType = TInterface "Gtk" "MenuItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "ContextMenuAction" -- throws : False -- Skip return : False @@ -647,8 +555,8 @@ contextMenuItemGetAction :: (MonadIO m, Gtk.MenuItemK a) => - a -> -- item - m ContextMenuAction + a -- item + -> m ContextMenuAction -- result contextMenuItemGetAction item = liftIO $ do let item' = unsafeManagedPtrCastPtr item result <- webkit_context_menu_item_get_action item' @@ -660,7 +568,6 @@ -- function webkit_application_cache_get_database_directory_path -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -671,7 +578,7 @@ applicationCacheGetDatabaseDirectoryPath :: (MonadIO m) => - m T.Text + m T.Text -- result applicationCacheGetDatabaseDirectoryPath = liftIO $ do result <- webkit_application_cache_get_database_directory_path checkUnexpectedReturnNULL "webkit_application_cache_get_database_directory_path" result diff --git a/GI/WebKit/Interfaces.hs b/GI/WebKit/Interfaces.hs --- a/GI/WebKit/Interfaces.hs +++ b/GI/WebKit/Interfaces.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 diff --git a/GI/WebKit/Interfaces/DOMEventTarget.hs b/GI/WebKit/Interfaces/DOMEventTarget.hs --- a/GI/WebKit/Interfaces/DOMEventTarget.hs +++ b/GI/WebKit/Interfaces/DOMEventTarget.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMEventTargetAddEventListener + DOMEventTargetAddEventListenerMethodInfo, dOMEventTargetAddEventListener , -- ** dOMEventTargetDispatchEvent + DOMEventTargetDispatchEventMethodInfo , dOMEventTargetDispatchEvent , -- ** dOMEventTargetRemoveEventListener + DOMEventTargetRemoveEventListenerMethodInfo, dOMEventTargetRemoveEventListener , @@ -49,11 +53,47 @@ noDOMEventTarget :: Maybe DOMEventTarget noDOMEventTarget = Nothing +type family ResolveDOMEventTargetMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMEventTargetMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMEventTargetMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMEventTargetMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMEventTargetMethod "dispatchEvent" o = DOMEventTargetDispatchEventMethodInfo + ResolveDOMEventTargetMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMEventTargetMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMEventTargetMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMEventTargetMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMEventTargetMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMEventTargetMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMEventTargetMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMEventTargetMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMEventTargetMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMEventTargetMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMEventTargetMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMEventTargetMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMEventTargetMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMEventTargetMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMEventTargetMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMEventTargetMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMEventTargetMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMEventTargetMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMEventTargetMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMEventTargetMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMEventTargetMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMEventTargetMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMEventTargetMethod t DOMEventTarget, MethodInfo info DOMEventTarget p) => IsLabelProxy t (DOMEventTarget -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMEventTargetMethod t DOMEventTarget, MethodInfo info DOMEventTarget p) => IsLabel t (DOMEventTarget -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMEventTarget = DOMEventTargetAttributeList type DOMEventTargetAttributeList = ('[ ] :: [(Symbol, *)]) type instance SignalList DOMEventTarget = DOMEventTargetSignalList -type DOMEventTargetSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMEventTargetSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) foreign import ccall "webkit_dom_event_target_get_type" c_webkit_dom_event_target_get_type :: IO GType @@ -74,9 +114,8 @@ -- method DOMEventTarget::add_event_listener -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handler", argType = TInterface "GObject" "Closure", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "use_capture", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "event_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "handler", argType = TInterface "GObject" "Closure", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "use_capture", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handler", argType = TInterface "GObject" "Closure", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "use_capture", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -91,28 +130,31 @@ dOMEventTargetAddEventListener :: (MonadIO m, DOMEventTargetK a) => - a -> -- _obj - T.Text -> -- event_name - Closure -> -- handler - Bool -> -- use_capture - m Bool -dOMEventTargetAddEventListener _obj event_name handler use_capture = liftIO $ do + a -- _obj + -> T.Text -- eventName + -> Closure -- handler + -> Bool -- useCapture + -> m Bool -- result +dOMEventTargetAddEventListener _obj eventName handler useCapture = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - event_name' <- textToCString event_name + eventName' <- textToCString eventName let handler' = unsafeManagedPtrGetPtr handler - let use_capture' = (fromIntegral . fromEnum) use_capture - result <- webkit_dom_event_target_add_event_listener_with_closure _obj' event_name' handler' use_capture' + let useCapture' = (fromIntegral . fromEnum) useCapture + result <- webkit_dom_event_target_add_event_listener_with_closure _obj' eventName' handler' useCapture' let result' = (/= 0) result touchManagedPtr _obj touchManagedPtr handler - freeMem event_name' + freeMem eventName' return result' +data DOMEventTargetAddEventListenerMethodInfo +instance (signature ~ (T.Text -> Closure -> Bool -> m Bool), MonadIO m, DOMEventTargetK a) => MethodInfo DOMEventTargetAddEventListenerMethodInfo a signature where + overloadedMethod _ = dOMEventTargetAddEventListener + -- method DOMEventTarget::dispatch_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -126,9 +168,9 @@ dOMEventTargetDispatchEvent :: (MonadIO m, DOMEventTargetK a, DOMEventK b) => - a -> -- _obj - b -> -- event - m () + a -- _obj + -> b -- event + -> m () -- result dOMEventTargetDispatchEvent _obj event = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let event' = unsafeManagedPtrCastPtr event @@ -141,11 +183,14 @@ return () ) +data DOMEventTargetDispatchEventMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMEventTargetK a, DOMEventK b) => MethodInfo DOMEventTargetDispatchEventMethodInfo a signature where + overloadedMethod _ = dOMEventTargetDispatchEvent + -- method DOMEventTarget::remove_event_listener -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handler", argType = TInterface "GObject" "Closure", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "use_capture", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "event_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "handler", argType = TInterface "GObject" "Closure", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "use_capture", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handler", argType = TInterface "GObject" "Closure", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "use_capture", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -160,21 +205,25 @@ dOMEventTargetRemoveEventListener :: (MonadIO m, DOMEventTargetK a) => - a -> -- _obj - T.Text -> -- event_name - Closure -> -- handler - Bool -> -- use_capture - m Bool -dOMEventTargetRemoveEventListener _obj event_name handler use_capture = liftIO $ do + a -- _obj + -> T.Text -- eventName + -> Closure -- handler + -> Bool -- useCapture + -> m Bool -- result +dOMEventTargetRemoveEventListener _obj eventName handler useCapture = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - event_name' <- textToCString event_name + eventName' <- textToCString eventName let handler' = unsafeManagedPtrGetPtr handler - let use_capture' = (fromIntegral . fromEnum) use_capture - result <- webkit_dom_event_target_remove_event_listener_with_closure _obj' event_name' handler' use_capture' + let useCapture' = (fromIntegral . fromEnum) useCapture + result <- webkit_dom_event_target_remove_event_listener_with_closure _obj' eventName' handler' useCapture' let result' = (/= 0) result touchManagedPtr _obj touchManagedPtr handler - freeMem event_name' + freeMem eventName' return result' + +data DOMEventTargetRemoveEventListenerMethodInfo +instance (signature ~ (T.Text -> Closure -> Bool -> m Bool), MonadIO m, DOMEventTargetK a) => MethodInfo DOMEventTargetRemoveEventListenerMethodInfo a signature where + overloadedMethod _ = dOMEventTargetRemoveEventListener diff --git a/GI/WebKit/Interfaces/DOMEventTarget.hs-boot b/GI/WebKit/Interfaces/DOMEventTarget.hs-boot --- a/GI/WebKit/Interfaces/DOMEventTarget.hs-boot +++ b/GI/WebKit/Interfaces/DOMEventTarget.hs-boot @@ -11,3 +11,6 @@ instance GObject DOMEventTarget where class GObject o => DOMEventTargetK o instance (GObject o, IsDescendantOf DOMEventTarget o) => DOMEventTargetK o +data DOMEventTargetAddEventListenerMethodInfo +data DOMEventTargetDispatchEventMethodInfo +data DOMEventTargetRemoveEventListenerMethodInfo diff --git a/GI/WebKit/Interfaces/SpellChecker.hs b/GI/WebKit/Interfaces/SpellChecker.hs --- a/GI/WebKit/Interfaces/SpellChecker.hs +++ b/GI/WebKit/Interfaces/SpellChecker.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** spellCheckerCheckSpellingOfString + SpellCheckerCheckSpellingOfStringMethodInfo, spellCheckerCheckSpellingOfString , -- ** spellCheckerGetAutocorrectSuggestionsForMisspelledWord + SpellCheckerGetAutocorrectSuggestionsForMisspelledWordMethodInfo, spellCheckerGetAutocorrectSuggestionsForMisspelledWord, -- ** spellCheckerGetGuessesForWord + SpellCheckerGetGuessesForWordMethodInfo , spellCheckerGetGuessesForWord , -- ** spellCheckerIgnoreWord + SpellCheckerIgnoreWordMethodInfo , spellCheckerIgnoreWord , -- ** spellCheckerLearnWord + SpellCheckerLearnWordMethodInfo , spellCheckerLearnWord , -- ** spellCheckerUpdateSpellCheckingLanguages + SpellCheckerUpdateSpellCheckingLanguagesMethodInfo, spellCheckerUpdateSpellCheckingLanguages, @@ -61,11 +68,50 @@ noSpellChecker :: Maybe SpellChecker noSpellChecker = Nothing +type family ResolveSpellCheckerMethod (t :: Symbol) (o :: *) :: * where + ResolveSpellCheckerMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveSpellCheckerMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveSpellCheckerMethod "checkSpellingOfString" o = SpellCheckerCheckSpellingOfStringMethodInfo + ResolveSpellCheckerMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveSpellCheckerMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveSpellCheckerMethod "ignoreWord" o = SpellCheckerIgnoreWordMethodInfo + ResolveSpellCheckerMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveSpellCheckerMethod "learnWord" o = SpellCheckerLearnWordMethodInfo + ResolveSpellCheckerMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveSpellCheckerMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveSpellCheckerMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveSpellCheckerMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveSpellCheckerMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveSpellCheckerMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveSpellCheckerMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveSpellCheckerMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveSpellCheckerMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveSpellCheckerMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveSpellCheckerMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveSpellCheckerMethod "updateSpellCheckingLanguages" o = SpellCheckerUpdateSpellCheckingLanguagesMethodInfo + ResolveSpellCheckerMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveSpellCheckerMethod "getAutocorrectSuggestionsForMisspelledWord" o = SpellCheckerGetAutocorrectSuggestionsForMisspelledWordMethodInfo + ResolveSpellCheckerMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveSpellCheckerMethod "getGuessesForWord" o = SpellCheckerGetGuessesForWordMethodInfo + ResolveSpellCheckerMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveSpellCheckerMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveSpellCheckerMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveSpellCheckerMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveSpellCheckerMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveSpellCheckerMethod t SpellChecker, MethodInfo info SpellChecker p) => IsLabelProxy t (SpellChecker -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveSpellCheckerMethod t SpellChecker, MethodInfo info SpellChecker p) => IsLabel t (SpellChecker -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList SpellChecker = SpellCheckerAttributeList type SpellCheckerAttributeList = ('[ ] :: [(Symbol, *)]) type instance SignalList SpellChecker = SpellCheckerSignalList -type SpellCheckerSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type SpellCheckerSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) foreign import ccall "webkit_spell_checker_get_type" c_webkit_spell_checker_get_type :: IO GType @@ -86,9 +132,8 @@ -- method SpellChecker::check_spelling_of_string -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "misspelling_location", argType = TBasicType TInt32, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferEverything},Arg {argName = "misspelling_length", argType = TBasicType TInt32, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferEverything}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "misspelling_location", argType = TBasicType TInt32, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "misspelling_length", argType = TBasicType TInt32, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -103,28 +148,31 @@ spellCheckerCheckSpellingOfString :: (MonadIO m, SpellCheckerK a) => - a -> -- _obj - T.Text -> -- string - m (Int32,Int32) + a -- _obj + -> T.Text -- string + -> m (Int32,Int32) -- result spellCheckerCheckSpellingOfString _obj string = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj string' <- textToCString string - misspelling_location <- allocMem :: IO (Ptr Int32) - misspelling_length <- allocMem :: IO (Ptr Int32) - webkit_spell_checker_check_spelling_of_string _obj' string' misspelling_location misspelling_length - misspelling_location' <- peek misspelling_location - misspelling_length' <- peek misspelling_length + misspellingLocation <- allocMem :: IO (Ptr Int32) + misspellingLength <- allocMem :: IO (Ptr Int32) + webkit_spell_checker_check_spelling_of_string _obj' string' misspellingLocation misspellingLength + misspellingLocation' <- peek misspellingLocation + misspellingLength' <- peek misspellingLength touchManagedPtr _obj freeMem string' - freeMem misspelling_location - freeMem misspelling_length - return (misspelling_location', misspelling_length') + freeMem misspellingLocation + freeMem misspellingLength + return (misspellingLocation', misspellingLength') +data SpellCheckerCheckSpellingOfStringMethodInfo +instance (signature ~ (T.Text -> m (Int32,Int32)), MonadIO m, SpellCheckerK a) => MethodInfo SpellCheckerCheckSpellingOfStringMethodInfo a signature where + overloadedMethod _ = spellCheckerCheckSpellingOfString + -- method SpellChecker::get_autocorrect_suggestions_for_misspelled_word -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -137,9 +185,9 @@ spellCheckerGetAutocorrectSuggestionsForMisspelledWord :: (MonadIO m, SpellCheckerK a) => - a -> -- _obj - T.Text -> -- word - m T.Text + a -- _obj + -> T.Text -- word + -> m T.Text -- result spellCheckerGetAutocorrectSuggestionsForMisspelledWord _obj word = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj word' <- textToCString word @@ -151,11 +199,14 @@ freeMem word' return result' +data SpellCheckerGetAutocorrectSuggestionsForMisspelledWordMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, SpellCheckerK a) => MethodInfo SpellCheckerGetAutocorrectSuggestionsForMisspelledWordMethodInfo a signature where + overloadedMethod _ = spellCheckerGetAutocorrectSuggestionsForMisspelledWord + -- method SpellChecker::get_guesses_for_word -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "context", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "context", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "context", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TCArray True (-1) (-1) (TBasicType TUTF8) -- throws : False -- Skip return : False @@ -169,10 +220,10 @@ spellCheckerGetGuessesForWord :: (MonadIO m, SpellCheckerK a) => - a -> -- _obj - T.Text -> -- word - Maybe (T.Text) -> -- context - m [T.Text] + a -- _obj + -> T.Text -- word + -> Maybe (T.Text) -- context + -> m [T.Text] -- result spellCheckerGetGuessesForWord _obj word context = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj word' <- textToCString word @@ -191,11 +242,14 @@ freeMem maybeContext return result' +data SpellCheckerGetGuessesForWordMethodInfo +instance (signature ~ (T.Text -> Maybe (T.Text) -> m [T.Text]), MonadIO m, SpellCheckerK a) => MethodInfo SpellCheckerGetGuessesForWordMethodInfo a signature where + overloadedMethod _ = spellCheckerGetGuessesForWord + -- method SpellChecker::ignore_word -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -208,9 +262,9 @@ spellCheckerIgnoreWord :: (MonadIO m, SpellCheckerK a) => - a -> -- _obj - T.Text -> -- word - m () + a -- _obj + -> T.Text -- word + -> m () -- result spellCheckerIgnoreWord _obj word = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj word' <- textToCString word @@ -219,11 +273,14 @@ freeMem word' return () +data SpellCheckerIgnoreWordMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, SpellCheckerK a) => MethodInfo SpellCheckerIgnoreWordMethodInfo a signature where + overloadedMethod _ = spellCheckerIgnoreWord + -- method SpellChecker::learn_word -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "word", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -236,9 +293,9 @@ spellCheckerLearnWord :: (MonadIO m, SpellCheckerK a) => - a -> -- _obj - T.Text -> -- word - m () + a -- _obj + -> T.Text -- word + -> m () -- result spellCheckerLearnWord _obj word = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj word' <- textToCString word @@ -247,11 +304,14 @@ freeMem word' return () +data SpellCheckerLearnWordMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, SpellCheckerK a) => MethodInfo SpellCheckerLearnWordMethodInfo a signature where + overloadedMethod _ = spellCheckerLearnWord + -- method SpellChecker::update_spell_checking_languages -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "languages", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "languages", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SpellChecker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "languages", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -264,9 +324,9 @@ spellCheckerUpdateSpellCheckingLanguages :: (MonadIO m, SpellCheckerK a) => - a -> -- _obj - Maybe (T.Text) -> -- languages - m () + a -- _obj + -> Maybe (T.Text) -- languages + -> m () -- result spellCheckerUpdateSpellCheckingLanguages _obj languages = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeLanguages <- case languages of @@ -278,5 +338,9 @@ touchManagedPtr _obj freeMem maybeLanguages return () + +data SpellCheckerUpdateSpellCheckingLanguagesMethodInfo +instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, SpellCheckerK a) => MethodInfo SpellCheckerUpdateSpellCheckingLanguagesMethodInfo a signature where + overloadedMethod _ = spellCheckerUpdateSpellCheckingLanguages diff --git a/GI/WebKit/Interfaces/SpellChecker.hs-boot b/GI/WebKit/Interfaces/SpellChecker.hs-boot --- a/GI/WebKit/Interfaces/SpellChecker.hs-boot +++ b/GI/WebKit/Interfaces/SpellChecker.hs-boot @@ -11,3 +11,9 @@ instance GObject SpellChecker where class GObject o => SpellCheckerK o instance (GObject o, IsDescendantOf SpellChecker o) => SpellCheckerK o +data SpellCheckerCheckSpellingOfStringMethodInfo +data SpellCheckerGetAutocorrectSuggestionsForMisspelledWordMethodInfo +data SpellCheckerGetGuessesForWordMethodInfo +data SpellCheckerIgnoreWordMethodInfo +data SpellCheckerLearnWordMethodInfo +data SpellCheckerUpdateSpellCheckingLanguagesMethodInfo diff --git a/GI/WebKit/Objects.hs b/GI/WebKit/Objects.hs --- a/GI/WebKit/Objects.hs +++ b/GI/WebKit/Objects.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 diff --git a/GI/WebKit/Objects/DOMAttr.hs b/GI/WebKit/Objects/DOMAttr.hs --- a/GI/WebKit/Objects/DOMAttr.hs +++ b/GI/WebKit/Objects/DOMAttr.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** dOMAttrGetIsId + DOMAttrGetIsIdMethodInfo , dOMAttrGetIsId , -- ** dOMAttrGetName + DOMAttrGetNameMethodInfo , dOMAttrGetName , -- ** dOMAttrGetOwnerElement + DOMAttrGetOwnerElementMethodInfo , dOMAttrGetOwnerElement , -- ** dOMAttrGetSpecified + DOMAttrGetSpecifiedMethodInfo , dOMAttrGetSpecified , -- ** dOMAttrGetValue + DOMAttrGetValueMethodInfo , dOMAttrGetValue , -- ** dOMAttrSetValue + DOMAttrSetValueMethodInfo , dOMAttrSetValue , @@ -106,6 +113,83 @@ noDOMAttr :: Maybe DOMAttr noDOMAttr = Nothing +type family ResolveDOMAttrMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMAttrMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMAttrMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMAttrMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMAttrMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMAttrMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMAttrMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMAttrMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMAttrMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMAttrMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMAttrMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMAttrMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMAttrMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMAttrMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMAttrMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMAttrMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMAttrMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMAttrMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMAttrMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMAttrMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMAttrMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMAttrMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMAttrMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMAttrMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMAttrMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMAttrMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMAttrMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMAttrMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMAttrMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMAttrMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMAttrMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMAttrMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMAttrMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMAttrMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMAttrMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMAttrMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMAttrMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMAttrMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMAttrMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMAttrMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMAttrMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMAttrMethod "getIsId" o = DOMAttrGetIsIdMethodInfo + ResolveDOMAttrMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMAttrMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMAttrMethod "getName" o = DOMAttrGetNameMethodInfo + ResolveDOMAttrMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMAttrMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMAttrMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMAttrMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMAttrMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMAttrMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMAttrMethod "getOwnerElement" o = DOMAttrGetOwnerElementMethodInfo + ResolveDOMAttrMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMAttrMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMAttrMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMAttrMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMAttrMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMAttrMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMAttrMethod "getSpecified" o = DOMAttrGetSpecifiedMethodInfo + ResolveDOMAttrMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMAttrMethod "getValue" o = DOMAttrGetValueMethodInfo + ResolveDOMAttrMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMAttrMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMAttrMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMAttrMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMAttrMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMAttrMethod "setValue" o = DOMAttrSetValueMethodInfo + ResolveDOMAttrMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMAttrMethod t DOMAttr, MethodInfo info DOMAttr p) => IsLabelProxy t (DOMAttr -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMAttrMethod t DOMAttr, MethodInfo info DOMAttr p) => IsLabel t (DOMAttr -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "is-id" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -119,7 +203,7 @@ type AttrSetTypeConstraint DOMAttrIsIdPropertyInfo = (~) () type AttrBaseTypeConstraint DOMAttrIsIdPropertyInfo = DOMAttrK type AttrGetType DOMAttrIsIdPropertyInfo = Bool - type AttrLabel DOMAttrIsIdPropertyInfo = "DOMAttr::is-id" + type AttrLabel DOMAttrIsIdPropertyInfo = "is-id" attrGet _ = getDOMAttrIsId attrSet _ = undefined attrConstruct _ = undefined @@ -137,7 +221,7 @@ type AttrSetTypeConstraint DOMAttrNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMAttrNamePropertyInfo = DOMAttrK type AttrGetType DOMAttrNamePropertyInfo = T.Text - type AttrLabel DOMAttrNamePropertyInfo = "DOMAttr::name" + type AttrLabel DOMAttrNamePropertyInfo = "name" attrGet _ = getDOMAttrName attrSet _ = undefined attrConstruct _ = undefined @@ -155,7 +239,7 @@ type AttrSetTypeConstraint DOMAttrOwnerElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMAttrOwnerElementPropertyInfo = DOMAttrK type AttrGetType DOMAttrOwnerElementPropertyInfo = DOMElement - type AttrLabel DOMAttrOwnerElementPropertyInfo = "DOMAttr::owner-element" + type AttrLabel DOMAttrOwnerElementPropertyInfo = "owner-element" attrGet _ = getDOMAttrOwnerElement attrSet _ = undefined attrConstruct _ = undefined @@ -173,7 +257,7 @@ type AttrSetTypeConstraint DOMAttrSpecifiedPropertyInfo = (~) () type AttrBaseTypeConstraint DOMAttrSpecifiedPropertyInfo = DOMAttrK type AttrGetType DOMAttrSpecifiedPropertyInfo = Bool - type AttrLabel DOMAttrSpecifiedPropertyInfo = "DOMAttr::specified" + type AttrLabel DOMAttrSpecifiedPropertyInfo = "specified" attrGet _ = getDOMAttrSpecified attrSet _ = undefined attrConstruct _ = undefined @@ -197,22 +281,21 @@ type AttrSetTypeConstraint DOMAttrValuePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMAttrValuePropertyInfo = DOMAttrK type AttrGetType DOMAttrValuePropertyInfo = T.Text - type AttrLabel DOMAttrValuePropertyInfo = "DOMAttr::value" + type AttrLabel DOMAttrValuePropertyInfo = "value" attrGet _ = getDOMAttrValue attrSet _ = setDOMAttrValue attrConstruct _ = constructDOMAttrValue type instance AttributeList DOMAttr = DOMAttrAttributeList -type DOMAttrAttributeList = ('[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("is-id", DOMAttrIsIdPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMAttrNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("owner-element", DOMAttrOwnerElementPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("specified", DOMAttrSpecifiedPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("value", DOMAttrValuePropertyInfo)] :: [(Symbol, *)]) +type DOMAttrAttributeList = ('[ '("baseUri", DOMNodeBaseUriPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("isId", DOMAttrIsIdPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMAttrNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("ownerElement", DOMAttrOwnerElementPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("specified", DOMAttrSpecifiedPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("value", DOMAttrValuePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMAttr = DOMAttrSignalList -type DOMAttrSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMAttrSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMAttr::get_is_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -224,8 +307,8 @@ dOMAttrGetIsId :: (MonadIO m, DOMAttrK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMAttrGetIsId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_attr_get_is_id _obj' @@ -233,11 +316,14 @@ touchManagedPtr _obj return result' +data DOMAttrGetIsIdMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMAttrK a) => MethodInfo DOMAttrGetIsIdMethodInfo a signature where + overloadedMethod _ = dOMAttrGetIsId + -- method DOMAttr::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -249,8 +335,8 @@ dOMAttrGetName :: (MonadIO m, DOMAttrK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMAttrGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_attr_get_name _obj' @@ -260,11 +346,14 @@ touchManagedPtr _obj return result' +data DOMAttrGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMAttrK a) => MethodInfo DOMAttrGetNameMethodInfo a signature where + overloadedMethod _ = dOMAttrGetName + -- method DOMAttr::get_owner_element -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : False -- Skip return : False @@ -276,8 +365,8 @@ dOMAttrGetOwnerElement :: (MonadIO m, DOMAttrK a) => - a -> -- _obj - m DOMElement + a -- _obj + -> m DOMElement -- result dOMAttrGetOwnerElement _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_attr_get_owner_element _obj' @@ -286,11 +375,14 @@ touchManagedPtr _obj return result' +data DOMAttrGetOwnerElementMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMAttrK a) => MethodInfo DOMAttrGetOwnerElementMethodInfo a signature where + overloadedMethod _ = dOMAttrGetOwnerElement + -- method DOMAttr::get_specified -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -302,8 +394,8 @@ dOMAttrGetSpecified :: (MonadIO m, DOMAttrK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMAttrGetSpecified _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_attr_get_specified _obj' @@ -311,11 +403,14 @@ touchManagedPtr _obj return result' +data DOMAttrGetSpecifiedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMAttrK a) => MethodInfo DOMAttrGetSpecifiedMethodInfo a signature where + overloadedMethod _ = dOMAttrGetSpecified + -- method DOMAttr::get_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -327,8 +422,8 @@ dOMAttrGetValue :: (MonadIO m, DOMAttrK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMAttrGetValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_attr_get_value _obj' @@ -338,11 +433,14 @@ touchManagedPtr _obj return result' +data DOMAttrGetValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMAttrK a) => MethodInfo DOMAttrGetValueMethodInfo a signature where + overloadedMethod _ = dOMAttrGetValue + -- method DOMAttr::set_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -356,9 +454,9 @@ dOMAttrSetValue :: (MonadIO m, DOMAttrK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMAttrSetValue _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -370,5 +468,9 @@ ) (do freeMem value' ) + +data DOMAttrSetValueMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMAttrK a) => MethodInfo DOMAttrSetValueMethodInfo a signature where + overloadedMethod _ = dOMAttrSetValue diff --git a/GI/WebKit/Objects/DOMAttr.hs-boot b/GI/WebKit/Objects/DOMAttr.hs-boot --- a/GI/WebKit/Objects/DOMAttr.hs-boot +++ b/GI/WebKit/Objects/DOMAttr.hs-boot @@ -16,3 +16,9 @@ data DOMAttrOwnerElementPropertyInfo data DOMAttrSpecifiedPropertyInfo data DOMAttrValuePropertyInfo +data DOMAttrGetIsIdMethodInfo +data DOMAttrGetNameMethodInfo +data DOMAttrGetOwnerElementMethodInfo +data DOMAttrGetSpecifiedMethodInfo +data DOMAttrGetValueMethodInfo +data DOMAttrSetValueMethodInfo diff --git a/GI/WebKit/Objects/DOMAudioTrack.hs b/GI/WebKit/Objects/DOMAudioTrack.hs --- a/GI/WebKit/Objects/DOMAudioTrack.hs +++ b/GI/WebKit/Objects/DOMAudioTrack.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** dOMAudioTrackGetEnabled + DOMAudioTrackGetEnabledMethodInfo , dOMAudioTrackGetEnabled , -- ** dOMAudioTrackGetId + DOMAudioTrackGetIdMethodInfo , dOMAudioTrackGetId , -- ** dOMAudioTrackGetKind + DOMAudioTrackGetKindMethodInfo , dOMAudioTrackGetKind , -- ** dOMAudioTrackGetLabel + DOMAudioTrackGetLabelMethodInfo , dOMAudioTrackGetLabel , -- ** dOMAudioTrackGetLanguage + DOMAudioTrackGetLanguageMethodInfo , dOMAudioTrackGetLanguage , -- ** dOMAudioTrackSetEnabled + DOMAudioTrackSetEnabledMethodInfo , dOMAudioTrackSetEnabled , @@ -106,6 +113,45 @@ noDOMAudioTrack :: Maybe DOMAudioTrack noDOMAudioTrack = Nothing +type family ResolveDOMAudioTrackMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMAudioTrackMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMAudioTrackMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMAudioTrackMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMAudioTrackMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMAudioTrackMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMAudioTrackMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMAudioTrackMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMAudioTrackMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMAudioTrackMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMAudioTrackMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMAudioTrackMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMAudioTrackMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMAudioTrackMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMAudioTrackMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMAudioTrackMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMAudioTrackMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMAudioTrackMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMAudioTrackMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMAudioTrackMethod "getEnabled" o = DOMAudioTrackGetEnabledMethodInfo + ResolveDOMAudioTrackMethod "getId" o = DOMAudioTrackGetIdMethodInfo + ResolveDOMAudioTrackMethod "getKind" o = DOMAudioTrackGetKindMethodInfo + ResolveDOMAudioTrackMethod "getLabel" o = DOMAudioTrackGetLabelMethodInfo + ResolveDOMAudioTrackMethod "getLanguage" o = DOMAudioTrackGetLanguageMethodInfo + ResolveDOMAudioTrackMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMAudioTrackMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMAudioTrackMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMAudioTrackMethod "setEnabled" o = DOMAudioTrackSetEnabledMethodInfo + ResolveDOMAudioTrackMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMAudioTrackMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMAudioTrackMethod t DOMAudioTrack, MethodInfo info DOMAudioTrack p) => IsLabelProxy t (DOMAudioTrack -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMAudioTrackMethod t DOMAudioTrack, MethodInfo info DOMAudioTrack p) => IsLabel t (DOMAudioTrack -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "enabled" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -125,7 +171,7 @@ type AttrSetTypeConstraint DOMAudioTrackEnabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMAudioTrackEnabledPropertyInfo = DOMAudioTrackK type AttrGetType DOMAudioTrackEnabledPropertyInfo = Bool - type AttrLabel DOMAudioTrackEnabledPropertyInfo = "DOMAudioTrack::enabled" + type AttrLabel DOMAudioTrackEnabledPropertyInfo = "enabled" attrGet _ = getDOMAudioTrackEnabled attrSet _ = setDOMAudioTrackEnabled attrConstruct _ = constructDOMAudioTrackEnabled @@ -143,7 +189,7 @@ type AttrSetTypeConstraint DOMAudioTrackIdPropertyInfo = (~) () type AttrBaseTypeConstraint DOMAudioTrackIdPropertyInfo = DOMAudioTrackK type AttrGetType DOMAudioTrackIdPropertyInfo = T.Text - type AttrLabel DOMAudioTrackIdPropertyInfo = "DOMAudioTrack::id" + type AttrLabel DOMAudioTrackIdPropertyInfo = "id" attrGet _ = getDOMAudioTrackId attrSet _ = undefined attrConstruct _ = undefined @@ -161,7 +207,7 @@ type AttrSetTypeConstraint DOMAudioTrackKindPropertyInfo = (~) () type AttrBaseTypeConstraint DOMAudioTrackKindPropertyInfo = DOMAudioTrackK type AttrGetType DOMAudioTrackKindPropertyInfo = T.Text - type AttrLabel DOMAudioTrackKindPropertyInfo = "DOMAudioTrack::kind" + type AttrLabel DOMAudioTrackKindPropertyInfo = "kind" attrGet _ = getDOMAudioTrackKind attrSet _ = undefined attrConstruct _ = undefined @@ -179,7 +225,7 @@ type AttrSetTypeConstraint DOMAudioTrackLabelPropertyInfo = (~) () type AttrBaseTypeConstraint DOMAudioTrackLabelPropertyInfo = DOMAudioTrackK type AttrGetType DOMAudioTrackLabelPropertyInfo = T.Text - type AttrLabel DOMAudioTrackLabelPropertyInfo = "DOMAudioTrack::label" + type AttrLabel DOMAudioTrackLabelPropertyInfo = "label" attrGet _ = getDOMAudioTrackLabel attrSet _ = undefined attrConstruct _ = undefined @@ -197,22 +243,21 @@ type AttrSetTypeConstraint DOMAudioTrackLanguagePropertyInfo = (~) () type AttrBaseTypeConstraint DOMAudioTrackLanguagePropertyInfo = DOMAudioTrackK type AttrGetType DOMAudioTrackLanguagePropertyInfo = T.Text - type AttrLabel DOMAudioTrackLanguagePropertyInfo = "DOMAudioTrack::language" + type AttrLabel DOMAudioTrackLanguagePropertyInfo = "language" attrGet _ = getDOMAudioTrackLanguage attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMAudioTrack = DOMAudioTrackAttributeList -type DOMAudioTrackAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("enabled", DOMAudioTrackEnabledPropertyInfo), '("id", DOMAudioTrackIdPropertyInfo), '("kind", DOMAudioTrackKindPropertyInfo), '("label", DOMAudioTrackLabelPropertyInfo), '("language", DOMAudioTrackLanguagePropertyInfo)] :: [(Symbol, *)]) +type DOMAudioTrackAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("enabled", DOMAudioTrackEnabledPropertyInfo), '("id", DOMAudioTrackIdPropertyInfo), '("kind", DOMAudioTrackKindPropertyInfo), '("label", DOMAudioTrackLabelPropertyInfo), '("language", DOMAudioTrackLanguagePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMAudioTrack = DOMAudioTrackSignalList -type DOMAudioTrackSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMAudioTrackSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMAudioTrack::get_enabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -224,8 +269,8 @@ dOMAudioTrackGetEnabled :: (MonadIO m, DOMAudioTrackK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMAudioTrackGetEnabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_audio_track_get_enabled _obj' @@ -233,11 +278,14 @@ touchManagedPtr _obj return result' +data DOMAudioTrackGetEnabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMAudioTrackK a) => MethodInfo DOMAudioTrackGetEnabledMethodInfo a signature where + overloadedMethod _ = dOMAudioTrackGetEnabled + -- method DOMAudioTrack::get_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -249,8 +297,8 @@ dOMAudioTrackGetId :: (MonadIO m, DOMAudioTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMAudioTrackGetId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_audio_track_get_id _obj' @@ -260,11 +308,14 @@ touchManagedPtr _obj return result' +data DOMAudioTrackGetIdMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMAudioTrackK a) => MethodInfo DOMAudioTrackGetIdMethodInfo a signature where + overloadedMethod _ = dOMAudioTrackGetId + -- method DOMAudioTrack::get_kind -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -276,8 +327,8 @@ dOMAudioTrackGetKind :: (MonadIO m, DOMAudioTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMAudioTrackGetKind _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_audio_track_get_kind _obj' @@ -287,11 +338,14 @@ touchManagedPtr _obj return result' +data DOMAudioTrackGetKindMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMAudioTrackK a) => MethodInfo DOMAudioTrackGetKindMethodInfo a signature where + overloadedMethod _ = dOMAudioTrackGetKind + -- method DOMAudioTrack::get_label -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -303,8 +357,8 @@ dOMAudioTrackGetLabel :: (MonadIO m, DOMAudioTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMAudioTrackGetLabel _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_audio_track_get_label _obj' @@ -314,11 +368,14 @@ touchManagedPtr _obj return result' +data DOMAudioTrackGetLabelMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMAudioTrackK a) => MethodInfo DOMAudioTrackGetLabelMethodInfo a signature where + overloadedMethod _ = dOMAudioTrackGetLabel + -- method DOMAudioTrack::get_language -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -330,8 +387,8 @@ dOMAudioTrackGetLanguage :: (MonadIO m, DOMAudioTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMAudioTrackGetLanguage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_audio_track_get_language _obj' @@ -341,11 +398,14 @@ touchManagedPtr _obj return result' +data DOMAudioTrackGetLanguageMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMAudioTrackK a) => MethodInfo DOMAudioTrackGetLanguageMethodInfo a signature where + overloadedMethod _ = dOMAudioTrackGetLanguage + -- method DOMAudioTrack::set_enabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -358,14 +418,18 @@ dOMAudioTrackSetEnabled :: (MonadIO m, DOMAudioTrackK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMAudioTrackSetEnabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_audio_track_set_enabled _obj' value' touchManagedPtr _obj return () + +data DOMAudioTrackSetEnabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMAudioTrackK a) => MethodInfo DOMAudioTrackSetEnabledMethodInfo a signature where + overloadedMethod _ = dOMAudioTrackSetEnabled diff --git a/GI/WebKit/Objects/DOMAudioTrack.hs-boot b/GI/WebKit/Objects/DOMAudioTrack.hs-boot --- a/GI/WebKit/Objects/DOMAudioTrack.hs-boot +++ b/GI/WebKit/Objects/DOMAudioTrack.hs-boot @@ -16,3 +16,9 @@ data DOMAudioTrackKindPropertyInfo data DOMAudioTrackLabelPropertyInfo data DOMAudioTrackLanguagePropertyInfo +data DOMAudioTrackGetEnabledMethodInfo +data DOMAudioTrackGetIdMethodInfo +data DOMAudioTrackGetKindMethodInfo +data DOMAudioTrackGetLabelMethodInfo +data DOMAudioTrackGetLanguageMethodInfo +data DOMAudioTrackSetEnabledMethodInfo diff --git a/GI/WebKit/Objects/DOMAudioTrackList.hs b/GI/WebKit/Objects/DOMAudioTrackList.hs --- a/GI/WebKit/Objects/DOMAudioTrackList.hs +++ b/GI/WebKit/Objects/DOMAudioTrackList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMAudioTrackListDispatchEvent + DOMAudioTrackListDispatchEventMethodInfo, dOMAudioTrackListDispatchEvent , -- ** dOMAudioTrackListGetLength + DOMAudioTrackListGetLengthMethodInfo , dOMAudioTrackListGetLength , -- ** dOMAudioTrackListGetTrackById + DOMAudioTrackListGetTrackByIdMethodInfo , dOMAudioTrackListGetTrackById , -- ** dOMAudioTrackListItem + DOMAudioTrackListItemMethodInfo , dOMAudioTrackListItem , @@ -76,6 +81,44 @@ noDOMAudioTrackList :: Maybe DOMAudioTrackList noDOMAudioTrackList = Nothing +type family ResolveDOMAudioTrackListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMAudioTrackListMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMAudioTrackListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMAudioTrackListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMAudioTrackListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMAudioTrackListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMAudioTrackListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMAudioTrackListMethod "item" o = DOMAudioTrackListItemMethodInfo + ResolveDOMAudioTrackListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMAudioTrackListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMAudioTrackListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMAudioTrackListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMAudioTrackListMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMAudioTrackListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMAudioTrackListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMAudioTrackListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMAudioTrackListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMAudioTrackListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMAudioTrackListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMAudioTrackListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMAudioTrackListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMAudioTrackListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMAudioTrackListMethod "getLength" o = DOMAudioTrackListGetLengthMethodInfo + ResolveDOMAudioTrackListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMAudioTrackListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMAudioTrackListMethod "getTrackById" o = DOMAudioTrackListGetTrackByIdMethodInfo + ResolveDOMAudioTrackListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMAudioTrackListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMAudioTrackListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMAudioTrackListMethod t DOMAudioTrackList, MethodInfo info DOMAudioTrackList p) => IsLabelProxy t (DOMAudioTrackList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMAudioTrackListMethod t DOMAudioTrackList, MethodInfo info DOMAudioTrackList p) => IsLabel t (DOMAudioTrackList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -89,22 +132,21 @@ type AttrSetTypeConstraint DOMAudioTrackListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMAudioTrackListLengthPropertyInfo = DOMAudioTrackListK type AttrGetType DOMAudioTrackListLengthPropertyInfo = Word64 - type AttrLabel DOMAudioTrackListLengthPropertyInfo = "DOMAudioTrackList::length" + type AttrLabel DOMAudioTrackListLengthPropertyInfo = "length" attrGet _ = getDOMAudioTrackListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMAudioTrackList = DOMAudioTrackListAttributeList -type DOMAudioTrackListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMAudioTrackListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMAudioTrackListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMAudioTrackListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMAudioTrackList = DOMAudioTrackListSignalList -type DOMAudioTrackListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMAudioTrackListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMAudioTrackList::dispatch_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -118,9 +160,9 @@ {-# DEPRECATED dOMAudioTrackListDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-} dOMAudioTrackListDispatchEvent :: (MonadIO m, DOMAudioTrackListK a, DOMEventK b) => - a -> -- _obj - b -> -- evt - m () + a -- _obj + -> b -- evt + -> m () -- result dOMAudioTrackListDispatchEvent _obj evt = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let evt' = unsafeManagedPtrCastPtr evt @@ -133,11 +175,14 @@ return () ) +data DOMAudioTrackListDispatchEventMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMAudioTrackListK a, DOMEventK b) => MethodInfo DOMAudioTrackListDispatchEventMethodInfo a signature where + overloadedMethod _ = dOMAudioTrackListDispatchEvent + -- method DOMAudioTrackList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -149,19 +194,22 @@ dOMAudioTrackListGetLength :: (MonadIO m, DOMAudioTrackListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMAudioTrackListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_audio_track_list_get_length _obj' touchManagedPtr _obj return result +data DOMAudioTrackListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMAudioTrackListK a) => MethodInfo DOMAudioTrackListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMAudioTrackListGetLength + -- method DOMAudioTrackList::get_track_by_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMAudioTrack" -- throws : False -- Skip return : False @@ -174,9 +222,9 @@ dOMAudioTrackListGetTrackById :: (MonadIO m, DOMAudioTrackListK a) => - a -> -- _obj - T.Text -> -- id - m DOMAudioTrack + a -- _obj + -> T.Text -- id + -> m DOMAudioTrack -- result dOMAudioTrackListGetTrackById _obj id = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj id' <- textToCString id @@ -187,11 +235,14 @@ freeMem id' return result' +data DOMAudioTrackListGetTrackByIdMethodInfo +instance (signature ~ (T.Text -> m DOMAudioTrack), MonadIO m, DOMAudioTrackListK a) => MethodInfo DOMAudioTrackListGetTrackByIdMethodInfo a signature where + overloadedMethod _ = dOMAudioTrackListGetTrackById + -- method DOMAudioTrackList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMAudioTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMAudioTrack" -- throws : False -- Skip return : False @@ -204,9 +255,9 @@ dOMAudioTrackListItem :: (MonadIO m, DOMAudioTrackListK a) => - a -> -- _obj - Word64 -> -- index - m DOMAudioTrack + a -- _obj + -> Word64 -- index + -> m DOMAudioTrack -- result dOMAudioTrackListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_audio_track_list_item _obj' index @@ -214,5 +265,9 @@ result' <- (wrapObject DOMAudioTrack) result touchManagedPtr _obj return result' + +data DOMAudioTrackListItemMethodInfo +instance (signature ~ (Word64 -> m DOMAudioTrack), MonadIO m, DOMAudioTrackListK a) => MethodInfo DOMAudioTrackListItemMethodInfo a signature where + overloadedMethod _ = dOMAudioTrackListItem diff --git a/GI/WebKit/Objects/DOMAudioTrackList.hs-boot b/GI/WebKit/Objects/DOMAudioTrackList.hs-boot --- a/GI/WebKit/Objects/DOMAudioTrackList.hs-boot +++ b/GI/WebKit/Objects/DOMAudioTrackList.hs-boot @@ -12,3 +12,7 @@ class GObject o => DOMAudioTrackListK o instance (GObject o, IsDescendantOf DOMAudioTrackList o) => DOMAudioTrackListK o data DOMAudioTrackListLengthPropertyInfo +data DOMAudioTrackListDispatchEventMethodInfo +data DOMAudioTrackListGetLengthMethodInfo +data DOMAudioTrackListGetTrackByIdMethodInfo +data DOMAudioTrackListItemMethodInfo diff --git a/GI/WebKit/Objects/DOMBarInfo.hs b/GI/WebKit/Objects/DOMBarInfo.hs --- a/GI/WebKit/Objects/DOMBarInfo.hs +++ b/GI/WebKit/Objects/DOMBarInfo.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -64,6 +65,39 @@ noDOMBarInfo :: Maybe DOMBarInfo noDOMBarInfo = Nothing +type family ResolveDOMBarInfoMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMBarInfoMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMBarInfoMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMBarInfoMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMBarInfoMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMBarInfoMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMBarInfoMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMBarInfoMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMBarInfoMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMBarInfoMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMBarInfoMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMBarInfoMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMBarInfoMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMBarInfoMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMBarInfoMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMBarInfoMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMBarInfoMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMBarInfoMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMBarInfoMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMBarInfoMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMBarInfoMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMBarInfoMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMBarInfoMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMBarInfoMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMBarInfoMethod t DOMBarInfo, MethodInfo info DOMBarInfo p) => IsLabelProxy t (DOMBarInfo -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMBarInfoMethod t DOMBarInfo, MethodInfo info DOMBarInfo p) => IsLabel t (DOMBarInfo -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "visible" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -77,22 +111,21 @@ type AttrSetTypeConstraint DOMBarInfoVisiblePropertyInfo = (~) () type AttrBaseTypeConstraint DOMBarInfoVisiblePropertyInfo = DOMBarInfoK type AttrGetType DOMBarInfoVisiblePropertyInfo = Bool - type AttrLabel DOMBarInfoVisiblePropertyInfo = "DOMBarInfo::visible" + type AttrLabel DOMBarInfoVisiblePropertyInfo = "visible" attrGet _ = getDOMBarInfoVisible attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMBarInfo = DOMBarInfoAttributeList -type DOMBarInfoAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("visible", DOMBarInfoVisiblePropertyInfo)] :: [(Symbol, *)]) +type DOMBarInfoAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("visible", DOMBarInfoVisiblePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMBarInfo = DOMBarInfoSignalList -type DOMBarInfoSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMBarInfoSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMBarInfo::get_visible -- method type : MemberFunction --- Args : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -104,8 +137,8 @@ {-# DEPRECATED dOMBarInfoGetVisible ["(Since version 2.2)"]#-} dOMBarInfoGetVisible :: (MonadIO m) => - Ptr () -> -- self - m Bool + Ptr () -- self + -> m Bool -- result dOMBarInfoGetVisible self = liftIO $ do result <- webkit_dom_bar_info_get_visible self let result' = (/= 0) result diff --git a/GI/WebKit/Objects/DOMBarProp.hs b/GI/WebKit/Objects/DOMBarProp.hs --- a/GI/WebKit/Objects/DOMBarProp.hs +++ b/GI/WebKit/Objects/DOMBarProp.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** dOMBarPropGetVisible + DOMBarPropGetVisibleMethodInfo , dOMBarPropGetVisible , @@ -64,6 +66,40 @@ noDOMBarProp :: Maybe DOMBarProp noDOMBarProp = Nothing +type family ResolveDOMBarPropMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMBarPropMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMBarPropMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMBarPropMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMBarPropMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMBarPropMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMBarPropMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMBarPropMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMBarPropMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMBarPropMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMBarPropMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMBarPropMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMBarPropMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMBarPropMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMBarPropMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMBarPropMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMBarPropMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMBarPropMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMBarPropMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMBarPropMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMBarPropMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMBarPropMethod "getVisible" o = DOMBarPropGetVisibleMethodInfo + ResolveDOMBarPropMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMBarPropMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMBarPropMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMBarPropMethod t DOMBarProp, MethodInfo info DOMBarProp p) => IsLabelProxy t (DOMBarProp -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMBarPropMethod t DOMBarProp, MethodInfo info DOMBarProp p) => IsLabel t (DOMBarProp -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "visible" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -77,22 +113,21 @@ type AttrSetTypeConstraint DOMBarPropVisiblePropertyInfo = (~) () type AttrBaseTypeConstraint DOMBarPropVisiblePropertyInfo = DOMBarPropK type AttrGetType DOMBarPropVisiblePropertyInfo = Bool - type AttrLabel DOMBarPropVisiblePropertyInfo = "DOMBarProp::visible" + type AttrLabel DOMBarPropVisiblePropertyInfo = "visible" attrGet _ = getDOMBarPropVisible attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMBarProp = DOMBarPropAttributeList -type DOMBarPropAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("visible", DOMBarPropVisiblePropertyInfo)] :: [(Symbol, *)]) +type DOMBarPropAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("visible", DOMBarPropVisiblePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMBarProp = DOMBarPropSignalList -type DOMBarPropSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMBarPropSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMBarProp::get_visible -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBarProp", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMBarProp", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBarProp", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -104,13 +139,17 @@ dOMBarPropGetVisible :: (MonadIO m, DOMBarPropK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMBarPropGetVisible _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_bar_prop_get_visible _obj' let result' = (/= 0) result touchManagedPtr _obj return result' + +data DOMBarPropGetVisibleMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMBarPropK a) => MethodInfo DOMBarPropGetVisibleMethodInfo a signature where + overloadedMethod _ = dOMBarPropGetVisible diff --git a/GI/WebKit/Objects/DOMBarProp.hs-boot b/GI/WebKit/Objects/DOMBarProp.hs-boot --- a/GI/WebKit/Objects/DOMBarProp.hs-boot +++ b/GI/WebKit/Objects/DOMBarProp.hs-boot @@ -12,3 +12,4 @@ class GObject o => DOMBarPropK o instance (GObject o, IsDescendantOf DOMBarProp o) => DOMBarPropK o data DOMBarPropVisiblePropertyInfo +data DOMBarPropGetVisibleMethodInfo diff --git a/GI/WebKit/Objects/DOMBatteryManager.hs b/GI/WebKit/Objects/DOMBatteryManager.hs --- a/GI/WebKit/Objects/DOMBatteryManager.hs +++ b/GI/WebKit/Objects/DOMBatteryManager.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,22 +18,27 @@ -- * Methods -- ** dOMBatteryManagerDispatchEvent + DOMBatteryManagerDispatchEventMethodInfo, dOMBatteryManagerDispatchEvent , -- ** dOMBatteryManagerGetCharging + DOMBatteryManagerGetChargingMethodInfo , dOMBatteryManagerGetCharging , -- ** dOMBatteryManagerGetChargingTime + DOMBatteryManagerGetChargingTimeMethodInfo, dOMBatteryManagerGetChargingTime , -- ** dOMBatteryManagerGetDischargingTime + DOMBatteryManagerGetDischargingTimeMethodInfo, dOMBatteryManagerGetDischargingTime , -- ** dOMBatteryManagerGetLevel + DOMBatteryManagerGetLevelMethodInfo , dOMBatteryManagerGetLevel , @@ -95,6 +101,45 @@ noDOMBatteryManager :: Maybe DOMBatteryManager noDOMBatteryManager = Nothing +type family ResolveDOMBatteryManagerMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMBatteryManagerMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMBatteryManagerMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMBatteryManagerMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMBatteryManagerMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMBatteryManagerMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMBatteryManagerMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMBatteryManagerMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMBatteryManagerMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMBatteryManagerMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMBatteryManagerMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMBatteryManagerMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMBatteryManagerMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMBatteryManagerMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMBatteryManagerMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMBatteryManagerMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMBatteryManagerMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMBatteryManagerMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMBatteryManagerMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMBatteryManagerMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMBatteryManagerMethod "getCharging" o = DOMBatteryManagerGetChargingMethodInfo + ResolveDOMBatteryManagerMethod "getChargingTime" o = DOMBatteryManagerGetChargingTimeMethodInfo + ResolveDOMBatteryManagerMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMBatteryManagerMethod "getDischargingTime" o = DOMBatteryManagerGetDischargingTimeMethodInfo + ResolveDOMBatteryManagerMethod "getLevel" o = DOMBatteryManagerGetLevelMethodInfo + ResolveDOMBatteryManagerMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMBatteryManagerMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMBatteryManagerMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMBatteryManagerMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMBatteryManagerMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMBatteryManagerMethod t DOMBatteryManager, MethodInfo info DOMBatteryManager p) => IsLabelProxy t (DOMBatteryManager -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMBatteryManagerMethod t DOMBatteryManager, MethodInfo info DOMBatteryManager p) => IsLabel t (DOMBatteryManager -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "charging" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -108,7 +153,7 @@ type AttrSetTypeConstraint DOMBatteryManagerChargingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMBatteryManagerChargingPropertyInfo = DOMBatteryManagerK type AttrGetType DOMBatteryManagerChargingPropertyInfo = Bool - type AttrLabel DOMBatteryManagerChargingPropertyInfo = "DOMBatteryManager::charging" + type AttrLabel DOMBatteryManagerChargingPropertyInfo = "charging" attrGet _ = getDOMBatteryManagerCharging attrSet _ = undefined attrConstruct _ = undefined @@ -126,7 +171,7 @@ type AttrSetTypeConstraint DOMBatteryManagerChargingTimePropertyInfo = (~) () type AttrBaseTypeConstraint DOMBatteryManagerChargingTimePropertyInfo = DOMBatteryManagerK type AttrGetType DOMBatteryManagerChargingTimePropertyInfo = Double - type AttrLabel DOMBatteryManagerChargingTimePropertyInfo = "DOMBatteryManager::charging-time" + type AttrLabel DOMBatteryManagerChargingTimePropertyInfo = "charging-time" attrGet _ = getDOMBatteryManagerChargingTime attrSet _ = undefined attrConstruct _ = undefined @@ -144,7 +189,7 @@ type AttrSetTypeConstraint DOMBatteryManagerDischargingTimePropertyInfo = (~) () type AttrBaseTypeConstraint DOMBatteryManagerDischargingTimePropertyInfo = DOMBatteryManagerK type AttrGetType DOMBatteryManagerDischargingTimePropertyInfo = Double - type AttrLabel DOMBatteryManagerDischargingTimePropertyInfo = "DOMBatteryManager::discharging-time" + type AttrLabel DOMBatteryManagerDischargingTimePropertyInfo = "discharging-time" attrGet _ = getDOMBatteryManagerDischargingTime attrSet _ = undefined attrConstruct _ = undefined @@ -162,22 +207,21 @@ type AttrSetTypeConstraint DOMBatteryManagerLevelPropertyInfo = (~) () type AttrBaseTypeConstraint DOMBatteryManagerLevelPropertyInfo = DOMBatteryManagerK type AttrGetType DOMBatteryManagerLevelPropertyInfo = Double - type AttrLabel DOMBatteryManagerLevelPropertyInfo = "DOMBatteryManager::level" + type AttrLabel DOMBatteryManagerLevelPropertyInfo = "level" attrGet _ = getDOMBatteryManagerLevel attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMBatteryManager = DOMBatteryManagerAttributeList -type DOMBatteryManagerAttributeList = ('[ '("charging", DOMBatteryManagerChargingPropertyInfo), '("charging-time", DOMBatteryManagerChargingTimePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("discharging-time", DOMBatteryManagerDischargingTimePropertyInfo), '("level", DOMBatteryManagerLevelPropertyInfo)] :: [(Symbol, *)]) +type DOMBatteryManagerAttributeList = ('[ '("charging", DOMBatteryManagerChargingPropertyInfo), '("chargingTime", DOMBatteryManagerChargingTimePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dischargingTime", DOMBatteryManagerDischargingTimePropertyInfo), '("level", DOMBatteryManagerLevelPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMBatteryManager = DOMBatteryManagerSignalList -type DOMBatteryManagerSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMBatteryManagerSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMBatteryManager::dispatch_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -191,9 +235,9 @@ {-# DEPRECATED dOMBatteryManagerDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-} dOMBatteryManagerDispatchEvent :: (MonadIO m, DOMBatteryManagerK a, DOMEventK b) => - a -> -- _obj - b -> -- event - m () + a -- _obj + -> b -- event + -> m () -- result dOMBatteryManagerDispatchEvent _obj event = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let event' = unsafeManagedPtrCastPtr event @@ -206,11 +250,14 @@ return () ) +data DOMBatteryManagerDispatchEventMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMBatteryManagerK a, DOMEventK b) => MethodInfo DOMBatteryManagerDispatchEventMethodInfo a signature where + overloadedMethod _ = dOMBatteryManagerDispatchEvent + -- method DOMBatteryManager::get_charging -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -222,8 +269,8 @@ dOMBatteryManagerGetCharging :: (MonadIO m, DOMBatteryManagerK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMBatteryManagerGetCharging _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_battery_manager_get_charging _obj' @@ -231,11 +278,14 @@ touchManagedPtr _obj return result' +data DOMBatteryManagerGetChargingMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMBatteryManagerK a) => MethodInfo DOMBatteryManagerGetChargingMethodInfo a signature where + overloadedMethod _ = dOMBatteryManagerGetCharging + -- method DOMBatteryManager::get_charging_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -247,8 +297,8 @@ dOMBatteryManagerGetChargingTime :: (MonadIO m, DOMBatteryManagerK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMBatteryManagerGetChargingTime _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_battery_manager_get_charging_time _obj' @@ -256,11 +306,14 @@ touchManagedPtr _obj return result' +data DOMBatteryManagerGetChargingTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMBatteryManagerK a) => MethodInfo DOMBatteryManagerGetChargingTimeMethodInfo a signature where + overloadedMethod _ = dOMBatteryManagerGetChargingTime + -- method DOMBatteryManager::get_discharging_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -272,8 +325,8 @@ dOMBatteryManagerGetDischargingTime :: (MonadIO m, DOMBatteryManagerK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMBatteryManagerGetDischargingTime _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_battery_manager_get_discharging_time _obj' @@ -281,11 +334,14 @@ touchManagedPtr _obj return result' +data DOMBatteryManagerGetDischargingTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMBatteryManagerK a) => MethodInfo DOMBatteryManagerGetDischargingTimeMethodInfo a signature where + overloadedMethod _ = dOMBatteryManagerGetDischargingTime + -- method DOMBatteryManager::get_level -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBatteryManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -297,13 +353,17 @@ dOMBatteryManagerGetLevel :: (MonadIO m, DOMBatteryManagerK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMBatteryManagerGetLevel _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_battery_manager_get_level _obj' let result' = realToFrac result touchManagedPtr _obj return result' + +data DOMBatteryManagerGetLevelMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMBatteryManagerK a) => MethodInfo DOMBatteryManagerGetLevelMethodInfo a signature where + overloadedMethod _ = dOMBatteryManagerGetLevel diff --git a/GI/WebKit/Objects/DOMBatteryManager.hs-boot b/GI/WebKit/Objects/DOMBatteryManager.hs-boot --- a/GI/WebKit/Objects/DOMBatteryManager.hs-boot +++ b/GI/WebKit/Objects/DOMBatteryManager.hs-boot @@ -15,3 +15,8 @@ data DOMBatteryManagerChargingTimePropertyInfo data DOMBatteryManagerDischargingTimePropertyInfo data DOMBatteryManagerLevelPropertyInfo +data DOMBatteryManagerDispatchEventMethodInfo +data DOMBatteryManagerGetChargingMethodInfo +data DOMBatteryManagerGetChargingTimeMethodInfo +data DOMBatteryManagerGetDischargingTimeMethodInfo +data DOMBatteryManagerGetLevelMethodInfo diff --git a/GI/WebKit/Objects/DOMBlob.hs b/GI/WebKit/Objects/DOMBlob.hs --- a/GI/WebKit/Objects/DOMBlob.hs +++ b/GI/WebKit/Objects/DOMBlob.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMBlobGetSize + DOMBlobGetSizeMethodInfo , dOMBlobGetSize , -- ** dOMBlobSlice + DOMBlobSliceMethodInfo , dOMBlobSlice , -- ** dOMBlobWebkitSlice + DOMBlobWebkitSliceMethodInfo , dOMBlobWebkitSlice , @@ -77,6 +81,42 @@ noDOMBlob :: Maybe DOMBlob noDOMBlob = Nothing +type family ResolveDOMBlobMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMBlobMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMBlobMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMBlobMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMBlobMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMBlobMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMBlobMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMBlobMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMBlobMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMBlobMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMBlobMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMBlobMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMBlobMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMBlobMethod "slice" o = DOMBlobSliceMethodInfo + ResolveDOMBlobMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMBlobMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMBlobMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMBlobMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMBlobMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMBlobMethod "webkitSlice" o = DOMBlobWebkitSliceMethodInfo + ResolveDOMBlobMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMBlobMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMBlobMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMBlobMethod "getSize" o = DOMBlobGetSizeMethodInfo + ResolveDOMBlobMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMBlobMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMBlobMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMBlobMethod t DOMBlob, MethodInfo info DOMBlob p) => IsLabelProxy t (DOMBlob -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMBlobMethod t DOMBlob, MethodInfo info DOMBlob p) => IsLabel t (DOMBlob -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "size" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -90,7 +130,7 @@ type AttrSetTypeConstraint DOMBlobSizePropertyInfo = (~) () type AttrBaseTypeConstraint DOMBlobSizePropertyInfo = DOMBlobK type AttrGetType DOMBlobSizePropertyInfo = Word64 - type AttrLabel DOMBlobSizePropertyInfo = "DOMBlob::size" + type AttrLabel DOMBlobSizePropertyInfo = "size" attrGet _ = getDOMBlobSize attrSet _ = undefined attrConstruct _ = undefined @@ -108,22 +148,21 @@ type AttrSetTypeConstraint DOMBlobTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMBlobTypePropertyInfo = DOMBlobK type AttrGetType DOMBlobTypePropertyInfo = T.Text - type AttrLabel DOMBlobTypePropertyInfo = "DOMBlob::type" + type AttrLabel DOMBlobTypePropertyInfo = "type" attrGet _ = getDOMBlobType attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMBlob = DOMBlobAttributeList -type DOMBlobAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("size", DOMBlobSizePropertyInfo), '("type", DOMBlobTypePropertyInfo)] :: [(Symbol, *)]) +type DOMBlobAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("size", DOMBlobSizePropertyInfo), '("type", DOMBlobTypePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMBlob = DOMBlobSignalList -type DOMBlobSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMBlobSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMBlob::get_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBlob", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMBlob", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBlob", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -135,19 +174,22 @@ dOMBlobGetSize :: (MonadIO m, DOMBlobK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMBlobGetSize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_blob_get_size _obj' touchManagedPtr _obj return result +data DOMBlobGetSizeMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMBlobK a) => MethodInfo DOMBlobGetSizeMethodInfo a signature where + overloadedMethod _ = dOMBlobGetSize + -- method DOMBlob::slice -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBlob", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "start", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "end", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "contentType", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMBlob", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "contentType", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBlob", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "start", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "end", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "contentType", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMBlob" -- throws : False -- Skip return : False @@ -162,11 +204,11 @@ dOMBlobSlice :: (MonadIO m, DOMBlobK a) => - a -> -- _obj - Int64 -> -- start - Int64 -> -- end - T.Text -> -- contentType - m DOMBlob + a -- _obj + -> Int64 -- start + -> Int64 -- end + -> T.Text -- contentType + -> m DOMBlob -- result dOMBlobSlice _obj start end contentType = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj contentType' <- textToCString contentType @@ -177,11 +219,14 @@ freeMem contentType' return result' +data DOMBlobSliceMethodInfo +instance (signature ~ (Int64 -> Int64 -> T.Text -> m DOMBlob), MonadIO m, DOMBlobK a) => MethodInfo DOMBlobSliceMethodInfo a signature where + overloadedMethod _ = dOMBlobSlice + -- method DOMBlob::webkit_slice -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBlob", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "start", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "end", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMBlob", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "content_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMBlob", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "start", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "end", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMBlob" -- throws : False -- Skip return : False @@ -196,19 +241,23 @@ {-# DEPRECATED dOMBlobWebkitSlice ["(Since version 1.10)","Use webkit_dom_blob_slice() instead."]#-} dOMBlobWebkitSlice :: (MonadIO m, DOMBlobK a) => - a -> -- _obj - Int64 -> -- start - Int64 -> -- end - T.Text -> -- content_type - m DOMBlob -dOMBlobWebkitSlice _obj start end content_type = liftIO $ do + a -- _obj + -> Int64 -- start + -> Int64 -- end + -> T.Text -- contentType + -> m DOMBlob -- result +dOMBlobWebkitSlice _obj start end contentType = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - content_type' <- textToCString content_type - result <- webkit_dom_blob_webkit_slice _obj' start end content_type' + contentType' <- textToCString contentType + result <- webkit_dom_blob_webkit_slice _obj' start end contentType' checkUnexpectedReturnNULL "webkit_dom_blob_webkit_slice" result result' <- (newObject DOMBlob) result touchManagedPtr _obj - freeMem content_type' + freeMem contentType' return result' + +data DOMBlobWebkitSliceMethodInfo +instance (signature ~ (Int64 -> Int64 -> T.Text -> m DOMBlob), MonadIO m, DOMBlobK a) => MethodInfo DOMBlobWebkitSliceMethodInfo a signature where + overloadedMethod _ = dOMBlobWebkitSlice diff --git a/GI/WebKit/Objects/DOMBlob.hs-boot b/GI/WebKit/Objects/DOMBlob.hs-boot --- a/GI/WebKit/Objects/DOMBlob.hs-boot +++ b/GI/WebKit/Objects/DOMBlob.hs-boot @@ -13,3 +13,6 @@ instance (GObject o, IsDescendantOf DOMBlob o) => DOMBlobK o data DOMBlobSizePropertyInfo data DOMBlobTypePropertyInfo +data DOMBlobGetSizeMethodInfo +data DOMBlobSliceMethodInfo +data DOMBlobWebkitSliceMethodInfo diff --git a/GI/WebKit/Objects/DOMCDATASection.hs b/GI/WebKit/Objects/DOMCDATASection.hs --- a/GI/WebKit/Objects/DOMCDATASection.hs +++ b/GI/WebKit/Objects/DOMCDATASection.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -49,10 +50,87 @@ noDOMCDATASection :: Maybe DOMCDATASection noDOMCDATASection = Nothing +type family ResolveDOMCDATASectionMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMCDATASectionMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMCDATASectionMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMCDATASectionMethod "appendData" o = DOMCharacterDataAppendDataMethodInfo + ResolveDOMCDATASectionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMCDATASectionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMCDATASectionMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMCDATASectionMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMCDATASectionMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMCDATASectionMethod "deleteData" o = DOMCharacterDataDeleteDataMethodInfo + ResolveDOMCDATASectionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMCDATASectionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMCDATASectionMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMCDATASectionMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMCDATASectionMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMCDATASectionMethod "insertData" o = DOMCharacterDataInsertDataMethodInfo + ResolveDOMCDATASectionMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMCDATASectionMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMCDATASectionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMCDATASectionMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMCDATASectionMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMCDATASectionMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMCDATASectionMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMCDATASectionMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMCDATASectionMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMCDATASectionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMCDATASectionMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMCDATASectionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMCDATASectionMethod "remove" o = DOMCharacterDataRemoveMethodInfo + ResolveDOMCDATASectionMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMCDATASectionMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMCDATASectionMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMCDATASectionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMCDATASectionMethod "replaceWholeText" o = DOMTextReplaceWholeTextMethodInfo + ResolveDOMCDATASectionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMCDATASectionMethod "splitText" o = DOMTextSplitTextMethodInfo + ResolveDOMCDATASectionMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMCDATASectionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMCDATASectionMethod "substringData" o = DOMCharacterDataSubstringDataMethodInfo + ResolveDOMCDATASectionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMCDATASectionMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMCDATASectionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMCDATASectionMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMCDATASectionMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMCDATASectionMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMCDATASectionMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMCDATASectionMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMCDATASectionMethod "getLength" o = DOMCharacterDataGetLengthMethodInfo + ResolveDOMCDATASectionMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMCDATASectionMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMCDATASectionMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMCDATASectionMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMCDATASectionMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMCDATASectionMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMCDATASectionMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMCDATASectionMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMCDATASectionMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMCDATASectionMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMCDATASectionMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMCDATASectionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMCDATASectionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMCDATASectionMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMCDATASectionMethod "getWholeText" o = DOMTextGetWholeTextMethodInfo + ResolveDOMCDATASectionMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMCDATASectionMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMCDATASectionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMCDATASectionMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMCDATASectionMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMCDATASectionMethod t DOMCDATASection, MethodInfo info DOMCDATASection p) => IsLabelProxy t (DOMCDATASection -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMCDATASectionMethod t DOMCDATASection, MethodInfo info DOMCDATASection p) => IsLabel t (DOMCDATASection -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMCDATASection = DOMCDATASectionAttributeList -type DOMCDATASectionAttributeList = ('[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("whole-text", DOMTextWholeTextPropertyInfo)] :: [(Symbol, *)]) +type DOMCDATASectionAttributeList = ('[ '("baseUri", DOMNodeBaseUriPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("wholeText", DOMTextWholeTextPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMCDATASection = DOMCDATASectionSignalList -type DOMCDATASectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMCDATASectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/DOMCSSRule.hs b/GI/WebKit/Objects/DOMCSSRule.hs --- a/GI/WebKit/Objects/DOMCSSRule.hs +++ b/GI/WebKit/Objects/DOMCSSRule.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMCSSRuleGetCssText + DOMCSSRuleGetCssTextMethodInfo , dOMCSSRuleGetCssText , -- ** dOMCSSRuleGetParentRule + DOMCSSRuleGetParentRuleMethodInfo , dOMCSSRuleGetParentRule , -- ** dOMCSSRuleGetParentStyleSheet + DOMCSSRuleGetParentStyleSheetMethodInfo , dOMCSSRuleGetParentStyleSheet , -- ** dOMCSSRuleSetCssText + DOMCSSRuleSetCssTextMethodInfo , dOMCSSRuleSetCssText , @@ -93,6 +98,43 @@ noDOMCSSRule :: Maybe DOMCSSRule noDOMCSSRule = Nothing +type family ResolveDOMCSSRuleMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMCSSRuleMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMCSSRuleMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMCSSRuleMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMCSSRuleMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMCSSRuleMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMCSSRuleMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMCSSRuleMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMCSSRuleMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMCSSRuleMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMCSSRuleMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMCSSRuleMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMCSSRuleMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMCSSRuleMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMCSSRuleMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMCSSRuleMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMCSSRuleMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMCSSRuleMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMCSSRuleMethod "getCssText" o = DOMCSSRuleGetCssTextMethodInfo + ResolveDOMCSSRuleMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMCSSRuleMethod "getParentRule" o = DOMCSSRuleGetParentRuleMethodInfo + ResolveDOMCSSRuleMethod "getParentStyleSheet" o = DOMCSSRuleGetParentStyleSheetMethodInfo + ResolveDOMCSSRuleMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMCSSRuleMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMCSSRuleMethod "setCssText" o = DOMCSSRuleSetCssTextMethodInfo + ResolveDOMCSSRuleMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMCSSRuleMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMCSSRuleMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMCSSRuleMethod t DOMCSSRule, MethodInfo info DOMCSSRule p) => IsLabelProxy t (DOMCSSRule -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMCSSRuleMethod t DOMCSSRule, MethodInfo info DOMCSSRule p) => IsLabel t (DOMCSSRule -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "css-text" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -112,7 +154,7 @@ type AttrSetTypeConstraint DOMCSSRuleCssTextPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMCSSRuleCssTextPropertyInfo = DOMCSSRuleK type AttrGetType DOMCSSRuleCssTextPropertyInfo = T.Text - type AttrLabel DOMCSSRuleCssTextPropertyInfo = "DOMCSSRule::css-text" + type AttrLabel DOMCSSRuleCssTextPropertyInfo = "css-text" attrGet _ = getDOMCSSRuleCssText attrSet _ = setDOMCSSRuleCssText attrConstruct _ = constructDOMCSSRuleCssText @@ -130,7 +172,7 @@ type AttrSetTypeConstraint DOMCSSRuleParentRulePropertyInfo = (~) () type AttrBaseTypeConstraint DOMCSSRuleParentRulePropertyInfo = DOMCSSRuleK type AttrGetType DOMCSSRuleParentRulePropertyInfo = DOMCSSRule - type AttrLabel DOMCSSRuleParentRulePropertyInfo = "DOMCSSRule::parent-rule" + type AttrLabel DOMCSSRuleParentRulePropertyInfo = "parent-rule" attrGet _ = getDOMCSSRuleParentRule attrSet _ = undefined attrConstruct _ = undefined @@ -148,7 +190,7 @@ type AttrSetTypeConstraint DOMCSSRuleParentStyleSheetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMCSSRuleParentStyleSheetPropertyInfo = DOMCSSRuleK type AttrGetType DOMCSSRuleParentStyleSheetPropertyInfo = DOMCSSStyleSheet - type AttrLabel DOMCSSRuleParentStyleSheetPropertyInfo = "DOMCSSRule::parent-style-sheet" + type AttrLabel DOMCSSRuleParentStyleSheetPropertyInfo = "parent-style-sheet" attrGet _ = getDOMCSSRuleParentStyleSheet attrSet _ = undefined attrConstruct _ = undefined @@ -166,22 +208,21 @@ type AttrSetTypeConstraint DOMCSSRuleTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMCSSRuleTypePropertyInfo = DOMCSSRuleK type AttrGetType DOMCSSRuleTypePropertyInfo = Word32 - type AttrLabel DOMCSSRuleTypePropertyInfo = "DOMCSSRule::type" + type AttrLabel DOMCSSRuleTypePropertyInfo = "type" attrGet _ = getDOMCSSRuleType attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMCSSRule = DOMCSSRuleAttributeList -type DOMCSSRuleAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("css-text", DOMCSSRuleCssTextPropertyInfo), '("parent-rule", DOMCSSRuleParentRulePropertyInfo), '("parent-style-sheet", DOMCSSRuleParentStyleSheetPropertyInfo), '("type", DOMCSSRuleTypePropertyInfo)] :: [(Symbol, *)]) +type DOMCSSRuleAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("cssText", DOMCSSRuleCssTextPropertyInfo), '("parentRule", DOMCSSRuleParentRulePropertyInfo), '("parentStyleSheet", DOMCSSRuleParentStyleSheetPropertyInfo), '("type", DOMCSSRuleTypePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMCSSRule = DOMCSSRuleSignalList -type DOMCSSRuleSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMCSSRuleSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMCSSRule::get_css_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -193,8 +234,8 @@ dOMCSSRuleGetCssText :: (MonadIO m, DOMCSSRuleK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMCSSRuleGetCssText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_rule_get_css_text _obj' @@ -204,11 +245,14 @@ touchManagedPtr _obj return result' +data DOMCSSRuleGetCssTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMCSSRuleK a) => MethodInfo DOMCSSRuleGetCssTextMethodInfo a signature where + overloadedMethod _ = dOMCSSRuleGetCssText + -- method DOMCSSRule::get_parent_rule -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMCSSRule" -- throws : False -- Skip return : False @@ -220,8 +264,8 @@ dOMCSSRuleGetParentRule :: (MonadIO m, DOMCSSRuleK a) => - a -> -- _obj - m DOMCSSRule + a -- _obj + -> m DOMCSSRule -- result dOMCSSRuleGetParentRule _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_rule_get_parent_rule _obj' @@ -230,11 +274,14 @@ touchManagedPtr _obj return result' +data DOMCSSRuleGetParentRuleMethodInfo +instance (signature ~ (m DOMCSSRule), MonadIO m, DOMCSSRuleK a) => MethodInfo DOMCSSRuleGetParentRuleMethodInfo a signature where + overloadedMethod _ = dOMCSSRuleGetParentRule + -- method DOMCSSRule::get_parent_style_sheet -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMCSSStyleSheet" -- throws : False -- Skip return : False @@ -246,8 +293,8 @@ dOMCSSRuleGetParentStyleSheet :: (MonadIO m, DOMCSSRuleK a) => - a -> -- _obj - m DOMCSSStyleSheet + a -- _obj + -> m DOMCSSStyleSheet -- result dOMCSSRuleGetParentStyleSheet _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_rule_get_parent_style_sheet _obj' @@ -256,11 +303,14 @@ touchManagedPtr _obj return result' +data DOMCSSRuleGetParentStyleSheetMethodInfo +instance (signature ~ (m DOMCSSStyleSheet), MonadIO m, DOMCSSRuleK a) => MethodInfo DOMCSSRuleGetParentStyleSheetMethodInfo a signature where + overloadedMethod _ = dOMCSSRuleGetParentStyleSheet + -- method DOMCSSRule::set_css_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRule", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -274,9 +324,9 @@ dOMCSSRuleSetCssText :: (MonadIO m, DOMCSSRuleK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMCSSRuleSetCssText _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -288,5 +338,9 @@ ) (do freeMem value' ) + +data DOMCSSRuleSetCssTextMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMCSSRuleK a) => MethodInfo DOMCSSRuleSetCssTextMethodInfo a signature where + overloadedMethod _ = dOMCSSRuleSetCssText diff --git a/GI/WebKit/Objects/DOMCSSRule.hs-boot b/GI/WebKit/Objects/DOMCSSRule.hs-boot --- a/GI/WebKit/Objects/DOMCSSRule.hs-boot +++ b/GI/WebKit/Objects/DOMCSSRule.hs-boot @@ -15,3 +15,7 @@ data DOMCSSRuleParentRulePropertyInfo data DOMCSSRuleParentStyleSheetPropertyInfo data DOMCSSRuleTypePropertyInfo +data DOMCSSRuleGetCssTextMethodInfo +data DOMCSSRuleGetParentRuleMethodInfo +data DOMCSSRuleGetParentStyleSheetMethodInfo +data DOMCSSRuleSetCssTextMethodInfo diff --git a/GI/WebKit/Objects/DOMCSSRuleList.hs b/GI/WebKit/Objects/DOMCSSRuleList.hs --- a/GI/WebKit/Objects/DOMCSSRuleList.hs +++ b/GI/WebKit/Objects/DOMCSSRuleList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMCSSRuleListGetLength + DOMCSSRuleListGetLengthMethodInfo , dOMCSSRuleListGetLength , -- ** dOMCSSRuleListItem + DOMCSSRuleListItemMethodInfo , dOMCSSRuleListItem , @@ -68,6 +71,41 @@ noDOMCSSRuleList :: Maybe DOMCSSRuleList noDOMCSSRuleList = Nothing +type family ResolveDOMCSSRuleListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMCSSRuleListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMCSSRuleListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMCSSRuleListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMCSSRuleListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMCSSRuleListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMCSSRuleListMethod "item" o = DOMCSSRuleListItemMethodInfo + ResolveDOMCSSRuleListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMCSSRuleListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMCSSRuleListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMCSSRuleListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMCSSRuleListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMCSSRuleListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMCSSRuleListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMCSSRuleListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMCSSRuleListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMCSSRuleListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMCSSRuleListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMCSSRuleListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMCSSRuleListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMCSSRuleListMethod "getLength" o = DOMCSSRuleListGetLengthMethodInfo + ResolveDOMCSSRuleListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMCSSRuleListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMCSSRuleListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMCSSRuleListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMCSSRuleListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMCSSRuleListMethod t DOMCSSRuleList, MethodInfo info DOMCSSRuleList p) => IsLabelProxy t (DOMCSSRuleList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMCSSRuleListMethod t DOMCSSRuleList, MethodInfo info DOMCSSRuleList p) => IsLabel t (DOMCSSRuleList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -81,22 +119,21 @@ type AttrSetTypeConstraint DOMCSSRuleListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMCSSRuleListLengthPropertyInfo = DOMCSSRuleListK type AttrGetType DOMCSSRuleListLengthPropertyInfo = Word64 - type AttrLabel DOMCSSRuleListLengthPropertyInfo = "DOMCSSRuleList::length" + type AttrLabel DOMCSSRuleListLengthPropertyInfo = "length" attrGet _ = getDOMCSSRuleListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMCSSRuleList = DOMCSSRuleListAttributeList -type DOMCSSRuleListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMCSSRuleListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMCSSRuleListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMCSSRuleListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMCSSRuleList = DOMCSSRuleListSignalList -type DOMCSSRuleListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMCSSRuleListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMCSSRuleList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRuleList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSRuleList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRuleList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -108,19 +145,22 @@ dOMCSSRuleListGetLength :: (MonadIO m, DOMCSSRuleListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMCSSRuleListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_rule_list_get_length _obj' touchManagedPtr _obj return result +data DOMCSSRuleListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMCSSRuleListK a) => MethodInfo DOMCSSRuleListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMCSSRuleListGetLength + -- method DOMCSSRuleList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRuleList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSRuleList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSRuleList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMCSSRule" -- throws : False -- Skip return : False @@ -133,9 +173,9 @@ dOMCSSRuleListItem :: (MonadIO m, DOMCSSRuleListK a) => - a -> -- _obj - Word64 -> -- index - m DOMCSSRule + a -- _obj + -> Word64 -- index + -> m DOMCSSRule -- result dOMCSSRuleListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_rule_list_item _obj' index @@ -143,5 +183,9 @@ result' <- (wrapObject DOMCSSRule) result touchManagedPtr _obj return result' + +data DOMCSSRuleListItemMethodInfo +instance (signature ~ (Word64 -> m DOMCSSRule), MonadIO m, DOMCSSRuleListK a) => MethodInfo DOMCSSRuleListItemMethodInfo a signature where + overloadedMethod _ = dOMCSSRuleListItem diff --git a/GI/WebKit/Objects/DOMCSSRuleList.hs-boot b/GI/WebKit/Objects/DOMCSSRuleList.hs-boot --- a/GI/WebKit/Objects/DOMCSSRuleList.hs-boot +++ b/GI/WebKit/Objects/DOMCSSRuleList.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMCSSRuleListK o instance (GObject o, IsDescendantOf DOMCSSRuleList o) => DOMCSSRuleListK o data DOMCSSRuleListLengthPropertyInfo +data DOMCSSRuleListGetLengthMethodInfo +data DOMCSSRuleListItemMethodInfo diff --git a/GI/WebKit/Objects/DOMCSSStyleDeclaration.hs b/GI/WebKit/Objects/DOMCSSStyleDeclaration.hs --- a/GI/WebKit/Objects/DOMCSSStyleDeclaration.hs +++ b/GI/WebKit/Objects/DOMCSSStyleDeclaration.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,50 +18,62 @@ -- * Methods -- ** dOMCSSStyleDeclarationGetCssText + DOMCSSStyleDeclarationGetCssTextMethodInfo, dOMCSSStyleDeclarationGetCssText , -- ** dOMCSSStyleDeclarationGetLength + DOMCSSStyleDeclarationGetLengthMethodInfo, dOMCSSStyleDeclarationGetLength , -- ** dOMCSSStyleDeclarationGetParentRule + DOMCSSStyleDeclarationGetParentRuleMethodInfo, dOMCSSStyleDeclarationGetParentRule , -- ** dOMCSSStyleDeclarationGetPropertyCssValue + DOMCSSStyleDeclarationGetPropertyCssValueMethodInfo, dOMCSSStyleDeclarationGetPropertyCssValue, -- ** dOMCSSStyleDeclarationGetPropertyPriority + DOMCSSStyleDeclarationGetPropertyPriorityMethodInfo, dOMCSSStyleDeclarationGetPropertyPriority, -- ** dOMCSSStyleDeclarationGetPropertyShorthand + DOMCSSStyleDeclarationGetPropertyShorthandMethodInfo, dOMCSSStyleDeclarationGetPropertyShorthand, -- ** dOMCSSStyleDeclarationGetPropertyValue + DOMCSSStyleDeclarationGetPropertyValueMethodInfo, dOMCSSStyleDeclarationGetPropertyValue , -- ** dOMCSSStyleDeclarationIsPropertyImplicit + DOMCSSStyleDeclarationIsPropertyImplicitMethodInfo, dOMCSSStyleDeclarationIsPropertyImplicit, -- ** dOMCSSStyleDeclarationItem + DOMCSSStyleDeclarationItemMethodInfo , dOMCSSStyleDeclarationItem , -- ** dOMCSSStyleDeclarationRemoveProperty + DOMCSSStyleDeclarationRemovePropertyMethodInfo, dOMCSSStyleDeclarationRemoveProperty , -- ** dOMCSSStyleDeclarationSetCssText + DOMCSSStyleDeclarationSetCssTextMethodInfo, dOMCSSStyleDeclarationSetCssText , -- ** dOMCSSStyleDeclarationSetProperty + DOMCSSStyleDeclarationSetPropertyMethodInfo, dOMCSSStyleDeclarationSetProperty , @@ -120,6 +133,49 @@ noDOMCSSStyleDeclaration :: Maybe DOMCSSStyleDeclaration noDOMCSSStyleDeclaration = Nothing +type family ResolveDOMCSSStyleDeclarationMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMCSSStyleDeclarationMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMCSSStyleDeclarationMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMCSSStyleDeclarationMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMCSSStyleDeclarationMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMCSSStyleDeclarationMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMCSSStyleDeclarationMethod "isPropertyImplicit" o = DOMCSSStyleDeclarationIsPropertyImplicitMethodInfo + ResolveDOMCSSStyleDeclarationMethod "item" o = DOMCSSStyleDeclarationItemMethodInfo + ResolveDOMCSSStyleDeclarationMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMCSSStyleDeclarationMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMCSSStyleDeclarationMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMCSSStyleDeclarationMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMCSSStyleDeclarationMethod "removeProperty" o = DOMCSSStyleDeclarationRemovePropertyMethodInfo + ResolveDOMCSSStyleDeclarationMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMCSSStyleDeclarationMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMCSSStyleDeclarationMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMCSSStyleDeclarationMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMCSSStyleDeclarationMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMCSSStyleDeclarationMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMCSSStyleDeclarationMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMCSSStyleDeclarationMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMCSSStyleDeclarationMethod "getCssText" o = DOMCSSStyleDeclarationGetCssTextMethodInfo + ResolveDOMCSSStyleDeclarationMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMCSSStyleDeclarationMethod "getLength" o = DOMCSSStyleDeclarationGetLengthMethodInfo + ResolveDOMCSSStyleDeclarationMethod "getParentRule" o = DOMCSSStyleDeclarationGetParentRuleMethodInfo + ResolveDOMCSSStyleDeclarationMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMCSSStyleDeclarationMethod "getPropertyCssValue" o = DOMCSSStyleDeclarationGetPropertyCssValueMethodInfo + ResolveDOMCSSStyleDeclarationMethod "getPropertyPriority" o = DOMCSSStyleDeclarationGetPropertyPriorityMethodInfo + ResolveDOMCSSStyleDeclarationMethod "getPropertyShorthand" o = DOMCSSStyleDeclarationGetPropertyShorthandMethodInfo + ResolveDOMCSSStyleDeclarationMethod "getPropertyValue" o = DOMCSSStyleDeclarationGetPropertyValueMethodInfo + ResolveDOMCSSStyleDeclarationMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMCSSStyleDeclarationMethod "setCssText" o = DOMCSSStyleDeclarationSetCssTextMethodInfo + ResolveDOMCSSStyleDeclarationMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMCSSStyleDeclarationMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMCSSStyleDeclarationMethod t DOMCSSStyleDeclaration, MethodInfo info DOMCSSStyleDeclaration p) => IsLabelProxy t (DOMCSSStyleDeclaration -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMCSSStyleDeclarationMethod t DOMCSSStyleDeclaration, MethodInfo info DOMCSSStyleDeclaration p) => IsLabel t (DOMCSSStyleDeclaration -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "css-text" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -139,7 +195,7 @@ type AttrSetTypeConstraint DOMCSSStyleDeclarationCssTextPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMCSSStyleDeclarationCssTextPropertyInfo = DOMCSSStyleDeclarationK type AttrGetType DOMCSSStyleDeclarationCssTextPropertyInfo = T.Text - type AttrLabel DOMCSSStyleDeclarationCssTextPropertyInfo = "DOMCSSStyleDeclaration::css-text" + type AttrLabel DOMCSSStyleDeclarationCssTextPropertyInfo = "css-text" attrGet _ = getDOMCSSStyleDeclarationCssText attrSet _ = setDOMCSSStyleDeclarationCssText attrConstruct _ = constructDOMCSSStyleDeclarationCssText @@ -157,7 +213,7 @@ type AttrSetTypeConstraint DOMCSSStyleDeclarationLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMCSSStyleDeclarationLengthPropertyInfo = DOMCSSStyleDeclarationK type AttrGetType DOMCSSStyleDeclarationLengthPropertyInfo = Word64 - type AttrLabel DOMCSSStyleDeclarationLengthPropertyInfo = "DOMCSSStyleDeclaration::length" + type AttrLabel DOMCSSStyleDeclarationLengthPropertyInfo = "length" attrGet _ = getDOMCSSStyleDeclarationLength attrSet _ = undefined attrConstruct _ = undefined @@ -175,22 +231,21 @@ type AttrSetTypeConstraint DOMCSSStyleDeclarationParentRulePropertyInfo = (~) () type AttrBaseTypeConstraint DOMCSSStyleDeclarationParentRulePropertyInfo = DOMCSSStyleDeclarationK type AttrGetType DOMCSSStyleDeclarationParentRulePropertyInfo = DOMCSSRule - type AttrLabel DOMCSSStyleDeclarationParentRulePropertyInfo = "DOMCSSStyleDeclaration::parent-rule" + type AttrLabel DOMCSSStyleDeclarationParentRulePropertyInfo = "parent-rule" attrGet _ = getDOMCSSStyleDeclarationParentRule attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMCSSStyleDeclaration = DOMCSSStyleDeclarationAttributeList -type DOMCSSStyleDeclarationAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("css-text", DOMCSSStyleDeclarationCssTextPropertyInfo), '("length", DOMCSSStyleDeclarationLengthPropertyInfo), '("parent-rule", DOMCSSStyleDeclarationParentRulePropertyInfo)] :: [(Symbol, *)]) +type DOMCSSStyleDeclarationAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("cssText", DOMCSSStyleDeclarationCssTextPropertyInfo), '("length", DOMCSSStyleDeclarationLengthPropertyInfo), '("parentRule", DOMCSSStyleDeclarationParentRulePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMCSSStyleDeclaration = DOMCSSStyleDeclarationSignalList -type DOMCSSStyleDeclarationSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMCSSStyleDeclarationSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMCSSStyleDeclaration::get_css_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -202,8 +257,8 @@ dOMCSSStyleDeclarationGetCssText :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMCSSStyleDeclarationGetCssText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_style_declaration_get_css_text _obj' @@ -213,11 +268,14 @@ touchManagedPtr _obj return result' +data DOMCSSStyleDeclarationGetCssTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationGetCssTextMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationGetCssText + -- method DOMCSSStyleDeclaration::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -229,19 +287,22 @@ dOMCSSStyleDeclarationGetLength :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMCSSStyleDeclarationGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_style_declaration_get_length _obj' touchManagedPtr _obj return result +data DOMCSSStyleDeclarationGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationGetLengthMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationGetLength + -- method DOMCSSStyleDeclaration::get_parent_rule -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMCSSRule" -- throws : False -- Skip return : False @@ -253,8 +314,8 @@ dOMCSSStyleDeclarationGetParentRule :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - m DOMCSSRule + a -- _obj + -> m DOMCSSRule -- result dOMCSSStyleDeclarationGetParentRule _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_style_declaration_get_parent_rule _obj' @@ -263,11 +324,14 @@ touchManagedPtr _obj return result' +data DOMCSSStyleDeclarationGetParentRuleMethodInfo +instance (signature ~ (m DOMCSSRule), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationGetParentRuleMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationGetParentRule + -- method DOMCSSStyleDeclaration::get_property_css_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMCSSValue" -- throws : False -- Skip return : False @@ -280,9 +344,9 @@ {-# DEPRECATED dOMCSSStyleDeclarationGetPropertyCssValue ["(Since version 2.2)"]#-} dOMCSSStyleDeclarationGetPropertyCssValue :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - T.Text -> -- propertyName - m DOMCSSValue + a -- _obj + -> T.Text -- propertyName + -> m DOMCSSValue -- result dOMCSSStyleDeclarationGetPropertyCssValue _obj propertyName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj propertyName' <- textToCString propertyName @@ -293,11 +357,14 @@ freeMem propertyName' return result' +data DOMCSSStyleDeclarationGetPropertyCssValueMethodInfo +instance (signature ~ (T.Text -> m DOMCSSValue), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationGetPropertyCssValueMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationGetPropertyCssValue + -- method DOMCSSStyleDeclaration::get_property_priority -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -310,9 +377,9 @@ dOMCSSStyleDeclarationGetPropertyPriority :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - T.Text -> -- propertyName - m T.Text + a -- _obj + -> T.Text -- propertyName + -> m T.Text -- result dOMCSSStyleDeclarationGetPropertyPriority _obj propertyName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj propertyName' <- textToCString propertyName @@ -324,11 +391,14 @@ freeMem propertyName' return result' +data DOMCSSStyleDeclarationGetPropertyPriorityMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationGetPropertyPriorityMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationGetPropertyPriority + -- method DOMCSSStyleDeclaration::get_property_shorthand -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -341,9 +411,9 @@ dOMCSSStyleDeclarationGetPropertyShorthand :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - T.Text -> -- propertyName - m T.Text + a -- _obj + -> T.Text -- propertyName + -> m T.Text -- result dOMCSSStyleDeclarationGetPropertyShorthand _obj propertyName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj propertyName' <- textToCString propertyName @@ -355,11 +425,14 @@ freeMem propertyName' return result' +data DOMCSSStyleDeclarationGetPropertyShorthandMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationGetPropertyShorthandMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationGetPropertyShorthand + -- method DOMCSSStyleDeclaration::get_property_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -372,9 +445,9 @@ dOMCSSStyleDeclarationGetPropertyValue :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - T.Text -> -- propertyName - m T.Text + a -- _obj + -> T.Text -- propertyName + -> m T.Text -- result dOMCSSStyleDeclarationGetPropertyValue _obj propertyName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj propertyName' <- textToCString propertyName @@ -386,11 +459,14 @@ freeMem propertyName' return result' +data DOMCSSStyleDeclarationGetPropertyValueMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationGetPropertyValueMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationGetPropertyValue + -- method DOMCSSStyleDeclaration::is_property_implicit -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -403,9 +479,9 @@ dOMCSSStyleDeclarationIsPropertyImplicit :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - T.Text -> -- propertyName - m Bool + a -- _obj + -> T.Text -- propertyName + -> m Bool -- result dOMCSSStyleDeclarationIsPropertyImplicit _obj propertyName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj propertyName' <- textToCString propertyName @@ -415,11 +491,14 @@ freeMem propertyName' return result' +data DOMCSSStyleDeclarationIsPropertyImplicitMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationIsPropertyImplicitMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationIsPropertyImplicit + -- method DOMCSSStyleDeclaration::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -432,9 +511,9 @@ dOMCSSStyleDeclarationItem :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - Word64 -> -- index - m T.Text + a -- _obj + -> Word64 -- index + -> m T.Text -- result dOMCSSStyleDeclarationItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_style_declaration_item _obj' index @@ -444,11 +523,14 @@ touchManagedPtr _obj return result' +data DOMCSSStyleDeclarationItemMethodInfo +instance (signature ~ (Word64 -> m T.Text), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationItemMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationItem + -- method DOMCSSStyleDeclaration::remove_property -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : True -- Skip return : False @@ -462,9 +544,9 @@ dOMCSSStyleDeclarationRemoveProperty :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - T.Text -> -- propertyName - m T.Text + a -- _obj + -> T.Text -- propertyName + -> m T.Text -- result dOMCSSStyleDeclarationRemoveProperty _obj propertyName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj propertyName' <- textToCString propertyName @@ -480,11 +562,14 @@ freeMem propertyName' ) +data DOMCSSStyleDeclarationRemovePropertyMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationRemovePropertyMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationRemoveProperty + -- method DOMCSSStyleDeclaration::set_css_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -498,9 +583,9 @@ dOMCSSStyleDeclarationSetCssText :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMCSSStyleDeclarationSetCssText _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -513,11 +598,14 @@ freeMem value' ) +data DOMCSSStyleDeclarationSetCssTextMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationSetCssTextMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationSetCssText + -- method DOMCSSStyleDeclaration::set_property -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "priority", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "priority", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleDeclaration", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "propertyName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "priority", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -533,11 +621,11 @@ dOMCSSStyleDeclarationSetProperty :: (MonadIO m, DOMCSSStyleDeclarationK a) => - a -> -- _obj - T.Text -> -- propertyName - T.Text -> -- value - T.Text -> -- priority - m () + a -- _obj + -> T.Text -- propertyName + -> T.Text -- value + -> T.Text -- priority + -> m () -- result dOMCSSStyleDeclarationSetProperty _obj propertyName value priority = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj propertyName' <- textToCString propertyName @@ -555,5 +643,9 @@ freeMem value' freeMem priority' ) + +data DOMCSSStyleDeclarationSetPropertyMethodInfo +instance (signature ~ (T.Text -> T.Text -> T.Text -> m ()), MonadIO m, DOMCSSStyleDeclarationK a) => MethodInfo DOMCSSStyleDeclarationSetPropertyMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleDeclarationSetProperty diff --git a/GI/WebKit/Objects/DOMCSSStyleDeclaration.hs-boot b/GI/WebKit/Objects/DOMCSSStyleDeclaration.hs-boot --- a/GI/WebKit/Objects/DOMCSSStyleDeclaration.hs-boot +++ b/GI/WebKit/Objects/DOMCSSStyleDeclaration.hs-boot @@ -14,3 +14,15 @@ data DOMCSSStyleDeclarationCssTextPropertyInfo data DOMCSSStyleDeclarationLengthPropertyInfo data DOMCSSStyleDeclarationParentRulePropertyInfo +data DOMCSSStyleDeclarationGetCssTextMethodInfo +data DOMCSSStyleDeclarationGetLengthMethodInfo +data DOMCSSStyleDeclarationGetParentRuleMethodInfo +data DOMCSSStyleDeclarationGetPropertyCssValueMethodInfo +data DOMCSSStyleDeclarationGetPropertyPriorityMethodInfo +data DOMCSSStyleDeclarationGetPropertyShorthandMethodInfo +data DOMCSSStyleDeclarationGetPropertyValueMethodInfo +data DOMCSSStyleDeclarationIsPropertyImplicitMethodInfo +data DOMCSSStyleDeclarationItemMethodInfo +data DOMCSSStyleDeclarationRemovePropertyMethodInfo +data DOMCSSStyleDeclarationSetCssTextMethodInfo +data DOMCSSStyleDeclarationSetPropertyMethodInfo diff --git a/GI/WebKit/Objects/DOMCSSStyleSheet.hs b/GI/WebKit/Objects/DOMCSSStyleSheet.hs --- a/GI/WebKit/Objects/DOMCSSStyleSheet.hs +++ b/GI/WebKit/Objects/DOMCSSStyleSheet.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,30 +18,37 @@ -- * Methods -- ** dOMCSSStyleSheetAddRule + DOMCSSStyleSheetAddRuleMethodInfo , dOMCSSStyleSheetAddRule , -- ** dOMCSSStyleSheetDeleteRule + DOMCSSStyleSheetDeleteRuleMethodInfo , dOMCSSStyleSheetDeleteRule , -- ** dOMCSSStyleSheetGetCssRules + DOMCSSStyleSheetGetCssRulesMethodInfo , dOMCSSStyleSheetGetCssRules , -- ** dOMCSSStyleSheetGetOwnerRule + DOMCSSStyleSheetGetOwnerRuleMethodInfo , dOMCSSStyleSheetGetOwnerRule , -- ** dOMCSSStyleSheetGetRules + DOMCSSStyleSheetGetRulesMethodInfo , dOMCSSStyleSheetGetRules , -- ** dOMCSSStyleSheetInsertRule + DOMCSSStyleSheetInsertRuleMethodInfo , dOMCSSStyleSheetInsertRule , -- ** dOMCSSStyleSheetRemoveRule + DOMCSSStyleSheetRemoveRuleMethodInfo , dOMCSSStyleSheetRemoveRule , @@ -98,6 +106,53 @@ noDOMCSSStyleSheet :: Maybe DOMCSSStyleSheet noDOMCSSStyleSheet = Nothing +type family ResolveDOMCSSStyleSheetMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMCSSStyleSheetMethod "addRule" o = DOMCSSStyleSheetAddRuleMethodInfo + ResolveDOMCSSStyleSheetMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMCSSStyleSheetMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMCSSStyleSheetMethod "deleteRule" o = DOMCSSStyleSheetDeleteRuleMethodInfo + ResolveDOMCSSStyleSheetMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMCSSStyleSheetMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMCSSStyleSheetMethod "insertRule" o = DOMCSSStyleSheetInsertRuleMethodInfo + ResolveDOMCSSStyleSheetMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMCSSStyleSheetMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMCSSStyleSheetMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMCSSStyleSheetMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMCSSStyleSheetMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMCSSStyleSheetMethod "removeRule" o = DOMCSSStyleSheetRemoveRuleMethodInfo + ResolveDOMCSSStyleSheetMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMCSSStyleSheetMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMCSSStyleSheetMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMCSSStyleSheetMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMCSSStyleSheetMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMCSSStyleSheetMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMCSSStyleSheetMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMCSSStyleSheetMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMCSSStyleSheetMethod "getCssRules" o = DOMCSSStyleSheetGetCssRulesMethodInfo + ResolveDOMCSSStyleSheetMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMCSSStyleSheetMethod "getDisabled" o = DOMStyleSheetGetDisabledMethodInfo + ResolveDOMCSSStyleSheetMethod "getHref" o = DOMStyleSheetGetHrefMethodInfo + ResolveDOMCSSStyleSheetMethod "getMedia" o = DOMStyleSheetGetMediaMethodInfo + ResolveDOMCSSStyleSheetMethod "getOwnerNode" o = DOMStyleSheetGetOwnerNodeMethodInfo + ResolveDOMCSSStyleSheetMethod "getOwnerRule" o = DOMCSSStyleSheetGetOwnerRuleMethodInfo + ResolveDOMCSSStyleSheetMethod "getParentStyleSheet" o = DOMStyleSheetGetParentStyleSheetMethodInfo + ResolveDOMCSSStyleSheetMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMCSSStyleSheetMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMCSSStyleSheetMethod "getRules" o = DOMCSSStyleSheetGetRulesMethodInfo + ResolveDOMCSSStyleSheetMethod "getTitle" o = DOMStyleSheetGetTitleMethodInfo + ResolveDOMCSSStyleSheetMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMCSSStyleSheetMethod "setDisabled" o = DOMStyleSheetSetDisabledMethodInfo + ResolveDOMCSSStyleSheetMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMCSSStyleSheetMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMCSSStyleSheetMethod t DOMCSSStyleSheet, MethodInfo info DOMCSSStyleSheet p) => IsLabelProxy t (DOMCSSStyleSheet -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMCSSStyleSheetMethod t DOMCSSStyleSheet, MethodInfo info DOMCSSStyleSheet p) => IsLabel t (DOMCSSStyleSheet -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "css-rules" -- Type: TInterface "WebKit" "DOMCSSRuleList" -- Flags: [PropertyReadable] @@ -111,7 +166,7 @@ type AttrSetTypeConstraint DOMCSSStyleSheetCssRulesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMCSSStyleSheetCssRulesPropertyInfo = DOMCSSStyleSheetK type AttrGetType DOMCSSStyleSheetCssRulesPropertyInfo = DOMCSSRuleList - type AttrLabel DOMCSSStyleSheetCssRulesPropertyInfo = "DOMCSSStyleSheet::css-rules" + type AttrLabel DOMCSSStyleSheetCssRulesPropertyInfo = "css-rules" attrGet _ = getDOMCSSStyleSheetCssRules attrSet _ = undefined attrConstruct _ = undefined @@ -129,7 +184,7 @@ type AttrSetTypeConstraint DOMCSSStyleSheetOwnerRulePropertyInfo = (~) () type AttrBaseTypeConstraint DOMCSSStyleSheetOwnerRulePropertyInfo = DOMCSSStyleSheetK type AttrGetType DOMCSSStyleSheetOwnerRulePropertyInfo = DOMCSSRule - type AttrLabel DOMCSSStyleSheetOwnerRulePropertyInfo = "DOMCSSStyleSheet::owner-rule" + type AttrLabel DOMCSSStyleSheetOwnerRulePropertyInfo = "owner-rule" attrGet _ = getDOMCSSStyleSheetOwnerRule attrSet _ = undefined attrConstruct _ = undefined @@ -147,22 +202,21 @@ type AttrSetTypeConstraint DOMCSSStyleSheetRulesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMCSSStyleSheetRulesPropertyInfo = DOMCSSStyleSheetK type AttrGetType DOMCSSStyleSheetRulesPropertyInfo = DOMCSSRuleList - type AttrLabel DOMCSSStyleSheetRulesPropertyInfo = "DOMCSSStyleSheet::rules" + type AttrLabel DOMCSSStyleSheetRulesPropertyInfo = "rules" attrGet _ = getDOMCSSStyleSheetRules attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMCSSStyleSheet = DOMCSSStyleSheetAttributeList -type DOMCSSStyleSheetAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("css-rules", DOMCSSStyleSheetCssRulesPropertyInfo), '("disabled", DOMStyleSheetDisabledPropertyInfo), '("href", DOMStyleSheetHrefPropertyInfo), '("media", DOMStyleSheetMediaPropertyInfo), '("owner-node", DOMStyleSheetOwnerNodePropertyInfo), '("owner-rule", DOMCSSStyleSheetOwnerRulePropertyInfo), '("parent-style-sheet", DOMStyleSheetParentStyleSheetPropertyInfo), '("rules", DOMCSSStyleSheetRulesPropertyInfo), '("title", DOMStyleSheetTitlePropertyInfo), '("type", DOMStyleSheetTypePropertyInfo)] :: [(Symbol, *)]) +type DOMCSSStyleSheetAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("cssRules", DOMCSSStyleSheetCssRulesPropertyInfo), '("disabled", DOMStyleSheetDisabledPropertyInfo), '("href", DOMStyleSheetHrefPropertyInfo), '("media", DOMStyleSheetMediaPropertyInfo), '("ownerNode", DOMStyleSheetOwnerNodePropertyInfo), '("ownerRule", DOMCSSStyleSheetOwnerRulePropertyInfo), '("parentStyleSheet", DOMStyleSheetParentStyleSheetPropertyInfo), '("rules", DOMCSSStyleSheetRulesPropertyInfo), '("title", DOMStyleSheetTitlePropertyInfo), '("type", DOMStyleSheetTypePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMCSSStyleSheet = DOMCSSStyleSheetSignalList -type DOMCSSStyleSheetSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMCSSStyleSheetSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMCSSStyleSheet::add_rule -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selector", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "style", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selector", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "style", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selector", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "style", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : True -- Skip return : False @@ -178,11 +232,11 @@ dOMCSSStyleSheetAddRule :: (MonadIO m, DOMCSSStyleSheetK a) => - a -> -- _obj - T.Text -> -- selector - T.Text -> -- style - Word64 -> -- index - m Int64 + a -- _obj + -> T.Text -- selector + -> T.Text -- style + -> Word64 -- index + -> m Int64 -- result dOMCSSStyleSheetAddRule _obj selector style index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj selector' <- textToCString selector @@ -198,11 +252,14 @@ freeMem style' ) +data DOMCSSStyleSheetAddRuleMethodInfo +instance (signature ~ (T.Text -> T.Text -> Word64 -> m Int64), MonadIO m, DOMCSSStyleSheetK a) => MethodInfo DOMCSSStyleSheetAddRuleMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleSheetAddRule + -- method DOMCSSStyleSheet::delete_rule -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -216,9 +273,9 @@ dOMCSSStyleSheetDeleteRule :: (MonadIO m, DOMCSSStyleSheetK a) => - a -> -- _obj - Word64 -> -- index - m () + a -- _obj + -> Word64 -- index + -> m () -- result dOMCSSStyleSheetDeleteRule _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -229,11 +286,14 @@ return () ) +data DOMCSSStyleSheetDeleteRuleMethodInfo +instance (signature ~ (Word64 -> m ()), MonadIO m, DOMCSSStyleSheetK a) => MethodInfo DOMCSSStyleSheetDeleteRuleMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleSheetDeleteRule + -- method DOMCSSStyleSheet::get_css_rules -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMCSSRuleList" -- throws : False -- Skip return : False @@ -245,8 +305,8 @@ dOMCSSStyleSheetGetCssRules :: (MonadIO m, DOMCSSStyleSheetK a) => - a -> -- _obj - m DOMCSSRuleList + a -- _obj + -> m DOMCSSRuleList -- result dOMCSSStyleSheetGetCssRules _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_style_sheet_get_css_rules _obj' @@ -255,11 +315,14 @@ touchManagedPtr _obj return result' +data DOMCSSStyleSheetGetCssRulesMethodInfo +instance (signature ~ (m DOMCSSRuleList), MonadIO m, DOMCSSStyleSheetK a) => MethodInfo DOMCSSStyleSheetGetCssRulesMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleSheetGetCssRules + -- method DOMCSSStyleSheet::get_owner_rule -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMCSSRule" -- throws : False -- Skip return : False @@ -271,8 +334,8 @@ dOMCSSStyleSheetGetOwnerRule :: (MonadIO m, DOMCSSStyleSheetK a) => - a -> -- _obj - m DOMCSSRule + a -- _obj + -> m DOMCSSRule -- result dOMCSSStyleSheetGetOwnerRule _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_style_sheet_get_owner_rule _obj' @@ -281,11 +344,14 @@ touchManagedPtr _obj return result' +data DOMCSSStyleSheetGetOwnerRuleMethodInfo +instance (signature ~ (m DOMCSSRule), MonadIO m, DOMCSSStyleSheetK a) => MethodInfo DOMCSSStyleSheetGetOwnerRuleMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleSheetGetOwnerRule + -- method DOMCSSStyleSheet::get_rules -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMCSSRuleList" -- throws : False -- Skip return : False @@ -297,8 +363,8 @@ dOMCSSStyleSheetGetRules :: (MonadIO m, DOMCSSStyleSheetK a) => - a -> -- _obj - m DOMCSSRuleList + a -- _obj + -> m DOMCSSRuleList -- result dOMCSSStyleSheetGetRules _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_style_sheet_get_rules _obj' @@ -307,11 +373,14 @@ touchManagedPtr _obj return result' +data DOMCSSStyleSheetGetRulesMethodInfo +instance (signature ~ (m DOMCSSRuleList), MonadIO m, DOMCSSStyleSheetK a) => MethodInfo DOMCSSStyleSheetGetRulesMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleSheetGetRules + -- method DOMCSSStyleSheet::insert_rule -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "rule", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "rule", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "rule", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : True -- Skip return : False @@ -326,10 +395,10 @@ dOMCSSStyleSheetInsertRule :: (MonadIO m, DOMCSSStyleSheetK a) => - a -> -- _obj - T.Text -> -- rule - Word64 -> -- index - m Word64 + a -- _obj + -> T.Text -- rule + -> Word64 -- index + -> m Word64 -- result dOMCSSStyleSheetInsertRule _obj rule index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj rule' <- textToCString rule @@ -342,11 +411,14 @@ freeMem rule' ) +data DOMCSSStyleSheetInsertRuleMethodInfo +instance (signature ~ (T.Text -> Word64 -> m Word64), MonadIO m, DOMCSSStyleSheetK a) => MethodInfo DOMCSSStyleSheetInsertRuleMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleSheetInsertRule + -- method DOMCSSStyleSheet::remove_rule -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -360,9 +432,9 @@ dOMCSSStyleSheetRemoveRule :: (MonadIO m, DOMCSSStyleSheetK a) => - a -> -- _obj - Word64 -> -- index - m () + a -- _obj + -> Word64 -- index + -> m () -- result dOMCSSStyleSheetRemoveRule _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -372,5 +444,9 @@ ) (do return () ) + +data DOMCSSStyleSheetRemoveRuleMethodInfo +instance (signature ~ (Word64 -> m ()), MonadIO m, DOMCSSStyleSheetK a) => MethodInfo DOMCSSStyleSheetRemoveRuleMethodInfo a signature where + overloadedMethod _ = dOMCSSStyleSheetRemoveRule diff --git a/GI/WebKit/Objects/DOMCSSStyleSheet.hs-boot b/GI/WebKit/Objects/DOMCSSStyleSheet.hs-boot --- a/GI/WebKit/Objects/DOMCSSStyleSheet.hs-boot +++ b/GI/WebKit/Objects/DOMCSSStyleSheet.hs-boot @@ -14,3 +14,10 @@ data DOMCSSStyleSheetCssRulesPropertyInfo data DOMCSSStyleSheetOwnerRulePropertyInfo data DOMCSSStyleSheetRulesPropertyInfo +data DOMCSSStyleSheetAddRuleMethodInfo +data DOMCSSStyleSheetDeleteRuleMethodInfo +data DOMCSSStyleSheetGetCssRulesMethodInfo +data DOMCSSStyleSheetGetOwnerRuleMethodInfo +data DOMCSSStyleSheetGetRulesMethodInfo +data DOMCSSStyleSheetInsertRuleMethodInfo +data DOMCSSStyleSheetRemoveRuleMethodInfo diff --git a/GI/WebKit/Objects/DOMCSSValue.hs b/GI/WebKit/Objects/DOMCSSValue.hs --- a/GI/WebKit/Objects/DOMCSSValue.hs +++ b/GI/WebKit/Objects/DOMCSSValue.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMCSSValueGetCssText + DOMCSSValueGetCssTextMethodInfo , dOMCSSValueGetCssText , -- ** dOMCSSValueGetCssValueType + DOMCSSValueGetCssValueTypeMethodInfo , dOMCSSValueGetCssValueType , -- ** dOMCSSValueSetCssText + DOMCSSValueSetCssTextMethodInfo , dOMCSSValueSetCssText , @@ -79,6 +83,42 @@ noDOMCSSValue :: Maybe DOMCSSValue noDOMCSSValue = Nothing +type family ResolveDOMCSSValueMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMCSSValueMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMCSSValueMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMCSSValueMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMCSSValueMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMCSSValueMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMCSSValueMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMCSSValueMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMCSSValueMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMCSSValueMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMCSSValueMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMCSSValueMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMCSSValueMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMCSSValueMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMCSSValueMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMCSSValueMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMCSSValueMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMCSSValueMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMCSSValueMethod "getCssText" o = DOMCSSValueGetCssTextMethodInfo + ResolveDOMCSSValueMethod "getCssValueType" o = DOMCSSValueGetCssValueTypeMethodInfo + ResolveDOMCSSValueMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMCSSValueMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMCSSValueMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMCSSValueMethod "setCssText" o = DOMCSSValueSetCssTextMethodInfo + ResolveDOMCSSValueMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMCSSValueMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMCSSValueMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMCSSValueMethod t DOMCSSValue, MethodInfo info DOMCSSValue p) => IsLabelProxy t (DOMCSSValue -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMCSSValueMethod t DOMCSSValue, MethodInfo info DOMCSSValue p) => IsLabel t (DOMCSSValue -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "css-text" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -98,7 +138,7 @@ type AttrSetTypeConstraint DOMCSSValueCssTextPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMCSSValueCssTextPropertyInfo = DOMCSSValueK type AttrGetType DOMCSSValueCssTextPropertyInfo = T.Text - type AttrLabel DOMCSSValueCssTextPropertyInfo = "DOMCSSValue::css-text" + type AttrLabel DOMCSSValueCssTextPropertyInfo = "css-text" attrGet _ = getDOMCSSValueCssText attrSet _ = setDOMCSSValueCssText attrConstruct _ = constructDOMCSSValueCssText @@ -116,22 +156,21 @@ type AttrSetTypeConstraint DOMCSSValueCssValueTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMCSSValueCssValueTypePropertyInfo = DOMCSSValueK type AttrGetType DOMCSSValueCssValueTypePropertyInfo = Word32 - type AttrLabel DOMCSSValueCssValueTypePropertyInfo = "DOMCSSValue::css-value-type" + type AttrLabel DOMCSSValueCssValueTypePropertyInfo = "css-value-type" attrGet _ = getDOMCSSValueCssValueType attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMCSSValue = DOMCSSValueAttributeList -type DOMCSSValueAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("css-text", DOMCSSValueCssTextPropertyInfo), '("css-value-type", DOMCSSValueCssValueTypePropertyInfo)] :: [(Symbol, *)]) +type DOMCSSValueAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("cssText", DOMCSSValueCssTextPropertyInfo), '("cssValueType", DOMCSSValueCssValueTypePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMCSSValue = DOMCSSValueSignalList -type DOMCSSValueSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMCSSValueSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMCSSValue::get_css_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSValue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSValue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSValue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -143,8 +182,8 @@ dOMCSSValueGetCssText :: (MonadIO m, DOMCSSValueK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMCSSValueGetCssText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_value_get_css_text _obj' @@ -154,11 +193,14 @@ touchManagedPtr _obj return result' +data DOMCSSValueGetCssTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMCSSValueK a) => MethodInfo DOMCSSValueGetCssTextMethodInfo a signature where + overloadedMethod _ = dOMCSSValueGetCssText + -- method DOMCSSValue::get_css_value_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSValue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSValue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSValue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt16 -- throws : False -- Skip return : False @@ -170,19 +212,22 @@ dOMCSSValueGetCssValueType :: (MonadIO m, DOMCSSValueK a) => - a -> -- _obj - m Word16 + a -- _obj + -> m Word16 -- result dOMCSSValueGetCssValueType _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_css_value_get_css_value_type _obj' touchManagedPtr _obj return result +data DOMCSSValueGetCssValueTypeMethodInfo +instance (signature ~ (m Word16), MonadIO m, DOMCSSValueK a) => MethodInfo DOMCSSValueGetCssValueTypeMethodInfo a signature where + overloadedMethod _ = dOMCSSValueGetCssValueType + -- method DOMCSSValue::set_css_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSValue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCSSValue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCSSValue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -196,9 +241,9 @@ dOMCSSValueSetCssText :: (MonadIO m, DOMCSSValueK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMCSSValueSetCssText _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -210,5 +255,9 @@ ) (do freeMem value' ) + +data DOMCSSValueSetCssTextMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMCSSValueK a) => MethodInfo DOMCSSValueSetCssTextMethodInfo a signature where + overloadedMethod _ = dOMCSSValueSetCssText diff --git a/GI/WebKit/Objects/DOMCSSValue.hs-boot b/GI/WebKit/Objects/DOMCSSValue.hs-boot --- a/GI/WebKit/Objects/DOMCSSValue.hs-boot +++ b/GI/WebKit/Objects/DOMCSSValue.hs-boot @@ -13,3 +13,6 @@ instance (GObject o, IsDescendantOf DOMCSSValue o) => DOMCSSValueK o data DOMCSSValueCssTextPropertyInfo data DOMCSSValueCssValueTypePropertyInfo +data DOMCSSValueGetCssTextMethodInfo +data DOMCSSValueGetCssValueTypeMethodInfo +data DOMCSSValueSetCssTextMethodInfo diff --git a/GI/WebKit/Objects/DOMCharacterData.hs b/GI/WebKit/Objects/DOMCharacterData.hs --- a/GI/WebKit/Objects/DOMCharacterData.hs +++ b/GI/WebKit/Objects/DOMCharacterData.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,38 +18,47 @@ -- * Methods -- ** dOMCharacterDataAppendData + DOMCharacterDataAppendDataMethodInfo , dOMCharacterDataAppendData , -- ** dOMCharacterDataDeleteData + DOMCharacterDataDeleteDataMethodInfo , dOMCharacterDataDeleteData , -- ** dOMCharacterDataGetData + DOMCharacterDataGetDataMethodInfo , dOMCharacterDataGetData , -- ** dOMCharacterDataGetLength + DOMCharacterDataGetLengthMethodInfo , dOMCharacterDataGetLength , -- ** dOMCharacterDataInsertData + DOMCharacterDataInsertDataMethodInfo , dOMCharacterDataInsertData , -- ** dOMCharacterDataRemove + DOMCharacterDataRemoveMethodInfo , dOMCharacterDataRemove , -- ** dOMCharacterDataReplaceData + DOMCharacterDataReplaceDataMethodInfo , dOMCharacterDataReplaceData , -- ** dOMCharacterDataSetData + DOMCharacterDataSetDataMethodInfo , dOMCharacterDataSetData , -- ** dOMCharacterDataSubstringData + DOMCharacterDataSubstringDataMethodInfo , dOMCharacterDataSubstringData , @@ -103,6 +113,80 @@ noDOMCharacterData :: Maybe DOMCharacterData noDOMCharacterData = Nothing +type family ResolveDOMCharacterDataMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMCharacterDataMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMCharacterDataMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMCharacterDataMethod "appendData" o = DOMCharacterDataAppendDataMethodInfo + ResolveDOMCharacterDataMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMCharacterDataMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMCharacterDataMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMCharacterDataMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMCharacterDataMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMCharacterDataMethod "deleteData" o = DOMCharacterDataDeleteDataMethodInfo + ResolveDOMCharacterDataMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMCharacterDataMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMCharacterDataMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMCharacterDataMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMCharacterDataMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMCharacterDataMethod "insertData" o = DOMCharacterDataInsertDataMethodInfo + ResolveDOMCharacterDataMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMCharacterDataMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMCharacterDataMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMCharacterDataMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMCharacterDataMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMCharacterDataMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMCharacterDataMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMCharacterDataMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMCharacterDataMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMCharacterDataMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMCharacterDataMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMCharacterDataMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMCharacterDataMethod "remove" o = DOMCharacterDataRemoveMethodInfo + ResolveDOMCharacterDataMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMCharacterDataMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMCharacterDataMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMCharacterDataMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMCharacterDataMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMCharacterDataMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMCharacterDataMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMCharacterDataMethod "substringData" o = DOMCharacterDataSubstringDataMethodInfo + ResolveDOMCharacterDataMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMCharacterDataMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMCharacterDataMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMCharacterDataMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMCharacterDataMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMCharacterDataMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMCharacterDataMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMCharacterDataMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMCharacterDataMethod "getLength" o = DOMCharacterDataGetLengthMethodInfo + ResolveDOMCharacterDataMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMCharacterDataMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMCharacterDataMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMCharacterDataMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMCharacterDataMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMCharacterDataMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMCharacterDataMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMCharacterDataMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMCharacterDataMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMCharacterDataMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMCharacterDataMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMCharacterDataMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMCharacterDataMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMCharacterDataMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMCharacterDataMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMCharacterDataMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMCharacterDataMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMCharacterDataMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMCharacterDataMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMCharacterDataMethod t DOMCharacterData, MethodInfo info DOMCharacterData p) => IsLabelProxy t (DOMCharacterData -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMCharacterDataMethod t DOMCharacterData, MethodInfo info DOMCharacterData p) => IsLabel t (DOMCharacterData -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "data" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -122,7 +206,7 @@ type AttrSetTypeConstraint DOMCharacterDataDataPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMCharacterDataDataPropertyInfo = DOMCharacterDataK type AttrGetType DOMCharacterDataDataPropertyInfo = T.Text - type AttrLabel DOMCharacterDataDataPropertyInfo = "DOMCharacterData::data" + type AttrLabel DOMCharacterDataDataPropertyInfo = "data" attrGet _ = getDOMCharacterDataData attrSet _ = setDOMCharacterDataData attrConstruct _ = constructDOMCharacterDataData @@ -140,22 +224,21 @@ type AttrSetTypeConstraint DOMCharacterDataLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMCharacterDataLengthPropertyInfo = DOMCharacterDataK type AttrGetType DOMCharacterDataLengthPropertyInfo = Word64 - type AttrLabel DOMCharacterDataLengthPropertyInfo = "DOMCharacterData::length" + type AttrLabel DOMCharacterDataLengthPropertyInfo = "length" attrGet _ = getDOMCharacterDataLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMCharacterData = DOMCharacterDataAttributeList -type DOMCharacterDataAttributeList = ('[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) +type DOMCharacterDataAttributeList = ('[ '("baseUri", DOMNodeBaseUriPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMCharacterData = DOMCharacterDataSignalList -type DOMCharacterDataSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMCharacterDataSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMCharacterData::append_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -169,9 +252,9 @@ dOMCharacterDataAppendData :: (MonadIO m, DOMCharacterDataK a) => - a -> -- _obj - T.Text -> -- data - m () + a -- _obj + -> T.Text -- data_ + -> m () -- result dOMCharacterDataAppendData _obj data_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj data_' <- textToCString data_ @@ -184,11 +267,14 @@ freeMem data_' ) +data DOMCharacterDataAppendDataMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMCharacterDataK a) => MethodInfo DOMCharacterDataAppendDataMethodInfo a signature where + overloadedMethod _ = dOMCharacterDataAppendData + -- method DOMCharacterData::delete_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "length", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "length", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "length", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -203,10 +289,10 @@ dOMCharacterDataDeleteData :: (MonadIO m, DOMCharacterDataK a) => - a -> -- _obj - Word64 -> -- offset - Word64 -> -- length - m () + a -- _obj + -> Word64 -- offset + -> Word64 -- length_ + -> m () -- result dOMCharacterDataDeleteData _obj offset length_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -217,11 +303,14 @@ return () ) +data DOMCharacterDataDeleteDataMethodInfo +instance (signature ~ (Word64 -> Word64 -> m ()), MonadIO m, DOMCharacterDataK a) => MethodInfo DOMCharacterDataDeleteDataMethodInfo a signature where + overloadedMethod _ = dOMCharacterDataDeleteData + -- method DOMCharacterData::get_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -233,8 +322,8 @@ dOMCharacterDataGetData :: (MonadIO m, DOMCharacterDataK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMCharacterDataGetData _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_character_data_get_data _obj' @@ -244,11 +333,14 @@ touchManagedPtr _obj return result' +data DOMCharacterDataGetDataMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMCharacterDataK a) => MethodInfo DOMCharacterDataGetDataMethodInfo a signature where + overloadedMethod _ = dOMCharacterDataGetData + -- method DOMCharacterData::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -260,19 +352,22 @@ dOMCharacterDataGetLength :: (MonadIO m, DOMCharacterDataK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMCharacterDataGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_character_data_get_length _obj' touchManagedPtr _obj return result +data DOMCharacterDataGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMCharacterDataK a) => MethodInfo DOMCharacterDataGetLengthMethodInfo a signature where + overloadedMethod _ = dOMCharacterDataGetLength + -- method DOMCharacterData::insert_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -287,10 +382,10 @@ dOMCharacterDataInsertData :: (MonadIO m, DOMCharacterDataK a) => - a -> -- _obj - Word64 -> -- offset - T.Text -> -- data - m () + a -- _obj + -> Word64 -- offset + -> T.Text -- data_ + -> m () -- result dOMCharacterDataInsertData _obj offset data_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj data_' <- textToCString data_ @@ -303,11 +398,14 @@ freeMem data_' ) +data DOMCharacterDataInsertDataMethodInfo +instance (signature ~ (Word64 -> T.Text -> m ()), MonadIO m, DOMCharacterDataK a) => MethodInfo DOMCharacterDataInsertDataMethodInfo a signature where + overloadedMethod _ = dOMCharacterDataInsertData + -- method DOMCharacterData::remove -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -320,8 +418,8 @@ dOMCharacterDataRemove :: (MonadIO m, DOMCharacterDataK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMCharacterDataRemove _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -332,11 +430,14 @@ return () ) +data DOMCharacterDataRemoveMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMCharacterDataK a) => MethodInfo DOMCharacterDataRemoveMethodInfo a signature where + overloadedMethod _ = dOMCharacterDataRemove + -- method DOMCharacterData::replace_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "length", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "length", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "length", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -352,11 +453,11 @@ dOMCharacterDataReplaceData :: (MonadIO m, DOMCharacterDataK a) => - a -> -- _obj - Word64 -> -- offset - Word64 -> -- length - T.Text -> -- data - m () + a -- _obj + -> Word64 -- offset + -> Word64 -- length_ + -> T.Text -- data_ + -> m () -- result dOMCharacterDataReplaceData _obj offset length_ data_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj data_' <- textToCString data_ @@ -369,11 +470,14 @@ freeMem data_' ) +data DOMCharacterDataReplaceDataMethodInfo +instance (signature ~ (Word64 -> Word64 -> T.Text -> m ()), MonadIO m, DOMCharacterDataK a) => MethodInfo DOMCharacterDataReplaceDataMethodInfo a signature where + overloadedMethod _ = dOMCharacterDataReplaceData + -- method DOMCharacterData::set_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -387,9 +491,9 @@ dOMCharacterDataSetData :: (MonadIO m, DOMCharacterDataK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMCharacterDataSetData _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -402,11 +506,14 @@ freeMem value' ) +data DOMCharacterDataSetDataMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMCharacterDataK a) => MethodInfo DOMCharacterDataSetDataMethodInfo a signature where + overloadedMethod _ = dOMCharacterDataSetData + -- method DOMCharacterData::substring_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "length", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "length", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMCharacterData", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "length", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : True -- Skip return : False @@ -421,10 +528,10 @@ dOMCharacterDataSubstringData :: (MonadIO m, DOMCharacterDataK a) => - a -> -- _obj - Word64 -> -- offset - Word64 -> -- length - m T.Text + a -- _obj + -> Word64 -- offset + -> Word64 -- length_ + -> m T.Text -- result dOMCharacterDataSubstringData _obj offset length_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -437,5 +544,9 @@ ) (do return () ) + +data DOMCharacterDataSubstringDataMethodInfo +instance (signature ~ (Word64 -> Word64 -> m T.Text), MonadIO m, DOMCharacterDataK a) => MethodInfo DOMCharacterDataSubstringDataMethodInfo a signature where + overloadedMethod _ = dOMCharacterDataSubstringData diff --git a/GI/WebKit/Objects/DOMCharacterData.hs-boot b/GI/WebKit/Objects/DOMCharacterData.hs-boot --- a/GI/WebKit/Objects/DOMCharacterData.hs-boot +++ b/GI/WebKit/Objects/DOMCharacterData.hs-boot @@ -13,3 +13,12 @@ instance (GObject o, IsDescendantOf DOMCharacterData o) => DOMCharacterDataK o data DOMCharacterDataDataPropertyInfo data DOMCharacterDataLengthPropertyInfo +data DOMCharacterDataAppendDataMethodInfo +data DOMCharacterDataDeleteDataMethodInfo +data DOMCharacterDataGetDataMethodInfo +data DOMCharacterDataGetLengthMethodInfo +data DOMCharacterDataInsertDataMethodInfo +data DOMCharacterDataRemoveMethodInfo +data DOMCharacterDataReplaceDataMethodInfo +data DOMCharacterDataSetDataMethodInfo +data DOMCharacterDataSubstringDataMethodInfo diff --git a/GI/WebKit/Objects/DOMComment.hs b/GI/WebKit/Objects/DOMComment.hs --- a/GI/WebKit/Objects/DOMComment.hs +++ b/GI/WebKit/Objects/DOMComment.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -49,10 +50,84 @@ noDOMComment :: Maybe DOMComment noDOMComment = Nothing +type family ResolveDOMCommentMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMCommentMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMCommentMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMCommentMethod "appendData" o = DOMCharacterDataAppendDataMethodInfo + ResolveDOMCommentMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMCommentMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMCommentMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMCommentMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMCommentMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMCommentMethod "deleteData" o = DOMCharacterDataDeleteDataMethodInfo + ResolveDOMCommentMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMCommentMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMCommentMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMCommentMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMCommentMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMCommentMethod "insertData" o = DOMCharacterDataInsertDataMethodInfo + ResolveDOMCommentMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMCommentMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMCommentMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMCommentMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMCommentMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMCommentMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMCommentMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMCommentMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMCommentMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMCommentMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMCommentMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMCommentMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMCommentMethod "remove" o = DOMCharacterDataRemoveMethodInfo + ResolveDOMCommentMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMCommentMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMCommentMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMCommentMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMCommentMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMCommentMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMCommentMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMCommentMethod "substringData" o = DOMCharacterDataSubstringDataMethodInfo + ResolveDOMCommentMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMCommentMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMCommentMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMCommentMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMCommentMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMCommentMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMCommentMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMCommentMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMCommentMethod "getLength" o = DOMCharacterDataGetLengthMethodInfo + ResolveDOMCommentMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMCommentMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMCommentMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMCommentMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMCommentMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMCommentMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMCommentMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMCommentMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMCommentMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMCommentMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMCommentMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMCommentMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMCommentMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMCommentMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMCommentMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMCommentMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMCommentMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMCommentMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMCommentMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMCommentMethod t DOMComment, MethodInfo info DOMComment p) => IsLabelProxy t (DOMComment -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMCommentMethod t DOMComment, MethodInfo info DOMComment p) => IsLabel t (DOMComment -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMComment = DOMCommentAttributeList -type DOMCommentAttributeList = ('[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) +type DOMCommentAttributeList = ('[ '("baseUri", DOMNodeBaseUriPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMComment = DOMCommentSignalList -type DOMCommentSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMCommentSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/DOMConsole.hs b/GI/WebKit/Objects/DOMConsole.hs --- a/GI/WebKit/Objects/DOMConsole.hs +++ b/GI/WebKit/Objects/DOMConsole.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMConsoleGetMemory + DOMConsoleGetMemoryMethodInfo , dOMConsoleGetMemory , -- ** dOMConsoleGroupEnd + DOMConsoleGroupEndMethodInfo , dOMConsoleGroupEnd , -- ** dOMConsoleTime + DOMConsoleTimeMethodInfo , dOMConsoleTime , @@ -64,17 +68,52 @@ noDOMConsole :: Maybe DOMConsole noDOMConsole = Nothing +type family ResolveDOMConsoleMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMConsoleMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMConsoleMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMConsoleMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMConsoleMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMConsoleMethod "groupEnd" o = DOMConsoleGroupEndMethodInfo + ResolveDOMConsoleMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMConsoleMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMConsoleMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMConsoleMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMConsoleMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMConsoleMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMConsoleMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMConsoleMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMConsoleMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMConsoleMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMConsoleMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMConsoleMethod "time" o = DOMConsoleTimeMethodInfo + ResolveDOMConsoleMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMConsoleMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMConsoleMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMConsoleMethod "getMemory" o = DOMConsoleGetMemoryMethodInfo + ResolveDOMConsoleMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMConsoleMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMConsoleMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMConsoleMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMConsoleMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMConsoleMethod t DOMConsole, MethodInfo info DOMConsole p) => IsLabelProxy t (DOMConsole -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMConsoleMethod t DOMConsole, MethodInfo info DOMConsole p) => IsLabel t (DOMConsole -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMConsole = DOMConsoleAttributeList -type DOMConsoleAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMConsoleAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMConsole = DOMConsoleSignalList -type DOMConsoleSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMConsoleSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMConsole::get_memory -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMConsole", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMConsole", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMConsole", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -86,19 +125,22 @@ {-# DEPRECATED dOMConsoleGetMemory ["(Since version 2.2)"]#-} dOMConsoleGetMemory :: (MonadIO m, DOMConsoleK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMConsoleGetMemory _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_console_get_memory _obj' touchManagedPtr _obj return () +data DOMConsoleGetMemoryMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMConsoleK a) => MethodInfo DOMConsoleGetMemoryMethodInfo a signature where + overloadedMethod _ = dOMConsoleGetMemory + -- method DOMConsole::group_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMConsole", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMConsole", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMConsole", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -110,19 +152,22 @@ dOMConsoleGroupEnd :: (MonadIO m, DOMConsoleK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMConsoleGroupEnd _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_console_group_end _obj' touchManagedPtr _obj return () +data DOMConsoleGroupEndMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMConsoleK a) => MethodInfo DOMConsoleGroupEndMethodInfo a signature where + overloadedMethod _ = dOMConsoleGroupEnd + -- method DOMConsole::time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMConsole", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMConsole", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMConsole", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -135,9 +180,9 @@ dOMConsoleTime :: (MonadIO m, DOMConsoleK a) => - a -> -- _obj - T.Text -> -- title - m () + a -- _obj + -> T.Text -- title + -> m () -- result dOMConsoleTime _obj title = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj title' <- textToCString title @@ -145,5 +190,9 @@ touchManagedPtr _obj freeMem title' return () + +data DOMConsoleTimeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMConsoleK a) => MethodInfo DOMConsoleTimeMethodInfo a signature where + overloadedMethod _ = dOMConsoleTime diff --git a/GI/WebKit/Objects/DOMConsole.hs-boot b/GI/WebKit/Objects/DOMConsole.hs-boot --- a/GI/WebKit/Objects/DOMConsole.hs-boot +++ b/GI/WebKit/Objects/DOMConsole.hs-boot @@ -11,3 +11,6 @@ instance GObject DOMConsole where class GObject o => DOMConsoleK o instance (GObject o, IsDescendantOf DOMConsole o) => DOMConsoleK o +data DOMConsoleGetMemoryMethodInfo +data DOMConsoleGroupEndMethodInfo +data DOMConsoleTimeMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMApplicationCache.hs b/GI/WebKit/Objects/DOMDOMApplicationCache.hs --- a/GI/WebKit/Objects/DOMDOMApplicationCache.hs +++ b/GI/WebKit/Objects/DOMDOMApplicationCache.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,22 +18,27 @@ -- * Methods -- ** dOMDOMApplicationCacheAbort + DOMDOMApplicationCacheAbortMethodInfo , dOMDOMApplicationCacheAbort , -- ** dOMDOMApplicationCacheDispatchEvent + DOMDOMApplicationCacheDispatchEventMethodInfo, dOMDOMApplicationCacheDispatchEvent , -- ** dOMDOMApplicationCacheGetStatus + DOMDOMApplicationCacheGetStatusMethodInfo, dOMDOMApplicationCacheGetStatus , -- ** dOMDOMApplicationCacheSwapCache + DOMDOMApplicationCacheSwapCacheMethodInfo, dOMDOMApplicationCacheSwapCache , -- ** dOMDOMApplicationCacheUpdate + DOMDOMApplicationCacheUpdateMethodInfo , dOMDOMApplicationCacheUpdate , @@ -80,6 +86,45 @@ noDOMDOMApplicationCache :: Maybe DOMDOMApplicationCache noDOMDOMApplicationCache = Nothing +type family ResolveDOMDOMApplicationCacheMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMApplicationCacheMethod "abort" o = DOMDOMApplicationCacheAbortMethodInfo + ResolveDOMDOMApplicationCacheMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMDOMApplicationCacheMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMApplicationCacheMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMApplicationCacheMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMApplicationCacheMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMApplicationCacheMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMApplicationCacheMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMApplicationCacheMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMApplicationCacheMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMApplicationCacheMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMApplicationCacheMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMDOMApplicationCacheMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMApplicationCacheMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMApplicationCacheMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMApplicationCacheMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMApplicationCacheMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMApplicationCacheMethod "swapCache" o = DOMDOMApplicationCacheSwapCacheMethodInfo + ResolveDOMDOMApplicationCacheMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMApplicationCacheMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMApplicationCacheMethod "update" o = DOMDOMApplicationCacheUpdateMethodInfo + ResolveDOMDOMApplicationCacheMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMApplicationCacheMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMApplicationCacheMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMApplicationCacheMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMApplicationCacheMethod "getStatus" o = DOMDOMApplicationCacheGetStatusMethodInfo + ResolveDOMDOMApplicationCacheMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMApplicationCacheMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMApplicationCacheMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMApplicationCacheMethod t DOMDOMApplicationCache, MethodInfo info DOMDOMApplicationCache p) => IsLabelProxy t (DOMDOMApplicationCache -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMApplicationCacheMethod t DOMDOMApplicationCache, MethodInfo info DOMDOMApplicationCache p) => IsLabel t (DOMDOMApplicationCache -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "status" -- Type: TBasicType TUInt32 -- Flags: [PropertyReadable] @@ -93,22 +138,21 @@ type AttrSetTypeConstraint DOMDOMApplicationCacheStatusPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMApplicationCacheStatusPropertyInfo = DOMDOMApplicationCacheK type AttrGetType DOMDOMApplicationCacheStatusPropertyInfo = Word32 - type AttrLabel DOMDOMApplicationCacheStatusPropertyInfo = "DOMDOMApplicationCache::status" + type AttrLabel DOMDOMApplicationCacheStatusPropertyInfo = "status" attrGet _ = getDOMDOMApplicationCacheStatus attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDOMApplicationCache = DOMDOMApplicationCacheAttributeList -type DOMDOMApplicationCacheAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("status", DOMDOMApplicationCacheStatusPropertyInfo)] :: [(Symbol, *)]) +type DOMDOMApplicationCacheAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("status", DOMDOMApplicationCacheStatusPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMApplicationCache = DOMDOMApplicationCacheSignalList -type DOMDOMApplicationCacheSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMApplicationCacheSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMApplicationCache::abort -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -120,19 +164,22 @@ dOMDOMApplicationCacheAbort :: (MonadIO m, DOMDOMApplicationCacheK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMDOMApplicationCacheAbort _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_dom_application_cache_abort _obj' touchManagedPtr _obj return () +data DOMDOMApplicationCacheAbortMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMApplicationCacheK a) => MethodInfo DOMDOMApplicationCacheAbortMethodInfo a signature where + overloadedMethod _ = dOMDOMApplicationCacheAbort + -- method DOMDOMApplicationCache::dispatch_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -146,9 +193,9 @@ {-# DEPRECATED dOMDOMApplicationCacheDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-} dOMDOMApplicationCacheDispatchEvent :: (MonadIO m, DOMDOMApplicationCacheK a, DOMEventK b) => - a -> -- _obj - b -> -- evt - m () + a -- _obj + -> b -- evt + -> m () -- result dOMDOMApplicationCacheDispatchEvent _obj evt = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let evt' = unsafeManagedPtrCastPtr evt @@ -161,11 +208,14 @@ return () ) +data DOMDOMApplicationCacheDispatchEventMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMDOMApplicationCacheK a, DOMEventK b) => MethodInfo DOMDOMApplicationCacheDispatchEventMethodInfo a signature where + overloadedMethod _ = dOMDOMApplicationCacheDispatchEvent + -- method DOMDOMApplicationCache::get_status -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt16 -- throws : False -- Skip return : False @@ -177,19 +227,22 @@ dOMDOMApplicationCacheGetStatus :: (MonadIO m, DOMDOMApplicationCacheK a) => - a -> -- _obj - m Word16 + a -- _obj + -> m Word16 -- result dOMDOMApplicationCacheGetStatus _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_application_cache_get_status _obj' touchManagedPtr _obj return result +data DOMDOMApplicationCacheGetStatusMethodInfo +instance (signature ~ (m Word16), MonadIO m, DOMDOMApplicationCacheK a) => MethodInfo DOMDOMApplicationCacheGetStatusMethodInfo a signature where + overloadedMethod _ = dOMDOMApplicationCacheGetStatus + -- method DOMDOMApplicationCache::swap_cache -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -202,8 +255,8 @@ dOMDOMApplicationCacheSwapCache :: (MonadIO m, DOMDOMApplicationCacheK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMDOMApplicationCacheSwapCache _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -214,11 +267,14 @@ return () ) +data DOMDOMApplicationCacheSwapCacheMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMApplicationCacheK a) => MethodInfo DOMDOMApplicationCacheSwapCacheMethodInfo a signature where + overloadedMethod _ = dOMDOMApplicationCacheSwapCache + -- method DOMDOMApplicationCache::update -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMApplicationCache", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -231,8 +287,8 @@ dOMDOMApplicationCacheUpdate :: (MonadIO m, DOMDOMApplicationCacheK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMDOMApplicationCacheUpdate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -242,5 +298,9 @@ ) (do return () ) + +data DOMDOMApplicationCacheUpdateMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMApplicationCacheK a) => MethodInfo DOMDOMApplicationCacheUpdateMethodInfo a signature where + overloadedMethod _ = dOMDOMApplicationCacheUpdate diff --git a/GI/WebKit/Objects/DOMDOMApplicationCache.hs-boot b/GI/WebKit/Objects/DOMDOMApplicationCache.hs-boot --- a/GI/WebKit/Objects/DOMDOMApplicationCache.hs-boot +++ b/GI/WebKit/Objects/DOMDOMApplicationCache.hs-boot @@ -12,3 +12,8 @@ class GObject o => DOMDOMApplicationCacheK o instance (GObject o, IsDescendantOf DOMDOMApplicationCache o) => DOMDOMApplicationCacheK o data DOMDOMApplicationCacheStatusPropertyInfo +data DOMDOMApplicationCacheAbortMethodInfo +data DOMDOMApplicationCacheDispatchEventMethodInfo +data DOMDOMApplicationCacheGetStatusMethodInfo +data DOMDOMApplicationCacheSwapCacheMethodInfo +data DOMDOMApplicationCacheUpdateMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMImplementation.hs b/GI/WebKit/Objects/DOMDOMImplementation.hs --- a/GI/WebKit/Objects/DOMDOMImplementation.hs +++ b/GI/WebKit/Objects/DOMDOMImplementation.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,22 +18,27 @@ -- * Methods -- ** dOMDOMImplementationCreateCssStyleSheet + DOMDOMImplementationCreateCssStyleSheetMethodInfo, dOMDOMImplementationCreateCssStyleSheet , -- ** dOMDOMImplementationCreateDocument + DOMDOMImplementationCreateDocumentMethodInfo, dOMDOMImplementationCreateDocument , -- ** dOMDOMImplementationCreateDocumentType + DOMDOMImplementationCreateDocumentTypeMethodInfo, dOMDOMImplementationCreateDocumentType , -- ** dOMDOMImplementationCreateHtmlDocument + DOMDOMImplementationCreateHtmlDocumentMethodInfo, dOMDOMImplementationCreateHtmlDocument , -- ** dOMDOMImplementationHasFeature + DOMDOMImplementationHasFeatureMethodInfo, dOMDOMImplementationHasFeature , @@ -72,17 +78,54 @@ noDOMDOMImplementation :: Maybe DOMDOMImplementation noDOMDOMImplementation = Nothing +type family ResolveDOMDOMImplementationMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMImplementationMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMImplementationMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMImplementationMethod "createCssStyleSheet" o = DOMDOMImplementationCreateCssStyleSheetMethodInfo + ResolveDOMDOMImplementationMethod "createDocument" o = DOMDOMImplementationCreateDocumentMethodInfo + ResolveDOMDOMImplementationMethod "createDocumentType" o = DOMDOMImplementationCreateDocumentTypeMethodInfo + ResolveDOMDOMImplementationMethod "createHtmlDocument" o = DOMDOMImplementationCreateHtmlDocumentMethodInfo + ResolveDOMDOMImplementationMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMImplementationMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMImplementationMethod "hasFeature" o = DOMDOMImplementationHasFeatureMethodInfo + ResolveDOMDOMImplementationMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMImplementationMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMImplementationMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMImplementationMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMImplementationMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMImplementationMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMImplementationMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMImplementationMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMImplementationMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMImplementationMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMImplementationMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMImplementationMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMImplementationMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMImplementationMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMImplementationMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMImplementationMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMImplementationMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMImplementationMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMImplementationMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMImplementationMethod t DOMDOMImplementation, MethodInfo info DOMDOMImplementation p) => IsLabelProxy t (DOMDOMImplementation -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMImplementationMethod t DOMDOMImplementation, MethodInfo info DOMDOMImplementation p) => IsLabel t (DOMDOMImplementation -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMDOMImplementation = DOMDOMImplementationAttributeList -type DOMDOMImplementationAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMDOMImplementationAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMImplementation = DOMDOMImplementationSignalList -type DOMDOMImplementationSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMImplementationSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMImplementation::create_css_style_sheet -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "media", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "media", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "media", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMCSSStyleSheet" -- throws : True -- Skip return : False @@ -97,10 +140,10 @@ dOMDOMImplementationCreateCssStyleSheet :: (MonadIO m, DOMDOMImplementationK a) => - a -> -- _obj - T.Text -> -- title - T.Text -> -- media - m DOMCSSStyleSheet + a -- _obj + -> T.Text -- title + -> T.Text -- media + -> m DOMCSSStyleSheet -- result dOMDOMImplementationCreateCssStyleSheet _obj title media = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj title' <- textToCString title @@ -118,11 +161,14 @@ freeMem media' ) +data DOMDOMImplementationCreateCssStyleSheetMethodInfo +instance (signature ~ (T.Text -> T.Text -> m DOMCSSStyleSheet), MonadIO m, DOMDOMImplementationK a) => MethodInfo DOMDOMImplementationCreateCssStyleSheetMethodInfo a signature where + overloadedMethod _ = dOMDOMImplementationCreateCssStyleSheet + -- method DOMDOMImplementation::create_document -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "doctype", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "doctype", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "doctype", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDocument" -- throws : True -- Skip return : False @@ -138,11 +184,11 @@ dOMDOMImplementationCreateDocument :: (MonadIO m, DOMDOMImplementationK a, DOMDocumentTypeK b) => - a -> -- _obj - Maybe (T.Text) -> -- namespaceURI - T.Text -> -- qualifiedName - Maybe (b) -> -- doctype - m DOMDocument + a -- _obj + -> Maybe (T.Text) -- namespaceURI + -> T.Text -- qualifiedName + -> Maybe (b) -- doctype + -> m DOMDocument -- result dOMDOMImplementationCreateDocument _obj namespaceURI qualifiedName doctype = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeNamespaceURI <- case namespaceURI of @@ -170,11 +216,14 @@ freeMem qualifiedName' ) +data DOMDOMImplementationCreateDocumentMethodInfo +instance (signature ~ (Maybe (T.Text) -> T.Text -> Maybe (b) -> m DOMDocument), MonadIO m, DOMDOMImplementationK a, DOMDocumentTypeK b) => MethodInfo DOMDOMImplementationCreateDocumentMethodInfo a signature where + overloadedMethod _ = dOMDOMImplementationCreateDocument + -- method DOMDOMImplementation::create_document_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "publicId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "systemId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "publicId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "systemId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "publicId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "systemId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDocumentType" -- throws : True -- Skip return : False @@ -190,11 +239,11 @@ dOMDOMImplementationCreateDocumentType :: (MonadIO m, DOMDOMImplementationK a) => - a -> -- _obj - T.Text -> -- qualifiedName - T.Text -> -- publicId - T.Text -> -- systemId - m DOMDocumentType + a -- _obj + -> T.Text -- qualifiedName + -> T.Text -- publicId + -> T.Text -- systemId + -> m DOMDocumentType -- result dOMDOMImplementationCreateDocumentType _obj qualifiedName publicId systemId = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj qualifiedName' <- textToCString qualifiedName @@ -215,11 +264,14 @@ freeMem systemId' ) +data DOMDOMImplementationCreateDocumentTypeMethodInfo +instance (signature ~ (T.Text -> T.Text -> T.Text -> m DOMDocumentType), MonadIO m, DOMDOMImplementationK a) => MethodInfo DOMDOMImplementationCreateDocumentTypeMethodInfo a signature where + overloadedMethod _ = dOMDOMImplementationCreateDocumentType + -- method DOMDOMImplementation::create_html_document -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLDocument" -- throws : False -- Skip return : False @@ -232,9 +284,9 @@ dOMDOMImplementationCreateHtmlDocument :: (MonadIO m, DOMDOMImplementationK a) => - a -> -- _obj - T.Text -> -- title - m DOMHTMLDocument + a -- _obj + -> T.Text -- title + -> m DOMHTMLDocument -- result dOMDOMImplementationCreateHtmlDocument _obj title = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj title' <- textToCString title @@ -245,11 +297,14 @@ freeMem title' return result' +data DOMDOMImplementationCreateHtmlDocumentMethodInfo +instance (signature ~ (T.Text -> m DOMHTMLDocument), MonadIO m, DOMDOMImplementationK a) => MethodInfo DOMDOMImplementationCreateHtmlDocumentMethodInfo a signature where + overloadedMethod _ = dOMDOMImplementationCreateHtmlDocument + -- method DOMDOMImplementation::has_feature -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "feature", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "version", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "feature", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "version", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMImplementation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "feature", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "version", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -263,10 +318,10 @@ dOMDOMImplementationHasFeature :: (MonadIO m, DOMDOMImplementationK a) => - a -> -- _obj - T.Text -> -- feature - T.Text -> -- version - m Bool + a -- _obj + -> T.Text -- feature + -> T.Text -- version + -> m Bool -- result dOMDOMImplementationHasFeature _obj feature version = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj feature' <- textToCString feature @@ -277,5 +332,9 @@ freeMem feature' freeMem version' return result' + +data DOMDOMImplementationHasFeatureMethodInfo +instance (signature ~ (T.Text -> T.Text -> m Bool), MonadIO m, DOMDOMImplementationK a) => MethodInfo DOMDOMImplementationHasFeatureMethodInfo a signature where + overloadedMethod _ = dOMDOMImplementationHasFeature diff --git a/GI/WebKit/Objects/DOMDOMImplementation.hs-boot b/GI/WebKit/Objects/DOMDOMImplementation.hs-boot --- a/GI/WebKit/Objects/DOMDOMImplementation.hs-boot +++ b/GI/WebKit/Objects/DOMDOMImplementation.hs-boot @@ -11,3 +11,8 @@ instance GObject DOMDOMImplementation where class GObject o => DOMDOMImplementationK o instance (GObject o, IsDescendantOf DOMDOMImplementation o) => DOMDOMImplementationK o +data DOMDOMImplementationCreateCssStyleSheetMethodInfo +data DOMDOMImplementationCreateDocumentMethodInfo +data DOMDOMImplementationCreateDocumentTypeMethodInfo +data DOMDOMImplementationCreateHtmlDocumentMethodInfo +data DOMDOMImplementationHasFeatureMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMMimeType.hs b/GI/WebKit/Objects/DOMDOMMimeType.hs --- a/GI/WebKit/Objects/DOMDOMMimeType.hs +++ b/GI/WebKit/Objects/DOMDOMMimeType.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMDOMMimeTypeGetDescription + DOMDOMMimeTypeGetDescriptionMethodInfo , dOMDOMMimeTypeGetDescription , -- ** dOMDOMMimeTypeGetEnabledPlugin + DOMDOMMimeTypeGetEnabledPluginMethodInfo, dOMDOMMimeTypeGetEnabledPlugin , -- ** dOMDOMMimeTypeGetSuffixes + DOMDOMMimeTypeGetSuffixesMethodInfo , dOMDOMMimeTypeGetSuffixes , @@ -87,6 +91,42 @@ noDOMDOMMimeType :: Maybe DOMDOMMimeType noDOMDOMMimeType = Nothing +type family ResolveDOMDOMMimeTypeMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMMimeTypeMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMMimeTypeMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMMimeTypeMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMMimeTypeMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMMimeTypeMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMMimeTypeMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMMimeTypeMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMMimeTypeMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMMimeTypeMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMMimeTypeMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMMimeTypeMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMMimeTypeMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMMimeTypeMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMMimeTypeMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMMimeTypeMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMMimeTypeMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMMimeTypeMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMMimeTypeMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMMimeTypeMethod "getDescription" o = DOMDOMMimeTypeGetDescriptionMethodInfo + ResolveDOMDOMMimeTypeMethod "getEnabledPlugin" o = DOMDOMMimeTypeGetEnabledPluginMethodInfo + ResolveDOMDOMMimeTypeMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMMimeTypeMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMMimeTypeMethod "getSuffixes" o = DOMDOMMimeTypeGetSuffixesMethodInfo + ResolveDOMDOMMimeTypeMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMMimeTypeMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMMimeTypeMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMMimeTypeMethod t DOMDOMMimeType, MethodInfo info DOMDOMMimeType p) => IsLabelProxy t (DOMDOMMimeType -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMMimeTypeMethod t DOMDOMMimeType, MethodInfo info DOMDOMMimeType p) => IsLabel t (DOMDOMMimeType -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "description" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -100,7 +140,7 @@ type AttrSetTypeConstraint DOMDOMMimeTypeDescriptionPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMMimeTypeDescriptionPropertyInfo = DOMDOMMimeTypeK type AttrGetType DOMDOMMimeTypeDescriptionPropertyInfo = T.Text - type AttrLabel DOMDOMMimeTypeDescriptionPropertyInfo = "DOMDOMMimeType::description" + type AttrLabel DOMDOMMimeTypeDescriptionPropertyInfo = "description" attrGet _ = getDOMDOMMimeTypeDescription attrSet _ = undefined attrConstruct _ = undefined @@ -118,7 +158,7 @@ type AttrSetTypeConstraint DOMDOMMimeTypeEnabledPluginPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMMimeTypeEnabledPluginPropertyInfo = DOMDOMMimeTypeK type AttrGetType DOMDOMMimeTypeEnabledPluginPropertyInfo = DOMDOMPlugin - type AttrLabel DOMDOMMimeTypeEnabledPluginPropertyInfo = "DOMDOMMimeType::enabled-plugin" + type AttrLabel DOMDOMMimeTypeEnabledPluginPropertyInfo = "enabled-plugin" attrGet _ = getDOMDOMMimeTypeEnabledPlugin attrSet _ = undefined attrConstruct _ = undefined @@ -136,7 +176,7 @@ type AttrSetTypeConstraint DOMDOMMimeTypeSuffixesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMMimeTypeSuffixesPropertyInfo = DOMDOMMimeTypeK type AttrGetType DOMDOMMimeTypeSuffixesPropertyInfo = T.Text - type AttrLabel DOMDOMMimeTypeSuffixesPropertyInfo = "DOMDOMMimeType::suffixes" + type AttrLabel DOMDOMMimeTypeSuffixesPropertyInfo = "suffixes" attrGet _ = getDOMDOMMimeTypeSuffixes attrSet _ = undefined attrConstruct _ = undefined @@ -154,22 +194,21 @@ type AttrSetTypeConstraint DOMDOMMimeTypeTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMMimeTypeTypePropertyInfo = DOMDOMMimeTypeK type AttrGetType DOMDOMMimeTypeTypePropertyInfo = T.Text - type AttrLabel DOMDOMMimeTypeTypePropertyInfo = "DOMDOMMimeType::type" + type AttrLabel DOMDOMMimeTypeTypePropertyInfo = "type" attrGet _ = getDOMDOMMimeTypeType attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDOMMimeType = DOMDOMMimeTypeAttributeList -type DOMDOMMimeTypeAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("description", DOMDOMMimeTypeDescriptionPropertyInfo), '("enabled-plugin", DOMDOMMimeTypeEnabledPluginPropertyInfo), '("suffixes", DOMDOMMimeTypeSuffixesPropertyInfo), '("type", DOMDOMMimeTypeTypePropertyInfo)] :: [(Symbol, *)]) +type DOMDOMMimeTypeAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("description", DOMDOMMimeTypeDescriptionPropertyInfo), '("enabledPlugin", DOMDOMMimeTypeEnabledPluginPropertyInfo), '("suffixes", DOMDOMMimeTypeSuffixesPropertyInfo), '("type", DOMDOMMimeTypeTypePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMMimeType = DOMDOMMimeTypeSignalList -type DOMDOMMimeTypeSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMMimeTypeSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMMimeType::get_description -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -181,8 +220,8 @@ dOMDOMMimeTypeGetDescription :: (MonadIO m, DOMDOMMimeTypeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMDOMMimeTypeGetDescription _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_mime_type_get_description _obj' @@ -192,11 +231,14 @@ touchManagedPtr _obj return result' +data DOMDOMMimeTypeGetDescriptionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDOMMimeTypeK a) => MethodInfo DOMDOMMimeTypeGetDescriptionMethodInfo a signature where + overloadedMethod _ = dOMDOMMimeTypeGetDescription + -- method DOMDOMMimeType::get_enabled_plugin -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMPlugin" -- throws : False -- Skip return : False @@ -208,8 +250,8 @@ dOMDOMMimeTypeGetEnabledPlugin :: (MonadIO m, DOMDOMMimeTypeK a) => - a -> -- _obj - m DOMDOMPlugin + a -- _obj + -> m DOMDOMPlugin -- result dOMDOMMimeTypeGetEnabledPlugin _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_mime_type_get_enabled_plugin _obj' @@ -218,11 +260,14 @@ touchManagedPtr _obj return result' +data DOMDOMMimeTypeGetEnabledPluginMethodInfo +instance (signature ~ (m DOMDOMPlugin), MonadIO m, DOMDOMMimeTypeK a) => MethodInfo DOMDOMMimeTypeGetEnabledPluginMethodInfo a signature where + overloadedMethod _ = dOMDOMMimeTypeGetEnabledPlugin + -- method DOMDOMMimeType::get_suffixes -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -234,8 +279,8 @@ dOMDOMMimeTypeGetSuffixes :: (MonadIO m, DOMDOMMimeTypeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMDOMMimeTypeGetSuffixes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_mime_type_get_suffixes _obj' @@ -244,5 +289,9 @@ freeMem result touchManagedPtr _obj return result' + +data DOMDOMMimeTypeGetSuffixesMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDOMMimeTypeK a) => MethodInfo DOMDOMMimeTypeGetSuffixesMethodInfo a signature where + overloadedMethod _ = dOMDOMMimeTypeGetSuffixes diff --git a/GI/WebKit/Objects/DOMDOMMimeType.hs-boot b/GI/WebKit/Objects/DOMDOMMimeType.hs-boot --- a/GI/WebKit/Objects/DOMDOMMimeType.hs-boot +++ b/GI/WebKit/Objects/DOMDOMMimeType.hs-boot @@ -15,3 +15,6 @@ data DOMDOMMimeTypeEnabledPluginPropertyInfo data DOMDOMMimeTypeSuffixesPropertyInfo data DOMDOMMimeTypeTypePropertyInfo +data DOMDOMMimeTypeGetDescriptionMethodInfo +data DOMDOMMimeTypeGetEnabledPluginMethodInfo +data DOMDOMMimeTypeGetSuffixesMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMMimeTypeArray.hs b/GI/WebKit/Objects/DOMDOMMimeTypeArray.hs --- a/GI/WebKit/Objects/DOMDOMMimeTypeArray.hs +++ b/GI/WebKit/Objects/DOMDOMMimeTypeArray.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMDOMMimeTypeArrayGetLength + DOMDOMMimeTypeArrayGetLengthMethodInfo , dOMDOMMimeTypeArrayGetLength , -- ** dOMDOMMimeTypeArrayItem + DOMDOMMimeTypeArrayItemMethodInfo , dOMDOMMimeTypeArrayItem , -- ** dOMDOMMimeTypeArrayNamedItem + DOMDOMMimeTypeArrayNamedItemMethodInfo , dOMDOMMimeTypeArrayNamedItem , @@ -72,6 +76,42 @@ noDOMDOMMimeTypeArray :: Maybe DOMDOMMimeTypeArray noDOMDOMMimeTypeArray = Nothing +type family ResolveDOMDOMMimeTypeArrayMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMMimeTypeArrayMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "item" o = DOMDOMMimeTypeArrayItemMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "namedItem" o = DOMDOMMimeTypeArrayNamedItemMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "getLength" o = DOMDOMMimeTypeArrayGetLengthMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMMimeTypeArrayMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMMimeTypeArrayMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMMimeTypeArrayMethod t DOMDOMMimeTypeArray, MethodInfo info DOMDOMMimeTypeArray p) => IsLabelProxy t (DOMDOMMimeTypeArray -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMMimeTypeArrayMethod t DOMDOMMimeTypeArray, MethodInfo info DOMDOMMimeTypeArray p) => IsLabel t (DOMDOMMimeTypeArray -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -85,22 +125,21 @@ type AttrSetTypeConstraint DOMDOMMimeTypeArrayLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMMimeTypeArrayLengthPropertyInfo = DOMDOMMimeTypeArrayK type AttrGetType DOMDOMMimeTypeArrayLengthPropertyInfo = Word64 - type AttrLabel DOMDOMMimeTypeArrayLengthPropertyInfo = "DOMDOMMimeTypeArray::length" + type AttrLabel DOMDOMMimeTypeArrayLengthPropertyInfo = "length" attrGet _ = getDOMDOMMimeTypeArrayLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDOMMimeTypeArray = DOMDOMMimeTypeArrayAttributeList -type DOMDOMMimeTypeArrayAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMMimeTypeArrayLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMDOMMimeTypeArrayAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMMimeTypeArrayLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMMimeTypeArray = DOMDOMMimeTypeArraySignalList -type DOMDOMMimeTypeArraySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMMimeTypeArraySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMMimeTypeArray::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeTypeArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeTypeArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeTypeArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -112,19 +151,22 @@ dOMDOMMimeTypeArrayGetLength :: (MonadIO m, DOMDOMMimeTypeArrayK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMDOMMimeTypeArrayGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_mime_type_array_get_length _obj' touchManagedPtr _obj return result +data DOMDOMMimeTypeArrayGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMDOMMimeTypeArrayK a) => MethodInfo DOMDOMMimeTypeArrayGetLengthMethodInfo a signature where + overloadedMethod _ = dOMDOMMimeTypeArrayGetLength + -- method DOMDOMMimeTypeArray::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeTypeArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeTypeArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeTypeArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMMimeType" -- throws : False -- Skip return : False @@ -137,9 +179,9 @@ dOMDOMMimeTypeArrayItem :: (MonadIO m, DOMDOMMimeTypeArrayK a) => - a -> -- _obj - Word64 -> -- index - m DOMDOMMimeType + a -- _obj + -> Word64 -- index + -> m DOMDOMMimeType -- result dOMDOMMimeTypeArrayItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_mime_type_array_item _obj' index @@ -148,11 +190,14 @@ touchManagedPtr _obj return result' +data DOMDOMMimeTypeArrayItemMethodInfo +instance (signature ~ (Word64 -> m DOMDOMMimeType), MonadIO m, DOMDOMMimeTypeArrayK a) => MethodInfo DOMDOMMimeTypeArrayItemMethodInfo a signature where + overloadedMethod _ = dOMDOMMimeTypeArrayItem + -- method DOMDOMMimeTypeArray::named_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeTypeArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeTypeArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMMimeTypeArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMMimeType" -- throws : False -- Skip return : False @@ -165,9 +210,9 @@ dOMDOMMimeTypeArrayNamedItem :: (MonadIO m, DOMDOMMimeTypeArrayK a) => - a -> -- _obj - T.Text -> -- name - m DOMDOMMimeType + a -- _obj + -> T.Text -- name + -> m DOMDOMMimeType -- result dOMDOMMimeTypeArrayNamedItem _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -177,5 +222,9 @@ touchManagedPtr _obj freeMem name' return result' + +data DOMDOMMimeTypeArrayNamedItemMethodInfo +instance (signature ~ (T.Text -> m DOMDOMMimeType), MonadIO m, DOMDOMMimeTypeArrayK a) => MethodInfo DOMDOMMimeTypeArrayNamedItemMethodInfo a signature where + overloadedMethod _ = dOMDOMMimeTypeArrayNamedItem diff --git a/GI/WebKit/Objects/DOMDOMMimeTypeArray.hs-boot b/GI/WebKit/Objects/DOMDOMMimeTypeArray.hs-boot --- a/GI/WebKit/Objects/DOMDOMMimeTypeArray.hs-boot +++ b/GI/WebKit/Objects/DOMDOMMimeTypeArray.hs-boot @@ -12,3 +12,6 @@ class GObject o => DOMDOMMimeTypeArrayK o instance (GObject o, IsDescendantOf DOMDOMMimeTypeArray o) => DOMDOMMimeTypeArrayK o data DOMDOMMimeTypeArrayLengthPropertyInfo +data DOMDOMMimeTypeArrayGetLengthMethodInfo +data DOMDOMMimeTypeArrayItemMethodInfo +data DOMDOMMimeTypeArrayNamedItemMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMNamedFlowCollection.hs b/GI/WebKit/Objects/DOMDOMNamedFlowCollection.hs --- a/GI/WebKit/Objects/DOMDOMNamedFlowCollection.hs +++ b/GI/WebKit/Objects/DOMDOMNamedFlowCollection.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMDOMNamedFlowCollectionGetLength + DOMDOMNamedFlowCollectionGetLengthMethodInfo, dOMDOMNamedFlowCollectionGetLength , -- ** dOMDOMNamedFlowCollectionItem + DOMDOMNamedFlowCollectionItemMethodInfo , dOMDOMNamedFlowCollectionItem , -- ** dOMDOMNamedFlowCollectionNamedItem + DOMDOMNamedFlowCollectionNamedItemMethodInfo, dOMDOMNamedFlowCollectionNamedItem , @@ -72,6 +76,42 @@ noDOMDOMNamedFlowCollection :: Maybe DOMDOMNamedFlowCollection noDOMDOMNamedFlowCollection = Nothing +type family ResolveDOMDOMNamedFlowCollectionMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMNamedFlowCollectionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "item" o = DOMDOMNamedFlowCollectionItemMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "namedItem" o = DOMDOMNamedFlowCollectionNamedItemMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "getLength" o = DOMDOMNamedFlowCollectionGetLengthMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMNamedFlowCollectionMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMNamedFlowCollectionMethod t DOMDOMNamedFlowCollection, MethodInfo info DOMDOMNamedFlowCollection p) => IsLabelProxy t (DOMDOMNamedFlowCollection -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMNamedFlowCollectionMethod t DOMDOMNamedFlowCollection, MethodInfo info DOMDOMNamedFlowCollection p) => IsLabel t (DOMDOMNamedFlowCollection -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -85,22 +125,21 @@ type AttrSetTypeConstraint DOMDOMNamedFlowCollectionLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMNamedFlowCollectionLengthPropertyInfo = DOMDOMNamedFlowCollectionK type AttrGetType DOMDOMNamedFlowCollectionLengthPropertyInfo = Word64 - type AttrLabel DOMDOMNamedFlowCollectionLengthPropertyInfo = "DOMDOMNamedFlowCollection::length" + type AttrLabel DOMDOMNamedFlowCollectionLengthPropertyInfo = "length" attrGet _ = getDOMDOMNamedFlowCollectionLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDOMNamedFlowCollection = DOMDOMNamedFlowCollectionAttributeList -type DOMDOMNamedFlowCollectionAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMNamedFlowCollectionLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMDOMNamedFlowCollectionAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMNamedFlowCollectionLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMNamedFlowCollection = DOMDOMNamedFlowCollectionSignalList -type DOMDOMNamedFlowCollectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMNamedFlowCollectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMNamedFlowCollection::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMNamedFlowCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMNamedFlowCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMNamedFlowCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -112,19 +151,22 @@ dOMDOMNamedFlowCollectionGetLength :: (MonadIO m, DOMDOMNamedFlowCollectionK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMDOMNamedFlowCollectionGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_named_flow_collection_get_length _obj' touchManagedPtr _obj return result +data DOMDOMNamedFlowCollectionGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMDOMNamedFlowCollectionK a) => MethodInfo DOMDOMNamedFlowCollectionGetLengthMethodInfo a signature where + overloadedMethod _ = dOMDOMNamedFlowCollectionGetLength + -- method DOMDOMNamedFlowCollection::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMNamedFlowCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMNamedFlowCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMNamedFlowCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMWebKitNamedFlow" -- throws : False -- Skip return : False @@ -137,9 +179,9 @@ dOMDOMNamedFlowCollectionItem :: (MonadIO m, DOMDOMNamedFlowCollectionK a) => - a -> -- _obj - Word64 -> -- index - m DOMWebKitNamedFlow + a -- _obj + -> Word64 -- index + -> m DOMWebKitNamedFlow -- result dOMDOMNamedFlowCollectionItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_named_flow_collection_item _obj' index @@ -148,11 +190,14 @@ touchManagedPtr _obj return result' +data DOMDOMNamedFlowCollectionItemMethodInfo +instance (signature ~ (Word64 -> m DOMWebKitNamedFlow), MonadIO m, DOMDOMNamedFlowCollectionK a) => MethodInfo DOMDOMNamedFlowCollectionItemMethodInfo a signature where + overloadedMethod _ = dOMDOMNamedFlowCollectionItem + -- method DOMDOMNamedFlowCollection::named_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMNamedFlowCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMNamedFlowCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMNamedFlowCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMWebKitNamedFlow" -- throws : False -- Skip return : False @@ -165,9 +210,9 @@ dOMDOMNamedFlowCollectionNamedItem :: (MonadIO m, DOMDOMNamedFlowCollectionK a) => - a -> -- _obj - T.Text -> -- name - m DOMWebKitNamedFlow + a -- _obj + -> T.Text -- name + -> m DOMWebKitNamedFlow -- result dOMDOMNamedFlowCollectionNamedItem _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -177,5 +222,9 @@ touchManagedPtr _obj freeMem name' return result' + +data DOMDOMNamedFlowCollectionNamedItemMethodInfo +instance (signature ~ (T.Text -> m DOMWebKitNamedFlow), MonadIO m, DOMDOMNamedFlowCollectionK a) => MethodInfo DOMDOMNamedFlowCollectionNamedItemMethodInfo a signature where + overloadedMethod _ = dOMDOMNamedFlowCollectionNamedItem diff --git a/GI/WebKit/Objects/DOMDOMNamedFlowCollection.hs-boot b/GI/WebKit/Objects/DOMDOMNamedFlowCollection.hs-boot --- a/GI/WebKit/Objects/DOMDOMNamedFlowCollection.hs-boot +++ b/GI/WebKit/Objects/DOMDOMNamedFlowCollection.hs-boot @@ -12,3 +12,6 @@ class GObject o => DOMDOMNamedFlowCollectionK o instance (GObject o, IsDescendantOf DOMDOMNamedFlowCollection o) => DOMDOMNamedFlowCollectionK o data DOMDOMNamedFlowCollectionLengthPropertyInfo +data DOMDOMNamedFlowCollectionGetLengthMethodInfo +data DOMDOMNamedFlowCollectionItemMethodInfo +data DOMDOMNamedFlowCollectionNamedItemMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMPlugin.hs b/GI/WebKit/Objects/DOMDOMPlugin.hs --- a/GI/WebKit/Objects/DOMDOMPlugin.hs +++ b/GI/WebKit/Objects/DOMDOMPlugin.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** dOMDOMPluginGetDescription + DOMDOMPluginGetDescriptionMethodInfo , dOMDOMPluginGetDescription , -- ** dOMDOMPluginGetFilename + DOMDOMPluginGetFilenameMethodInfo , dOMDOMPluginGetFilename , -- ** dOMDOMPluginGetLength + DOMDOMPluginGetLengthMethodInfo , dOMDOMPluginGetLength , -- ** dOMDOMPluginGetName + DOMDOMPluginGetNameMethodInfo , dOMDOMPluginGetName , -- ** dOMDOMPluginItem + DOMDOMPluginItemMethodInfo , dOMDOMPluginItem , -- ** dOMDOMPluginNamedItem + DOMDOMPluginNamedItemMethodInfo , dOMDOMPluginNamedItem , @@ -99,6 +106,45 @@ noDOMDOMPlugin :: Maybe DOMDOMPlugin noDOMDOMPlugin = Nothing +type family ResolveDOMDOMPluginMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMPluginMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMPluginMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMPluginMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMPluginMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMPluginMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMPluginMethod "item" o = DOMDOMPluginItemMethodInfo + ResolveDOMDOMPluginMethod "namedItem" o = DOMDOMPluginNamedItemMethodInfo + ResolveDOMDOMPluginMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMPluginMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMPluginMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMPluginMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMPluginMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMPluginMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMPluginMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMPluginMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMPluginMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMPluginMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMPluginMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMPluginMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMPluginMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMPluginMethod "getDescription" o = DOMDOMPluginGetDescriptionMethodInfo + ResolveDOMDOMPluginMethod "getFilename" o = DOMDOMPluginGetFilenameMethodInfo + ResolveDOMDOMPluginMethod "getLength" o = DOMDOMPluginGetLengthMethodInfo + ResolveDOMDOMPluginMethod "getName" o = DOMDOMPluginGetNameMethodInfo + ResolveDOMDOMPluginMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMPluginMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMPluginMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMPluginMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMPluginMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMPluginMethod t DOMDOMPlugin, MethodInfo info DOMDOMPlugin p) => IsLabelProxy t (DOMDOMPlugin -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMPluginMethod t DOMDOMPlugin, MethodInfo info DOMDOMPlugin p) => IsLabel t (DOMDOMPlugin -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "description" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -112,7 +158,7 @@ type AttrSetTypeConstraint DOMDOMPluginDescriptionPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMPluginDescriptionPropertyInfo = DOMDOMPluginK type AttrGetType DOMDOMPluginDescriptionPropertyInfo = T.Text - type AttrLabel DOMDOMPluginDescriptionPropertyInfo = "DOMDOMPlugin::description" + type AttrLabel DOMDOMPluginDescriptionPropertyInfo = "description" attrGet _ = getDOMDOMPluginDescription attrSet _ = undefined attrConstruct _ = undefined @@ -130,7 +176,7 @@ type AttrSetTypeConstraint DOMDOMPluginFilenamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMPluginFilenamePropertyInfo = DOMDOMPluginK type AttrGetType DOMDOMPluginFilenamePropertyInfo = T.Text - type AttrLabel DOMDOMPluginFilenamePropertyInfo = "DOMDOMPlugin::filename" + type AttrLabel DOMDOMPluginFilenamePropertyInfo = "filename" attrGet _ = getDOMDOMPluginFilename attrSet _ = undefined attrConstruct _ = undefined @@ -148,7 +194,7 @@ type AttrSetTypeConstraint DOMDOMPluginLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMPluginLengthPropertyInfo = DOMDOMPluginK type AttrGetType DOMDOMPluginLengthPropertyInfo = Word64 - type AttrLabel DOMDOMPluginLengthPropertyInfo = "DOMDOMPlugin::length" + type AttrLabel DOMDOMPluginLengthPropertyInfo = "length" attrGet _ = getDOMDOMPluginLength attrSet _ = undefined attrConstruct _ = undefined @@ -166,22 +212,21 @@ type AttrSetTypeConstraint DOMDOMPluginNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMPluginNamePropertyInfo = DOMDOMPluginK type AttrGetType DOMDOMPluginNamePropertyInfo = T.Text - type AttrLabel DOMDOMPluginNamePropertyInfo = "DOMDOMPlugin::name" + type AttrLabel DOMDOMPluginNamePropertyInfo = "name" attrGet _ = getDOMDOMPluginName attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDOMPlugin = DOMDOMPluginAttributeList -type DOMDOMPluginAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("description", DOMDOMPluginDescriptionPropertyInfo), '("filename", DOMDOMPluginFilenamePropertyInfo), '("length", DOMDOMPluginLengthPropertyInfo), '("name", DOMDOMPluginNamePropertyInfo)] :: [(Symbol, *)]) +type DOMDOMPluginAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("description", DOMDOMPluginDescriptionPropertyInfo), '("filename", DOMDOMPluginFilenamePropertyInfo), '("length", DOMDOMPluginLengthPropertyInfo), '("name", DOMDOMPluginNamePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMPlugin = DOMDOMPluginSignalList -type DOMDOMPluginSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMPluginSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMPlugin::get_description -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -193,8 +238,8 @@ dOMDOMPluginGetDescription :: (MonadIO m, DOMDOMPluginK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMDOMPluginGetDescription _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_plugin_get_description _obj' @@ -204,11 +249,14 @@ touchManagedPtr _obj return result' +data DOMDOMPluginGetDescriptionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDOMPluginK a) => MethodInfo DOMDOMPluginGetDescriptionMethodInfo a signature where + overloadedMethod _ = dOMDOMPluginGetDescription + -- method DOMDOMPlugin::get_filename -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -220,8 +268,8 @@ dOMDOMPluginGetFilename :: (MonadIO m, DOMDOMPluginK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMDOMPluginGetFilename _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_plugin_get_filename _obj' @@ -231,11 +279,14 @@ touchManagedPtr _obj return result' +data DOMDOMPluginGetFilenameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDOMPluginK a) => MethodInfo DOMDOMPluginGetFilenameMethodInfo a signature where + overloadedMethod _ = dOMDOMPluginGetFilename + -- method DOMDOMPlugin::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -247,19 +298,22 @@ dOMDOMPluginGetLength :: (MonadIO m, DOMDOMPluginK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMDOMPluginGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_plugin_get_length _obj' touchManagedPtr _obj return result +data DOMDOMPluginGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMDOMPluginK a) => MethodInfo DOMDOMPluginGetLengthMethodInfo a signature where + overloadedMethod _ = dOMDOMPluginGetLength + -- method DOMDOMPlugin::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -271,8 +325,8 @@ dOMDOMPluginGetName :: (MonadIO m, DOMDOMPluginK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMDOMPluginGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_plugin_get_name _obj' @@ -282,11 +336,14 @@ touchManagedPtr _obj return result' +data DOMDOMPluginGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDOMPluginK a) => MethodInfo DOMDOMPluginGetNameMethodInfo a signature where + overloadedMethod _ = dOMDOMPluginGetName + -- method DOMDOMPlugin::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMMimeType" -- throws : False -- Skip return : False @@ -299,9 +356,9 @@ dOMDOMPluginItem :: (MonadIO m, DOMDOMPluginK a) => - a -> -- _obj - Word64 -> -- index - m DOMDOMMimeType + a -- _obj + -> Word64 -- index + -> m DOMDOMMimeType -- result dOMDOMPluginItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_plugin_item _obj' index @@ -310,11 +367,14 @@ touchManagedPtr _obj return result' +data DOMDOMPluginItemMethodInfo +instance (signature ~ (Word64 -> m DOMDOMMimeType), MonadIO m, DOMDOMPluginK a) => MethodInfo DOMDOMPluginItemMethodInfo a signature where + overloadedMethod _ = dOMDOMPluginItem + -- method DOMDOMPlugin::named_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMMimeType" -- throws : False -- Skip return : False @@ -327,9 +387,9 @@ dOMDOMPluginNamedItem :: (MonadIO m, DOMDOMPluginK a) => - a -> -- _obj - T.Text -> -- name - m DOMDOMMimeType + a -- _obj + -> T.Text -- name + -> m DOMDOMMimeType -- result dOMDOMPluginNamedItem _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -339,5 +399,9 @@ touchManagedPtr _obj freeMem name' return result' + +data DOMDOMPluginNamedItemMethodInfo +instance (signature ~ (T.Text -> m DOMDOMMimeType), MonadIO m, DOMDOMPluginK a) => MethodInfo DOMDOMPluginNamedItemMethodInfo a signature where + overloadedMethod _ = dOMDOMPluginNamedItem diff --git a/GI/WebKit/Objects/DOMDOMPlugin.hs-boot b/GI/WebKit/Objects/DOMDOMPlugin.hs-boot --- a/GI/WebKit/Objects/DOMDOMPlugin.hs-boot +++ b/GI/WebKit/Objects/DOMDOMPlugin.hs-boot @@ -15,3 +15,9 @@ data DOMDOMPluginFilenamePropertyInfo data DOMDOMPluginLengthPropertyInfo data DOMDOMPluginNamePropertyInfo +data DOMDOMPluginGetDescriptionMethodInfo +data DOMDOMPluginGetFilenameMethodInfo +data DOMDOMPluginGetLengthMethodInfo +data DOMDOMPluginGetNameMethodInfo +data DOMDOMPluginItemMethodInfo +data DOMDOMPluginNamedItemMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMPluginArray.hs b/GI/WebKit/Objects/DOMDOMPluginArray.hs --- a/GI/WebKit/Objects/DOMDOMPluginArray.hs +++ b/GI/WebKit/Objects/DOMDOMPluginArray.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMDOMPluginArrayGetLength + DOMDOMPluginArrayGetLengthMethodInfo , dOMDOMPluginArrayGetLength , -- ** dOMDOMPluginArrayItem + DOMDOMPluginArrayItemMethodInfo , dOMDOMPluginArrayItem , -- ** dOMDOMPluginArrayNamedItem + DOMDOMPluginArrayNamedItemMethodInfo , dOMDOMPluginArrayNamedItem , -- ** dOMDOMPluginArrayRefresh + DOMDOMPluginArrayRefreshMethodInfo , dOMDOMPluginArrayRefresh , @@ -76,6 +81,43 @@ noDOMDOMPluginArray :: Maybe DOMDOMPluginArray noDOMDOMPluginArray = Nothing +type family ResolveDOMDOMPluginArrayMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMPluginArrayMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMPluginArrayMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMPluginArrayMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMPluginArrayMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMPluginArrayMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMPluginArrayMethod "item" o = DOMDOMPluginArrayItemMethodInfo + ResolveDOMDOMPluginArrayMethod "namedItem" o = DOMDOMPluginArrayNamedItemMethodInfo + ResolveDOMDOMPluginArrayMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMPluginArrayMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMPluginArrayMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMPluginArrayMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMPluginArrayMethod "refresh" o = DOMDOMPluginArrayRefreshMethodInfo + ResolveDOMDOMPluginArrayMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMPluginArrayMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMPluginArrayMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMPluginArrayMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMPluginArrayMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMPluginArrayMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMPluginArrayMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMPluginArrayMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMPluginArrayMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMPluginArrayMethod "getLength" o = DOMDOMPluginArrayGetLengthMethodInfo + ResolveDOMDOMPluginArrayMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMPluginArrayMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMPluginArrayMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMPluginArrayMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMPluginArrayMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMPluginArrayMethod t DOMDOMPluginArray, MethodInfo info DOMDOMPluginArray p) => IsLabelProxy t (DOMDOMPluginArray -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMPluginArrayMethod t DOMDOMPluginArray, MethodInfo info DOMDOMPluginArray p) => IsLabel t (DOMDOMPluginArray -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -89,22 +131,21 @@ type AttrSetTypeConstraint DOMDOMPluginArrayLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMPluginArrayLengthPropertyInfo = DOMDOMPluginArrayK type AttrGetType DOMDOMPluginArrayLengthPropertyInfo = Word64 - type AttrLabel DOMDOMPluginArrayLengthPropertyInfo = "DOMDOMPluginArray::length" + type AttrLabel DOMDOMPluginArrayLengthPropertyInfo = "length" attrGet _ = getDOMDOMPluginArrayLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDOMPluginArray = DOMDOMPluginArrayAttributeList -type DOMDOMPluginArrayAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMPluginArrayLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMDOMPluginArrayAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMPluginArrayLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMPluginArray = DOMDOMPluginArraySignalList -type DOMDOMPluginArraySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMPluginArraySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMPluginArray::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -116,19 +157,22 @@ dOMDOMPluginArrayGetLength :: (MonadIO m, DOMDOMPluginArrayK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMDOMPluginArrayGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_plugin_array_get_length _obj' touchManagedPtr _obj return result +data DOMDOMPluginArrayGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMDOMPluginArrayK a) => MethodInfo DOMDOMPluginArrayGetLengthMethodInfo a signature where + overloadedMethod _ = dOMDOMPluginArrayGetLength + -- method DOMDOMPluginArray::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMPlugin" -- throws : False -- Skip return : False @@ -141,9 +185,9 @@ dOMDOMPluginArrayItem :: (MonadIO m, DOMDOMPluginArrayK a) => - a -> -- _obj - Word64 -> -- index - m DOMDOMPlugin + a -- _obj + -> Word64 -- index + -> m DOMDOMPlugin -- result dOMDOMPluginArrayItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_plugin_array_item _obj' index @@ -152,11 +196,14 @@ touchManagedPtr _obj return result' +data DOMDOMPluginArrayItemMethodInfo +instance (signature ~ (Word64 -> m DOMDOMPlugin), MonadIO m, DOMDOMPluginArrayK a) => MethodInfo DOMDOMPluginArrayItemMethodInfo a signature where + overloadedMethod _ = dOMDOMPluginArrayItem + -- method DOMDOMPluginArray::named_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMPlugin" -- throws : False -- Skip return : False @@ -169,9 +216,9 @@ dOMDOMPluginArrayNamedItem :: (MonadIO m, DOMDOMPluginArrayK a) => - a -> -- _obj - T.Text -> -- name - m DOMDOMPlugin + a -- _obj + -> T.Text -- name + -> m DOMDOMPlugin -- result dOMDOMPluginArrayNamedItem _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -182,11 +229,14 @@ freeMem name' return result' +data DOMDOMPluginArrayNamedItemMethodInfo +instance (signature ~ (T.Text -> m DOMDOMPlugin), MonadIO m, DOMDOMPluginArrayK a) => MethodInfo DOMDOMPluginArrayNamedItemMethodInfo a signature where + overloadedMethod _ = dOMDOMPluginArrayNamedItem + -- method DOMDOMPluginArray::refresh -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "reload", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "reload", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMPluginArray", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "reload", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -199,14 +249,18 @@ dOMDOMPluginArrayRefresh :: (MonadIO m, DOMDOMPluginArrayK a) => - a -> -- _obj - Bool -> -- reload - m () + a -- _obj + -> Bool -- reload + -> m () -- result dOMDOMPluginArrayRefresh _obj reload = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let reload' = (fromIntegral . fromEnum) reload webkit_dom_dom_plugin_array_refresh _obj' reload' touchManagedPtr _obj return () + +data DOMDOMPluginArrayRefreshMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMDOMPluginArrayK a) => MethodInfo DOMDOMPluginArrayRefreshMethodInfo a signature where + overloadedMethod _ = dOMDOMPluginArrayRefresh diff --git a/GI/WebKit/Objects/DOMDOMPluginArray.hs-boot b/GI/WebKit/Objects/DOMDOMPluginArray.hs-boot --- a/GI/WebKit/Objects/DOMDOMPluginArray.hs-boot +++ b/GI/WebKit/Objects/DOMDOMPluginArray.hs-boot @@ -12,3 +12,7 @@ class GObject o => DOMDOMPluginArrayK o instance (GObject o, IsDescendantOf DOMDOMPluginArray o) => DOMDOMPluginArrayK o data DOMDOMPluginArrayLengthPropertyInfo +data DOMDOMPluginArrayGetLengthMethodInfo +data DOMDOMPluginArrayItemMethodInfo +data DOMDOMPluginArrayNamedItemMethodInfo +data DOMDOMPluginArrayRefreshMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMSecurityPolicy.hs b/GI/WebKit/Objects/DOMDOMSecurityPolicy.hs --- a/GI/WebKit/Objects/DOMDOMSecurityPolicy.hs +++ b/GI/WebKit/Objects/DOMDOMSecurityPolicy.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,62 +18,77 @@ -- * Methods -- ** dOMDOMSecurityPolicyAllowsConnectionTo + DOMDOMSecurityPolicyAllowsConnectionToMethodInfo, dOMDOMSecurityPolicyAllowsConnectionTo , -- ** dOMDOMSecurityPolicyAllowsFontFrom + DOMDOMSecurityPolicyAllowsFontFromMethodInfo, dOMDOMSecurityPolicyAllowsFontFrom , -- ** dOMDOMSecurityPolicyAllowsFormAction + DOMDOMSecurityPolicyAllowsFormActionMethodInfo, dOMDOMSecurityPolicyAllowsFormAction , -- ** dOMDOMSecurityPolicyAllowsFrameFrom + DOMDOMSecurityPolicyAllowsFrameFromMethodInfo, dOMDOMSecurityPolicyAllowsFrameFrom , -- ** dOMDOMSecurityPolicyAllowsImageFrom + DOMDOMSecurityPolicyAllowsImageFromMethodInfo, dOMDOMSecurityPolicyAllowsImageFrom , -- ** dOMDOMSecurityPolicyAllowsMediaFrom + DOMDOMSecurityPolicyAllowsMediaFromMethodInfo, dOMDOMSecurityPolicyAllowsMediaFrom , -- ** dOMDOMSecurityPolicyAllowsObjectFrom + DOMDOMSecurityPolicyAllowsObjectFromMethodInfo, dOMDOMSecurityPolicyAllowsObjectFrom , -- ** dOMDOMSecurityPolicyAllowsPluginType + DOMDOMSecurityPolicyAllowsPluginTypeMethodInfo, dOMDOMSecurityPolicyAllowsPluginType , -- ** dOMDOMSecurityPolicyAllowsScriptFrom + DOMDOMSecurityPolicyAllowsScriptFromMethodInfo, dOMDOMSecurityPolicyAllowsScriptFrom , -- ** dOMDOMSecurityPolicyAllowsStyleFrom + DOMDOMSecurityPolicyAllowsStyleFromMethodInfo, dOMDOMSecurityPolicyAllowsStyleFrom , -- ** dOMDOMSecurityPolicyGetAllowsEval + DOMDOMSecurityPolicyGetAllowsEvalMethodInfo, dOMDOMSecurityPolicyGetAllowsEval , -- ** dOMDOMSecurityPolicyGetAllowsInlineScript + DOMDOMSecurityPolicyGetAllowsInlineScriptMethodInfo, dOMDOMSecurityPolicyGetAllowsInlineScript, -- ** dOMDOMSecurityPolicyGetAllowsInlineStyle + DOMDOMSecurityPolicyGetAllowsInlineStyleMethodInfo, dOMDOMSecurityPolicyGetAllowsInlineStyle, -- ** dOMDOMSecurityPolicyGetIsActive + DOMDOMSecurityPolicyGetIsActiveMethodInfo, dOMDOMSecurityPolicyGetIsActive , -- ** dOMDOMSecurityPolicyGetReportUrIs + DOMDOMSecurityPolicyGetReportUrIsMethodInfo, dOMDOMSecurityPolicyGetReportUrIs , @@ -140,6 +156,54 @@ noDOMDOMSecurityPolicy :: Maybe DOMDOMSecurityPolicy noDOMDOMSecurityPolicy = Nothing +type family ResolveDOMDOMSecurityPolicyMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMSecurityPolicyMethod "allowsConnectionTo" o = DOMDOMSecurityPolicyAllowsConnectionToMethodInfo + ResolveDOMDOMSecurityPolicyMethod "allowsFontFrom" o = DOMDOMSecurityPolicyAllowsFontFromMethodInfo + ResolveDOMDOMSecurityPolicyMethod "allowsFormAction" o = DOMDOMSecurityPolicyAllowsFormActionMethodInfo + ResolveDOMDOMSecurityPolicyMethod "allowsFrameFrom" o = DOMDOMSecurityPolicyAllowsFrameFromMethodInfo + ResolveDOMDOMSecurityPolicyMethod "allowsImageFrom" o = DOMDOMSecurityPolicyAllowsImageFromMethodInfo + ResolveDOMDOMSecurityPolicyMethod "allowsMediaFrom" o = DOMDOMSecurityPolicyAllowsMediaFromMethodInfo + ResolveDOMDOMSecurityPolicyMethod "allowsObjectFrom" o = DOMDOMSecurityPolicyAllowsObjectFromMethodInfo + ResolveDOMDOMSecurityPolicyMethod "allowsPluginType" o = DOMDOMSecurityPolicyAllowsPluginTypeMethodInfo + ResolveDOMDOMSecurityPolicyMethod "allowsScriptFrom" o = DOMDOMSecurityPolicyAllowsScriptFromMethodInfo + ResolveDOMDOMSecurityPolicyMethod "allowsStyleFrom" o = DOMDOMSecurityPolicyAllowsStyleFromMethodInfo + ResolveDOMDOMSecurityPolicyMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMSecurityPolicyMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMSecurityPolicyMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMSecurityPolicyMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMSecurityPolicyMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMSecurityPolicyMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMSecurityPolicyMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMSecurityPolicyMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMSecurityPolicyMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMSecurityPolicyMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMSecurityPolicyMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMSecurityPolicyMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMSecurityPolicyMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMSecurityPolicyMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMSecurityPolicyMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMSecurityPolicyMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMSecurityPolicyMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMSecurityPolicyMethod "getAllowsEval" o = DOMDOMSecurityPolicyGetAllowsEvalMethodInfo + ResolveDOMDOMSecurityPolicyMethod "getAllowsInlineScript" o = DOMDOMSecurityPolicyGetAllowsInlineScriptMethodInfo + ResolveDOMDOMSecurityPolicyMethod "getAllowsInlineStyle" o = DOMDOMSecurityPolicyGetAllowsInlineStyleMethodInfo + ResolveDOMDOMSecurityPolicyMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMSecurityPolicyMethod "getIsActive" o = DOMDOMSecurityPolicyGetIsActiveMethodInfo + ResolveDOMDOMSecurityPolicyMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMSecurityPolicyMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMSecurityPolicyMethod "getReportUrIs" o = DOMDOMSecurityPolicyGetReportUrIsMethodInfo + ResolveDOMDOMSecurityPolicyMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMSecurityPolicyMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMSecurityPolicyMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMSecurityPolicyMethod t DOMDOMSecurityPolicy, MethodInfo info DOMDOMSecurityPolicy p) => IsLabelProxy t (DOMDOMSecurityPolicy -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMSecurityPolicyMethod t DOMDOMSecurityPolicy, MethodInfo info DOMDOMSecurityPolicy p) => IsLabel t (DOMDOMSecurityPolicy -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "allows-eval" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -153,7 +217,7 @@ type AttrSetTypeConstraint DOMDOMSecurityPolicyAllowsEvalPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSecurityPolicyAllowsEvalPropertyInfo = DOMDOMSecurityPolicyK type AttrGetType DOMDOMSecurityPolicyAllowsEvalPropertyInfo = Bool - type AttrLabel DOMDOMSecurityPolicyAllowsEvalPropertyInfo = "DOMDOMSecurityPolicy::allows-eval" + type AttrLabel DOMDOMSecurityPolicyAllowsEvalPropertyInfo = "allows-eval" attrGet _ = getDOMDOMSecurityPolicyAllowsEval attrSet _ = undefined attrConstruct _ = undefined @@ -171,7 +235,7 @@ type AttrSetTypeConstraint DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = DOMDOMSecurityPolicyK type AttrGetType DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = Bool - type AttrLabel DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = "DOMDOMSecurityPolicy::allows-inline-script" + type AttrLabel DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo = "allows-inline-script" attrGet _ = getDOMDOMSecurityPolicyAllowsInlineScript attrSet _ = undefined attrConstruct _ = undefined @@ -189,7 +253,7 @@ type AttrSetTypeConstraint DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = DOMDOMSecurityPolicyK type AttrGetType DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = Bool - type AttrLabel DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = "DOMDOMSecurityPolicy::allows-inline-style" + type AttrLabel DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo = "allows-inline-style" attrGet _ = getDOMDOMSecurityPolicyAllowsInlineStyle attrSet _ = undefined attrConstruct _ = undefined @@ -207,7 +271,7 @@ type AttrSetTypeConstraint DOMDOMSecurityPolicyIsActivePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSecurityPolicyIsActivePropertyInfo = DOMDOMSecurityPolicyK type AttrGetType DOMDOMSecurityPolicyIsActivePropertyInfo = Bool - type AttrLabel DOMDOMSecurityPolicyIsActivePropertyInfo = "DOMDOMSecurityPolicy::is-active" + type AttrLabel DOMDOMSecurityPolicyIsActivePropertyInfo = "is-active" attrGet _ = getDOMDOMSecurityPolicyIsActive attrSet _ = undefined attrConstruct _ = undefined @@ -225,22 +289,21 @@ type AttrSetTypeConstraint DOMDOMSecurityPolicyReportUrIsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSecurityPolicyReportUrIsPropertyInfo = DOMDOMSecurityPolicyK type AttrGetType DOMDOMSecurityPolicyReportUrIsPropertyInfo = DOMDOMStringList - type AttrLabel DOMDOMSecurityPolicyReportUrIsPropertyInfo = "DOMDOMSecurityPolicy::report-ur-is" + type AttrLabel DOMDOMSecurityPolicyReportUrIsPropertyInfo = "report-ur-is" attrGet _ = getDOMDOMSecurityPolicyReportUrIs attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDOMSecurityPolicy = DOMDOMSecurityPolicyAttributeList -type DOMDOMSecurityPolicyAttributeList = ('[ '("allows-eval", DOMDOMSecurityPolicyAllowsEvalPropertyInfo), '("allows-inline-script", DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo), '("allows-inline-style", DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("is-active", DOMDOMSecurityPolicyIsActivePropertyInfo), '("report-ur-is", DOMDOMSecurityPolicyReportUrIsPropertyInfo)] :: [(Symbol, *)]) +type DOMDOMSecurityPolicyAttributeList = ('[ '("allowsEval", DOMDOMSecurityPolicyAllowsEvalPropertyInfo), '("allowsInlineScript", DOMDOMSecurityPolicyAllowsInlineScriptPropertyInfo), '("allowsInlineStyle", DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("isActive", DOMDOMSecurityPolicyIsActivePropertyInfo), '("reportUrIs", DOMDOMSecurityPolicyReportUrIsPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMSecurityPolicy = DOMDOMSecurityPolicySignalList -type DOMDOMSecurityPolicySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMSecurityPolicySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMSecurityPolicy::allows_connection_to -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -253,9 +316,9 @@ dOMDOMSecurityPolicyAllowsConnectionTo :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - T.Text -> -- url - m Bool + a -- _obj + -> T.Text -- url + -> m Bool -- result dOMDOMSecurityPolicyAllowsConnectionTo _obj url = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj url' <- textToCString url @@ -265,11 +328,14 @@ freeMem url' return result' +data DOMDOMSecurityPolicyAllowsConnectionToMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyAllowsConnectionToMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyAllowsConnectionTo + -- method DOMDOMSecurityPolicy::allows_font_from -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -282,9 +348,9 @@ dOMDOMSecurityPolicyAllowsFontFrom :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - T.Text -> -- url - m Bool + a -- _obj + -> T.Text -- url + -> m Bool -- result dOMDOMSecurityPolicyAllowsFontFrom _obj url = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj url' <- textToCString url @@ -294,11 +360,14 @@ freeMem url' return result' +data DOMDOMSecurityPolicyAllowsFontFromMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyAllowsFontFromMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyAllowsFontFrom + -- method DOMDOMSecurityPolicy::allows_form_action -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -311,9 +380,9 @@ dOMDOMSecurityPolicyAllowsFormAction :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - T.Text -> -- url - m Bool + a -- _obj + -> T.Text -- url + -> m Bool -- result dOMDOMSecurityPolicyAllowsFormAction _obj url = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj url' <- textToCString url @@ -323,11 +392,14 @@ freeMem url' return result' +data DOMDOMSecurityPolicyAllowsFormActionMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyAllowsFormActionMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyAllowsFormAction + -- method DOMDOMSecurityPolicy::allows_frame_from -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -340,9 +412,9 @@ dOMDOMSecurityPolicyAllowsFrameFrom :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - T.Text -> -- url - m Bool + a -- _obj + -> T.Text -- url + -> m Bool -- result dOMDOMSecurityPolicyAllowsFrameFrom _obj url = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj url' <- textToCString url @@ -352,11 +424,14 @@ freeMem url' return result' +data DOMDOMSecurityPolicyAllowsFrameFromMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyAllowsFrameFromMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyAllowsFrameFrom + -- method DOMDOMSecurityPolicy::allows_image_from -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -369,9 +444,9 @@ dOMDOMSecurityPolicyAllowsImageFrom :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - T.Text -> -- url - m Bool + a -- _obj + -> T.Text -- url + -> m Bool -- result dOMDOMSecurityPolicyAllowsImageFrom _obj url = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj url' <- textToCString url @@ -381,11 +456,14 @@ freeMem url' return result' +data DOMDOMSecurityPolicyAllowsImageFromMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyAllowsImageFromMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyAllowsImageFrom + -- method DOMDOMSecurityPolicy::allows_media_from -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -398,9 +476,9 @@ dOMDOMSecurityPolicyAllowsMediaFrom :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - T.Text -> -- url - m Bool + a -- _obj + -> T.Text -- url + -> m Bool -- result dOMDOMSecurityPolicyAllowsMediaFrom _obj url = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj url' <- textToCString url @@ -410,11 +488,14 @@ freeMem url' return result' +data DOMDOMSecurityPolicyAllowsMediaFromMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyAllowsMediaFromMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyAllowsMediaFrom + -- method DOMDOMSecurityPolicy::allows_object_from -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -427,9 +508,9 @@ dOMDOMSecurityPolicyAllowsObjectFrom :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - T.Text -> -- url - m Bool + a -- _obj + -> T.Text -- url + -> m Bool -- result dOMDOMSecurityPolicyAllowsObjectFrom _obj url = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj url' <- textToCString url @@ -439,11 +520,14 @@ freeMem url' return result' +data DOMDOMSecurityPolicyAllowsObjectFromMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyAllowsObjectFromMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyAllowsObjectFrom + -- method DOMDOMSecurityPolicy::allows_plugin_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -456,9 +540,9 @@ dOMDOMSecurityPolicyAllowsPluginType :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - T.Text -> -- type - m Bool + a -- _obj + -> T.Text -- type_ + -> m Bool -- result dOMDOMSecurityPolicyAllowsPluginType _obj type_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj type_' <- textToCString type_ @@ -468,11 +552,14 @@ freeMem type_' return result' +data DOMDOMSecurityPolicyAllowsPluginTypeMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyAllowsPluginTypeMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyAllowsPluginType + -- method DOMDOMSecurityPolicy::allows_script_from -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -485,9 +572,9 @@ dOMDOMSecurityPolicyAllowsScriptFrom :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - T.Text -> -- url - m Bool + a -- _obj + -> T.Text -- url + -> m Bool -- result dOMDOMSecurityPolicyAllowsScriptFrom _obj url = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj url' <- textToCString url @@ -497,11 +584,14 @@ freeMem url' return result' +data DOMDOMSecurityPolicyAllowsScriptFromMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyAllowsScriptFromMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyAllowsScriptFrom + -- method DOMDOMSecurityPolicy::allows_style_from -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -514,9 +604,9 @@ dOMDOMSecurityPolicyAllowsStyleFrom :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - T.Text -> -- url - m Bool + a -- _obj + -> T.Text -- url + -> m Bool -- result dOMDOMSecurityPolicyAllowsStyleFrom _obj url = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj url' <- textToCString url @@ -526,11 +616,14 @@ freeMem url' return result' +data DOMDOMSecurityPolicyAllowsStyleFromMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyAllowsStyleFromMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyAllowsStyleFrom + -- method DOMDOMSecurityPolicy::get_allows_eval -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -542,8 +635,8 @@ dOMDOMSecurityPolicyGetAllowsEval :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMDOMSecurityPolicyGetAllowsEval _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_security_policy_get_allows_eval _obj' @@ -551,11 +644,14 @@ touchManagedPtr _obj return result' +data DOMDOMSecurityPolicyGetAllowsEvalMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyGetAllowsEvalMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyGetAllowsEval + -- method DOMDOMSecurityPolicy::get_allows_inline_script -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -567,8 +663,8 @@ dOMDOMSecurityPolicyGetAllowsInlineScript :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMDOMSecurityPolicyGetAllowsInlineScript _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_security_policy_get_allows_inline_script _obj' @@ -576,11 +672,14 @@ touchManagedPtr _obj return result' +data DOMDOMSecurityPolicyGetAllowsInlineScriptMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyGetAllowsInlineScriptMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyGetAllowsInlineScript + -- method DOMDOMSecurityPolicy::get_allows_inline_style -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -592,8 +691,8 @@ dOMDOMSecurityPolicyGetAllowsInlineStyle :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMDOMSecurityPolicyGetAllowsInlineStyle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_security_policy_get_allows_inline_style _obj' @@ -601,11 +700,14 @@ touchManagedPtr _obj return result' +data DOMDOMSecurityPolicyGetAllowsInlineStyleMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyGetAllowsInlineStyleMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyGetAllowsInlineStyle + -- method DOMDOMSecurityPolicy::get_is_active -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -617,8 +719,8 @@ dOMDOMSecurityPolicyGetIsActive :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMDOMSecurityPolicyGetIsActive _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_security_policy_get_is_active _obj' @@ -626,11 +728,14 @@ touchManagedPtr _obj return result' +data DOMDOMSecurityPolicyGetIsActiveMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyGetIsActiveMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyGetIsActive + -- method DOMDOMSecurityPolicy::get_report_ur_is -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSecurityPolicy", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMStringList" -- throws : False -- Skip return : False @@ -642,8 +747,8 @@ dOMDOMSecurityPolicyGetReportUrIs :: (MonadIO m, DOMDOMSecurityPolicyK a) => - a -> -- _obj - m DOMDOMStringList + a -- _obj + -> m DOMDOMStringList -- result dOMDOMSecurityPolicyGetReportUrIs _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_security_policy_get_report_ur_is _obj' @@ -651,5 +756,9 @@ result' <- (wrapObject DOMDOMStringList) result touchManagedPtr _obj return result' + +data DOMDOMSecurityPolicyGetReportUrIsMethodInfo +instance (signature ~ (m DOMDOMStringList), MonadIO m, DOMDOMSecurityPolicyK a) => MethodInfo DOMDOMSecurityPolicyGetReportUrIsMethodInfo a signature where + overloadedMethod _ = dOMDOMSecurityPolicyGetReportUrIs diff --git a/GI/WebKit/Objects/DOMDOMSecurityPolicy.hs-boot b/GI/WebKit/Objects/DOMDOMSecurityPolicy.hs-boot --- a/GI/WebKit/Objects/DOMDOMSecurityPolicy.hs-boot +++ b/GI/WebKit/Objects/DOMDOMSecurityPolicy.hs-boot @@ -16,3 +16,18 @@ data DOMDOMSecurityPolicyAllowsInlineStylePropertyInfo data DOMDOMSecurityPolicyIsActivePropertyInfo data DOMDOMSecurityPolicyReportUrIsPropertyInfo +data DOMDOMSecurityPolicyAllowsConnectionToMethodInfo +data DOMDOMSecurityPolicyAllowsFontFromMethodInfo +data DOMDOMSecurityPolicyAllowsFormActionMethodInfo +data DOMDOMSecurityPolicyAllowsFrameFromMethodInfo +data DOMDOMSecurityPolicyAllowsImageFromMethodInfo +data DOMDOMSecurityPolicyAllowsMediaFromMethodInfo +data DOMDOMSecurityPolicyAllowsObjectFromMethodInfo +data DOMDOMSecurityPolicyAllowsPluginTypeMethodInfo +data DOMDOMSecurityPolicyAllowsScriptFromMethodInfo +data DOMDOMSecurityPolicyAllowsStyleFromMethodInfo +data DOMDOMSecurityPolicyGetAllowsEvalMethodInfo +data DOMDOMSecurityPolicyGetAllowsInlineScriptMethodInfo +data DOMDOMSecurityPolicyGetAllowsInlineStyleMethodInfo +data DOMDOMSecurityPolicyGetIsActiveMethodInfo +data DOMDOMSecurityPolicyGetReportUrIsMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMSelection.hs b/GI/WebKit/Objects/DOMDOMSelection.hs --- a/GI/WebKit/Objects/DOMDOMSelection.hs +++ b/GI/WebKit/Objects/DOMDOMSelection.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,98 +18,122 @@ -- * Methods -- ** dOMDOMSelectionAddRange + DOMDOMSelectionAddRangeMethodInfo , dOMDOMSelectionAddRange , -- ** dOMDOMSelectionCollapse + DOMDOMSelectionCollapseMethodInfo , dOMDOMSelectionCollapse , -- ** dOMDOMSelectionCollapseToEnd + DOMDOMSelectionCollapseToEndMethodInfo , dOMDOMSelectionCollapseToEnd , -- ** dOMDOMSelectionCollapseToStart + DOMDOMSelectionCollapseToStartMethodInfo, dOMDOMSelectionCollapseToStart , -- ** dOMDOMSelectionContainsNode + DOMDOMSelectionContainsNodeMethodInfo , dOMDOMSelectionContainsNode , -- ** dOMDOMSelectionDeleteFromDocument + DOMDOMSelectionDeleteFromDocumentMethodInfo, dOMDOMSelectionDeleteFromDocument , -- ** dOMDOMSelectionEmpty + DOMDOMSelectionEmptyMethodInfo , dOMDOMSelectionEmpty , -- ** dOMDOMSelectionExtend + DOMDOMSelectionExtendMethodInfo , dOMDOMSelectionExtend , -- ** dOMDOMSelectionGetAnchorNode + DOMDOMSelectionGetAnchorNodeMethodInfo , dOMDOMSelectionGetAnchorNode , -- ** dOMDOMSelectionGetAnchorOffset + DOMDOMSelectionGetAnchorOffsetMethodInfo, dOMDOMSelectionGetAnchorOffset , -- ** dOMDOMSelectionGetBaseNode + DOMDOMSelectionGetBaseNodeMethodInfo , dOMDOMSelectionGetBaseNode , -- ** dOMDOMSelectionGetBaseOffset + DOMDOMSelectionGetBaseOffsetMethodInfo , dOMDOMSelectionGetBaseOffset , -- ** dOMDOMSelectionGetExtentNode + DOMDOMSelectionGetExtentNodeMethodInfo , dOMDOMSelectionGetExtentNode , -- ** dOMDOMSelectionGetExtentOffset + DOMDOMSelectionGetExtentOffsetMethodInfo, dOMDOMSelectionGetExtentOffset , -- ** dOMDOMSelectionGetFocusNode + DOMDOMSelectionGetFocusNodeMethodInfo , dOMDOMSelectionGetFocusNode , -- ** dOMDOMSelectionGetFocusOffset + DOMDOMSelectionGetFocusOffsetMethodInfo , dOMDOMSelectionGetFocusOffset , -- ** dOMDOMSelectionGetIsCollapsed + DOMDOMSelectionGetIsCollapsedMethodInfo , dOMDOMSelectionGetIsCollapsed , -- ** dOMDOMSelectionGetRangeAt + DOMDOMSelectionGetRangeAtMethodInfo , dOMDOMSelectionGetRangeAt , -- ** dOMDOMSelectionGetRangeCount + DOMDOMSelectionGetRangeCountMethodInfo , dOMDOMSelectionGetRangeCount , -- ** dOMDOMSelectionModify + DOMDOMSelectionModifyMethodInfo , dOMDOMSelectionModify , -- ** dOMDOMSelectionRemoveAllRanges + DOMDOMSelectionRemoveAllRangesMethodInfo, dOMDOMSelectionRemoveAllRanges , -- ** dOMDOMSelectionSelectAllChildren + DOMDOMSelectionSelectAllChildrenMethodInfo, dOMDOMSelectionSelectAllChildren , -- ** dOMDOMSelectionSetBaseAndExtent + DOMDOMSelectionSetBaseAndExtentMethodInfo, dOMDOMSelectionSetBaseAndExtent , -- ** dOMDOMSelectionSetPosition + DOMDOMSelectionSetPositionMethodInfo , dOMDOMSelectionSetPosition , @@ -206,6 +231,63 @@ noDOMDOMSelection :: Maybe DOMDOMSelection noDOMDOMSelection = Nothing +type family ResolveDOMDOMSelectionMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMSelectionMethod "addRange" o = DOMDOMSelectionAddRangeMethodInfo + ResolveDOMDOMSelectionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMSelectionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMSelectionMethod "collapse" o = DOMDOMSelectionCollapseMethodInfo + ResolveDOMDOMSelectionMethod "collapseToEnd" o = DOMDOMSelectionCollapseToEndMethodInfo + ResolveDOMDOMSelectionMethod "collapseToStart" o = DOMDOMSelectionCollapseToStartMethodInfo + ResolveDOMDOMSelectionMethod "containsNode" o = DOMDOMSelectionContainsNodeMethodInfo + ResolveDOMDOMSelectionMethod "deleteFromDocument" o = DOMDOMSelectionDeleteFromDocumentMethodInfo + ResolveDOMDOMSelectionMethod "empty" o = DOMDOMSelectionEmptyMethodInfo + ResolveDOMDOMSelectionMethod "extend" o = DOMDOMSelectionExtendMethodInfo + ResolveDOMDOMSelectionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMSelectionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMSelectionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMSelectionMethod "modify" o = DOMDOMSelectionModifyMethodInfo + ResolveDOMDOMSelectionMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMSelectionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMSelectionMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMSelectionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMSelectionMethod "removeAllRanges" o = DOMDOMSelectionRemoveAllRangesMethodInfo + ResolveDOMDOMSelectionMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMSelectionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMSelectionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMSelectionMethod "selectAllChildren" o = DOMDOMSelectionSelectAllChildrenMethodInfo + ResolveDOMDOMSelectionMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMSelectionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMSelectionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMSelectionMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMSelectionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMSelectionMethod "getAnchorNode" o = DOMDOMSelectionGetAnchorNodeMethodInfo + ResolveDOMDOMSelectionMethod "getAnchorOffset" o = DOMDOMSelectionGetAnchorOffsetMethodInfo + ResolveDOMDOMSelectionMethod "getBaseNode" o = DOMDOMSelectionGetBaseNodeMethodInfo + ResolveDOMDOMSelectionMethod "getBaseOffset" o = DOMDOMSelectionGetBaseOffsetMethodInfo + ResolveDOMDOMSelectionMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMSelectionMethod "getExtentNode" o = DOMDOMSelectionGetExtentNodeMethodInfo + ResolveDOMDOMSelectionMethod "getExtentOffset" o = DOMDOMSelectionGetExtentOffsetMethodInfo + ResolveDOMDOMSelectionMethod "getFocusNode" o = DOMDOMSelectionGetFocusNodeMethodInfo + ResolveDOMDOMSelectionMethod "getFocusOffset" o = DOMDOMSelectionGetFocusOffsetMethodInfo + ResolveDOMDOMSelectionMethod "getIsCollapsed" o = DOMDOMSelectionGetIsCollapsedMethodInfo + ResolveDOMDOMSelectionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMSelectionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMSelectionMethod "getRangeAt" o = DOMDOMSelectionGetRangeAtMethodInfo + ResolveDOMDOMSelectionMethod "getRangeCount" o = DOMDOMSelectionGetRangeCountMethodInfo + ResolveDOMDOMSelectionMethod "setBaseAndExtent" o = DOMDOMSelectionSetBaseAndExtentMethodInfo + ResolveDOMDOMSelectionMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMSelectionMethod "setPosition" o = DOMDOMSelectionSetPositionMethodInfo + ResolveDOMDOMSelectionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMSelectionMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMSelectionMethod t DOMDOMSelection, MethodInfo info DOMDOMSelection p) => IsLabelProxy t (DOMDOMSelection -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMSelectionMethod t DOMDOMSelection, MethodInfo info DOMDOMSelection p) => IsLabel t (DOMDOMSelection -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "anchor-node" -- Type: TInterface "WebKit" "DOMNode" -- Flags: [PropertyReadable] @@ -219,7 +301,7 @@ type AttrSetTypeConstraint DOMDOMSelectionAnchorNodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSelectionAnchorNodePropertyInfo = DOMDOMSelectionK type AttrGetType DOMDOMSelectionAnchorNodePropertyInfo = DOMNode - type AttrLabel DOMDOMSelectionAnchorNodePropertyInfo = "DOMDOMSelection::anchor-node" + type AttrLabel DOMDOMSelectionAnchorNodePropertyInfo = "anchor-node" attrGet _ = getDOMDOMSelectionAnchorNode attrSet _ = undefined attrConstruct _ = undefined @@ -237,7 +319,7 @@ type AttrSetTypeConstraint DOMDOMSelectionAnchorOffsetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSelectionAnchorOffsetPropertyInfo = DOMDOMSelectionK type AttrGetType DOMDOMSelectionAnchorOffsetPropertyInfo = Int64 - type AttrLabel DOMDOMSelectionAnchorOffsetPropertyInfo = "DOMDOMSelection::anchor-offset" + type AttrLabel DOMDOMSelectionAnchorOffsetPropertyInfo = "anchor-offset" attrGet _ = getDOMDOMSelectionAnchorOffset attrSet _ = undefined attrConstruct _ = undefined @@ -255,7 +337,7 @@ type AttrSetTypeConstraint DOMDOMSelectionBaseNodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSelectionBaseNodePropertyInfo = DOMDOMSelectionK type AttrGetType DOMDOMSelectionBaseNodePropertyInfo = DOMNode - type AttrLabel DOMDOMSelectionBaseNodePropertyInfo = "DOMDOMSelection::base-node" + type AttrLabel DOMDOMSelectionBaseNodePropertyInfo = "base-node" attrGet _ = getDOMDOMSelectionBaseNode attrSet _ = undefined attrConstruct _ = undefined @@ -273,7 +355,7 @@ type AttrSetTypeConstraint DOMDOMSelectionBaseOffsetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSelectionBaseOffsetPropertyInfo = DOMDOMSelectionK type AttrGetType DOMDOMSelectionBaseOffsetPropertyInfo = Int64 - type AttrLabel DOMDOMSelectionBaseOffsetPropertyInfo = "DOMDOMSelection::base-offset" + type AttrLabel DOMDOMSelectionBaseOffsetPropertyInfo = "base-offset" attrGet _ = getDOMDOMSelectionBaseOffset attrSet _ = undefined attrConstruct _ = undefined @@ -291,7 +373,7 @@ type AttrSetTypeConstraint DOMDOMSelectionExtentNodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSelectionExtentNodePropertyInfo = DOMDOMSelectionK type AttrGetType DOMDOMSelectionExtentNodePropertyInfo = DOMNode - type AttrLabel DOMDOMSelectionExtentNodePropertyInfo = "DOMDOMSelection::extent-node" + type AttrLabel DOMDOMSelectionExtentNodePropertyInfo = "extent-node" attrGet _ = getDOMDOMSelectionExtentNode attrSet _ = undefined attrConstruct _ = undefined @@ -309,7 +391,7 @@ type AttrSetTypeConstraint DOMDOMSelectionExtentOffsetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSelectionExtentOffsetPropertyInfo = DOMDOMSelectionK type AttrGetType DOMDOMSelectionExtentOffsetPropertyInfo = Int64 - type AttrLabel DOMDOMSelectionExtentOffsetPropertyInfo = "DOMDOMSelection::extent-offset" + type AttrLabel DOMDOMSelectionExtentOffsetPropertyInfo = "extent-offset" attrGet _ = getDOMDOMSelectionExtentOffset attrSet _ = undefined attrConstruct _ = undefined @@ -327,7 +409,7 @@ type AttrSetTypeConstraint DOMDOMSelectionFocusNodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSelectionFocusNodePropertyInfo = DOMDOMSelectionK type AttrGetType DOMDOMSelectionFocusNodePropertyInfo = DOMNode - type AttrLabel DOMDOMSelectionFocusNodePropertyInfo = "DOMDOMSelection::focus-node" + type AttrLabel DOMDOMSelectionFocusNodePropertyInfo = "focus-node" attrGet _ = getDOMDOMSelectionFocusNode attrSet _ = undefined attrConstruct _ = undefined @@ -345,7 +427,7 @@ type AttrSetTypeConstraint DOMDOMSelectionFocusOffsetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSelectionFocusOffsetPropertyInfo = DOMDOMSelectionK type AttrGetType DOMDOMSelectionFocusOffsetPropertyInfo = Int64 - type AttrLabel DOMDOMSelectionFocusOffsetPropertyInfo = "DOMDOMSelection::focus-offset" + type AttrLabel DOMDOMSelectionFocusOffsetPropertyInfo = "focus-offset" attrGet _ = getDOMDOMSelectionFocusOffset attrSet _ = undefined attrConstruct _ = undefined @@ -363,7 +445,7 @@ type AttrSetTypeConstraint DOMDOMSelectionIsCollapsedPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSelectionIsCollapsedPropertyInfo = DOMDOMSelectionK type AttrGetType DOMDOMSelectionIsCollapsedPropertyInfo = Bool - type AttrLabel DOMDOMSelectionIsCollapsedPropertyInfo = "DOMDOMSelection::is-collapsed" + type AttrLabel DOMDOMSelectionIsCollapsedPropertyInfo = "is-collapsed" attrGet _ = getDOMDOMSelectionIsCollapsed attrSet _ = undefined attrConstruct _ = undefined @@ -381,7 +463,7 @@ type AttrSetTypeConstraint DOMDOMSelectionRangeCountPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSelectionRangeCountPropertyInfo = DOMDOMSelectionK type AttrGetType DOMDOMSelectionRangeCountPropertyInfo = Int64 - type AttrLabel DOMDOMSelectionRangeCountPropertyInfo = "DOMDOMSelection::range-count" + type AttrLabel DOMDOMSelectionRangeCountPropertyInfo = "range-count" attrGet _ = getDOMDOMSelectionRangeCount attrSet _ = undefined attrConstruct _ = undefined @@ -399,22 +481,21 @@ type AttrSetTypeConstraint DOMDOMSelectionTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMSelectionTypePropertyInfo = DOMDOMSelectionK type AttrGetType DOMDOMSelectionTypePropertyInfo = T.Text - type AttrLabel DOMDOMSelectionTypePropertyInfo = "DOMDOMSelection::type" + type AttrLabel DOMDOMSelectionTypePropertyInfo = "type" attrGet _ = getDOMDOMSelectionType attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDOMSelection = DOMDOMSelectionAttributeList -type DOMDOMSelectionAttributeList = ('[ '("anchor-node", DOMDOMSelectionAnchorNodePropertyInfo), '("anchor-offset", DOMDOMSelectionAnchorOffsetPropertyInfo), '("base-node", DOMDOMSelectionBaseNodePropertyInfo), '("base-offset", DOMDOMSelectionBaseOffsetPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("extent-node", DOMDOMSelectionExtentNodePropertyInfo), '("extent-offset", DOMDOMSelectionExtentOffsetPropertyInfo), '("focus-node", DOMDOMSelectionFocusNodePropertyInfo), '("focus-offset", DOMDOMSelectionFocusOffsetPropertyInfo), '("is-collapsed", DOMDOMSelectionIsCollapsedPropertyInfo), '("range-count", DOMDOMSelectionRangeCountPropertyInfo), '("type", DOMDOMSelectionTypePropertyInfo)] :: [(Symbol, *)]) +type DOMDOMSelectionAttributeList = ('[ '("anchorNode", DOMDOMSelectionAnchorNodePropertyInfo), '("anchorOffset", DOMDOMSelectionAnchorOffsetPropertyInfo), '("baseNode", DOMDOMSelectionBaseNodePropertyInfo), '("baseOffset", DOMDOMSelectionBaseOffsetPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("extentNode", DOMDOMSelectionExtentNodePropertyInfo), '("extentOffset", DOMDOMSelectionExtentOffsetPropertyInfo), '("focusNode", DOMDOMSelectionFocusNodePropertyInfo), '("focusOffset", DOMDOMSelectionFocusOffsetPropertyInfo), '("isCollapsed", DOMDOMSelectionIsCollapsedPropertyInfo), '("rangeCount", DOMDOMSelectionRangeCountPropertyInfo), '("type", DOMDOMSelectionTypePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMSelection = DOMDOMSelectionSignalList -type DOMDOMSelectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMSelectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMSelection::add_range -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "range", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "range", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "range", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -427,9 +508,9 @@ dOMDOMSelectionAddRange :: (MonadIO m, DOMDOMSelectionK a, DOMRangeK b) => - a -> -- _obj - b -> -- range - m () + a -- _obj + -> b -- range + -> m () -- result dOMDOMSelectionAddRange _obj range = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let range' = unsafeManagedPtrCastPtr range @@ -438,11 +519,14 @@ touchManagedPtr range return () +data DOMDOMSelectionAddRangeMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMDOMSelectionK a, DOMRangeK b) => MethodInfo DOMDOMSelectionAddRangeMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionAddRange + -- method DOMDOMSelection::collapse -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -457,10 +541,10 @@ dOMDOMSelectionCollapse :: (MonadIO m, DOMDOMSelectionK a, DOMNodeK b) => - a -> -- _obj - b -> -- node - Int64 -> -- index - m () + a -- _obj + -> b -- node + -> Int64 -- index + -> m () -- result dOMDOMSelectionCollapse _obj node index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let node' = unsafeManagedPtrCastPtr node @@ -473,11 +557,14 @@ return () ) +data DOMDOMSelectionCollapseMethodInfo +instance (signature ~ (b -> Int64 -> m ()), MonadIO m, DOMDOMSelectionK a, DOMNodeK b) => MethodInfo DOMDOMSelectionCollapseMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionCollapse + -- method DOMDOMSelection::collapse_to_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -490,8 +577,8 @@ dOMDOMSelectionCollapseToEnd :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMDOMSelectionCollapseToEnd _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -502,11 +589,14 @@ return () ) +data DOMDOMSelectionCollapseToEndMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionCollapseToEndMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionCollapseToEnd + -- method DOMDOMSelection::collapse_to_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -519,8 +609,8 @@ dOMDOMSelectionCollapseToStart :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMDOMSelectionCollapseToStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -531,11 +621,14 @@ return () ) +data DOMDOMSelectionCollapseToStartMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionCollapseToStartMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionCollapseToStart + -- method DOMDOMSelection::contains_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "allowPartial", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "allowPartial", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "allowPartial", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -549,10 +642,10 @@ dOMDOMSelectionContainsNode :: (MonadIO m, DOMDOMSelectionK a, DOMNodeK b) => - a -> -- _obj - b -> -- node - Bool -> -- allowPartial - m Bool + a -- _obj + -> b -- node + -> Bool -- allowPartial + -> m Bool -- result dOMDOMSelectionContainsNode _obj node allowPartial = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let node' = unsafeManagedPtrCastPtr node @@ -563,11 +656,14 @@ touchManagedPtr node return result' +data DOMDOMSelectionContainsNodeMethodInfo +instance (signature ~ (b -> Bool -> m Bool), MonadIO m, DOMDOMSelectionK a, DOMNodeK b) => MethodInfo DOMDOMSelectionContainsNodeMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionContainsNode + -- method DOMDOMSelection::delete_from_document -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -579,19 +675,22 @@ dOMDOMSelectionDeleteFromDocument :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMDOMSelectionDeleteFromDocument _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_dom_selection_delete_from_document _obj' touchManagedPtr _obj return () +data DOMDOMSelectionDeleteFromDocumentMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionDeleteFromDocumentMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionDeleteFromDocument + -- method DOMDOMSelection::empty -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -603,19 +702,22 @@ dOMDOMSelectionEmpty :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMDOMSelectionEmpty _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_dom_selection_empty _obj' touchManagedPtr _obj return () +data DOMDOMSelectionEmptyMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionEmptyMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionEmpty + -- method DOMDOMSelection::extend -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -630,10 +732,10 @@ dOMDOMSelectionExtend :: (MonadIO m, DOMDOMSelectionK a, DOMNodeK b) => - a -> -- _obj - b -> -- node - Int64 -> -- offset - m () + a -- _obj + -> b -- node + -> Int64 -- offset + -> m () -- result dOMDOMSelectionExtend _obj node offset = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let node' = unsafeManagedPtrCastPtr node @@ -646,11 +748,14 @@ return () ) +data DOMDOMSelectionExtendMethodInfo +instance (signature ~ (b -> Int64 -> m ()), MonadIO m, DOMDOMSelectionK a, DOMNodeK b) => MethodInfo DOMDOMSelectionExtendMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionExtend + -- method DOMDOMSelection::get_anchor_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -662,8 +767,8 @@ dOMDOMSelectionGetAnchorNode :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMDOMSelectionGetAnchorNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_selection_get_anchor_node _obj' @@ -672,11 +777,14 @@ touchManagedPtr _obj return result' +data DOMDOMSelectionGetAnchorNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionGetAnchorNodeMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionGetAnchorNode + -- method DOMDOMSelection::get_anchor_offset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -688,19 +796,22 @@ dOMDOMSelectionGetAnchorOffset :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMDOMSelectionGetAnchorOffset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_selection_get_anchor_offset _obj' touchManagedPtr _obj return result +data DOMDOMSelectionGetAnchorOffsetMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionGetAnchorOffsetMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionGetAnchorOffset + -- method DOMDOMSelection::get_base_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -712,8 +823,8 @@ dOMDOMSelectionGetBaseNode :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMDOMSelectionGetBaseNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_selection_get_base_node _obj' @@ -722,11 +833,14 @@ touchManagedPtr _obj return result' +data DOMDOMSelectionGetBaseNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionGetBaseNodeMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionGetBaseNode + -- method DOMDOMSelection::get_base_offset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -738,19 +852,22 @@ dOMDOMSelectionGetBaseOffset :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMDOMSelectionGetBaseOffset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_selection_get_base_offset _obj' touchManagedPtr _obj return result +data DOMDOMSelectionGetBaseOffsetMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionGetBaseOffsetMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionGetBaseOffset + -- method DOMDOMSelection::get_extent_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -762,8 +879,8 @@ dOMDOMSelectionGetExtentNode :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMDOMSelectionGetExtentNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_selection_get_extent_node _obj' @@ -772,11 +889,14 @@ touchManagedPtr _obj return result' +data DOMDOMSelectionGetExtentNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionGetExtentNodeMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionGetExtentNode + -- method DOMDOMSelection::get_extent_offset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -788,19 +908,22 @@ dOMDOMSelectionGetExtentOffset :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMDOMSelectionGetExtentOffset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_selection_get_extent_offset _obj' touchManagedPtr _obj return result +data DOMDOMSelectionGetExtentOffsetMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionGetExtentOffsetMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionGetExtentOffset + -- method DOMDOMSelection::get_focus_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -812,8 +935,8 @@ dOMDOMSelectionGetFocusNode :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMDOMSelectionGetFocusNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_selection_get_focus_node _obj' @@ -822,11 +945,14 @@ touchManagedPtr _obj return result' +data DOMDOMSelectionGetFocusNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionGetFocusNodeMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionGetFocusNode + -- method DOMDOMSelection::get_focus_offset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -838,19 +964,22 @@ dOMDOMSelectionGetFocusOffset :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMDOMSelectionGetFocusOffset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_selection_get_focus_offset _obj' touchManagedPtr _obj return result +data DOMDOMSelectionGetFocusOffsetMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionGetFocusOffsetMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionGetFocusOffset + -- method DOMDOMSelection::get_is_collapsed -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -862,8 +991,8 @@ dOMDOMSelectionGetIsCollapsed :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMDOMSelectionGetIsCollapsed _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_selection_get_is_collapsed _obj' @@ -871,11 +1000,14 @@ touchManagedPtr _obj return result' +data DOMDOMSelectionGetIsCollapsedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionGetIsCollapsedMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionGetIsCollapsed + -- method DOMDOMSelection::get_range_at -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMRange" -- throws : True -- Skip return : False @@ -889,9 +1021,9 @@ dOMDOMSelectionGetRangeAt :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - Int64 -> -- index - m DOMRange + a -- _obj + -> Int64 -- index + -> m DOMRange -- result dOMDOMSelectionGetRangeAt _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -904,11 +1036,14 @@ return () ) +data DOMDOMSelectionGetRangeAtMethodInfo +instance (signature ~ (Int64 -> m DOMRange), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionGetRangeAtMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionGetRangeAt + -- method DOMDOMSelection::get_range_count -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -920,19 +1055,22 @@ dOMDOMSelectionGetRangeCount :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMDOMSelectionGetRangeCount _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_selection_get_range_count _obj' touchManagedPtr _obj return result +data DOMDOMSelectionGetRangeCountMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionGetRangeCountMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionGetRangeCount + -- method DOMDOMSelection::modify -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "alter", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "direction", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "granularity", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "alter", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "direction", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "granularity", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "alter", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "direction", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "granularity", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -947,11 +1085,11 @@ dOMDOMSelectionModify :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - T.Text -> -- alter - T.Text -> -- direction - T.Text -> -- granularity - m () + a -- _obj + -> T.Text -- alter + -> T.Text -- direction + -> T.Text -- granularity + -> m () -- result dOMDOMSelectionModify _obj alter direction granularity = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj alter' <- textToCString alter @@ -964,11 +1102,14 @@ freeMem granularity' return () +data DOMDOMSelectionModifyMethodInfo +instance (signature ~ (T.Text -> T.Text -> T.Text -> m ()), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionModifyMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionModify + -- method DOMDOMSelection::remove_all_ranges -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -980,19 +1121,22 @@ dOMDOMSelectionRemoveAllRanges :: (MonadIO m, DOMDOMSelectionK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMDOMSelectionRemoveAllRanges _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_dom_selection_remove_all_ranges _obj' touchManagedPtr _obj return () +data DOMDOMSelectionRemoveAllRangesMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMSelectionK a) => MethodInfo DOMDOMSelectionRemoveAllRangesMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionRemoveAllRanges + -- method DOMDOMSelection::select_all_children -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1006,9 +1150,9 @@ dOMDOMSelectionSelectAllChildren :: (MonadIO m, DOMDOMSelectionK a, DOMNodeK b) => - a -> -- _obj - b -> -- node - m () + a -- _obj + -> b -- node + -> m () -- result dOMDOMSelectionSelectAllChildren _obj node = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let node' = unsafeManagedPtrCastPtr node @@ -1021,11 +1165,14 @@ return () ) +data DOMDOMSelectionSelectAllChildrenMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMDOMSelectionK a, DOMNodeK b) => MethodInfo DOMDOMSelectionSelectAllChildrenMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionSelectAllChildren + -- method DOMDOMSelection::set_base_and_extent -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "baseNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "baseOffset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "extentNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "extentOffset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "baseNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "baseOffset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "extentNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "extentOffset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "baseNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "baseOffset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "extentNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "extentOffset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1042,12 +1189,12 @@ dOMDOMSelectionSetBaseAndExtent :: (MonadIO m, DOMDOMSelectionK a, DOMNodeK b, DOMNodeK c) => - a -> -- _obj - b -> -- baseNode - Int64 -> -- baseOffset - c -> -- extentNode - Int64 -> -- extentOffset - m () + a -- _obj + -> b -- baseNode + -> Int64 -- baseOffset + -> c -- extentNode + -> Int64 -- extentOffset + -> m () -- result dOMDOMSelectionSetBaseAndExtent _obj baseNode baseOffset extentNode extentOffset = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let baseNode' = unsafeManagedPtrCastPtr baseNode @@ -1062,11 +1209,14 @@ return () ) +data DOMDOMSelectionSetBaseAndExtentMethodInfo +instance (signature ~ (b -> Int64 -> c -> Int64 -> m ()), MonadIO m, DOMDOMSelectionK a, DOMNodeK b, DOMNodeK c) => MethodInfo DOMDOMSelectionSetBaseAndExtentMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionSetBaseAndExtent + -- method DOMDOMSelection::set_position -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSelection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1081,10 +1231,10 @@ dOMDOMSelectionSetPosition :: (MonadIO m, DOMDOMSelectionK a, DOMNodeK b) => - a -> -- _obj - b -> -- node - Int64 -> -- offset - m () + a -- _obj + -> b -- node + -> Int64 -- offset + -> m () -- result dOMDOMSelectionSetPosition _obj node offset = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let node' = unsafeManagedPtrCastPtr node @@ -1096,5 +1246,9 @@ ) (do return () ) + +data DOMDOMSelectionSetPositionMethodInfo +instance (signature ~ (b -> Int64 -> m ()), MonadIO m, DOMDOMSelectionK a, DOMNodeK b) => MethodInfo DOMDOMSelectionSetPositionMethodInfo a signature where + overloadedMethod _ = dOMDOMSelectionSetPosition diff --git a/GI/WebKit/Objects/DOMDOMSelection.hs-boot b/GI/WebKit/Objects/DOMDOMSelection.hs-boot --- a/GI/WebKit/Objects/DOMDOMSelection.hs-boot +++ b/GI/WebKit/Objects/DOMDOMSelection.hs-boot @@ -22,3 +22,27 @@ data DOMDOMSelectionIsCollapsedPropertyInfo data DOMDOMSelectionRangeCountPropertyInfo data DOMDOMSelectionTypePropertyInfo +data DOMDOMSelectionAddRangeMethodInfo +data DOMDOMSelectionCollapseMethodInfo +data DOMDOMSelectionCollapseToEndMethodInfo +data DOMDOMSelectionCollapseToStartMethodInfo +data DOMDOMSelectionContainsNodeMethodInfo +data DOMDOMSelectionDeleteFromDocumentMethodInfo +data DOMDOMSelectionEmptyMethodInfo +data DOMDOMSelectionExtendMethodInfo +data DOMDOMSelectionGetAnchorNodeMethodInfo +data DOMDOMSelectionGetAnchorOffsetMethodInfo +data DOMDOMSelectionGetBaseNodeMethodInfo +data DOMDOMSelectionGetBaseOffsetMethodInfo +data DOMDOMSelectionGetExtentNodeMethodInfo +data DOMDOMSelectionGetExtentOffsetMethodInfo +data DOMDOMSelectionGetFocusNodeMethodInfo +data DOMDOMSelectionGetFocusOffsetMethodInfo +data DOMDOMSelectionGetIsCollapsedMethodInfo +data DOMDOMSelectionGetRangeAtMethodInfo +data DOMDOMSelectionGetRangeCountMethodInfo +data DOMDOMSelectionModifyMethodInfo +data DOMDOMSelectionRemoveAllRangesMethodInfo +data DOMDOMSelectionSelectAllChildrenMethodInfo +data DOMDOMSelectionSetBaseAndExtentMethodInfo +data DOMDOMSelectionSetPositionMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMSettableTokenList.hs b/GI/WebKit/Objects/DOMDOMSettableTokenList.hs --- a/GI/WebKit/Objects/DOMDOMSettableTokenList.hs +++ b/GI/WebKit/Objects/DOMDOMSettableTokenList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMDOMSettableTokenListGetValue + DOMDOMSettableTokenListGetValueMethodInfo, dOMDOMSettableTokenListGetValue , -- ** dOMDOMSettableTokenListSetValue + DOMDOMSettableTokenListSetValueMethodInfo, dOMDOMSettableTokenListSetValue , @@ -70,6 +73,47 @@ noDOMDOMSettableTokenList :: Maybe DOMDOMSettableTokenList noDOMDOMSettableTokenList = Nothing +type family ResolveDOMDOMSettableTokenListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMSettableTokenListMethod "add" o = DOMDOMTokenListAddMethodInfo + ResolveDOMDOMSettableTokenListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMSettableTokenListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMSettableTokenListMethod "contains" o = DOMDOMTokenListContainsMethodInfo + ResolveDOMDOMSettableTokenListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMSettableTokenListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMSettableTokenListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMSettableTokenListMethod "item" o = DOMDOMTokenListItemMethodInfo + ResolveDOMDOMSettableTokenListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMSettableTokenListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMSettableTokenListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMSettableTokenListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMSettableTokenListMethod "remove" o = DOMDOMTokenListRemoveMethodInfo + ResolveDOMDOMSettableTokenListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMSettableTokenListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMSettableTokenListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMSettableTokenListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMSettableTokenListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMSettableTokenListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMSettableTokenListMethod "toggle" o = DOMDOMTokenListToggleMethodInfo + ResolveDOMDOMSettableTokenListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMSettableTokenListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMSettableTokenListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMSettableTokenListMethod "getLength" o = DOMDOMTokenListGetLengthMethodInfo + ResolveDOMDOMSettableTokenListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMSettableTokenListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMSettableTokenListMethod "getValue" o = DOMDOMSettableTokenListGetValueMethodInfo + ResolveDOMDOMSettableTokenListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMSettableTokenListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMSettableTokenListMethod "setValue" o = DOMDOMSettableTokenListSetValueMethodInfo + ResolveDOMDOMSettableTokenListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMSettableTokenListMethod t DOMDOMSettableTokenList, MethodInfo info DOMDOMSettableTokenList p) => IsLabelProxy t (DOMDOMSettableTokenList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMSettableTokenListMethod t DOMDOMSettableTokenList, MethodInfo info DOMDOMSettableTokenList p) => IsLabel t (DOMDOMSettableTokenList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "value" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +133,21 @@ type AttrSetTypeConstraint DOMDOMSettableTokenListValuePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMDOMSettableTokenListValuePropertyInfo = DOMDOMSettableTokenListK type AttrGetType DOMDOMSettableTokenListValuePropertyInfo = T.Text - type AttrLabel DOMDOMSettableTokenListValuePropertyInfo = "DOMDOMSettableTokenList::value" + type AttrLabel DOMDOMSettableTokenListValuePropertyInfo = "value" attrGet _ = getDOMDOMSettableTokenListValue attrSet _ = setDOMDOMSettableTokenListValue attrConstruct _ = constructDOMDOMSettableTokenListValue type instance AttributeList DOMDOMSettableTokenList = DOMDOMSettableTokenListAttributeList -type DOMDOMSettableTokenListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMTokenListLengthPropertyInfo), '("value", DOMDOMSettableTokenListValuePropertyInfo)] :: [(Symbol, *)]) +type DOMDOMSettableTokenListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMTokenListLengthPropertyInfo), '("value", DOMDOMSettableTokenListValuePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMSettableTokenList = DOMDOMSettableTokenListSignalList -type DOMDOMSettableTokenListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMSettableTokenListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMSettableTokenList::get_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSettableTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSettableTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSettableTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -116,8 +159,8 @@ dOMDOMSettableTokenListGetValue :: (MonadIO m, DOMDOMSettableTokenListK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMDOMSettableTokenListGetValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_settable_token_list_get_value _obj' @@ -127,11 +170,14 @@ touchManagedPtr _obj return result' +data DOMDOMSettableTokenListGetValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDOMSettableTokenListK a) => MethodInfo DOMDOMSettableTokenListGetValueMethodInfo a signature where + overloadedMethod _ = dOMDOMSettableTokenListGetValue + -- method DOMDOMSettableTokenList::set_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSettableTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMSettableTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMSettableTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -144,9 +190,9 @@ dOMDOMSettableTokenListSetValue :: (MonadIO m, DOMDOMSettableTokenListK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMDOMSettableTokenListSetValue _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -154,5 +200,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMDOMSettableTokenListSetValueMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDOMSettableTokenListK a) => MethodInfo DOMDOMSettableTokenListSetValueMethodInfo a signature where + overloadedMethod _ = dOMDOMSettableTokenListSetValue diff --git a/GI/WebKit/Objects/DOMDOMSettableTokenList.hs-boot b/GI/WebKit/Objects/DOMDOMSettableTokenList.hs-boot --- a/GI/WebKit/Objects/DOMDOMSettableTokenList.hs-boot +++ b/GI/WebKit/Objects/DOMDOMSettableTokenList.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMDOMSettableTokenListK o instance (GObject o, IsDescendantOf DOMDOMSettableTokenList o) => DOMDOMSettableTokenListK o data DOMDOMSettableTokenListValuePropertyInfo +data DOMDOMSettableTokenListGetValueMethodInfo +data DOMDOMSettableTokenListSetValueMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMStringList.hs b/GI/WebKit/Objects/DOMDOMStringList.hs --- a/GI/WebKit/Objects/DOMDOMStringList.hs +++ b/GI/WebKit/Objects/DOMDOMStringList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMDOMStringListContains + DOMDOMStringListContainsMethodInfo , dOMDOMStringListContains , -- ** dOMDOMStringListGetLength + DOMDOMStringListGetLengthMethodInfo , dOMDOMStringListGetLength , -- ** dOMDOMStringListItem + DOMDOMStringListItemMethodInfo , dOMDOMStringListItem , @@ -72,6 +76,42 @@ noDOMDOMStringList :: Maybe DOMDOMStringList noDOMDOMStringList = Nothing +type family ResolveDOMDOMStringListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMStringListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMStringListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMStringListMethod "contains" o = DOMDOMStringListContainsMethodInfo + ResolveDOMDOMStringListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMStringListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMStringListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMStringListMethod "item" o = DOMDOMStringListItemMethodInfo + ResolveDOMDOMStringListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMStringListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMStringListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMStringListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMStringListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMStringListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMStringListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMStringListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMStringListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMStringListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMStringListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMStringListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMStringListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMStringListMethod "getLength" o = DOMDOMStringListGetLengthMethodInfo + ResolveDOMDOMStringListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMStringListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMStringListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMStringListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMStringListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMStringListMethod t DOMDOMStringList, MethodInfo info DOMDOMStringList p) => IsLabelProxy t (DOMDOMStringList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMStringListMethod t DOMDOMStringList, MethodInfo info DOMDOMStringList p) => IsLabel t (DOMDOMStringList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -85,22 +125,21 @@ type AttrSetTypeConstraint DOMDOMStringListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMStringListLengthPropertyInfo = DOMDOMStringListK type AttrGetType DOMDOMStringListLengthPropertyInfo = Word64 - type AttrLabel DOMDOMStringListLengthPropertyInfo = "DOMDOMStringList::length" + type AttrLabel DOMDOMStringListLengthPropertyInfo = "length" attrGet _ = getDOMDOMStringListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDOMStringList = DOMDOMStringListAttributeList -type DOMDOMStringListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMStringListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMDOMStringListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMStringListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMStringList = DOMDOMStringListSignalList -type DOMDOMStringListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMStringListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMStringList::contains -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMStringList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMStringList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMStringList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -113,9 +152,9 @@ dOMDOMStringListContains :: (MonadIO m, DOMDOMStringListK a) => - a -> -- _obj - T.Text -> -- string - m Bool + a -- _obj + -> T.Text -- string + -> m Bool -- result dOMDOMStringListContains _obj string = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj string' <- textToCString string @@ -125,11 +164,14 @@ freeMem string' return result' +data DOMDOMStringListContainsMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMStringListK a) => MethodInfo DOMDOMStringListContainsMethodInfo a signature where + overloadedMethod _ = dOMDOMStringListContains + -- method DOMDOMStringList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMStringList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMStringList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMStringList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -141,19 +183,22 @@ dOMDOMStringListGetLength :: (MonadIO m, DOMDOMStringListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMDOMStringListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_string_list_get_length _obj' touchManagedPtr _obj return result +data DOMDOMStringListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMDOMStringListK a) => MethodInfo DOMDOMStringListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMDOMStringListGetLength + -- method DOMDOMStringList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMStringList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMStringList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMStringList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -166,9 +211,9 @@ dOMDOMStringListItem :: (MonadIO m, DOMDOMStringListK a) => - a -> -- _obj - Word64 -> -- index - m T.Text + a -- _obj + -> Word64 -- index + -> m T.Text -- result dOMDOMStringListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_string_list_item _obj' index @@ -177,5 +222,9 @@ freeMem result touchManagedPtr _obj return result' + +data DOMDOMStringListItemMethodInfo +instance (signature ~ (Word64 -> m T.Text), MonadIO m, DOMDOMStringListK a) => MethodInfo DOMDOMStringListItemMethodInfo a signature where + overloadedMethod _ = dOMDOMStringListItem diff --git a/GI/WebKit/Objects/DOMDOMStringList.hs-boot b/GI/WebKit/Objects/DOMDOMStringList.hs-boot --- a/GI/WebKit/Objects/DOMDOMStringList.hs-boot +++ b/GI/WebKit/Objects/DOMDOMStringList.hs-boot @@ -12,3 +12,6 @@ class GObject o => DOMDOMStringListK o instance (GObject o, IsDescendantOf DOMDOMStringList o) => DOMDOMStringListK o data DOMDOMStringListLengthPropertyInfo +data DOMDOMStringListContainsMethodInfo +data DOMDOMStringListGetLengthMethodInfo +data DOMDOMStringListItemMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMStringMap.hs b/GI/WebKit/Objects/DOMDOMStringMap.hs --- a/GI/WebKit/Objects/DOMDOMStringMap.hs +++ b/GI/WebKit/Objects/DOMDOMStringMap.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -49,10 +50,43 @@ noDOMDOMStringMap :: Maybe DOMDOMStringMap noDOMDOMStringMap = Nothing +type family ResolveDOMDOMStringMapMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMStringMapMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMStringMapMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMStringMapMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMStringMapMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMStringMapMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMStringMapMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMStringMapMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMStringMapMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMStringMapMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMStringMapMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMStringMapMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMStringMapMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMStringMapMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMStringMapMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMStringMapMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMStringMapMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMStringMapMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMStringMapMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMStringMapMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMStringMapMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMStringMapMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMStringMapMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMStringMapMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMStringMapMethod t DOMDOMStringMap, MethodInfo info DOMDOMStringMap p) => IsLabelProxy t (DOMDOMStringMap -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMStringMapMethod t DOMDOMStringMap, MethodInfo info DOMDOMStringMap p) => IsLabel t (DOMDOMStringMap -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMDOMStringMap = DOMDOMStringMapAttributeList -type DOMDOMStringMapAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMDOMStringMapAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMStringMap = DOMDOMStringMapSignalList -type DOMDOMStringMapSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMStringMapSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/DOMDOMTokenList.hs b/GI/WebKit/Objects/DOMDOMTokenList.hs --- a/GI/WebKit/Objects/DOMDOMTokenList.hs +++ b/GI/WebKit/Objects/DOMDOMTokenList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** dOMDOMTokenListAdd + DOMDOMTokenListAddMethodInfo , dOMDOMTokenListAdd , -- ** dOMDOMTokenListContains + DOMDOMTokenListContainsMethodInfo , dOMDOMTokenListContains , -- ** dOMDOMTokenListGetLength + DOMDOMTokenListGetLengthMethodInfo , dOMDOMTokenListGetLength , -- ** dOMDOMTokenListItem + DOMDOMTokenListItemMethodInfo , dOMDOMTokenListItem , -- ** dOMDOMTokenListRemove + DOMDOMTokenListRemoveMethodInfo , dOMDOMTokenListRemove , -- ** dOMDOMTokenListToggle + DOMDOMTokenListToggleMethodInfo , dOMDOMTokenListToggle , @@ -84,6 +91,45 @@ noDOMDOMTokenList :: Maybe DOMDOMTokenList noDOMDOMTokenList = Nothing +type family ResolveDOMDOMTokenListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMTokenListMethod "add" o = DOMDOMTokenListAddMethodInfo + ResolveDOMDOMTokenListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMTokenListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMTokenListMethod "contains" o = DOMDOMTokenListContainsMethodInfo + ResolveDOMDOMTokenListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMTokenListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMTokenListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMTokenListMethod "item" o = DOMDOMTokenListItemMethodInfo + ResolveDOMDOMTokenListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMTokenListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMTokenListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMTokenListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMTokenListMethod "remove" o = DOMDOMTokenListRemoveMethodInfo + ResolveDOMDOMTokenListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMTokenListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMTokenListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMTokenListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMTokenListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMTokenListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMTokenListMethod "toggle" o = DOMDOMTokenListToggleMethodInfo + ResolveDOMDOMTokenListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMTokenListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMTokenListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMTokenListMethod "getLength" o = DOMDOMTokenListGetLengthMethodInfo + ResolveDOMDOMTokenListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMTokenListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMTokenListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMTokenListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMTokenListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMTokenListMethod t DOMDOMTokenList, MethodInfo info DOMDOMTokenList p) => IsLabelProxy t (DOMDOMTokenList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMTokenListMethod t DOMDOMTokenList, MethodInfo info DOMDOMTokenList p) => IsLabel t (DOMDOMTokenList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -97,22 +143,21 @@ type AttrSetTypeConstraint DOMDOMTokenListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDOMTokenListLengthPropertyInfo = DOMDOMTokenListK type AttrGetType DOMDOMTokenListLengthPropertyInfo = Word64 - type AttrLabel DOMDOMTokenListLengthPropertyInfo = "DOMDOMTokenList::length" + type AttrLabel DOMDOMTokenListLengthPropertyInfo = "length" attrGet _ = getDOMDOMTokenListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDOMTokenList = DOMDOMTokenListAttributeList -type DOMDOMTokenListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMTokenListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMDOMTokenListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMDOMTokenListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMTokenList = DOMDOMTokenListSignalList -type DOMDOMTokenListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMTokenListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMTokenList::add -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tokens", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tokens", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tokens", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -126,9 +171,9 @@ dOMDOMTokenListAdd :: (MonadIO m, DOMDOMTokenListK a) => - a -> -- _obj - T.Text -> -- tokens - m () + a -- _obj + -> T.Text -- tokens + -> m () -- result dOMDOMTokenListAdd _obj tokens = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj tokens' <- textToCString tokens @@ -141,11 +186,14 @@ freeMem tokens' ) +data DOMDOMTokenListAddMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDOMTokenListK a) => MethodInfo DOMDOMTokenListAddMethodInfo a signature where + overloadedMethod _ = dOMDOMTokenListAdd + -- method DOMDOMTokenList::contains -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "token", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "token", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "token", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -159,9 +207,9 @@ dOMDOMTokenListContains :: (MonadIO m, DOMDOMTokenListK a) => - a -> -- _obj - T.Text -> -- token - m () + a -- _obj + -> T.Text -- token + -> m () -- result dOMDOMTokenListContains _obj token = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj token' <- textToCString token @@ -174,11 +222,14 @@ freeMem token' ) +data DOMDOMTokenListContainsMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDOMTokenListK a) => MethodInfo DOMDOMTokenListContainsMethodInfo a signature where + overloadedMethod _ = dOMDOMTokenListContains + -- method DOMDOMTokenList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -190,19 +241,22 @@ dOMDOMTokenListGetLength :: (MonadIO m, DOMDOMTokenListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMDOMTokenListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_token_list_get_length _obj' touchManagedPtr _obj return result +data DOMDOMTokenListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMDOMTokenListK a) => MethodInfo DOMDOMTokenListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMDOMTokenListGetLength + -- method DOMDOMTokenList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -215,9 +269,9 @@ dOMDOMTokenListItem :: (MonadIO m, DOMDOMTokenListK a) => - a -> -- _obj - Word64 -> -- index - m T.Text + a -- _obj + -> Word64 -- index + -> m T.Text -- result dOMDOMTokenListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_dom_token_list_item _obj' index @@ -227,11 +281,14 @@ touchManagedPtr _obj return result' +data DOMDOMTokenListItemMethodInfo +instance (signature ~ (Word64 -> m T.Text), MonadIO m, DOMDOMTokenListK a) => MethodInfo DOMDOMTokenListItemMethodInfo a signature where + overloadedMethod _ = dOMDOMTokenListItem + -- method DOMDOMTokenList::remove -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tokens", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tokens", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tokens", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -245,9 +302,9 @@ dOMDOMTokenListRemove :: (MonadIO m, DOMDOMTokenListK a) => - a -> -- _obj - T.Text -> -- tokens - m () + a -- _obj + -> T.Text -- tokens + -> m () -- result dOMDOMTokenListRemove _obj tokens = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj tokens' <- textToCString tokens @@ -260,11 +317,14 @@ freeMem tokens' ) +data DOMDOMTokenListRemoveMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDOMTokenListK a) => MethodInfo DOMDOMTokenListRemoveMethodInfo a signature where + overloadedMethod _ = dOMDOMTokenListRemove + -- method DOMDOMTokenList::toggle -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "token", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "force", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "token", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "force", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMTokenList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "token", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "force", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -279,10 +339,10 @@ dOMDOMTokenListToggle :: (MonadIO m, DOMDOMTokenListK a) => - a -> -- _obj - T.Text -> -- token - Bool -> -- force - m () + a -- _obj + -> T.Text -- token + -> Bool -- force + -> m () -- result dOMDOMTokenListToggle _obj token force = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj token' <- textToCString token @@ -295,5 +355,9 @@ ) (do freeMem token' ) + +data DOMDOMTokenListToggleMethodInfo +instance (signature ~ (T.Text -> Bool -> m ()), MonadIO m, DOMDOMTokenListK a) => MethodInfo DOMDOMTokenListToggleMethodInfo a signature where + overloadedMethod _ = dOMDOMTokenListToggle diff --git a/GI/WebKit/Objects/DOMDOMTokenList.hs-boot b/GI/WebKit/Objects/DOMDOMTokenList.hs-boot --- a/GI/WebKit/Objects/DOMDOMTokenList.hs-boot +++ b/GI/WebKit/Objects/DOMDOMTokenList.hs-boot @@ -12,3 +12,9 @@ class GObject o => DOMDOMTokenListK o instance (GObject o, IsDescendantOf DOMDOMTokenList o) => DOMDOMTokenListK o data DOMDOMTokenListLengthPropertyInfo +data DOMDOMTokenListAddMethodInfo +data DOMDOMTokenListContainsMethodInfo +data DOMDOMTokenListGetLengthMethodInfo +data DOMDOMTokenListItemMethodInfo +data DOMDOMTokenListRemoveMethodInfo +data DOMDOMTokenListToggleMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMWindow.hs b/GI/WebKit/Objects/DOMDOMWindow.hs --- a/GI/WebKit/Objects/DOMDOMWindow.hs +++ b/GI/WebKit/Objects/DOMDOMWindow.hs @@ -1,3585 +1,4015 @@ -{- | -Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte -License : LGPL-2.1 -Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) --} - -module GI.WebKit.Objects.DOMDOMWindow - ( - --- * Exported types - DOMDOMWindow(..) , - DOMDOMWindowK , - toDOMDOMWindow , - noDOMDOMWindow , - - - -- * Methods --- ** dOMDOMWindowAlert - dOMDOMWindowAlert , - - --- ** dOMDOMWindowAtob - dOMDOMWindowAtob , - - --- ** dOMDOMWindowBlur - dOMDOMWindowBlur , - - --- ** dOMDOMWindowBtoa - dOMDOMWindowBtoa , - - --- ** dOMDOMWindowCancelAnimationFrame - dOMDOMWindowCancelAnimationFrame , - - --- ** dOMDOMWindowCaptureEvents - dOMDOMWindowCaptureEvents , - - --- ** dOMDOMWindowClearInterval - dOMDOMWindowClearInterval , - - --- ** dOMDOMWindowClearTimeout - dOMDOMWindowClearTimeout , - - --- ** dOMDOMWindowClose - dOMDOMWindowClose , - - --- ** dOMDOMWindowConfirm - dOMDOMWindowConfirm , - - --- ** dOMDOMWindowDispatchEvent - dOMDOMWindowDispatchEvent , - - --- ** dOMDOMWindowFind - dOMDOMWindowFind , - - --- ** dOMDOMWindowFocus - dOMDOMWindowFocus , - - --- ** dOMDOMWindowGetApplicationCache - dOMDOMWindowGetApplicationCache , - - --- ** dOMDOMWindowGetClientInformation - dOMDOMWindowGetClientInformation , - - --- ** dOMDOMWindowGetClosed - dOMDOMWindowGetClosed , - - --- ** dOMDOMWindowGetComputedStyle - dOMDOMWindowGetComputedStyle , - - --- ** dOMDOMWindowGetConsole - dOMDOMWindowGetConsole , - - --- ** dOMDOMWindowGetCss - dOMDOMWindowGetCss , - - --- ** dOMDOMWindowGetDefaultStatus - dOMDOMWindowGetDefaultStatus , - - --- ** dOMDOMWindowGetDevicePixelRatio - dOMDOMWindowGetDevicePixelRatio , - - --- ** dOMDOMWindowGetDocument - dOMDOMWindowGetDocument , - - --- ** dOMDOMWindowGetFrameElement - dOMDOMWindowGetFrameElement , - - --- ** dOMDOMWindowGetFrames - dOMDOMWindowGetFrames , - - --- ** dOMDOMWindowGetHistory - dOMDOMWindowGetHistory , - - --- ** dOMDOMWindowGetInnerHeight - dOMDOMWindowGetInnerHeight , - - --- ** dOMDOMWindowGetInnerWidth - dOMDOMWindowGetInnerWidth , - - --- ** dOMDOMWindowGetLength - dOMDOMWindowGetLength , - - --- ** dOMDOMWindowGetLocalStorage - dOMDOMWindowGetLocalStorage , - - --- ** dOMDOMWindowGetLocationbar - dOMDOMWindowGetLocationbar , - - --- ** dOMDOMWindowGetMenubar - dOMDOMWindowGetMenubar , - - --- ** dOMDOMWindowGetName - dOMDOMWindowGetName , - - --- ** dOMDOMWindowGetNavigator - dOMDOMWindowGetNavigator , - - --- ** dOMDOMWindowGetOffscreenBuffering - dOMDOMWindowGetOffscreenBuffering , - - --- ** dOMDOMWindowGetOpener - dOMDOMWindowGetOpener , - - --- ** dOMDOMWindowGetOuterHeight - dOMDOMWindowGetOuterHeight , - - --- ** dOMDOMWindowGetOuterWidth - dOMDOMWindowGetOuterWidth , - - --- ** dOMDOMWindowGetPageXOffset - dOMDOMWindowGetPageXOffset , - - --- ** dOMDOMWindowGetPageYOffset - dOMDOMWindowGetPageYOffset , - - --- ** dOMDOMWindowGetParent - dOMDOMWindowGetParent , - - --- ** dOMDOMWindowGetPerformance - dOMDOMWindowGetPerformance , - - --- ** dOMDOMWindowGetPersonalbar - dOMDOMWindowGetPersonalbar , - - --- ** dOMDOMWindowGetScreen - dOMDOMWindowGetScreen , - - --- ** dOMDOMWindowGetScreenLeft - dOMDOMWindowGetScreenLeft , - - --- ** dOMDOMWindowGetScreenTop - dOMDOMWindowGetScreenTop , - - --- ** dOMDOMWindowGetScreenX - dOMDOMWindowGetScreenX , - - --- ** dOMDOMWindowGetScreenY - dOMDOMWindowGetScreenY , - - --- ** dOMDOMWindowGetScrollX - dOMDOMWindowGetScrollX , - - --- ** dOMDOMWindowGetScrollY - dOMDOMWindowGetScrollY , - - --- ** dOMDOMWindowGetScrollbars - dOMDOMWindowGetScrollbars , - - --- ** dOMDOMWindowGetSelection - dOMDOMWindowGetSelection , - - --- ** dOMDOMWindowGetSelf - dOMDOMWindowGetSelf , - - --- ** dOMDOMWindowGetSessionStorage - dOMDOMWindowGetSessionStorage , - - --- ** dOMDOMWindowGetStatus - dOMDOMWindowGetStatus , - - --- ** dOMDOMWindowGetStatusbar - dOMDOMWindowGetStatusbar , - - --- ** dOMDOMWindowGetStyleMedia - dOMDOMWindowGetStyleMedia , - - --- ** dOMDOMWindowGetToolbar - dOMDOMWindowGetToolbar , - - --- ** dOMDOMWindowGetTop - dOMDOMWindowGetTop , - - --- ** dOMDOMWindowGetWebkitStorageInfo - dOMDOMWindowGetWebkitStorageInfo , - - --- ** dOMDOMWindowGetWindow - dOMDOMWindowGetWindow , - - --- ** dOMDOMWindowMatchMedia - dOMDOMWindowMatchMedia , - - --- ** dOMDOMWindowMoveBy - dOMDOMWindowMoveBy , - - --- ** dOMDOMWindowMoveTo - dOMDOMWindowMoveTo , - - --- ** dOMDOMWindowPrint - dOMDOMWindowPrint , - - --- ** dOMDOMWindowPrompt - dOMDOMWindowPrompt , - - --- ** dOMDOMWindowReleaseEvents - dOMDOMWindowReleaseEvents , - - --- ** dOMDOMWindowResizeBy - dOMDOMWindowResizeBy , - - --- ** dOMDOMWindowResizeTo - dOMDOMWindowResizeTo , - - --- ** dOMDOMWindowScroll - dOMDOMWindowScroll , - - --- ** dOMDOMWindowScrollBy - dOMDOMWindowScrollBy , - - --- ** dOMDOMWindowScrollTo - dOMDOMWindowScrollTo , - - --- ** dOMDOMWindowSetDefaultStatus - dOMDOMWindowSetDefaultStatus , - - --- ** dOMDOMWindowSetName - dOMDOMWindowSetName , - - --- ** dOMDOMWindowSetStatus - dOMDOMWindowSetStatus , - - --- ** dOMDOMWindowStop - dOMDOMWindowStop , - - --- ** dOMDOMWindowWebkitCancelAnimationFrame - dOMDOMWindowWebkitCancelAnimationFrame , - - --- ** dOMDOMWindowWebkitCancelRequestAnimationFrame - dOMDOMWindowWebkitCancelRequestAnimationFrame, - - --- ** dOMDOMWindowWebkitConvertPointFromNodeToPage - dOMDOMWindowWebkitConvertPointFromNodeToPage, - - --- ** dOMDOMWindowWebkitConvertPointFromPageToNode - dOMDOMWindowWebkitConvertPointFromPageToNode, - - - - - -- * Properties --- ** ApplicationCache - DOMDOMWindowApplicationCachePropertyInfo, - getDOMDOMWindowApplicationCache , - - --- ** ClientInformation - DOMDOMWindowClientInformationPropertyInfo, - getDOMDOMWindowClientInformation , - - --- ** Closed - DOMDOMWindowClosedPropertyInfo , - getDOMDOMWindowClosed , - - --- ** Console - DOMDOMWindowConsolePropertyInfo , - getDOMDOMWindowConsole , - - --- ** Css - DOMDOMWindowCssPropertyInfo , - getDOMDOMWindowCss , - - --- ** DefaultStatus - DOMDOMWindowDefaultStatusPropertyInfo , - constructDOMDOMWindowDefaultStatus , - getDOMDOMWindowDefaultStatus , - setDOMDOMWindowDefaultStatus , - - --- ** DevicePixelRatio - DOMDOMWindowDevicePixelRatioPropertyInfo, - getDOMDOMWindowDevicePixelRatio , - - --- ** Document - DOMDOMWindowDocumentPropertyInfo , - getDOMDOMWindowDocument , - - --- ** FrameElement - DOMDOMWindowFrameElementPropertyInfo , - getDOMDOMWindowFrameElement , - - --- ** Frames - DOMDOMWindowFramesPropertyInfo , - getDOMDOMWindowFrames , - - --- ** History - DOMDOMWindowHistoryPropertyInfo , - getDOMDOMWindowHistory , - - --- ** InnerHeight - DOMDOMWindowInnerHeightPropertyInfo , - getDOMDOMWindowInnerHeight , - - --- ** InnerWidth - DOMDOMWindowInnerWidthPropertyInfo , - getDOMDOMWindowInnerWidth , - - --- ** Length - DOMDOMWindowLengthPropertyInfo , - getDOMDOMWindowLength , - - --- ** LocalStorage - DOMDOMWindowLocalStoragePropertyInfo , - getDOMDOMWindowLocalStorage , - - --- ** Locationbar - DOMDOMWindowLocationbarPropertyInfo , - getDOMDOMWindowLocationbar , - - --- ** Menubar - DOMDOMWindowMenubarPropertyInfo , - getDOMDOMWindowMenubar , - - --- ** Name - DOMDOMWindowNamePropertyInfo , - constructDOMDOMWindowName , - getDOMDOMWindowName , - setDOMDOMWindowName , - - --- ** Navigator - DOMDOMWindowNavigatorPropertyInfo , - getDOMDOMWindowNavigator , - - --- ** OffscreenBuffering - DOMDOMWindowOffscreenBufferingPropertyInfo, - getDOMDOMWindowOffscreenBuffering , - - --- ** Opener - DOMDOMWindowOpenerPropertyInfo , - getDOMDOMWindowOpener , - - --- ** OuterHeight - DOMDOMWindowOuterHeightPropertyInfo , - getDOMDOMWindowOuterHeight , - - --- ** OuterWidth - DOMDOMWindowOuterWidthPropertyInfo , - getDOMDOMWindowOuterWidth , - - --- ** PageXOffset - DOMDOMWindowPageXOffsetPropertyInfo , - getDOMDOMWindowPageXOffset , - - --- ** PageYOffset - DOMDOMWindowPageYOffsetPropertyInfo , - getDOMDOMWindowPageYOffset , - - --- ** Parent - DOMDOMWindowParentPropertyInfo , - getDOMDOMWindowParent , - - --- ** Performance - DOMDOMWindowPerformancePropertyInfo , - getDOMDOMWindowPerformance , - - --- ** Personalbar - DOMDOMWindowPersonalbarPropertyInfo , - getDOMDOMWindowPersonalbar , - - --- ** Screen - DOMDOMWindowScreenPropertyInfo , - getDOMDOMWindowScreen , - - --- ** ScreenLeft - DOMDOMWindowScreenLeftPropertyInfo , - getDOMDOMWindowScreenLeft , - - --- ** ScreenTop - DOMDOMWindowScreenTopPropertyInfo , - getDOMDOMWindowScreenTop , - - --- ** ScreenX - DOMDOMWindowScreenXPropertyInfo , - getDOMDOMWindowScreenX , - - --- ** ScreenY - DOMDOMWindowScreenYPropertyInfo , - getDOMDOMWindowScreenY , - - --- ** ScrollX - DOMDOMWindowScrollXPropertyInfo , - getDOMDOMWindowScrollX , - - --- ** ScrollY - DOMDOMWindowScrollYPropertyInfo , - getDOMDOMWindowScrollY , - - --- ** Scrollbars - DOMDOMWindowScrollbarsPropertyInfo , - getDOMDOMWindowScrollbars , - - --- ** Self - DOMDOMWindowSelfPropertyInfo , - getDOMDOMWindowSelf , - - --- ** SessionStorage - DOMDOMWindowSessionStoragePropertyInfo , - getDOMDOMWindowSessionStorage , - - --- ** Status - DOMDOMWindowStatusPropertyInfo , - constructDOMDOMWindowStatus , - getDOMDOMWindowStatus , - setDOMDOMWindowStatus , - - --- ** Statusbar - DOMDOMWindowStatusbarPropertyInfo , - getDOMDOMWindowStatusbar , - - --- ** StyleMedia - DOMDOMWindowStyleMediaPropertyInfo , - getDOMDOMWindowStyleMedia , - - --- ** Toolbar - DOMDOMWindowToolbarPropertyInfo , - getDOMDOMWindowToolbar , - - --- ** Top - DOMDOMWindowTopPropertyInfo , - getDOMDOMWindowTop , - - --- ** WebkitStorageInfo - DOMDOMWindowWebkitStorageInfoPropertyInfo, - getDOMDOMWindowWebkitStorageInfo , - - --- ** Window - DOMDOMWindowWindowPropertyInfo , - getDOMDOMWindowWindow , - - - - - ) where - -import Prelude () -import Data.GI.Base.ShortPrelude - -import qualified Data.Text as T -import qualified Data.ByteString.Char8 as B -import qualified Data.Map as Map - -import GI.WebKit.Types -import GI.WebKit.Callbacks -import qualified GI.GObject as GObject - -newtype DOMDOMWindow = DOMDOMWindow (ForeignPtr DOMDOMWindow) -foreign import ccall "webkit_dom_dom_window_get_type" - c_webkit_dom_dom_window_get_type :: IO GType - -type instance ParentTypes DOMDOMWindow = DOMDOMWindowParentTypes -type DOMDOMWindowParentTypes = '[DOMObject, GObject.Object, DOMEventTarget] - -instance GObject DOMDOMWindow where - gobjectIsInitiallyUnowned _ = False - gobjectType _ = c_webkit_dom_dom_window_get_type - - -class GObject o => DOMDOMWindowK o -instance (GObject o, IsDescendantOf DOMDOMWindow o) => DOMDOMWindowK o - -toDOMDOMWindow :: DOMDOMWindowK o => o -> IO DOMDOMWindow -toDOMDOMWindow = unsafeCastTo DOMDOMWindow - -noDOMDOMWindow :: Maybe DOMDOMWindow -noDOMDOMWindow = Nothing - --- VVV Prop "application-cache" - -- Type: TInterface "WebKit" "DOMDOMApplicationCache" - -- Flags: [PropertyReadable] - -getDOMDOMWindowApplicationCache :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMApplicationCache -getDOMDOMWindowApplicationCache obj = liftIO $ getObjectPropertyObject obj "application-cache" DOMDOMApplicationCache - -data DOMDOMWindowApplicationCachePropertyInfo -instance AttrInfo DOMDOMWindowApplicationCachePropertyInfo where - type AttrAllowedOps DOMDOMWindowApplicationCachePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowApplicationCachePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowApplicationCachePropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowApplicationCachePropertyInfo = DOMDOMApplicationCache - type AttrLabel DOMDOMWindowApplicationCachePropertyInfo = "DOMDOMWindow::application-cache" - attrGet _ = getDOMDOMWindowApplicationCache - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "client-information" - -- Type: TInterface "WebKit" "DOMNavigator" - -- Flags: [PropertyReadable] - -getDOMDOMWindowClientInformation :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMNavigator -getDOMDOMWindowClientInformation obj = liftIO $ getObjectPropertyObject obj "client-information" DOMNavigator - -data DOMDOMWindowClientInformationPropertyInfo -instance AttrInfo DOMDOMWindowClientInformationPropertyInfo where - type AttrAllowedOps DOMDOMWindowClientInformationPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowClientInformationPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowClientInformationPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowClientInformationPropertyInfo = DOMNavigator - type AttrLabel DOMDOMWindowClientInformationPropertyInfo = "DOMDOMWindow::client-information" - attrGet _ = getDOMDOMWindowClientInformation - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "closed" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMDOMWindowClosed :: (MonadIO m, DOMDOMWindowK o) => o -> m Bool -getDOMDOMWindowClosed obj = liftIO $ getObjectPropertyBool obj "closed" - -data DOMDOMWindowClosedPropertyInfo -instance AttrInfo DOMDOMWindowClosedPropertyInfo where - type AttrAllowedOps DOMDOMWindowClosedPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowClosedPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowClosedPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowClosedPropertyInfo = Bool - type AttrLabel DOMDOMWindowClosedPropertyInfo = "DOMDOMWindow::closed" - attrGet _ = getDOMDOMWindowClosed - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "console" - -- Type: TInterface "WebKit" "DOMConsole" - -- Flags: [PropertyReadable] - -getDOMDOMWindowConsole :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMConsole -getDOMDOMWindowConsole obj = liftIO $ getObjectPropertyObject obj "console" DOMConsole - -data DOMDOMWindowConsolePropertyInfo -instance AttrInfo DOMDOMWindowConsolePropertyInfo where - type AttrAllowedOps DOMDOMWindowConsolePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowConsolePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowConsolePropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowConsolePropertyInfo = DOMConsole - type AttrLabel DOMDOMWindowConsolePropertyInfo = "DOMDOMWindow::console" - attrGet _ = getDOMDOMWindowConsole - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "css" - -- Type: TInterface "WebKit" "DOMDOMWindowCSS" - -- Flags: [PropertyReadable] - -getDOMDOMWindowCss :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindowCSS -getDOMDOMWindowCss obj = liftIO $ getObjectPropertyObject obj "css" DOMDOMWindowCSS - -data DOMDOMWindowCssPropertyInfo -instance AttrInfo DOMDOMWindowCssPropertyInfo where - type AttrAllowedOps DOMDOMWindowCssPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowCssPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowCssPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowCssPropertyInfo = DOMDOMWindowCSS - type AttrLabel DOMDOMWindowCssPropertyInfo = "DOMDOMWindow::css" - attrGet _ = getDOMDOMWindowCss - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "default-status" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMDOMWindowDefaultStatus :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text -getDOMDOMWindowDefaultStatus obj = liftIO $ getObjectPropertyString obj "default-status" - -setDOMDOMWindowDefaultStatus :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m () -setDOMDOMWindowDefaultStatus obj val = liftIO $ setObjectPropertyString obj "default-status" val - -constructDOMDOMWindowDefaultStatus :: T.Text -> IO ([Char], GValue) -constructDOMDOMWindowDefaultStatus val = constructObjectPropertyString "default-status" val - -data DOMDOMWindowDefaultStatusPropertyInfo -instance AttrInfo DOMDOMWindowDefaultStatusPropertyInfo where - type AttrAllowedOps DOMDOMWindowDefaultStatusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowDefaultStatusPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMDOMWindowDefaultStatusPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowDefaultStatusPropertyInfo = T.Text - type AttrLabel DOMDOMWindowDefaultStatusPropertyInfo = "DOMDOMWindow::default-status" - attrGet _ = getDOMDOMWindowDefaultStatus - attrSet _ = setDOMDOMWindowDefaultStatus - attrConstruct _ = constructDOMDOMWindowDefaultStatus - --- VVV Prop "device-pixel-ratio" - -- Type: TBasicType TDouble - -- Flags: [PropertyReadable] - -getDOMDOMWindowDevicePixelRatio :: (MonadIO m, DOMDOMWindowK o) => o -> m Double -getDOMDOMWindowDevicePixelRatio obj = liftIO $ getObjectPropertyDouble obj "device-pixel-ratio" - -data DOMDOMWindowDevicePixelRatioPropertyInfo -instance AttrInfo DOMDOMWindowDevicePixelRatioPropertyInfo where - type AttrAllowedOps DOMDOMWindowDevicePixelRatioPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowDevicePixelRatioPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowDevicePixelRatioPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowDevicePixelRatioPropertyInfo = Double - type AttrLabel DOMDOMWindowDevicePixelRatioPropertyInfo = "DOMDOMWindow::device-pixel-ratio" - attrGet _ = getDOMDOMWindowDevicePixelRatio - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "document" - -- Type: TInterface "WebKit" "DOMDocument" - -- Flags: [PropertyReadable] - -getDOMDOMWindowDocument :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDocument -getDOMDOMWindowDocument obj = liftIO $ getObjectPropertyObject obj "document" DOMDocument - -data DOMDOMWindowDocumentPropertyInfo -instance AttrInfo DOMDOMWindowDocumentPropertyInfo where - type AttrAllowedOps DOMDOMWindowDocumentPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowDocumentPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowDocumentPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowDocumentPropertyInfo = DOMDocument - type AttrLabel DOMDOMWindowDocumentPropertyInfo = "DOMDOMWindow::document" - attrGet _ = getDOMDOMWindowDocument - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "frame-element" - -- Type: TInterface "WebKit" "DOMElement" - -- Flags: [PropertyReadable] - -getDOMDOMWindowFrameElement :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMElement -getDOMDOMWindowFrameElement obj = liftIO $ getObjectPropertyObject obj "frame-element" DOMElement - -data DOMDOMWindowFrameElementPropertyInfo -instance AttrInfo DOMDOMWindowFrameElementPropertyInfo where - type AttrAllowedOps DOMDOMWindowFrameElementPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowFrameElementPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowFrameElementPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowFrameElementPropertyInfo = DOMElement - type AttrLabel DOMDOMWindowFrameElementPropertyInfo = "DOMDOMWindow::frame-element" - attrGet _ = getDOMDOMWindowFrameElement - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "frames" - -- Type: TInterface "WebKit" "DOMDOMWindow" - -- Flags: [PropertyReadable] - -getDOMDOMWindowFrames :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow -getDOMDOMWindowFrames obj = liftIO $ getObjectPropertyObject obj "frames" DOMDOMWindow - -data DOMDOMWindowFramesPropertyInfo -instance AttrInfo DOMDOMWindowFramesPropertyInfo where - type AttrAllowedOps DOMDOMWindowFramesPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowFramesPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowFramesPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowFramesPropertyInfo = DOMDOMWindow - type AttrLabel DOMDOMWindowFramesPropertyInfo = "DOMDOMWindow::frames" - attrGet _ = getDOMDOMWindowFrames - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "history" - -- Type: TInterface "WebKit" "DOMHistory" - -- Flags: [PropertyReadable] - -getDOMDOMWindowHistory :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMHistory -getDOMDOMWindowHistory obj = liftIO $ getObjectPropertyObject obj "history" DOMHistory - -data DOMDOMWindowHistoryPropertyInfo -instance AttrInfo DOMDOMWindowHistoryPropertyInfo where - type AttrAllowedOps DOMDOMWindowHistoryPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowHistoryPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowHistoryPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowHistoryPropertyInfo = DOMHistory - type AttrLabel DOMDOMWindowHistoryPropertyInfo = "DOMDOMWindow::history" - attrGet _ = getDOMDOMWindowHistory - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "inner-height" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowInnerHeight :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowInnerHeight obj = liftIO $ getObjectPropertyInt64 obj "inner-height" - -data DOMDOMWindowInnerHeightPropertyInfo -instance AttrInfo DOMDOMWindowInnerHeightPropertyInfo where - type AttrAllowedOps DOMDOMWindowInnerHeightPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowInnerHeightPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowInnerHeightPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowInnerHeightPropertyInfo = Int64 - type AttrLabel DOMDOMWindowInnerHeightPropertyInfo = "DOMDOMWindow::inner-height" - attrGet _ = getDOMDOMWindowInnerHeight - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "inner-width" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowInnerWidth :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowInnerWidth obj = liftIO $ getObjectPropertyInt64 obj "inner-width" - -data DOMDOMWindowInnerWidthPropertyInfo -instance AttrInfo DOMDOMWindowInnerWidthPropertyInfo where - type AttrAllowedOps DOMDOMWindowInnerWidthPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowInnerWidthPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowInnerWidthPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowInnerWidthPropertyInfo = Int64 - type AttrLabel DOMDOMWindowInnerWidthPropertyInfo = "DOMDOMWindow::inner-width" - attrGet _ = getDOMDOMWindowInnerWidth - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "length" - -- Type: TBasicType TUInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowLength :: (MonadIO m, DOMDOMWindowK o) => o -> m Word64 -getDOMDOMWindowLength obj = liftIO $ getObjectPropertyUInt64 obj "length" - -data DOMDOMWindowLengthPropertyInfo -instance AttrInfo DOMDOMWindowLengthPropertyInfo where - type AttrAllowedOps DOMDOMWindowLengthPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowLengthPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowLengthPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowLengthPropertyInfo = Word64 - type AttrLabel DOMDOMWindowLengthPropertyInfo = "DOMDOMWindow::length" - attrGet _ = getDOMDOMWindowLength - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "local-storage" - -- Type: TInterface "WebKit" "DOMStorage" - -- Flags: [PropertyReadable] - -getDOMDOMWindowLocalStorage :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorage -getDOMDOMWindowLocalStorage obj = liftIO $ getObjectPropertyObject obj "local-storage" DOMStorage - -data DOMDOMWindowLocalStoragePropertyInfo -instance AttrInfo DOMDOMWindowLocalStoragePropertyInfo where - type AttrAllowedOps DOMDOMWindowLocalStoragePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowLocalStoragePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowLocalStoragePropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowLocalStoragePropertyInfo = DOMStorage - type AttrLabel DOMDOMWindowLocalStoragePropertyInfo = "DOMDOMWindow::local-storage" - attrGet _ = getDOMDOMWindowLocalStorage - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "locationbar" - -- Type: TInterface "WebKit" "DOMBarProp" - -- Flags: [PropertyReadable] - -getDOMDOMWindowLocationbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp -getDOMDOMWindowLocationbar obj = liftIO $ getObjectPropertyObject obj "locationbar" DOMBarProp - -data DOMDOMWindowLocationbarPropertyInfo -instance AttrInfo DOMDOMWindowLocationbarPropertyInfo where - type AttrAllowedOps DOMDOMWindowLocationbarPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowLocationbarPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowLocationbarPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowLocationbarPropertyInfo = DOMBarProp - type AttrLabel DOMDOMWindowLocationbarPropertyInfo = "DOMDOMWindow::locationbar" - attrGet _ = getDOMDOMWindowLocationbar - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "menubar" - -- Type: TInterface "WebKit" "DOMBarProp" - -- Flags: [PropertyReadable] - -getDOMDOMWindowMenubar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp -getDOMDOMWindowMenubar obj = liftIO $ getObjectPropertyObject obj "menubar" DOMBarProp - -data DOMDOMWindowMenubarPropertyInfo -instance AttrInfo DOMDOMWindowMenubarPropertyInfo where - type AttrAllowedOps DOMDOMWindowMenubarPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowMenubarPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowMenubarPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowMenubarPropertyInfo = DOMBarProp - type AttrLabel DOMDOMWindowMenubarPropertyInfo = "DOMDOMWindow::menubar" - attrGet _ = getDOMDOMWindowMenubar - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "name" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMDOMWindowName :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text -getDOMDOMWindowName obj = liftIO $ getObjectPropertyString obj "name" - -setDOMDOMWindowName :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m () -setDOMDOMWindowName obj val = liftIO $ setObjectPropertyString obj "name" val - -constructDOMDOMWindowName :: T.Text -> IO ([Char], GValue) -constructDOMDOMWindowName val = constructObjectPropertyString "name" val - -data DOMDOMWindowNamePropertyInfo -instance AttrInfo DOMDOMWindowNamePropertyInfo where - type AttrAllowedOps DOMDOMWindowNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowNamePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMDOMWindowNamePropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowNamePropertyInfo = T.Text - type AttrLabel DOMDOMWindowNamePropertyInfo = "DOMDOMWindow::name" - attrGet _ = getDOMDOMWindowName - attrSet _ = setDOMDOMWindowName - attrConstruct _ = constructDOMDOMWindowName - --- VVV Prop "navigator" - -- Type: TInterface "WebKit" "DOMNavigator" - -- Flags: [PropertyReadable] - -getDOMDOMWindowNavigator :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMNavigator -getDOMDOMWindowNavigator obj = liftIO $ getObjectPropertyObject obj "navigator" DOMNavigator - -data DOMDOMWindowNavigatorPropertyInfo -instance AttrInfo DOMDOMWindowNavigatorPropertyInfo where - type AttrAllowedOps DOMDOMWindowNavigatorPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowNavigatorPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowNavigatorPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowNavigatorPropertyInfo = DOMNavigator - type AttrLabel DOMDOMWindowNavigatorPropertyInfo = "DOMDOMWindow::navigator" - attrGet _ = getDOMDOMWindowNavigator - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "offscreen-buffering" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMDOMWindowOffscreenBuffering :: (MonadIO m, DOMDOMWindowK o) => o -> m Bool -getDOMDOMWindowOffscreenBuffering obj = liftIO $ getObjectPropertyBool obj "offscreen-buffering" - -data DOMDOMWindowOffscreenBufferingPropertyInfo -instance AttrInfo DOMDOMWindowOffscreenBufferingPropertyInfo where - type AttrAllowedOps DOMDOMWindowOffscreenBufferingPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowOffscreenBufferingPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowOffscreenBufferingPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowOffscreenBufferingPropertyInfo = Bool - type AttrLabel DOMDOMWindowOffscreenBufferingPropertyInfo = "DOMDOMWindow::offscreen-buffering" - attrGet _ = getDOMDOMWindowOffscreenBuffering - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "opener" - -- Type: TInterface "WebKit" "DOMDOMWindow" - -- Flags: [PropertyReadable] - -getDOMDOMWindowOpener :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow -getDOMDOMWindowOpener obj = liftIO $ getObjectPropertyObject obj "opener" DOMDOMWindow - -data DOMDOMWindowOpenerPropertyInfo -instance AttrInfo DOMDOMWindowOpenerPropertyInfo where - type AttrAllowedOps DOMDOMWindowOpenerPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowOpenerPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowOpenerPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowOpenerPropertyInfo = DOMDOMWindow - type AttrLabel DOMDOMWindowOpenerPropertyInfo = "DOMDOMWindow::opener" - attrGet _ = getDOMDOMWindowOpener - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "outer-height" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowOuterHeight :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowOuterHeight obj = liftIO $ getObjectPropertyInt64 obj "outer-height" - -data DOMDOMWindowOuterHeightPropertyInfo -instance AttrInfo DOMDOMWindowOuterHeightPropertyInfo where - type AttrAllowedOps DOMDOMWindowOuterHeightPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowOuterHeightPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowOuterHeightPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowOuterHeightPropertyInfo = Int64 - type AttrLabel DOMDOMWindowOuterHeightPropertyInfo = "DOMDOMWindow::outer-height" - attrGet _ = getDOMDOMWindowOuterHeight - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "outer-width" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowOuterWidth :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowOuterWidth obj = liftIO $ getObjectPropertyInt64 obj "outer-width" - -data DOMDOMWindowOuterWidthPropertyInfo -instance AttrInfo DOMDOMWindowOuterWidthPropertyInfo where - type AttrAllowedOps DOMDOMWindowOuterWidthPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowOuterWidthPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowOuterWidthPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowOuterWidthPropertyInfo = Int64 - type AttrLabel DOMDOMWindowOuterWidthPropertyInfo = "DOMDOMWindow::outer-width" - attrGet _ = getDOMDOMWindowOuterWidth - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "page-x-offset" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowPageXOffset :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowPageXOffset obj = liftIO $ getObjectPropertyInt64 obj "page-x-offset" - -data DOMDOMWindowPageXOffsetPropertyInfo -instance AttrInfo DOMDOMWindowPageXOffsetPropertyInfo where - type AttrAllowedOps DOMDOMWindowPageXOffsetPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowPageXOffsetPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowPageXOffsetPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowPageXOffsetPropertyInfo = Int64 - type AttrLabel DOMDOMWindowPageXOffsetPropertyInfo = "DOMDOMWindow::page-x-offset" - attrGet _ = getDOMDOMWindowPageXOffset - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "page-y-offset" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowPageYOffset :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowPageYOffset obj = liftIO $ getObjectPropertyInt64 obj "page-y-offset" - -data DOMDOMWindowPageYOffsetPropertyInfo -instance AttrInfo DOMDOMWindowPageYOffsetPropertyInfo where - type AttrAllowedOps DOMDOMWindowPageYOffsetPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowPageYOffsetPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowPageYOffsetPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowPageYOffsetPropertyInfo = Int64 - type AttrLabel DOMDOMWindowPageYOffsetPropertyInfo = "DOMDOMWindow::page-y-offset" - attrGet _ = getDOMDOMWindowPageYOffset - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "parent" - -- Type: TInterface "WebKit" "DOMDOMWindow" - -- Flags: [PropertyReadable] - -getDOMDOMWindowParent :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow -getDOMDOMWindowParent obj = liftIO $ getObjectPropertyObject obj "parent" DOMDOMWindow - -data DOMDOMWindowParentPropertyInfo -instance AttrInfo DOMDOMWindowParentPropertyInfo where - type AttrAllowedOps DOMDOMWindowParentPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowParentPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowParentPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowParentPropertyInfo = DOMDOMWindow - type AttrLabel DOMDOMWindowParentPropertyInfo = "DOMDOMWindow::parent" - attrGet _ = getDOMDOMWindowParent - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "performance" - -- Type: TInterface "WebKit" "DOMPerformance" - -- Flags: [PropertyReadable] - -getDOMDOMWindowPerformance :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMPerformance -getDOMDOMWindowPerformance obj = liftIO $ getObjectPropertyObject obj "performance" DOMPerformance - -data DOMDOMWindowPerformancePropertyInfo -instance AttrInfo DOMDOMWindowPerformancePropertyInfo where - type AttrAllowedOps DOMDOMWindowPerformancePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowPerformancePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowPerformancePropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowPerformancePropertyInfo = DOMPerformance - type AttrLabel DOMDOMWindowPerformancePropertyInfo = "DOMDOMWindow::performance" - attrGet _ = getDOMDOMWindowPerformance - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "personalbar" - -- Type: TInterface "WebKit" "DOMBarProp" - -- Flags: [PropertyReadable] - -getDOMDOMWindowPersonalbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp -getDOMDOMWindowPersonalbar obj = liftIO $ getObjectPropertyObject obj "personalbar" DOMBarProp - -data DOMDOMWindowPersonalbarPropertyInfo -instance AttrInfo DOMDOMWindowPersonalbarPropertyInfo where - type AttrAllowedOps DOMDOMWindowPersonalbarPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowPersonalbarPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowPersonalbarPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowPersonalbarPropertyInfo = DOMBarProp - type AttrLabel DOMDOMWindowPersonalbarPropertyInfo = "DOMDOMWindow::personalbar" - attrGet _ = getDOMDOMWindowPersonalbar - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "screen" - -- Type: TInterface "WebKit" "DOMScreen" - -- Flags: [PropertyReadable] - -getDOMDOMWindowScreen :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMScreen -getDOMDOMWindowScreen obj = liftIO $ getObjectPropertyObject obj "screen" DOMScreen - -data DOMDOMWindowScreenPropertyInfo -instance AttrInfo DOMDOMWindowScreenPropertyInfo where - type AttrAllowedOps DOMDOMWindowScreenPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowScreenPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowScreenPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowScreenPropertyInfo = DOMScreen - type AttrLabel DOMDOMWindowScreenPropertyInfo = "DOMDOMWindow::screen" - attrGet _ = getDOMDOMWindowScreen - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "screen-left" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowScreenLeft :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowScreenLeft obj = liftIO $ getObjectPropertyInt64 obj "screen-left" - -data DOMDOMWindowScreenLeftPropertyInfo -instance AttrInfo DOMDOMWindowScreenLeftPropertyInfo where - type AttrAllowedOps DOMDOMWindowScreenLeftPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowScreenLeftPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowScreenLeftPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowScreenLeftPropertyInfo = Int64 - type AttrLabel DOMDOMWindowScreenLeftPropertyInfo = "DOMDOMWindow::screen-left" - attrGet _ = getDOMDOMWindowScreenLeft - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "screen-top" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowScreenTop :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowScreenTop obj = liftIO $ getObjectPropertyInt64 obj "screen-top" - -data DOMDOMWindowScreenTopPropertyInfo -instance AttrInfo DOMDOMWindowScreenTopPropertyInfo where - type AttrAllowedOps DOMDOMWindowScreenTopPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowScreenTopPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowScreenTopPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowScreenTopPropertyInfo = Int64 - type AttrLabel DOMDOMWindowScreenTopPropertyInfo = "DOMDOMWindow::screen-top" - attrGet _ = getDOMDOMWindowScreenTop - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "screen-x" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowScreenX :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowScreenX obj = liftIO $ getObjectPropertyInt64 obj "screen-x" - -data DOMDOMWindowScreenXPropertyInfo -instance AttrInfo DOMDOMWindowScreenXPropertyInfo where - type AttrAllowedOps DOMDOMWindowScreenXPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowScreenXPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowScreenXPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowScreenXPropertyInfo = Int64 - type AttrLabel DOMDOMWindowScreenXPropertyInfo = "DOMDOMWindow::screen-x" - attrGet _ = getDOMDOMWindowScreenX - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "screen-y" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowScreenY :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowScreenY obj = liftIO $ getObjectPropertyInt64 obj "screen-y" - -data DOMDOMWindowScreenYPropertyInfo -instance AttrInfo DOMDOMWindowScreenYPropertyInfo where - type AttrAllowedOps DOMDOMWindowScreenYPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowScreenYPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowScreenYPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowScreenYPropertyInfo = Int64 - type AttrLabel DOMDOMWindowScreenYPropertyInfo = "DOMDOMWindow::screen-y" - attrGet _ = getDOMDOMWindowScreenY - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "scroll-x" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowScrollX :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowScrollX obj = liftIO $ getObjectPropertyInt64 obj "scroll-x" - -data DOMDOMWindowScrollXPropertyInfo -instance AttrInfo DOMDOMWindowScrollXPropertyInfo where - type AttrAllowedOps DOMDOMWindowScrollXPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowScrollXPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowScrollXPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowScrollXPropertyInfo = Int64 - type AttrLabel DOMDOMWindowScrollXPropertyInfo = "DOMDOMWindow::scroll-x" - attrGet _ = getDOMDOMWindowScrollX - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "scroll-y" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable] - -getDOMDOMWindowScrollY :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 -getDOMDOMWindowScrollY obj = liftIO $ getObjectPropertyInt64 obj "scroll-y" - -data DOMDOMWindowScrollYPropertyInfo -instance AttrInfo DOMDOMWindowScrollYPropertyInfo where - type AttrAllowedOps DOMDOMWindowScrollYPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowScrollYPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowScrollYPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowScrollYPropertyInfo = Int64 - type AttrLabel DOMDOMWindowScrollYPropertyInfo = "DOMDOMWindow::scroll-y" - attrGet _ = getDOMDOMWindowScrollY - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "scrollbars" - -- Type: TInterface "WebKit" "DOMBarProp" - -- Flags: [PropertyReadable] - -getDOMDOMWindowScrollbars :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp -getDOMDOMWindowScrollbars obj = liftIO $ getObjectPropertyObject obj "scrollbars" DOMBarProp - -data DOMDOMWindowScrollbarsPropertyInfo -instance AttrInfo DOMDOMWindowScrollbarsPropertyInfo where - type AttrAllowedOps DOMDOMWindowScrollbarsPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowScrollbarsPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowScrollbarsPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowScrollbarsPropertyInfo = DOMBarProp - type AttrLabel DOMDOMWindowScrollbarsPropertyInfo = "DOMDOMWindow::scrollbars" - attrGet _ = getDOMDOMWindowScrollbars - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "self" - -- Type: TInterface "WebKit" "DOMDOMWindow" - -- Flags: [PropertyReadable] - -getDOMDOMWindowSelf :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow -getDOMDOMWindowSelf obj = liftIO $ getObjectPropertyObject obj "self" DOMDOMWindow - -data DOMDOMWindowSelfPropertyInfo -instance AttrInfo DOMDOMWindowSelfPropertyInfo where - type AttrAllowedOps DOMDOMWindowSelfPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowSelfPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowSelfPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowSelfPropertyInfo = DOMDOMWindow - type AttrLabel DOMDOMWindowSelfPropertyInfo = "DOMDOMWindow::self" - attrGet _ = getDOMDOMWindowSelf - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "session-storage" - -- Type: TInterface "WebKit" "DOMStorage" - -- Flags: [PropertyReadable] - -getDOMDOMWindowSessionStorage :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorage -getDOMDOMWindowSessionStorage obj = liftIO $ getObjectPropertyObject obj "session-storage" DOMStorage - -data DOMDOMWindowSessionStoragePropertyInfo -instance AttrInfo DOMDOMWindowSessionStoragePropertyInfo where - type AttrAllowedOps DOMDOMWindowSessionStoragePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowSessionStoragePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowSessionStoragePropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowSessionStoragePropertyInfo = DOMStorage - type AttrLabel DOMDOMWindowSessionStoragePropertyInfo = "DOMDOMWindow::session-storage" - attrGet _ = getDOMDOMWindowSessionStorage - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "status" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMDOMWindowStatus :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text -getDOMDOMWindowStatus obj = liftIO $ getObjectPropertyString obj "status" - -setDOMDOMWindowStatus :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m () -setDOMDOMWindowStatus obj val = liftIO $ setObjectPropertyString obj "status" val - -constructDOMDOMWindowStatus :: T.Text -> IO ([Char], GValue) -constructDOMDOMWindowStatus val = constructObjectPropertyString "status" val - -data DOMDOMWindowStatusPropertyInfo -instance AttrInfo DOMDOMWindowStatusPropertyInfo where - type AttrAllowedOps DOMDOMWindowStatusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowStatusPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMDOMWindowStatusPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowStatusPropertyInfo = T.Text - type AttrLabel DOMDOMWindowStatusPropertyInfo = "DOMDOMWindow::status" - attrGet _ = getDOMDOMWindowStatus - attrSet _ = setDOMDOMWindowStatus - attrConstruct _ = constructDOMDOMWindowStatus - --- VVV Prop "statusbar" - -- Type: TInterface "WebKit" "DOMBarProp" - -- Flags: [PropertyReadable] - -getDOMDOMWindowStatusbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp -getDOMDOMWindowStatusbar obj = liftIO $ getObjectPropertyObject obj "statusbar" DOMBarProp - -data DOMDOMWindowStatusbarPropertyInfo -instance AttrInfo DOMDOMWindowStatusbarPropertyInfo where - type AttrAllowedOps DOMDOMWindowStatusbarPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowStatusbarPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowStatusbarPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowStatusbarPropertyInfo = DOMBarProp - type AttrLabel DOMDOMWindowStatusbarPropertyInfo = "DOMDOMWindow::statusbar" - attrGet _ = getDOMDOMWindowStatusbar - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "style-media" - -- Type: TInterface "WebKit" "DOMStyleMedia" - -- Flags: [PropertyReadable] - -getDOMDOMWindowStyleMedia :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStyleMedia -getDOMDOMWindowStyleMedia obj = liftIO $ getObjectPropertyObject obj "style-media" DOMStyleMedia - -data DOMDOMWindowStyleMediaPropertyInfo -instance AttrInfo DOMDOMWindowStyleMediaPropertyInfo where - type AttrAllowedOps DOMDOMWindowStyleMediaPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowStyleMediaPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowStyleMediaPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowStyleMediaPropertyInfo = DOMStyleMedia - type AttrLabel DOMDOMWindowStyleMediaPropertyInfo = "DOMDOMWindow::style-media" - attrGet _ = getDOMDOMWindowStyleMedia - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "toolbar" - -- Type: TInterface "WebKit" "DOMBarProp" - -- Flags: [PropertyReadable] - -getDOMDOMWindowToolbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp -getDOMDOMWindowToolbar obj = liftIO $ getObjectPropertyObject obj "toolbar" DOMBarProp - -data DOMDOMWindowToolbarPropertyInfo -instance AttrInfo DOMDOMWindowToolbarPropertyInfo where - type AttrAllowedOps DOMDOMWindowToolbarPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowToolbarPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowToolbarPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowToolbarPropertyInfo = DOMBarProp - type AttrLabel DOMDOMWindowToolbarPropertyInfo = "DOMDOMWindow::toolbar" - attrGet _ = getDOMDOMWindowToolbar - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "top" - -- Type: TInterface "WebKit" "DOMDOMWindow" - -- Flags: [PropertyReadable] - -getDOMDOMWindowTop :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow -getDOMDOMWindowTop obj = liftIO $ getObjectPropertyObject obj "top" DOMDOMWindow - -data DOMDOMWindowTopPropertyInfo -instance AttrInfo DOMDOMWindowTopPropertyInfo where - type AttrAllowedOps DOMDOMWindowTopPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowTopPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowTopPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowTopPropertyInfo = DOMDOMWindow - type AttrLabel DOMDOMWindowTopPropertyInfo = "DOMDOMWindow::top" - attrGet _ = getDOMDOMWindowTop - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "webkit-storage-info" - -- Type: TInterface "WebKit" "DOMStorageInfo" - -- Flags: [PropertyReadable] - -getDOMDOMWindowWebkitStorageInfo :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorageInfo -getDOMDOMWindowWebkitStorageInfo obj = liftIO $ getObjectPropertyObject obj "webkit-storage-info" DOMStorageInfo - -data DOMDOMWindowWebkitStorageInfoPropertyInfo -instance AttrInfo DOMDOMWindowWebkitStorageInfoPropertyInfo where - type AttrAllowedOps DOMDOMWindowWebkitStorageInfoPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowWebkitStorageInfoPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowWebkitStorageInfoPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowWebkitStorageInfoPropertyInfo = DOMStorageInfo - type AttrLabel DOMDOMWindowWebkitStorageInfoPropertyInfo = "DOMDOMWindow::webkit-storage-info" - attrGet _ = getDOMDOMWindowWebkitStorageInfo - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "window" - -- Type: TInterface "WebKit" "DOMDOMWindow" - -- Flags: [PropertyReadable] - -getDOMDOMWindowWindow :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow -getDOMDOMWindowWindow obj = liftIO $ getObjectPropertyObject obj "window" DOMDOMWindow - -data DOMDOMWindowWindowPropertyInfo -instance AttrInfo DOMDOMWindowWindowPropertyInfo where - type AttrAllowedOps DOMDOMWindowWindowPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDOMWindowWindowPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDOMWindowWindowPropertyInfo = DOMDOMWindowK - type AttrGetType DOMDOMWindowWindowPropertyInfo = DOMDOMWindow - type AttrLabel DOMDOMWindowWindowPropertyInfo = "DOMDOMWindow::window" - attrGet _ = getDOMDOMWindowWindow - attrSet _ = undefined - attrConstruct _ = undefined - -type instance AttributeList DOMDOMWindow = DOMDOMWindowAttributeList -type DOMDOMWindowAttributeList = ('[ '("application-cache", DOMDOMWindowApplicationCachePropertyInfo), '("client-information", DOMDOMWindowClientInformationPropertyInfo), '("closed", DOMDOMWindowClosedPropertyInfo), '("console", DOMDOMWindowConsolePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("css", DOMDOMWindowCssPropertyInfo), '("default-status", DOMDOMWindowDefaultStatusPropertyInfo), '("device-pixel-ratio", DOMDOMWindowDevicePixelRatioPropertyInfo), '("document", DOMDOMWindowDocumentPropertyInfo), '("frame-element", DOMDOMWindowFrameElementPropertyInfo), '("frames", DOMDOMWindowFramesPropertyInfo), '("history", DOMDOMWindowHistoryPropertyInfo), '("inner-height", DOMDOMWindowInnerHeightPropertyInfo), '("inner-width", DOMDOMWindowInnerWidthPropertyInfo), '("length", DOMDOMWindowLengthPropertyInfo), '("local-storage", DOMDOMWindowLocalStoragePropertyInfo), '("locationbar", DOMDOMWindowLocationbarPropertyInfo), '("menubar", DOMDOMWindowMenubarPropertyInfo), '("name", DOMDOMWindowNamePropertyInfo), '("navigator", DOMDOMWindowNavigatorPropertyInfo), '("offscreen-buffering", DOMDOMWindowOffscreenBufferingPropertyInfo), '("opener", DOMDOMWindowOpenerPropertyInfo), '("outer-height", DOMDOMWindowOuterHeightPropertyInfo), '("outer-width", DOMDOMWindowOuterWidthPropertyInfo), '("page-x-offset", DOMDOMWindowPageXOffsetPropertyInfo), '("page-y-offset", DOMDOMWindowPageYOffsetPropertyInfo), '("parent", DOMDOMWindowParentPropertyInfo), '("performance", DOMDOMWindowPerformancePropertyInfo), '("personalbar", DOMDOMWindowPersonalbarPropertyInfo), '("screen", DOMDOMWindowScreenPropertyInfo), '("screen-left", DOMDOMWindowScreenLeftPropertyInfo), '("screen-top", DOMDOMWindowScreenTopPropertyInfo), '("screen-x", DOMDOMWindowScreenXPropertyInfo), '("screen-y", DOMDOMWindowScreenYPropertyInfo), '("scroll-x", DOMDOMWindowScrollXPropertyInfo), '("scroll-y", DOMDOMWindowScrollYPropertyInfo), '("scrollbars", DOMDOMWindowScrollbarsPropertyInfo), '("self", DOMDOMWindowSelfPropertyInfo), '("session-storage", DOMDOMWindowSessionStoragePropertyInfo), '("status", DOMDOMWindowStatusPropertyInfo), '("statusbar", DOMDOMWindowStatusbarPropertyInfo), '("style-media", DOMDOMWindowStyleMediaPropertyInfo), '("toolbar", DOMDOMWindowToolbarPropertyInfo), '("top", DOMDOMWindowTopPropertyInfo), '("webkit-storage-info", DOMDOMWindowWebkitStorageInfoPropertyInfo), '("window", DOMDOMWindowWindowPropertyInfo)] :: [(Symbol, *)]) - -type instance SignalList DOMDOMWindow = DOMDOMWindowSignalList -type DOMDOMWindowSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) - --- method DOMDOMWindow::alert --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_alert" webkit_dom_dom_window_alert :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CString -> -- message : TBasicType TUTF8 - IO () - - -dOMDOMWindowAlert :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - T.Text -> -- message - m () -dOMDOMWindowAlert _obj message = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - message' <- textToCString message - webkit_dom_dom_window_alert _obj' message' - touchManagedPtr _obj - freeMem message' - return () - --- method DOMDOMWindow::atob --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_atob" webkit_dom_dom_window_atob :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CString -> -- string : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO CString - - -dOMDOMWindowAtob :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - T.Text -> -- string - m T.Text -dOMDOMWindowAtob _obj string = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - string' <- textToCString string - onException (do - result <- propagateGError $ webkit_dom_dom_window_atob _obj' string' - checkUnexpectedReturnNULL "webkit_dom_dom_window_atob" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - freeMem string' - return result' - ) (do - freeMem string' - ) - --- method DOMDOMWindow::blur --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_blur" webkit_dom_dom_window_blur :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO () - - -dOMDOMWindowBlur :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m () -dOMDOMWindowBlur _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_blur _obj' - touchManagedPtr _obj - return () - --- method DOMDOMWindow::btoa --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_btoa" webkit_dom_dom_window_btoa :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CString -> -- string : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO CString - - -dOMDOMWindowBtoa :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - T.Text -> -- string - m T.Text -dOMDOMWindowBtoa _obj string = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - string' <- textToCString string - onException (do - result <- propagateGError $ webkit_dom_dom_window_btoa _obj' string' - checkUnexpectedReturnNULL "webkit_dom_dom_window_btoa" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - freeMem string' - return result' - ) (do - freeMem string' - ) - --- method DOMDOMWindow::cancel_animation_frame --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_cancel_animation_frame" webkit_dom_dom_window_cancel_animation_frame :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Int64 -> -- id : TBasicType TInt64 - IO () - - -dOMDOMWindowCancelAnimationFrame :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Int64 -> -- id - m () -dOMDOMWindowCancelAnimationFrame _obj id = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_cancel_animation_frame _obj' id - touchManagedPtr _obj - return () - --- method DOMDOMWindow::capture_events --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_capture_events" webkit_dom_dom_window_capture_events :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO () - - -dOMDOMWindowCaptureEvents :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m () -dOMDOMWindowCaptureEvents _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_capture_events _obj' - touchManagedPtr _obj - return () - --- method DOMDOMWindow::clear_interval --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handle", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handle", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_clear_interval" webkit_dom_dom_window_clear_interval :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Int64 -> -- handle : TBasicType TInt64 - IO () - - -dOMDOMWindowClearInterval :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Int64 -> -- handle - m () -dOMDOMWindowClearInterval _obj handle = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_clear_interval _obj' handle - touchManagedPtr _obj - return () - --- method DOMDOMWindow::clear_timeout --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handle", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "handle", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_clear_timeout" webkit_dom_dom_window_clear_timeout :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Int64 -> -- handle : TBasicType TInt64 - IO () - - -dOMDOMWindowClearTimeout :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Int64 -> -- handle - m () -dOMDOMWindowClearTimeout _obj handle = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_clear_timeout _obj' handle - touchManagedPtr _obj - return () - --- method DOMDOMWindow::close --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_close" webkit_dom_dom_window_close :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO () - - -dOMDOMWindowClose :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m () -dOMDOMWindowClose _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_close _obj' - touchManagedPtr _obj - return () - --- method DOMDOMWindow::confirm --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_confirm" webkit_dom_dom_window_confirm :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CString -> -- message : TBasicType TUTF8 - IO CInt - - -dOMDOMWindowConfirm :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - T.Text -> -- message - m Bool -dOMDOMWindowConfirm _obj message = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - message' <- textToCString message - result <- webkit_dom_dom_window_confirm _obj' message' - let result' = (/= 0) result - touchManagedPtr _obj - freeMem message' - return result' - --- method DOMDOMWindow::dispatch_event --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_dispatch_event" webkit_dom_dom_window_dispatch_event :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Ptr DOMEvent -> -- evt : TInterface "WebKit" "DOMEvent" - Ptr (Ptr GError) -> -- error - IO CInt - -{-# DEPRECATED dOMDOMWindowDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-} -dOMDOMWindowDispatchEvent :: - (MonadIO m, DOMDOMWindowK a, DOMEventK b) => - a -> -- _obj - b -> -- evt - m () -dOMDOMWindowDispatchEvent _obj evt = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let evt' = unsafeManagedPtrCastPtr evt - onException (do - _ <- propagateGError $ webkit_dom_dom_window_dispatch_event _obj' evt' - touchManagedPtr _obj - touchManagedPtr evt - return () - ) (do - return () - ) - --- method DOMDOMWindow::find --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "caseSensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "backwards", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wrap", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wholeWord", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "searchInFrames", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "showDialog", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "caseSensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "backwards", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wrap", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wholeWord", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "searchInFrames", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "showDialog", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_find" webkit_dom_dom_window_find :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CString -> -- string : TBasicType TUTF8 - CInt -> -- caseSensitive : TBasicType TBoolean - CInt -> -- backwards : TBasicType TBoolean - CInt -> -- wrap : TBasicType TBoolean - CInt -> -- wholeWord : TBasicType TBoolean - CInt -> -- searchInFrames : TBasicType TBoolean - CInt -> -- showDialog : TBasicType TBoolean - IO CInt - - -dOMDOMWindowFind :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - T.Text -> -- string - Bool -> -- caseSensitive - Bool -> -- backwards - Bool -> -- wrap - Bool -> -- wholeWord - Bool -> -- searchInFrames - Bool -> -- showDialog - m Bool -dOMDOMWindowFind _obj string caseSensitive backwards wrap wholeWord searchInFrames showDialog = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - string' <- textToCString string - let caseSensitive' = (fromIntegral . fromEnum) caseSensitive - let backwards' = (fromIntegral . fromEnum) backwards - let wrap' = (fromIntegral . fromEnum) wrap - let wholeWord' = (fromIntegral . fromEnum) wholeWord - let searchInFrames' = (fromIntegral . fromEnum) searchInFrames - let showDialog' = (fromIntegral . fromEnum) showDialog - result <- webkit_dom_dom_window_find _obj' string' caseSensitive' backwards' wrap' wholeWord' searchInFrames' showDialog' - let result' = (/= 0) result - touchManagedPtr _obj - freeMem string' - return result' - --- method DOMDOMWindow::focus --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_focus" webkit_dom_dom_window_focus :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO () - - -dOMDOMWindowFocus :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m () -dOMDOMWindowFocus _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_focus _obj' - touchManagedPtr _obj - return () - --- method DOMDOMWindow::get_application_cache --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMApplicationCache" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_application_cache" webkit_dom_dom_window_get_application_cache :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMDOMApplicationCache) - - -dOMDOMWindowGetApplicationCache :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMDOMApplicationCache -dOMDOMWindowGetApplicationCache _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_application_cache _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_application_cache" result - result' <- (wrapObject DOMDOMApplicationCache) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_client_information --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMNavigator" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_client_information" webkit_dom_dom_window_get_client_information :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMNavigator) - - -dOMDOMWindowGetClientInformation :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMNavigator -dOMDOMWindowGetClientInformation _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_client_information _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_client_information" result - result' <- (wrapObject DOMNavigator) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_closed --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_closed" webkit_dom_dom_window_get_closed :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO CInt - - -dOMDOMWindowGetClosed :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Bool -dOMDOMWindowGetClosed _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_closed _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_computed_style --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "element", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pseudoElement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "element", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pseudoElement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMCSSStyleDeclaration" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_computed_style" webkit_dom_dom_window_get_computed_style :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Ptr DOMElement -> -- element : TInterface "WebKit" "DOMElement" - CString -> -- pseudoElement : TBasicType TUTF8 - IO (Ptr DOMCSSStyleDeclaration) - - -dOMDOMWindowGetComputedStyle :: - (MonadIO m, DOMDOMWindowK a, DOMElementK b) => - a -> -- _obj - b -> -- element - Maybe (T.Text) -> -- pseudoElement - m DOMCSSStyleDeclaration -dOMDOMWindowGetComputedStyle _obj element pseudoElement = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let element' = unsafeManagedPtrCastPtr element - maybePseudoElement <- case pseudoElement of - Nothing -> return nullPtr - Just jPseudoElement -> do - jPseudoElement' <- textToCString jPseudoElement - return jPseudoElement' - result <- webkit_dom_dom_window_get_computed_style _obj' element' maybePseudoElement - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_computed_style" result - result' <- (wrapObject DOMCSSStyleDeclaration) result - touchManagedPtr _obj - touchManagedPtr element - freeMem maybePseudoElement - return result' - --- method DOMDOMWindow::get_console --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMConsole" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_console" webkit_dom_dom_window_get_console :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMConsole) - - -dOMDOMWindowGetConsole :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMConsole -dOMDOMWindowGetConsole _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_console _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_console" result - result' <- (newObject DOMConsole) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_css --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMWindowCSS" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_css" webkit_dom_dom_window_get_css :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMDOMWindowCSS) - - -dOMDOMWindowGetCss :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMDOMWindowCSS -dOMDOMWindowGetCss _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_css _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_css" result - result' <- (wrapObject DOMDOMWindowCSS) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_default_status --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_default_status" webkit_dom_dom_window_get_default_status :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO CString - - -dOMDOMWindowGetDefaultStatus :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m T.Text -dOMDOMWindowGetDefaultStatus _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_default_status _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_default_status" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_device_pixel_ratio --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TDouble --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_device_pixel_ratio" webkit_dom_dom_window_get_device_pixel_ratio :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO CDouble - - -dOMDOMWindowGetDevicePixelRatio :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Double -dOMDOMWindowGetDevicePixelRatio _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_device_pixel_ratio _obj' - let result' = realToFrac result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_document --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDocument" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_document" webkit_dom_dom_window_get_document :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMDocument) - - -dOMDOMWindowGetDocument :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMDocument -dOMDOMWindowGetDocument _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_document _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_document" result - result' <- (newObject DOMDocument) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_frame_element --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_frame_element" webkit_dom_dom_window_get_frame_element :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMElement) - - -dOMDOMWindowGetFrameElement :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMElement -dOMDOMWindowGetFrameElement _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_frame_element _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_frame_element" result - result' <- (newObject DOMElement) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_frames --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMWindow" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_frames" webkit_dom_dom_window_get_frames :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMDOMWindow) - - -dOMDOMWindowGetFrames :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMDOMWindow -dOMDOMWindowGetFrames _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_frames _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_frames" result - result' <- (wrapObject DOMDOMWindow) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_history --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMHistory" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_history" webkit_dom_dom_window_get_history :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMHistory) - - -dOMDOMWindowGetHistory :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMHistory -dOMDOMWindowGetHistory _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_history _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_history" result - result' <- (wrapObject DOMHistory) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_inner_height --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_inner_height" webkit_dom_dom_window_get_inner_height :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetInnerHeight :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetInnerHeight _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_inner_height _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_inner_width --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_inner_width" webkit_dom_dom_window_get_inner_width :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetInnerWidth :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetInnerWidth _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_inner_width _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_length --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_length" webkit_dom_dom_window_get_length :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Word64 - - -dOMDOMWindowGetLength :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Word64 -dOMDOMWindowGetLength _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_length _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_local_storage --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMStorage" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_local_storage" webkit_dom_dom_window_get_local_storage :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Ptr (Ptr GError) -> -- error - IO (Ptr DOMStorage) - - -dOMDOMWindowGetLocalStorage :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMStorage -dOMDOMWindowGetLocalStorage _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - onException (do - result <- propagateGError $ webkit_dom_dom_window_get_local_storage _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_local_storage" result - result' <- (wrapObject DOMStorage) result - touchManagedPtr _obj - return result' - ) (do - return () - ) - --- method DOMDOMWindow::get_locationbar --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMBarProp" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_locationbar" webkit_dom_dom_window_get_locationbar :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMBarProp) - - -dOMDOMWindowGetLocationbar :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMBarProp -dOMDOMWindowGetLocationbar _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_locationbar _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_locationbar" result - result' <- (wrapObject DOMBarProp) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_menubar --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMBarProp" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_menubar" webkit_dom_dom_window_get_menubar :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMBarProp) - - -dOMDOMWindowGetMenubar :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMBarProp -dOMDOMWindowGetMenubar _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_menubar _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_menubar" result - result' <- (wrapObject DOMBarProp) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_name --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_name" webkit_dom_dom_window_get_name :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO CString - - -dOMDOMWindowGetName :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m T.Text -dOMDOMWindowGetName _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_name _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_name" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_navigator --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMNavigator" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_navigator" webkit_dom_dom_window_get_navigator :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMNavigator) - - -dOMDOMWindowGetNavigator :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMNavigator -dOMDOMWindowGetNavigator _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_navigator _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_navigator" result - result' <- (wrapObject DOMNavigator) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_offscreen_buffering --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_offscreen_buffering" webkit_dom_dom_window_get_offscreen_buffering :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO CInt - - -dOMDOMWindowGetOffscreenBuffering :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Bool -dOMDOMWindowGetOffscreenBuffering _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_offscreen_buffering _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_opener --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMWindow" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_opener" webkit_dom_dom_window_get_opener :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMDOMWindow) - - -dOMDOMWindowGetOpener :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMDOMWindow -dOMDOMWindowGetOpener _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_opener _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_opener" result - result' <- (wrapObject DOMDOMWindow) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_outer_height --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_outer_height" webkit_dom_dom_window_get_outer_height :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetOuterHeight :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetOuterHeight _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_outer_height _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_outer_width --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_outer_width" webkit_dom_dom_window_get_outer_width :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetOuterWidth :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetOuterWidth _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_outer_width _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_page_x_offset --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_page_x_offset" webkit_dom_dom_window_get_page_x_offset :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetPageXOffset :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetPageXOffset _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_page_x_offset _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_page_y_offset --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_page_y_offset" webkit_dom_dom_window_get_page_y_offset :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetPageYOffset :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetPageYOffset _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_page_y_offset _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_parent --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMWindow" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_parent" webkit_dom_dom_window_get_parent :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMDOMWindow) - - -dOMDOMWindowGetParent :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMDOMWindow -dOMDOMWindowGetParent _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_parent _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_parent" result - result' <- (wrapObject DOMDOMWindow) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_performance --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMPerformance" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_performance" webkit_dom_dom_window_get_performance :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMPerformance) - - -dOMDOMWindowGetPerformance :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMPerformance -dOMDOMWindowGetPerformance _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_performance _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_performance" result - result' <- (wrapObject DOMPerformance) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_personalbar --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMBarProp" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_personalbar" webkit_dom_dom_window_get_personalbar :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMBarProp) - - -dOMDOMWindowGetPersonalbar :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMBarProp -dOMDOMWindowGetPersonalbar _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_personalbar _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_personalbar" result - result' <- (wrapObject DOMBarProp) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_screen --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMScreen" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_screen" webkit_dom_dom_window_get_screen :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMScreen) - - -dOMDOMWindowGetScreen :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMScreen -dOMDOMWindowGetScreen _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_screen _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_screen" result - result' <- (wrapObject DOMScreen) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_screen_left --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_screen_left" webkit_dom_dom_window_get_screen_left :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetScreenLeft :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetScreenLeft _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_screen_left _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_screen_top --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_screen_top" webkit_dom_dom_window_get_screen_top :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetScreenTop :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetScreenTop _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_screen_top _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_screen_x --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_screen_x" webkit_dom_dom_window_get_screen_x :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetScreenX :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetScreenX _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_screen_x _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_screen_y --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_screen_y" webkit_dom_dom_window_get_screen_y :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetScreenY :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetScreenY _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_screen_y _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_scroll_x --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_scroll_x" webkit_dom_dom_window_get_scroll_x :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetScrollX :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetScrollX _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_scroll_x _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_scroll_y --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_scroll_y" webkit_dom_dom_window_get_scroll_y :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO Int64 - - -dOMDOMWindowGetScrollY :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m Int64 -dOMDOMWindowGetScrollY _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_scroll_y _obj' - touchManagedPtr _obj - return result - --- method DOMDOMWindow::get_scrollbars --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMBarProp" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_scrollbars" webkit_dom_dom_window_get_scrollbars :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMBarProp) - - -dOMDOMWindowGetScrollbars :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMBarProp -dOMDOMWindowGetScrollbars _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_scrollbars _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_scrollbars" result - result' <- (wrapObject DOMBarProp) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_selection --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMSelection" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_selection" webkit_dom_dom_window_get_selection :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMDOMSelection) - - -dOMDOMWindowGetSelection :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMDOMSelection -dOMDOMWindowGetSelection _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_selection _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_selection" result - result' <- (wrapObject DOMDOMSelection) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_self --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMWindow" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_self" webkit_dom_dom_window_get_self :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMDOMWindow) - - -dOMDOMWindowGetSelf :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMDOMWindow -dOMDOMWindowGetSelf _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_self _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_self" result - result' <- (wrapObject DOMDOMWindow) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_session_storage --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMStorage" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_session_storage" webkit_dom_dom_window_get_session_storage :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Ptr (Ptr GError) -> -- error - IO (Ptr DOMStorage) - - -dOMDOMWindowGetSessionStorage :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMStorage -dOMDOMWindowGetSessionStorage _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - onException (do - result <- propagateGError $ webkit_dom_dom_window_get_session_storage _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_session_storage" result - result' <- (wrapObject DOMStorage) result - touchManagedPtr _obj - return result' - ) (do - return () - ) - --- method DOMDOMWindow::get_status --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_status" webkit_dom_dom_window_get_status :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO CString - - -dOMDOMWindowGetStatus :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m T.Text -dOMDOMWindowGetStatus _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_status _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_status" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_statusbar --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMBarProp" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_statusbar" webkit_dom_dom_window_get_statusbar :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMBarProp) - - -dOMDOMWindowGetStatusbar :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMBarProp -dOMDOMWindowGetStatusbar _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_statusbar _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_statusbar" result - result' <- (wrapObject DOMBarProp) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_style_media --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMStyleMedia" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_style_media" webkit_dom_dom_window_get_style_media :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMStyleMedia) - - -dOMDOMWindowGetStyleMedia :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMStyleMedia -dOMDOMWindowGetStyleMedia _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_style_media _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_style_media" result - result' <- (wrapObject DOMStyleMedia) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_toolbar --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMBarProp" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_toolbar" webkit_dom_dom_window_get_toolbar :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMBarProp) - - -dOMDOMWindowGetToolbar :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMBarProp -dOMDOMWindowGetToolbar _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_toolbar _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_toolbar" result - result' <- (wrapObject DOMBarProp) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_top --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMWindow" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_top" webkit_dom_dom_window_get_top :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMDOMWindow) - - -dOMDOMWindowGetTop :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMDOMWindow -dOMDOMWindowGetTop _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_top _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_top" result - result' <- (wrapObject DOMDOMWindow) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_webkit_storage_info --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMStorageInfo" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_webkit_storage_info" webkit_dom_dom_window_get_webkit_storage_info :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMStorageInfo) - - -dOMDOMWindowGetWebkitStorageInfo :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMStorageInfo -dOMDOMWindowGetWebkitStorageInfo _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_webkit_storage_info _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_webkit_storage_info" result - result' <- (newObject DOMStorageInfo) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::get_window --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMWindow" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_get_window" webkit_dom_dom_window_get_window :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO (Ptr DOMDOMWindow) - - -dOMDOMWindowGetWindow :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m DOMDOMWindow -dOMDOMWindowGetWindow _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_dom_window_get_window _obj' - checkUnexpectedReturnNULL "webkit_dom_dom_window_get_window" result - result' <- (wrapObject DOMDOMWindow) result - touchManagedPtr _obj - return result' - --- method DOMDOMWindow::match_media --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "query", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "query", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMMediaQueryList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_match_media" webkit_dom_dom_window_match_media :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CString -> -- query : TBasicType TUTF8 - IO (Ptr DOMMediaQueryList) - - -dOMDOMWindowMatchMedia :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - T.Text -> -- query - m DOMMediaQueryList -dOMDOMWindowMatchMedia _obj query = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - query' <- textToCString query - result <- webkit_dom_dom_window_match_media _obj' query' - checkUnexpectedReturnNULL "webkit_dom_dom_window_match_media" result - result' <- (wrapObject DOMMediaQueryList) result - touchManagedPtr _obj - freeMem query' - return result' - --- method DOMDOMWindow::move_by --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_move_by" webkit_dom_dom_window_move_by :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CFloat -> -- x : TBasicType TFloat - CFloat -> -- y : TBasicType TFloat - IO () - - -dOMDOMWindowMoveBy :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Float -> -- x - Float -> -- y - m () -dOMDOMWindowMoveBy _obj x y = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let x' = realToFrac x - let y' = realToFrac y - webkit_dom_dom_window_move_by _obj' x' y' - touchManagedPtr _obj - return () - --- method DOMDOMWindow::move_to --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_move_to" webkit_dom_dom_window_move_to :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CFloat -> -- x : TBasicType TFloat - CFloat -> -- y : TBasicType TFloat - IO () - - -dOMDOMWindowMoveTo :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Float -> -- x - Float -> -- y - m () -dOMDOMWindowMoveTo _obj x y = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let x' = realToFrac x - let y' = realToFrac y - webkit_dom_dom_window_move_to _obj' x' y' - touchManagedPtr _obj - return () - --- method DOMDOMWindow::print --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_print" webkit_dom_dom_window_print :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO () - - -dOMDOMWindowPrint :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m () -dOMDOMWindowPrint _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_print _obj' - touchManagedPtr _obj - return () - --- method DOMDOMWindow::prompt --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "defaultValue", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "defaultValue", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_prompt" webkit_dom_dom_window_prompt :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CString -> -- message : TBasicType TUTF8 - CString -> -- defaultValue : TBasicType TUTF8 - IO CString - - -dOMDOMWindowPrompt :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - T.Text -> -- message - T.Text -> -- defaultValue - m T.Text -dOMDOMWindowPrompt _obj message defaultValue = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - message' <- textToCString message - defaultValue' <- textToCString defaultValue - result <- webkit_dom_dom_window_prompt _obj' message' defaultValue' - checkUnexpectedReturnNULL "webkit_dom_dom_window_prompt" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - freeMem message' - freeMem defaultValue' - return result' - --- method DOMDOMWindow::release_events --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_release_events" webkit_dom_dom_window_release_events :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO () - - -dOMDOMWindowReleaseEvents :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m () -dOMDOMWindowReleaseEvents _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_release_events _obj' - touchManagedPtr _obj - return () - --- method DOMDOMWindow::resize_by --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_resize_by" webkit_dom_dom_window_resize_by :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CFloat -> -- x : TBasicType TFloat - CFloat -> -- y : TBasicType TFloat - IO () - - -dOMDOMWindowResizeBy :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Float -> -- x - Float -> -- y - m () -dOMDOMWindowResizeBy _obj x y = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let x' = realToFrac x - let y' = realToFrac y - webkit_dom_dom_window_resize_by _obj' x' y' - touchManagedPtr _obj - return () - --- method DOMDOMWindow::resize_to --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "width", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "height", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "width", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "height", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_resize_to" webkit_dom_dom_window_resize_to :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CFloat -> -- width : TBasicType TFloat - CFloat -> -- height : TBasicType TFloat - IO () - - -dOMDOMWindowResizeTo :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Float -> -- width - Float -> -- height - m () -dOMDOMWindowResizeTo _obj width height = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let width' = realToFrac width - let height' = realToFrac height - webkit_dom_dom_window_resize_to _obj' width' height' - touchManagedPtr _obj - return () - --- method DOMDOMWindow::scroll --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_scroll" webkit_dom_dom_window_scroll :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Int64 -> -- x : TBasicType TInt64 - Int64 -> -- y : TBasicType TInt64 - IO () - - -dOMDOMWindowScroll :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Int64 -> -- x - Int64 -> -- y - m () -dOMDOMWindowScroll _obj x y = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_scroll _obj' x y - touchManagedPtr _obj - return () - --- method DOMDOMWindow::scroll_by --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_scroll_by" webkit_dom_dom_window_scroll_by :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Int64 -> -- x : TBasicType TInt64 - Int64 -> -- y : TBasicType TInt64 - IO () - - -dOMDOMWindowScrollBy :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Int64 -> -- x - Int64 -> -- y - m () -dOMDOMWindowScrollBy _obj x y = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_scroll_by _obj' x y - touchManagedPtr _obj - return () - --- method DOMDOMWindow::scroll_to --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_scroll_to" webkit_dom_dom_window_scroll_to :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Int64 -> -- x : TBasicType TInt64 - Int64 -> -- y : TBasicType TInt64 - IO () - - -dOMDOMWindowScrollTo :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Int64 -> -- x - Int64 -> -- y - m () -dOMDOMWindowScrollTo _obj x y = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_scroll_to _obj' x y - touchManagedPtr _obj - return () - --- method DOMDOMWindow::set_default_status --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_set_default_status" webkit_dom_dom_window_set_default_status :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMDOMWindowSetDefaultStatus :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMDOMWindowSetDefaultStatus _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_dom_window_set_default_status _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMDOMWindow::set_name --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_set_name" webkit_dom_dom_window_set_name :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMDOMWindowSetName :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMDOMWindowSetName _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_dom_window_set_name _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMDOMWindow::set_status --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_set_status" webkit_dom_dom_window_set_status :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMDOMWindowSetStatus :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMDOMWindowSetStatus _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_dom_window_set_status _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMDOMWindow::stop --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_stop" webkit_dom_dom_window_stop :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - IO () - - -dOMDOMWindowStop :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - m () -dOMDOMWindowStop _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_stop _obj' - touchManagedPtr _obj - return () - --- method DOMDOMWindow::webkit_cancel_animation_frame --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_webkit_cancel_animation_frame" webkit_dom_dom_window_webkit_cancel_animation_frame :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Int64 -> -- id : TBasicType TInt64 - IO () - - -dOMDOMWindowWebkitCancelAnimationFrame :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Int64 -> -- id - m () -dOMDOMWindowWebkitCancelAnimationFrame _obj id = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_webkit_cancel_animation_frame _obj' id - touchManagedPtr _obj - return () - --- method DOMDOMWindow::webkit_cancel_request_animation_frame --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_webkit_cancel_request_animation_frame" webkit_dom_dom_window_webkit_cancel_request_animation_frame :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Int64 -> -- id : TBasicType TInt64 - IO () - - -dOMDOMWindowWebkitCancelRequestAnimationFrame :: - (MonadIO m, DOMDOMWindowK a) => - a -> -- _obj - Int64 -> -- id - m () -dOMDOMWindowWebkitCancelRequestAnimationFrame _obj id = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_dom_window_webkit_cancel_request_animation_frame _obj' id - touchManagedPtr _obj - return () - --- method DOMDOMWindow::webkit_convert_point_from_node_to_page --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "p", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "p", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMWebKitPoint" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_webkit_convert_point_from_node_to_page" webkit_dom_dom_window_webkit_convert_point_from_node_to_page :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Ptr DOMNode -> -- node : TInterface "WebKit" "DOMNode" - Ptr DOMWebKitPoint -> -- p : TInterface "WebKit" "DOMWebKitPoint" - IO (Ptr DOMWebKitPoint) - - -dOMDOMWindowWebkitConvertPointFromNodeToPage :: - (MonadIO m, DOMDOMWindowK a, DOMNodeK b, DOMWebKitPointK c) => - a -> -- _obj - b -> -- node - c -> -- p - m DOMWebKitPoint -dOMDOMWindowWebkitConvertPointFromNodeToPage _obj node p = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let node' = unsafeManagedPtrCastPtr node - let p' = unsafeManagedPtrCastPtr p - result <- webkit_dom_dom_window_webkit_convert_point_from_node_to_page _obj' node' p' - checkUnexpectedReturnNULL "webkit_dom_dom_window_webkit_convert_point_from_node_to_page" result - result' <- (wrapObject DOMWebKitPoint) result - touchManagedPtr _obj - touchManagedPtr node - touchManagedPtr p - return result' - --- method DOMDOMWindow::webkit_convert_point_from_page_to_node --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "p", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "p", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMWebKitPoint" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_dom_window_webkit_convert_point_from_page_to_node" webkit_dom_dom_window_webkit_convert_point_from_page_to_node :: - Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" - Ptr DOMNode -> -- node : TInterface "WebKit" "DOMNode" - Ptr DOMWebKitPoint -> -- p : TInterface "WebKit" "DOMWebKitPoint" - IO (Ptr DOMWebKitPoint) - - -dOMDOMWindowWebkitConvertPointFromPageToNode :: - (MonadIO m, DOMDOMWindowK a, DOMNodeK b, DOMWebKitPointK c) => - a -> -- _obj - b -> -- node - c -> -- p - m DOMWebKitPoint -dOMDOMWindowWebkitConvertPointFromPageToNode _obj node p = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let node' = unsafeManagedPtrCastPtr node - let p' = unsafeManagedPtrCastPtr p - result <- webkit_dom_dom_window_webkit_convert_point_from_page_to_node _obj' node' p' - checkUnexpectedReturnNULL "webkit_dom_dom_window_webkit_convert_point_from_page_to_node" result - result' <- (wrapObject DOMWebKitPoint) result - touchManagedPtr _obj - touchManagedPtr node - touchManagedPtr p - return result' + +{- | +Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte +License : LGPL-2.1 +Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) +-} + +module GI.WebKit.Objects.DOMDOMWindow + ( + +-- * Exported types + DOMDOMWindow(..) , + DOMDOMWindowK , + toDOMDOMWindow , + noDOMDOMWindow , + + + -- * Methods +-- ** dOMDOMWindowAlert + DOMDOMWindowAlertMethodInfo , + dOMDOMWindowAlert , + + +-- ** dOMDOMWindowAtob + DOMDOMWindowAtobMethodInfo , + dOMDOMWindowAtob , + + +-- ** dOMDOMWindowBlur + DOMDOMWindowBlurMethodInfo , + dOMDOMWindowBlur , + + +-- ** dOMDOMWindowBtoa + DOMDOMWindowBtoaMethodInfo , + dOMDOMWindowBtoa , + + +-- ** dOMDOMWindowCancelAnimationFrame + DOMDOMWindowCancelAnimationFrameMethodInfo, + dOMDOMWindowCancelAnimationFrame , + + +-- ** dOMDOMWindowCaptureEvents + DOMDOMWindowCaptureEventsMethodInfo , + dOMDOMWindowCaptureEvents , + + +-- ** dOMDOMWindowClearInterval + DOMDOMWindowClearIntervalMethodInfo , + dOMDOMWindowClearInterval , + + +-- ** dOMDOMWindowClearTimeout + DOMDOMWindowClearTimeoutMethodInfo , + dOMDOMWindowClearTimeout , + + +-- ** dOMDOMWindowClose + DOMDOMWindowCloseMethodInfo , + dOMDOMWindowClose , + + +-- ** dOMDOMWindowConfirm + DOMDOMWindowConfirmMethodInfo , + dOMDOMWindowConfirm , + + +-- ** dOMDOMWindowDispatchEvent + DOMDOMWindowDispatchEventMethodInfo , + dOMDOMWindowDispatchEvent , + + +-- ** dOMDOMWindowFind + DOMDOMWindowFindMethodInfo , + dOMDOMWindowFind , + + +-- ** dOMDOMWindowFocus + DOMDOMWindowFocusMethodInfo , + dOMDOMWindowFocus , + + +-- ** dOMDOMWindowGetApplicationCache + DOMDOMWindowGetApplicationCacheMethodInfo, + dOMDOMWindowGetApplicationCache , + + +-- ** dOMDOMWindowGetClientInformation + DOMDOMWindowGetClientInformationMethodInfo, + dOMDOMWindowGetClientInformation , + + +-- ** dOMDOMWindowGetClosed + DOMDOMWindowGetClosedMethodInfo , + dOMDOMWindowGetClosed , + + +-- ** dOMDOMWindowGetComputedStyle + DOMDOMWindowGetComputedStyleMethodInfo , + dOMDOMWindowGetComputedStyle , + + +-- ** dOMDOMWindowGetConsole + DOMDOMWindowGetConsoleMethodInfo , + dOMDOMWindowGetConsole , + + +-- ** dOMDOMWindowGetCss + DOMDOMWindowGetCssMethodInfo , + dOMDOMWindowGetCss , + + +-- ** dOMDOMWindowGetDefaultStatus + DOMDOMWindowGetDefaultStatusMethodInfo , + dOMDOMWindowGetDefaultStatus , + + +-- ** dOMDOMWindowGetDevicePixelRatio + DOMDOMWindowGetDevicePixelRatioMethodInfo, + dOMDOMWindowGetDevicePixelRatio , + + +-- ** dOMDOMWindowGetDocument + DOMDOMWindowGetDocumentMethodInfo , + dOMDOMWindowGetDocument , + + +-- ** dOMDOMWindowGetFrameElement + DOMDOMWindowGetFrameElementMethodInfo , + dOMDOMWindowGetFrameElement , + + +-- ** dOMDOMWindowGetFrames + DOMDOMWindowGetFramesMethodInfo , + dOMDOMWindowGetFrames , + + +-- ** dOMDOMWindowGetHistory + DOMDOMWindowGetHistoryMethodInfo , + dOMDOMWindowGetHistory , + + +-- ** dOMDOMWindowGetInnerHeight + DOMDOMWindowGetInnerHeightMethodInfo , + dOMDOMWindowGetInnerHeight , + + +-- ** dOMDOMWindowGetInnerWidth + DOMDOMWindowGetInnerWidthMethodInfo , + dOMDOMWindowGetInnerWidth , + + +-- ** dOMDOMWindowGetLength + DOMDOMWindowGetLengthMethodInfo , + dOMDOMWindowGetLength , + + +-- ** dOMDOMWindowGetLocalStorage + DOMDOMWindowGetLocalStorageMethodInfo , + dOMDOMWindowGetLocalStorage , + + +-- ** dOMDOMWindowGetLocationbar + DOMDOMWindowGetLocationbarMethodInfo , + dOMDOMWindowGetLocationbar , + + +-- ** dOMDOMWindowGetMenubar + DOMDOMWindowGetMenubarMethodInfo , + dOMDOMWindowGetMenubar , + + +-- ** dOMDOMWindowGetName + DOMDOMWindowGetNameMethodInfo , + dOMDOMWindowGetName , + + +-- ** dOMDOMWindowGetNavigator + DOMDOMWindowGetNavigatorMethodInfo , + dOMDOMWindowGetNavigator , + + +-- ** dOMDOMWindowGetOffscreenBuffering + DOMDOMWindowGetOffscreenBufferingMethodInfo, + dOMDOMWindowGetOffscreenBuffering , + + +-- ** dOMDOMWindowGetOpener + DOMDOMWindowGetOpenerMethodInfo , + dOMDOMWindowGetOpener , + + +-- ** dOMDOMWindowGetOuterHeight + DOMDOMWindowGetOuterHeightMethodInfo , + dOMDOMWindowGetOuterHeight , + + +-- ** dOMDOMWindowGetOuterWidth + DOMDOMWindowGetOuterWidthMethodInfo , + dOMDOMWindowGetOuterWidth , + + +-- ** dOMDOMWindowGetPageXOffset + DOMDOMWindowGetPageXOffsetMethodInfo , + dOMDOMWindowGetPageXOffset , + + +-- ** dOMDOMWindowGetPageYOffset + DOMDOMWindowGetPageYOffsetMethodInfo , + dOMDOMWindowGetPageYOffset , + + +-- ** dOMDOMWindowGetParent + DOMDOMWindowGetParentMethodInfo , + dOMDOMWindowGetParent , + + +-- ** dOMDOMWindowGetPerformance + DOMDOMWindowGetPerformanceMethodInfo , + dOMDOMWindowGetPerformance , + + +-- ** dOMDOMWindowGetPersonalbar + DOMDOMWindowGetPersonalbarMethodInfo , + dOMDOMWindowGetPersonalbar , + + +-- ** dOMDOMWindowGetScreen + DOMDOMWindowGetScreenMethodInfo , + dOMDOMWindowGetScreen , + + +-- ** dOMDOMWindowGetScreenLeft + DOMDOMWindowGetScreenLeftMethodInfo , + dOMDOMWindowGetScreenLeft , + + +-- ** dOMDOMWindowGetScreenTop + DOMDOMWindowGetScreenTopMethodInfo , + dOMDOMWindowGetScreenTop , + + +-- ** dOMDOMWindowGetScreenX + DOMDOMWindowGetScreenXMethodInfo , + dOMDOMWindowGetScreenX , + + +-- ** dOMDOMWindowGetScreenY + DOMDOMWindowGetScreenYMethodInfo , + dOMDOMWindowGetScreenY , + + +-- ** dOMDOMWindowGetScrollX + DOMDOMWindowGetScrollXMethodInfo , + dOMDOMWindowGetScrollX , + + +-- ** dOMDOMWindowGetScrollY + DOMDOMWindowGetScrollYMethodInfo , + dOMDOMWindowGetScrollY , + + +-- ** dOMDOMWindowGetScrollbars + DOMDOMWindowGetScrollbarsMethodInfo , + dOMDOMWindowGetScrollbars , + + +-- ** dOMDOMWindowGetSelection + DOMDOMWindowGetSelectionMethodInfo , + dOMDOMWindowGetSelection , + + +-- ** dOMDOMWindowGetSelf + DOMDOMWindowGetSelfMethodInfo , + dOMDOMWindowGetSelf , + + +-- ** dOMDOMWindowGetSessionStorage + DOMDOMWindowGetSessionStorageMethodInfo , + dOMDOMWindowGetSessionStorage , + + +-- ** dOMDOMWindowGetStatus + DOMDOMWindowGetStatusMethodInfo , + dOMDOMWindowGetStatus , + + +-- ** dOMDOMWindowGetStatusbar + DOMDOMWindowGetStatusbarMethodInfo , + dOMDOMWindowGetStatusbar , + + +-- ** dOMDOMWindowGetStyleMedia + DOMDOMWindowGetStyleMediaMethodInfo , + dOMDOMWindowGetStyleMedia , + + +-- ** dOMDOMWindowGetToolbar + DOMDOMWindowGetToolbarMethodInfo , + dOMDOMWindowGetToolbar , + + +-- ** dOMDOMWindowGetTop + DOMDOMWindowGetTopMethodInfo , + dOMDOMWindowGetTop , + + +-- ** dOMDOMWindowGetWebkitStorageInfo + DOMDOMWindowGetWebkitStorageInfoMethodInfo, + dOMDOMWindowGetWebkitStorageInfo , + + +-- ** dOMDOMWindowGetWindow + DOMDOMWindowGetWindowMethodInfo , + dOMDOMWindowGetWindow , + + +-- ** dOMDOMWindowMatchMedia + DOMDOMWindowMatchMediaMethodInfo , + dOMDOMWindowMatchMedia , + + +-- ** dOMDOMWindowMoveBy + DOMDOMWindowMoveByMethodInfo , + dOMDOMWindowMoveBy , + + +-- ** dOMDOMWindowMoveTo + DOMDOMWindowMoveToMethodInfo , + dOMDOMWindowMoveTo , + + +-- ** dOMDOMWindowPrint + DOMDOMWindowPrintMethodInfo , + dOMDOMWindowPrint , + + +-- ** dOMDOMWindowPrompt + DOMDOMWindowPromptMethodInfo , + dOMDOMWindowPrompt , + + +-- ** dOMDOMWindowReleaseEvents + DOMDOMWindowReleaseEventsMethodInfo , + dOMDOMWindowReleaseEvents , + + +-- ** dOMDOMWindowResizeBy + DOMDOMWindowResizeByMethodInfo , + dOMDOMWindowResizeBy , + + +-- ** dOMDOMWindowResizeTo + DOMDOMWindowResizeToMethodInfo , + dOMDOMWindowResizeTo , + + +-- ** dOMDOMWindowScroll + DOMDOMWindowScrollMethodInfo , + dOMDOMWindowScroll , + + +-- ** dOMDOMWindowScrollBy + DOMDOMWindowScrollByMethodInfo , + dOMDOMWindowScrollBy , + + +-- ** dOMDOMWindowScrollTo + DOMDOMWindowScrollToMethodInfo , + dOMDOMWindowScrollTo , + + +-- ** dOMDOMWindowSetDefaultStatus + DOMDOMWindowSetDefaultStatusMethodInfo , + dOMDOMWindowSetDefaultStatus , + + +-- ** dOMDOMWindowSetName + DOMDOMWindowSetNameMethodInfo , + dOMDOMWindowSetName , + + +-- ** dOMDOMWindowSetStatus + DOMDOMWindowSetStatusMethodInfo , + dOMDOMWindowSetStatus , + + +-- ** dOMDOMWindowStop + DOMDOMWindowStopMethodInfo , + dOMDOMWindowStop , + + +-- ** dOMDOMWindowWebkitCancelAnimationFrame + DOMDOMWindowWebkitCancelAnimationFrameMethodInfo, + dOMDOMWindowWebkitCancelAnimationFrame , + + +-- ** dOMDOMWindowWebkitCancelRequestAnimationFrame + DOMDOMWindowWebkitCancelRequestAnimationFrameMethodInfo, + dOMDOMWindowWebkitCancelRequestAnimationFrame, + + +-- ** dOMDOMWindowWebkitConvertPointFromNodeToPage + DOMDOMWindowWebkitConvertPointFromNodeToPageMethodInfo, + dOMDOMWindowWebkitConvertPointFromNodeToPage, + + +-- ** dOMDOMWindowWebkitConvertPointFromPageToNode + DOMDOMWindowWebkitConvertPointFromPageToNodeMethodInfo, + dOMDOMWindowWebkitConvertPointFromPageToNode, + + + + + -- * Properties +-- ** ApplicationCache + DOMDOMWindowApplicationCachePropertyInfo, + getDOMDOMWindowApplicationCache , + + +-- ** ClientInformation + DOMDOMWindowClientInformationPropertyInfo, + getDOMDOMWindowClientInformation , + + +-- ** Closed + DOMDOMWindowClosedPropertyInfo , + getDOMDOMWindowClosed , + + +-- ** Console + DOMDOMWindowConsolePropertyInfo , + getDOMDOMWindowConsole , + + +-- ** Css + DOMDOMWindowCssPropertyInfo , + getDOMDOMWindowCss , + + +-- ** DefaultStatus + DOMDOMWindowDefaultStatusPropertyInfo , + constructDOMDOMWindowDefaultStatus , + getDOMDOMWindowDefaultStatus , + setDOMDOMWindowDefaultStatus , + + +-- ** DevicePixelRatio + DOMDOMWindowDevicePixelRatioPropertyInfo, + getDOMDOMWindowDevicePixelRatio , + + +-- ** Document + DOMDOMWindowDocumentPropertyInfo , + getDOMDOMWindowDocument , + + +-- ** FrameElement + DOMDOMWindowFrameElementPropertyInfo , + getDOMDOMWindowFrameElement , + + +-- ** Frames + DOMDOMWindowFramesPropertyInfo , + getDOMDOMWindowFrames , + + +-- ** History + DOMDOMWindowHistoryPropertyInfo , + getDOMDOMWindowHistory , + + +-- ** InnerHeight + DOMDOMWindowInnerHeightPropertyInfo , + getDOMDOMWindowInnerHeight , + + +-- ** InnerWidth + DOMDOMWindowInnerWidthPropertyInfo , + getDOMDOMWindowInnerWidth , + + +-- ** Length + DOMDOMWindowLengthPropertyInfo , + getDOMDOMWindowLength , + + +-- ** LocalStorage + DOMDOMWindowLocalStoragePropertyInfo , + getDOMDOMWindowLocalStorage , + + +-- ** Locationbar + DOMDOMWindowLocationbarPropertyInfo , + getDOMDOMWindowLocationbar , + + +-- ** Menubar + DOMDOMWindowMenubarPropertyInfo , + getDOMDOMWindowMenubar , + + +-- ** Name + DOMDOMWindowNamePropertyInfo , + constructDOMDOMWindowName , + getDOMDOMWindowName , + setDOMDOMWindowName , + + +-- ** Navigator + DOMDOMWindowNavigatorPropertyInfo , + getDOMDOMWindowNavigator , + + +-- ** OffscreenBuffering + DOMDOMWindowOffscreenBufferingPropertyInfo, + getDOMDOMWindowOffscreenBuffering , + + +-- ** Opener + DOMDOMWindowOpenerPropertyInfo , + getDOMDOMWindowOpener , + + +-- ** OuterHeight + DOMDOMWindowOuterHeightPropertyInfo , + getDOMDOMWindowOuterHeight , + + +-- ** OuterWidth + DOMDOMWindowOuterWidthPropertyInfo , + getDOMDOMWindowOuterWidth , + + +-- ** PageXOffset + DOMDOMWindowPageXOffsetPropertyInfo , + getDOMDOMWindowPageXOffset , + + +-- ** PageYOffset + DOMDOMWindowPageYOffsetPropertyInfo , + getDOMDOMWindowPageYOffset , + + +-- ** Parent + DOMDOMWindowParentPropertyInfo , + getDOMDOMWindowParent , + + +-- ** Performance + DOMDOMWindowPerformancePropertyInfo , + getDOMDOMWindowPerformance , + + +-- ** Personalbar + DOMDOMWindowPersonalbarPropertyInfo , + getDOMDOMWindowPersonalbar , + + +-- ** Screen + DOMDOMWindowScreenPropertyInfo , + getDOMDOMWindowScreen , + + +-- ** ScreenLeft + DOMDOMWindowScreenLeftPropertyInfo , + getDOMDOMWindowScreenLeft , + + +-- ** ScreenTop + DOMDOMWindowScreenTopPropertyInfo , + getDOMDOMWindowScreenTop , + + +-- ** ScreenX + DOMDOMWindowScreenXPropertyInfo , + getDOMDOMWindowScreenX , + + +-- ** ScreenY + DOMDOMWindowScreenYPropertyInfo , + getDOMDOMWindowScreenY , + + +-- ** ScrollX + DOMDOMWindowScrollXPropertyInfo , + getDOMDOMWindowScrollX , + + +-- ** ScrollY + DOMDOMWindowScrollYPropertyInfo , + getDOMDOMWindowScrollY , + + +-- ** Scrollbars + DOMDOMWindowScrollbarsPropertyInfo , + getDOMDOMWindowScrollbars , + + +-- ** Self + DOMDOMWindowSelfPropertyInfo , + getDOMDOMWindowSelf , + + +-- ** SessionStorage + DOMDOMWindowSessionStoragePropertyInfo , + getDOMDOMWindowSessionStorage , + + +-- ** Status + DOMDOMWindowStatusPropertyInfo , + constructDOMDOMWindowStatus , + getDOMDOMWindowStatus , + setDOMDOMWindowStatus , + + +-- ** Statusbar + DOMDOMWindowStatusbarPropertyInfo , + getDOMDOMWindowStatusbar , + + +-- ** StyleMedia + DOMDOMWindowStyleMediaPropertyInfo , + getDOMDOMWindowStyleMedia , + + +-- ** Toolbar + DOMDOMWindowToolbarPropertyInfo , + getDOMDOMWindowToolbar , + + +-- ** Top + DOMDOMWindowTopPropertyInfo , + getDOMDOMWindowTop , + + +-- ** WebkitStorageInfo + DOMDOMWindowWebkitStorageInfoPropertyInfo, + getDOMDOMWindowWebkitStorageInfo , + + +-- ** Window + DOMDOMWindowWindowPropertyInfo , + getDOMDOMWindowWindow , + + + + + ) where + +import Prelude () +import Data.GI.Base.ShortPrelude + +import qualified Data.Text as T +import qualified Data.ByteString.Char8 as B +import qualified Data.Map as Map + +import GI.WebKit.Types +import GI.WebKit.Callbacks +import qualified GI.GObject as GObject + +newtype DOMDOMWindow = DOMDOMWindow (ForeignPtr DOMDOMWindow) +foreign import ccall "webkit_dom_dom_window_get_type" + c_webkit_dom_dom_window_get_type :: IO GType + +type instance ParentTypes DOMDOMWindow = DOMDOMWindowParentTypes +type DOMDOMWindowParentTypes = '[DOMObject, GObject.Object, DOMEventTarget] + +instance GObject DOMDOMWindow where + gobjectIsInitiallyUnowned _ = False + gobjectType _ = c_webkit_dom_dom_window_get_type + + +class GObject o => DOMDOMWindowK o +instance (GObject o, IsDescendantOf DOMDOMWindow o) => DOMDOMWindowK o + +toDOMDOMWindow :: DOMDOMWindowK o => o -> IO DOMDOMWindow +toDOMDOMWindow = unsafeCastTo DOMDOMWindow + +noDOMDOMWindow :: Maybe DOMDOMWindow +noDOMDOMWindow = Nothing + +type family ResolveDOMDOMWindowMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMWindowMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMDOMWindowMethod "alert" o = DOMDOMWindowAlertMethodInfo + ResolveDOMDOMWindowMethod "atob" o = DOMDOMWindowAtobMethodInfo + ResolveDOMDOMWindowMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMWindowMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMWindowMethod "blur" o = DOMDOMWindowBlurMethodInfo + ResolveDOMDOMWindowMethod "btoa" o = DOMDOMWindowBtoaMethodInfo + ResolveDOMDOMWindowMethod "cancelAnimationFrame" o = DOMDOMWindowCancelAnimationFrameMethodInfo + ResolveDOMDOMWindowMethod "captureEvents" o = DOMDOMWindowCaptureEventsMethodInfo + ResolveDOMDOMWindowMethod "clearInterval" o = DOMDOMWindowClearIntervalMethodInfo + ResolveDOMDOMWindowMethod "clearTimeout" o = DOMDOMWindowClearTimeoutMethodInfo + ResolveDOMDOMWindowMethod "close" o = DOMDOMWindowCloseMethodInfo + ResolveDOMDOMWindowMethod "confirm" o = DOMDOMWindowConfirmMethodInfo + ResolveDOMDOMWindowMethod "find" o = DOMDOMWindowFindMethodInfo + ResolveDOMDOMWindowMethod "focus" o = DOMDOMWindowFocusMethodInfo + ResolveDOMDOMWindowMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMWindowMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMWindowMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMWindowMethod "matchMedia" o = DOMDOMWindowMatchMediaMethodInfo + ResolveDOMDOMWindowMethod "moveBy" o = DOMDOMWindowMoveByMethodInfo + ResolveDOMDOMWindowMethod "moveTo" o = DOMDOMWindowMoveToMethodInfo + ResolveDOMDOMWindowMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMWindowMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMWindowMethod "print" o = DOMDOMWindowPrintMethodInfo + ResolveDOMDOMWindowMethod "prompt" o = DOMDOMWindowPromptMethodInfo + ResolveDOMDOMWindowMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMWindowMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMWindowMethod "releaseEvents" o = DOMDOMWindowReleaseEventsMethodInfo + ResolveDOMDOMWindowMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMDOMWindowMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMWindowMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMWindowMethod "resizeBy" o = DOMDOMWindowResizeByMethodInfo + ResolveDOMDOMWindowMethod "resizeTo" o = DOMDOMWindowResizeToMethodInfo + ResolveDOMDOMWindowMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMWindowMethod "scroll" o = DOMDOMWindowScrollMethodInfo + ResolveDOMDOMWindowMethod "scrollBy" o = DOMDOMWindowScrollByMethodInfo + ResolveDOMDOMWindowMethod "scrollTo" o = DOMDOMWindowScrollToMethodInfo + ResolveDOMDOMWindowMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMWindowMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMWindowMethod "stop" o = DOMDOMWindowStopMethodInfo + ResolveDOMDOMWindowMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMWindowMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMWindowMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMWindowMethod "webkitCancelAnimationFrame" o = DOMDOMWindowWebkitCancelAnimationFrameMethodInfo + ResolveDOMDOMWindowMethod "webkitCancelRequestAnimationFrame" o = DOMDOMWindowWebkitCancelRequestAnimationFrameMethodInfo + ResolveDOMDOMWindowMethod "webkitConvertPointFromNodeToPage" o = DOMDOMWindowWebkitConvertPointFromNodeToPageMethodInfo + ResolveDOMDOMWindowMethod "webkitConvertPointFromPageToNode" o = DOMDOMWindowWebkitConvertPointFromPageToNodeMethodInfo + ResolveDOMDOMWindowMethod "getApplicationCache" o = DOMDOMWindowGetApplicationCacheMethodInfo + ResolveDOMDOMWindowMethod "getClientInformation" o = DOMDOMWindowGetClientInformationMethodInfo + ResolveDOMDOMWindowMethod "getClosed" o = DOMDOMWindowGetClosedMethodInfo + ResolveDOMDOMWindowMethod "getComputedStyle" o = DOMDOMWindowGetComputedStyleMethodInfo + ResolveDOMDOMWindowMethod "getConsole" o = DOMDOMWindowGetConsoleMethodInfo + ResolveDOMDOMWindowMethod "getCss" o = DOMDOMWindowGetCssMethodInfo + ResolveDOMDOMWindowMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMWindowMethod "getDefaultStatus" o = DOMDOMWindowGetDefaultStatusMethodInfo + ResolveDOMDOMWindowMethod "getDevicePixelRatio" o = DOMDOMWindowGetDevicePixelRatioMethodInfo + ResolveDOMDOMWindowMethod "getDocument" o = DOMDOMWindowGetDocumentMethodInfo + ResolveDOMDOMWindowMethod "getFrameElement" o = DOMDOMWindowGetFrameElementMethodInfo + ResolveDOMDOMWindowMethod "getFrames" o = DOMDOMWindowGetFramesMethodInfo + ResolveDOMDOMWindowMethod "getHistory" o = DOMDOMWindowGetHistoryMethodInfo + ResolveDOMDOMWindowMethod "getInnerHeight" o = DOMDOMWindowGetInnerHeightMethodInfo + ResolveDOMDOMWindowMethod "getInnerWidth" o = DOMDOMWindowGetInnerWidthMethodInfo + ResolveDOMDOMWindowMethod "getLength" o = DOMDOMWindowGetLengthMethodInfo + ResolveDOMDOMWindowMethod "getLocalStorage" o = DOMDOMWindowGetLocalStorageMethodInfo + ResolveDOMDOMWindowMethod "getLocationbar" o = DOMDOMWindowGetLocationbarMethodInfo + ResolveDOMDOMWindowMethod "getMenubar" o = DOMDOMWindowGetMenubarMethodInfo + ResolveDOMDOMWindowMethod "getName" o = DOMDOMWindowGetNameMethodInfo + ResolveDOMDOMWindowMethod "getNavigator" o = DOMDOMWindowGetNavigatorMethodInfo + ResolveDOMDOMWindowMethod "getOffscreenBuffering" o = DOMDOMWindowGetOffscreenBufferingMethodInfo + ResolveDOMDOMWindowMethod "getOpener" o = DOMDOMWindowGetOpenerMethodInfo + ResolveDOMDOMWindowMethod "getOuterHeight" o = DOMDOMWindowGetOuterHeightMethodInfo + ResolveDOMDOMWindowMethod "getOuterWidth" o = DOMDOMWindowGetOuterWidthMethodInfo + ResolveDOMDOMWindowMethod "getPageXOffset" o = DOMDOMWindowGetPageXOffsetMethodInfo + ResolveDOMDOMWindowMethod "getPageYOffset" o = DOMDOMWindowGetPageYOffsetMethodInfo + ResolveDOMDOMWindowMethod "getParent" o = DOMDOMWindowGetParentMethodInfo + ResolveDOMDOMWindowMethod "getPerformance" o = DOMDOMWindowGetPerformanceMethodInfo + ResolveDOMDOMWindowMethod "getPersonalbar" o = DOMDOMWindowGetPersonalbarMethodInfo + ResolveDOMDOMWindowMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMWindowMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMWindowMethod "getScreen" o = DOMDOMWindowGetScreenMethodInfo + ResolveDOMDOMWindowMethod "getScreenLeft" o = DOMDOMWindowGetScreenLeftMethodInfo + ResolveDOMDOMWindowMethod "getScreenTop" o = DOMDOMWindowGetScreenTopMethodInfo + ResolveDOMDOMWindowMethod "getScreenX" o = DOMDOMWindowGetScreenXMethodInfo + ResolveDOMDOMWindowMethod "getScreenY" o = DOMDOMWindowGetScreenYMethodInfo + ResolveDOMDOMWindowMethod "getScrollX" o = DOMDOMWindowGetScrollXMethodInfo + ResolveDOMDOMWindowMethod "getScrollY" o = DOMDOMWindowGetScrollYMethodInfo + ResolveDOMDOMWindowMethod "getScrollbars" o = DOMDOMWindowGetScrollbarsMethodInfo + ResolveDOMDOMWindowMethod "getSelection" o = DOMDOMWindowGetSelectionMethodInfo + ResolveDOMDOMWindowMethod "getSelf" o = DOMDOMWindowGetSelfMethodInfo + ResolveDOMDOMWindowMethod "getSessionStorage" o = DOMDOMWindowGetSessionStorageMethodInfo + ResolveDOMDOMWindowMethod "getStatus" o = DOMDOMWindowGetStatusMethodInfo + ResolveDOMDOMWindowMethod "getStatusbar" o = DOMDOMWindowGetStatusbarMethodInfo + ResolveDOMDOMWindowMethod "getStyleMedia" o = DOMDOMWindowGetStyleMediaMethodInfo + ResolveDOMDOMWindowMethod "getToolbar" o = DOMDOMWindowGetToolbarMethodInfo + ResolveDOMDOMWindowMethod "getTop" o = DOMDOMWindowGetTopMethodInfo + ResolveDOMDOMWindowMethod "getWebkitStorageInfo" o = DOMDOMWindowGetWebkitStorageInfoMethodInfo + ResolveDOMDOMWindowMethod "getWindow" o = DOMDOMWindowGetWindowMethodInfo + ResolveDOMDOMWindowMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMWindowMethod "setDefaultStatus" o = DOMDOMWindowSetDefaultStatusMethodInfo + ResolveDOMDOMWindowMethod "setName" o = DOMDOMWindowSetNameMethodInfo + ResolveDOMDOMWindowMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMWindowMethod "setStatus" o = DOMDOMWindowSetStatusMethodInfo + ResolveDOMDOMWindowMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMWindowMethod t DOMDOMWindow, MethodInfo info DOMDOMWindow p) => IsLabelProxy t (DOMDOMWindow -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMWindowMethod t DOMDOMWindow, MethodInfo info DOMDOMWindow p) => IsLabel t (DOMDOMWindow -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + +-- VVV Prop "application-cache" + -- Type: TInterface "WebKit" "DOMDOMApplicationCache" + -- Flags: [PropertyReadable] + +getDOMDOMWindowApplicationCache :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMApplicationCache +getDOMDOMWindowApplicationCache obj = liftIO $ getObjectPropertyObject obj "application-cache" DOMDOMApplicationCache + +data DOMDOMWindowApplicationCachePropertyInfo +instance AttrInfo DOMDOMWindowApplicationCachePropertyInfo where + type AttrAllowedOps DOMDOMWindowApplicationCachePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowApplicationCachePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowApplicationCachePropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowApplicationCachePropertyInfo = DOMDOMApplicationCache + type AttrLabel DOMDOMWindowApplicationCachePropertyInfo = "application-cache" + attrGet _ = getDOMDOMWindowApplicationCache + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "client-information" + -- Type: TInterface "WebKit" "DOMNavigator" + -- Flags: [PropertyReadable] + +getDOMDOMWindowClientInformation :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMNavigator +getDOMDOMWindowClientInformation obj = liftIO $ getObjectPropertyObject obj "client-information" DOMNavigator + +data DOMDOMWindowClientInformationPropertyInfo +instance AttrInfo DOMDOMWindowClientInformationPropertyInfo where + type AttrAllowedOps DOMDOMWindowClientInformationPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowClientInformationPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowClientInformationPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowClientInformationPropertyInfo = DOMNavigator + type AttrLabel DOMDOMWindowClientInformationPropertyInfo = "client-information" + attrGet _ = getDOMDOMWindowClientInformation + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "closed" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMDOMWindowClosed :: (MonadIO m, DOMDOMWindowK o) => o -> m Bool +getDOMDOMWindowClosed obj = liftIO $ getObjectPropertyBool obj "closed" + +data DOMDOMWindowClosedPropertyInfo +instance AttrInfo DOMDOMWindowClosedPropertyInfo where + type AttrAllowedOps DOMDOMWindowClosedPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowClosedPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowClosedPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowClosedPropertyInfo = Bool + type AttrLabel DOMDOMWindowClosedPropertyInfo = "closed" + attrGet _ = getDOMDOMWindowClosed + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "console" + -- Type: TInterface "WebKit" "DOMConsole" + -- Flags: [PropertyReadable] + +getDOMDOMWindowConsole :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMConsole +getDOMDOMWindowConsole obj = liftIO $ getObjectPropertyObject obj "console" DOMConsole + +data DOMDOMWindowConsolePropertyInfo +instance AttrInfo DOMDOMWindowConsolePropertyInfo where + type AttrAllowedOps DOMDOMWindowConsolePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowConsolePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowConsolePropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowConsolePropertyInfo = DOMConsole + type AttrLabel DOMDOMWindowConsolePropertyInfo = "console" + attrGet _ = getDOMDOMWindowConsole + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "css" + -- Type: TInterface "WebKit" "DOMDOMWindowCSS" + -- Flags: [PropertyReadable] + +getDOMDOMWindowCss :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindowCSS +getDOMDOMWindowCss obj = liftIO $ getObjectPropertyObject obj "css" DOMDOMWindowCSS + +data DOMDOMWindowCssPropertyInfo +instance AttrInfo DOMDOMWindowCssPropertyInfo where + type AttrAllowedOps DOMDOMWindowCssPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowCssPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowCssPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowCssPropertyInfo = DOMDOMWindowCSS + type AttrLabel DOMDOMWindowCssPropertyInfo = "css" + attrGet _ = getDOMDOMWindowCss + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "default-status" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMDOMWindowDefaultStatus :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text +getDOMDOMWindowDefaultStatus obj = liftIO $ getObjectPropertyString obj "default-status" + +setDOMDOMWindowDefaultStatus :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m () +setDOMDOMWindowDefaultStatus obj val = liftIO $ setObjectPropertyString obj "default-status" val + +constructDOMDOMWindowDefaultStatus :: T.Text -> IO ([Char], GValue) +constructDOMDOMWindowDefaultStatus val = constructObjectPropertyString "default-status" val + +data DOMDOMWindowDefaultStatusPropertyInfo +instance AttrInfo DOMDOMWindowDefaultStatusPropertyInfo where + type AttrAllowedOps DOMDOMWindowDefaultStatusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowDefaultStatusPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMDOMWindowDefaultStatusPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowDefaultStatusPropertyInfo = T.Text + type AttrLabel DOMDOMWindowDefaultStatusPropertyInfo = "default-status" + attrGet _ = getDOMDOMWindowDefaultStatus + attrSet _ = setDOMDOMWindowDefaultStatus + attrConstruct _ = constructDOMDOMWindowDefaultStatus + +-- VVV Prop "device-pixel-ratio" + -- Type: TBasicType TDouble + -- Flags: [PropertyReadable] + +getDOMDOMWindowDevicePixelRatio :: (MonadIO m, DOMDOMWindowK o) => o -> m Double +getDOMDOMWindowDevicePixelRatio obj = liftIO $ getObjectPropertyDouble obj "device-pixel-ratio" + +data DOMDOMWindowDevicePixelRatioPropertyInfo +instance AttrInfo DOMDOMWindowDevicePixelRatioPropertyInfo where + type AttrAllowedOps DOMDOMWindowDevicePixelRatioPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowDevicePixelRatioPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowDevicePixelRatioPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowDevicePixelRatioPropertyInfo = Double + type AttrLabel DOMDOMWindowDevicePixelRatioPropertyInfo = "device-pixel-ratio" + attrGet _ = getDOMDOMWindowDevicePixelRatio + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "document" + -- Type: TInterface "WebKit" "DOMDocument" + -- Flags: [PropertyReadable] + +getDOMDOMWindowDocument :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDocument +getDOMDOMWindowDocument obj = liftIO $ getObjectPropertyObject obj "document" DOMDocument + +data DOMDOMWindowDocumentPropertyInfo +instance AttrInfo DOMDOMWindowDocumentPropertyInfo where + type AttrAllowedOps DOMDOMWindowDocumentPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowDocumentPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowDocumentPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowDocumentPropertyInfo = DOMDocument + type AttrLabel DOMDOMWindowDocumentPropertyInfo = "document" + attrGet _ = getDOMDOMWindowDocument + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "frame-element" + -- Type: TInterface "WebKit" "DOMElement" + -- Flags: [PropertyReadable] + +getDOMDOMWindowFrameElement :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMElement +getDOMDOMWindowFrameElement obj = liftIO $ getObjectPropertyObject obj "frame-element" DOMElement + +data DOMDOMWindowFrameElementPropertyInfo +instance AttrInfo DOMDOMWindowFrameElementPropertyInfo where + type AttrAllowedOps DOMDOMWindowFrameElementPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowFrameElementPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowFrameElementPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowFrameElementPropertyInfo = DOMElement + type AttrLabel DOMDOMWindowFrameElementPropertyInfo = "frame-element" + attrGet _ = getDOMDOMWindowFrameElement + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "frames" + -- Type: TInterface "WebKit" "DOMDOMWindow" + -- Flags: [PropertyReadable] + +getDOMDOMWindowFrames :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow +getDOMDOMWindowFrames obj = liftIO $ getObjectPropertyObject obj "frames" DOMDOMWindow + +data DOMDOMWindowFramesPropertyInfo +instance AttrInfo DOMDOMWindowFramesPropertyInfo where + type AttrAllowedOps DOMDOMWindowFramesPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowFramesPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowFramesPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowFramesPropertyInfo = DOMDOMWindow + type AttrLabel DOMDOMWindowFramesPropertyInfo = "frames" + attrGet _ = getDOMDOMWindowFrames + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "history" + -- Type: TInterface "WebKit" "DOMHistory" + -- Flags: [PropertyReadable] + +getDOMDOMWindowHistory :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMHistory +getDOMDOMWindowHistory obj = liftIO $ getObjectPropertyObject obj "history" DOMHistory + +data DOMDOMWindowHistoryPropertyInfo +instance AttrInfo DOMDOMWindowHistoryPropertyInfo where + type AttrAllowedOps DOMDOMWindowHistoryPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowHistoryPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowHistoryPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowHistoryPropertyInfo = DOMHistory + type AttrLabel DOMDOMWindowHistoryPropertyInfo = "history" + attrGet _ = getDOMDOMWindowHistory + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "inner-height" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowInnerHeight :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowInnerHeight obj = liftIO $ getObjectPropertyInt64 obj "inner-height" + +data DOMDOMWindowInnerHeightPropertyInfo +instance AttrInfo DOMDOMWindowInnerHeightPropertyInfo where + type AttrAllowedOps DOMDOMWindowInnerHeightPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowInnerHeightPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowInnerHeightPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowInnerHeightPropertyInfo = Int64 + type AttrLabel DOMDOMWindowInnerHeightPropertyInfo = "inner-height" + attrGet _ = getDOMDOMWindowInnerHeight + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "inner-width" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowInnerWidth :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowInnerWidth obj = liftIO $ getObjectPropertyInt64 obj "inner-width" + +data DOMDOMWindowInnerWidthPropertyInfo +instance AttrInfo DOMDOMWindowInnerWidthPropertyInfo where + type AttrAllowedOps DOMDOMWindowInnerWidthPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowInnerWidthPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowInnerWidthPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowInnerWidthPropertyInfo = Int64 + type AttrLabel DOMDOMWindowInnerWidthPropertyInfo = "inner-width" + attrGet _ = getDOMDOMWindowInnerWidth + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "length" + -- Type: TBasicType TUInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowLength :: (MonadIO m, DOMDOMWindowK o) => o -> m Word64 +getDOMDOMWindowLength obj = liftIO $ getObjectPropertyUInt64 obj "length" + +data DOMDOMWindowLengthPropertyInfo +instance AttrInfo DOMDOMWindowLengthPropertyInfo where + type AttrAllowedOps DOMDOMWindowLengthPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowLengthPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowLengthPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowLengthPropertyInfo = Word64 + type AttrLabel DOMDOMWindowLengthPropertyInfo = "length" + attrGet _ = getDOMDOMWindowLength + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "local-storage" + -- Type: TInterface "WebKit" "DOMStorage" + -- Flags: [PropertyReadable] + +getDOMDOMWindowLocalStorage :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorage +getDOMDOMWindowLocalStorage obj = liftIO $ getObjectPropertyObject obj "local-storage" DOMStorage + +data DOMDOMWindowLocalStoragePropertyInfo +instance AttrInfo DOMDOMWindowLocalStoragePropertyInfo where + type AttrAllowedOps DOMDOMWindowLocalStoragePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowLocalStoragePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowLocalStoragePropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowLocalStoragePropertyInfo = DOMStorage + type AttrLabel DOMDOMWindowLocalStoragePropertyInfo = "local-storage" + attrGet _ = getDOMDOMWindowLocalStorage + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "locationbar" + -- Type: TInterface "WebKit" "DOMBarProp" + -- Flags: [PropertyReadable] + +getDOMDOMWindowLocationbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp +getDOMDOMWindowLocationbar obj = liftIO $ getObjectPropertyObject obj "locationbar" DOMBarProp + +data DOMDOMWindowLocationbarPropertyInfo +instance AttrInfo DOMDOMWindowLocationbarPropertyInfo where + type AttrAllowedOps DOMDOMWindowLocationbarPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowLocationbarPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowLocationbarPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowLocationbarPropertyInfo = DOMBarProp + type AttrLabel DOMDOMWindowLocationbarPropertyInfo = "locationbar" + attrGet _ = getDOMDOMWindowLocationbar + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "menubar" + -- Type: TInterface "WebKit" "DOMBarProp" + -- Flags: [PropertyReadable] + +getDOMDOMWindowMenubar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp +getDOMDOMWindowMenubar obj = liftIO $ getObjectPropertyObject obj "menubar" DOMBarProp + +data DOMDOMWindowMenubarPropertyInfo +instance AttrInfo DOMDOMWindowMenubarPropertyInfo where + type AttrAllowedOps DOMDOMWindowMenubarPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowMenubarPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowMenubarPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowMenubarPropertyInfo = DOMBarProp + type AttrLabel DOMDOMWindowMenubarPropertyInfo = "menubar" + attrGet _ = getDOMDOMWindowMenubar + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "name" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMDOMWindowName :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text +getDOMDOMWindowName obj = liftIO $ getObjectPropertyString obj "name" + +setDOMDOMWindowName :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m () +setDOMDOMWindowName obj val = liftIO $ setObjectPropertyString obj "name" val + +constructDOMDOMWindowName :: T.Text -> IO ([Char], GValue) +constructDOMDOMWindowName val = constructObjectPropertyString "name" val + +data DOMDOMWindowNamePropertyInfo +instance AttrInfo DOMDOMWindowNamePropertyInfo where + type AttrAllowedOps DOMDOMWindowNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowNamePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMDOMWindowNamePropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowNamePropertyInfo = T.Text + type AttrLabel DOMDOMWindowNamePropertyInfo = "name" + attrGet _ = getDOMDOMWindowName + attrSet _ = setDOMDOMWindowName + attrConstruct _ = constructDOMDOMWindowName + +-- VVV Prop "navigator" + -- Type: TInterface "WebKit" "DOMNavigator" + -- Flags: [PropertyReadable] + +getDOMDOMWindowNavigator :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMNavigator +getDOMDOMWindowNavigator obj = liftIO $ getObjectPropertyObject obj "navigator" DOMNavigator + +data DOMDOMWindowNavigatorPropertyInfo +instance AttrInfo DOMDOMWindowNavigatorPropertyInfo where + type AttrAllowedOps DOMDOMWindowNavigatorPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowNavigatorPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowNavigatorPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowNavigatorPropertyInfo = DOMNavigator + type AttrLabel DOMDOMWindowNavigatorPropertyInfo = "navigator" + attrGet _ = getDOMDOMWindowNavigator + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "offscreen-buffering" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMDOMWindowOffscreenBuffering :: (MonadIO m, DOMDOMWindowK o) => o -> m Bool +getDOMDOMWindowOffscreenBuffering obj = liftIO $ getObjectPropertyBool obj "offscreen-buffering" + +data DOMDOMWindowOffscreenBufferingPropertyInfo +instance AttrInfo DOMDOMWindowOffscreenBufferingPropertyInfo where + type AttrAllowedOps DOMDOMWindowOffscreenBufferingPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowOffscreenBufferingPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowOffscreenBufferingPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowOffscreenBufferingPropertyInfo = Bool + type AttrLabel DOMDOMWindowOffscreenBufferingPropertyInfo = "offscreen-buffering" + attrGet _ = getDOMDOMWindowOffscreenBuffering + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "opener" + -- Type: TInterface "WebKit" "DOMDOMWindow" + -- Flags: [PropertyReadable] + +getDOMDOMWindowOpener :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow +getDOMDOMWindowOpener obj = liftIO $ getObjectPropertyObject obj "opener" DOMDOMWindow + +data DOMDOMWindowOpenerPropertyInfo +instance AttrInfo DOMDOMWindowOpenerPropertyInfo where + type AttrAllowedOps DOMDOMWindowOpenerPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowOpenerPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowOpenerPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowOpenerPropertyInfo = DOMDOMWindow + type AttrLabel DOMDOMWindowOpenerPropertyInfo = "opener" + attrGet _ = getDOMDOMWindowOpener + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "outer-height" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowOuterHeight :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowOuterHeight obj = liftIO $ getObjectPropertyInt64 obj "outer-height" + +data DOMDOMWindowOuterHeightPropertyInfo +instance AttrInfo DOMDOMWindowOuterHeightPropertyInfo where + type AttrAllowedOps DOMDOMWindowOuterHeightPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowOuterHeightPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowOuterHeightPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowOuterHeightPropertyInfo = Int64 + type AttrLabel DOMDOMWindowOuterHeightPropertyInfo = "outer-height" + attrGet _ = getDOMDOMWindowOuterHeight + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "outer-width" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowOuterWidth :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowOuterWidth obj = liftIO $ getObjectPropertyInt64 obj "outer-width" + +data DOMDOMWindowOuterWidthPropertyInfo +instance AttrInfo DOMDOMWindowOuterWidthPropertyInfo where + type AttrAllowedOps DOMDOMWindowOuterWidthPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowOuterWidthPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowOuterWidthPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowOuterWidthPropertyInfo = Int64 + type AttrLabel DOMDOMWindowOuterWidthPropertyInfo = "outer-width" + attrGet _ = getDOMDOMWindowOuterWidth + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "page-x-offset" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowPageXOffset :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowPageXOffset obj = liftIO $ getObjectPropertyInt64 obj "page-x-offset" + +data DOMDOMWindowPageXOffsetPropertyInfo +instance AttrInfo DOMDOMWindowPageXOffsetPropertyInfo where + type AttrAllowedOps DOMDOMWindowPageXOffsetPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowPageXOffsetPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowPageXOffsetPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowPageXOffsetPropertyInfo = Int64 + type AttrLabel DOMDOMWindowPageXOffsetPropertyInfo = "page-x-offset" + attrGet _ = getDOMDOMWindowPageXOffset + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "page-y-offset" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowPageYOffset :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowPageYOffset obj = liftIO $ getObjectPropertyInt64 obj "page-y-offset" + +data DOMDOMWindowPageYOffsetPropertyInfo +instance AttrInfo DOMDOMWindowPageYOffsetPropertyInfo where + type AttrAllowedOps DOMDOMWindowPageYOffsetPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowPageYOffsetPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowPageYOffsetPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowPageYOffsetPropertyInfo = Int64 + type AttrLabel DOMDOMWindowPageYOffsetPropertyInfo = "page-y-offset" + attrGet _ = getDOMDOMWindowPageYOffset + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "parent" + -- Type: TInterface "WebKit" "DOMDOMWindow" + -- Flags: [PropertyReadable] + +getDOMDOMWindowParent :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow +getDOMDOMWindowParent obj = liftIO $ getObjectPropertyObject obj "parent" DOMDOMWindow + +data DOMDOMWindowParentPropertyInfo +instance AttrInfo DOMDOMWindowParentPropertyInfo where + type AttrAllowedOps DOMDOMWindowParentPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowParentPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowParentPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowParentPropertyInfo = DOMDOMWindow + type AttrLabel DOMDOMWindowParentPropertyInfo = "parent" + attrGet _ = getDOMDOMWindowParent + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "performance" + -- Type: TInterface "WebKit" "DOMPerformance" + -- Flags: [PropertyReadable] + +getDOMDOMWindowPerformance :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMPerformance +getDOMDOMWindowPerformance obj = liftIO $ getObjectPropertyObject obj "performance" DOMPerformance + +data DOMDOMWindowPerformancePropertyInfo +instance AttrInfo DOMDOMWindowPerformancePropertyInfo where + type AttrAllowedOps DOMDOMWindowPerformancePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowPerformancePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowPerformancePropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowPerformancePropertyInfo = DOMPerformance + type AttrLabel DOMDOMWindowPerformancePropertyInfo = "performance" + attrGet _ = getDOMDOMWindowPerformance + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "personalbar" + -- Type: TInterface "WebKit" "DOMBarProp" + -- Flags: [PropertyReadable] + +getDOMDOMWindowPersonalbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp +getDOMDOMWindowPersonalbar obj = liftIO $ getObjectPropertyObject obj "personalbar" DOMBarProp + +data DOMDOMWindowPersonalbarPropertyInfo +instance AttrInfo DOMDOMWindowPersonalbarPropertyInfo where + type AttrAllowedOps DOMDOMWindowPersonalbarPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowPersonalbarPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowPersonalbarPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowPersonalbarPropertyInfo = DOMBarProp + type AttrLabel DOMDOMWindowPersonalbarPropertyInfo = "personalbar" + attrGet _ = getDOMDOMWindowPersonalbar + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "screen" + -- Type: TInterface "WebKit" "DOMScreen" + -- Flags: [PropertyReadable] + +getDOMDOMWindowScreen :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMScreen +getDOMDOMWindowScreen obj = liftIO $ getObjectPropertyObject obj "screen" DOMScreen + +data DOMDOMWindowScreenPropertyInfo +instance AttrInfo DOMDOMWindowScreenPropertyInfo where + type AttrAllowedOps DOMDOMWindowScreenPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowScreenPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowScreenPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowScreenPropertyInfo = DOMScreen + type AttrLabel DOMDOMWindowScreenPropertyInfo = "screen" + attrGet _ = getDOMDOMWindowScreen + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "screen-left" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowScreenLeft :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowScreenLeft obj = liftIO $ getObjectPropertyInt64 obj "screen-left" + +data DOMDOMWindowScreenLeftPropertyInfo +instance AttrInfo DOMDOMWindowScreenLeftPropertyInfo where + type AttrAllowedOps DOMDOMWindowScreenLeftPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowScreenLeftPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowScreenLeftPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowScreenLeftPropertyInfo = Int64 + type AttrLabel DOMDOMWindowScreenLeftPropertyInfo = "screen-left" + attrGet _ = getDOMDOMWindowScreenLeft + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "screen-top" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowScreenTop :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowScreenTop obj = liftIO $ getObjectPropertyInt64 obj "screen-top" + +data DOMDOMWindowScreenTopPropertyInfo +instance AttrInfo DOMDOMWindowScreenTopPropertyInfo where + type AttrAllowedOps DOMDOMWindowScreenTopPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowScreenTopPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowScreenTopPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowScreenTopPropertyInfo = Int64 + type AttrLabel DOMDOMWindowScreenTopPropertyInfo = "screen-top" + attrGet _ = getDOMDOMWindowScreenTop + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "screen-x" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowScreenX :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowScreenX obj = liftIO $ getObjectPropertyInt64 obj "screen-x" + +data DOMDOMWindowScreenXPropertyInfo +instance AttrInfo DOMDOMWindowScreenXPropertyInfo where + type AttrAllowedOps DOMDOMWindowScreenXPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowScreenXPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowScreenXPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowScreenXPropertyInfo = Int64 + type AttrLabel DOMDOMWindowScreenXPropertyInfo = "screen-x" + attrGet _ = getDOMDOMWindowScreenX + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "screen-y" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowScreenY :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowScreenY obj = liftIO $ getObjectPropertyInt64 obj "screen-y" + +data DOMDOMWindowScreenYPropertyInfo +instance AttrInfo DOMDOMWindowScreenYPropertyInfo where + type AttrAllowedOps DOMDOMWindowScreenYPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowScreenYPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowScreenYPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowScreenYPropertyInfo = Int64 + type AttrLabel DOMDOMWindowScreenYPropertyInfo = "screen-y" + attrGet _ = getDOMDOMWindowScreenY + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "scroll-x" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowScrollX :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowScrollX obj = liftIO $ getObjectPropertyInt64 obj "scroll-x" + +data DOMDOMWindowScrollXPropertyInfo +instance AttrInfo DOMDOMWindowScrollXPropertyInfo where + type AttrAllowedOps DOMDOMWindowScrollXPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowScrollXPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowScrollXPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowScrollXPropertyInfo = Int64 + type AttrLabel DOMDOMWindowScrollXPropertyInfo = "scroll-x" + attrGet _ = getDOMDOMWindowScrollX + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "scroll-y" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable] + +getDOMDOMWindowScrollY :: (MonadIO m, DOMDOMWindowK o) => o -> m Int64 +getDOMDOMWindowScrollY obj = liftIO $ getObjectPropertyInt64 obj "scroll-y" + +data DOMDOMWindowScrollYPropertyInfo +instance AttrInfo DOMDOMWindowScrollYPropertyInfo where + type AttrAllowedOps DOMDOMWindowScrollYPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowScrollYPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowScrollYPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowScrollYPropertyInfo = Int64 + type AttrLabel DOMDOMWindowScrollYPropertyInfo = "scroll-y" + attrGet _ = getDOMDOMWindowScrollY + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "scrollbars" + -- Type: TInterface "WebKit" "DOMBarProp" + -- Flags: [PropertyReadable] + +getDOMDOMWindowScrollbars :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp +getDOMDOMWindowScrollbars obj = liftIO $ getObjectPropertyObject obj "scrollbars" DOMBarProp + +data DOMDOMWindowScrollbarsPropertyInfo +instance AttrInfo DOMDOMWindowScrollbarsPropertyInfo where + type AttrAllowedOps DOMDOMWindowScrollbarsPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowScrollbarsPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowScrollbarsPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowScrollbarsPropertyInfo = DOMBarProp + type AttrLabel DOMDOMWindowScrollbarsPropertyInfo = "scrollbars" + attrGet _ = getDOMDOMWindowScrollbars + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "self" + -- Type: TInterface "WebKit" "DOMDOMWindow" + -- Flags: [PropertyReadable] + +getDOMDOMWindowSelf :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow +getDOMDOMWindowSelf obj = liftIO $ getObjectPropertyObject obj "self" DOMDOMWindow + +data DOMDOMWindowSelfPropertyInfo +instance AttrInfo DOMDOMWindowSelfPropertyInfo where + type AttrAllowedOps DOMDOMWindowSelfPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowSelfPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowSelfPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowSelfPropertyInfo = DOMDOMWindow + type AttrLabel DOMDOMWindowSelfPropertyInfo = "self" + attrGet _ = getDOMDOMWindowSelf + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "session-storage" + -- Type: TInterface "WebKit" "DOMStorage" + -- Flags: [PropertyReadable] + +getDOMDOMWindowSessionStorage :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorage +getDOMDOMWindowSessionStorage obj = liftIO $ getObjectPropertyObject obj "session-storage" DOMStorage + +data DOMDOMWindowSessionStoragePropertyInfo +instance AttrInfo DOMDOMWindowSessionStoragePropertyInfo where + type AttrAllowedOps DOMDOMWindowSessionStoragePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowSessionStoragePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowSessionStoragePropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowSessionStoragePropertyInfo = DOMStorage + type AttrLabel DOMDOMWindowSessionStoragePropertyInfo = "session-storage" + attrGet _ = getDOMDOMWindowSessionStorage + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "status" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMDOMWindowStatus :: (MonadIO m, DOMDOMWindowK o) => o -> m T.Text +getDOMDOMWindowStatus obj = liftIO $ getObjectPropertyString obj "status" + +setDOMDOMWindowStatus :: (MonadIO m, DOMDOMWindowK o) => o -> T.Text -> m () +setDOMDOMWindowStatus obj val = liftIO $ setObjectPropertyString obj "status" val + +constructDOMDOMWindowStatus :: T.Text -> IO ([Char], GValue) +constructDOMDOMWindowStatus val = constructObjectPropertyString "status" val + +data DOMDOMWindowStatusPropertyInfo +instance AttrInfo DOMDOMWindowStatusPropertyInfo where + type AttrAllowedOps DOMDOMWindowStatusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowStatusPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMDOMWindowStatusPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowStatusPropertyInfo = T.Text + type AttrLabel DOMDOMWindowStatusPropertyInfo = "status" + attrGet _ = getDOMDOMWindowStatus + attrSet _ = setDOMDOMWindowStatus + attrConstruct _ = constructDOMDOMWindowStatus + +-- VVV Prop "statusbar" + -- Type: TInterface "WebKit" "DOMBarProp" + -- Flags: [PropertyReadable] + +getDOMDOMWindowStatusbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp +getDOMDOMWindowStatusbar obj = liftIO $ getObjectPropertyObject obj "statusbar" DOMBarProp + +data DOMDOMWindowStatusbarPropertyInfo +instance AttrInfo DOMDOMWindowStatusbarPropertyInfo where + type AttrAllowedOps DOMDOMWindowStatusbarPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowStatusbarPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowStatusbarPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowStatusbarPropertyInfo = DOMBarProp + type AttrLabel DOMDOMWindowStatusbarPropertyInfo = "statusbar" + attrGet _ = getDOMDOMWindowStatusbar + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "style-media" + -- Type: TInterface "WebKit" "DOMStyleMedia" + -- Flags: [PropertyReadable] + +getDOMDOMWindowStyleMedia :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStyleMedia +getDOMDOMWindowStyleMedia obj = liftIO $ getObjectPropertyObject obj "style-media" DOMStyleMedia + +data DOMDOMWindowStyleMediaPropertyInfo +instance AttrInfo DOMDOMWindowStyleMediaPropertyInfo where + type AttrAllowedOps DOMDOMWindowStyleMediaPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowStyleMediaPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowStyleMediaPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowStyleMediaPropertyInfo = DOMStyleMedia + type AttrLabel DOMDOMWindowStyleMediaPropertyInfo = "style-media" + attrGet _ = getDOMDOMWindowStyleMedia + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "toolbar" + -- Type: TInterface "WebKit" "DOMBarProp" + -- Flags: [PropertyReadable] + +getDOMDOMWindowToolbar :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMBarProp +getDOMDOMWindowToolbar obj = liftIO $ getObjectPropertyObject obj "toolbar" DOMBarProp + +data DOMDOMWindowToolbarPropertyInfo +instance AttrInfo DOMDOMWindowToolbarPropertyInfo where + type AttrAllowedOps DOMDOMWindowToolbarPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowToolbarPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowToolbarPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowToolbarPropertyInfo = DOMBarProp + type AttrLabel DOMDOMWindowToolbarPropertyInfo = "toolbar" + attrGet _ = getDOMDOMWindowToolbar + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "top" + -- Type: TInterface "WebKit" "DOMDOMWindow" + -- Flags: [PropertyReadable] + +getDOMDOMWindowTop :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow +getDOMDOMWindowTop obj = liftIO $ getObjectPropertyObject obj "top" DOMDOMWindow + +data DOMDOMWindowTopPropertyInfo +instance AttrInfo DOMDOMWindowTopPropertyInfo where + type AttrAllowedOps DOMDOMWindowTopPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowTopPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowTopPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowTopPropertyInfo = DOMDOMWindow + type AttrLabel DOMDOMWindowTopPropertyInfo = "top" + attrGet _ = getDOMDOMWindowTop + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "webkit-storage-info" + -- Type: TInterface "WebKit" "DOMStorageInfo" + -- Flags: [PropertyReadable] + +getDOMDOMWindowWebkitStorageInfo :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMStorageInfo +getDOMDOMWindowWebkitStorageInfo obj = liftIO $ getObjectPropertyObject obj "webkit-storage-info" DOMStorageInfo + +data DOMDOMWindowWebkitStorageInfoPropertyInfo +instance AttrInfo DOMDOMWindowWebkitStorageInfoPropertyInfo where + type AttrAllowedOps DOMDOMWindowWebkitStorageInfoPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowWebkitStorageInfoPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowWebkitStorageInfoPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowWebkitStorageInfoPropertyInfo = DOMStorageInfo + type AttrLabel DOMDOMWindowWebkitStorageInfoPropertyInfo = "webkit-storage-info" + attrGet _ = getDOMDOMWindowWebkitStorageInfo + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "window" + -- Type: TInterface "WebKit" "DOMDOMWindow" + -- Flags: [PropertyReadable] + +getDOMDOMWindowWindow :: (MonadIO m, DOMDOMWindowK o) => o -> m DOMDOMWindow +getDOMDOMWindowWindow obj = liftIO $ getObjectPropertyObject obj "window" DOMDOMWindow + +data DOMDOMWindowWindowPropertyInfo +instance AttrInfo DOMDOMWindowWindowPropertyInfo where + type AttrAllowedOps DOMDOMWindowWindowPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDOMWindowWindowPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDOMWindowWindowPropertyInfo = DOMDOMWindowK + type AttrGetType DOMDOMWindowWindowPropertyInfo = DOMDOMWindow + type AttrLabel DOMDOMWindowWindowPropertyInfo = "window" + attrGet _ = getDOMDOMWindowWindow + attrSet _ = undefined + attrConstruct _ = undefined + +type instance AttributeList DOMDOMWindow = DOMDOMWindowAttributeList +type DOMDOMWindowAttributeList = ('[ '("applicationCache", DOMDOMWindowApplicationCachePropertyInfo), '("clientInformation", DOMDOMWindowClientInformationPropertyInfo), '("closed", DOMDOMWindowClosedPropertyInfo), '("console", DOMDOMWindowConsolePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("css", DOMDOMWindowCssPropertyInfo), '("defaultStatus", DOMDOMWindowDefaultStatusPropertyInfo), '("devicePixelRatio", DOMDOMWindowDevicePixelRatioPropertyInfo), '("document", DOMDOMWindowDocumentPropertyInfo), '("frameElement", DOMDOMWindowFrameElementPropertyInfo), '("frames", DOMDOMWindowFramesPropertyInfo), '("history", DOMDOMWindowHistoryPropertyInfo), '("innerHeight", DOMDOMWindowInnerHeightPropertyInfo), '("innerWidth", DOMDOMWindowInnerWidthPropertyInfo), '("length", DOMDOMWindowLengthPropertyInfo), '("localStorage", DOMDOMWindowLocalStoragePropertyInfo), '("locationbar", DOMDOMWindowLocationbarPropertyInfo), '("menubar", DOMDOMWindowMenubarPropertyInfo), '("name", DOMDOMWindowNamePropertyInfo), '("navigator", DOMDOMWindowNavigatorPropertyInfo), '("offscreenBuffering", DOMDOMWindowOffscreenBufferingPropertyInfo), '("opener", DOMDOMWindowOpenerPropertyInfo), '("outerHeight", DOMDOMWindowOuterHeightPropertyInfo), '("outerWidth", DOMDOMWindowOuterWidthPropertyInfo), '("pageXOffset", DOMDOMWindowPageXOffsetPropertyInfo), '("pageYOffset", DOMDOMWindowPageYOffsetPropertyInfo), '("parent", DOMDOMWindowParentPropertyInfo), '("performance", DOMDOMWindowPerformancePropertyInfo), '("personalbar", DOMDOMWindowPersonalbarPropertyInfo), '("screen", DOMDOMWindowScreenPropertyInfo), '("screenLeft", DOMDOMWindowScreenLeftPropertyInfo), '("screenTop", DOMDOMWindowScreenTopPropertyInfo), '("screenX", DOMDOMWindowScreenXPropertyInfo), '("screenY", DOMDOMWindowScreenYPropertyInfo), '("scrollX", DOMDOMWindowScrollXPropertyInfo), '("scrollY", DOMDOMWindowScrollYPropertyInfo), '("scrollbars", DOMDOMWindowScrollbarsPropertyInfo), '("self", DOMDOMWindowSelfPropertyInfo), '("sessionStorage", DOMDOMWindowSessionStoragePropertyInfo), '("status", DOMDOMWindowStatusPropertyInfo), '("statusbar", DOMDOMWindowStatusbarPropertyInfo), '("styleMedia", DOMDOMWindowStyleMediaPropertyInfo), '("toolbar", DOMDOMWindowToolbarPropertyInfo), '("top", DOMDOMWindowTopPropertyInfo), '("webkitStorageInfo", DOMDOMWindowWebkitStorageInfoPropertyInfo), '("window", DOMDOMWindowWindowPropertyInfo)] :: [(Symbol, *)]) + +type instance SignalList DOMDOMWindow = DOMDOMWindowSignalList +type DOMDOMWindowSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) + +-- method DOMDOMWindow::alert +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_alert" webkit_dom_dom_window_alert :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CString -> -- message : TBasicType TUTF8 + IO () + + +dOMDOMWindowAlert :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> T.Text -- message + -> m () -- result +dOMDOMWindowAlert _obj message = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + message' <- textToCString message + webkit_dom_dom_window_alert _obj' message' + touchManagedPtr _obj + freeMem message' + return () + +data DOMDOMWindowAlertMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowAlertMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowAlert + +-- method DOMDOMWindow::atob +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_atob" webkit_dom_dom_window_atob :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CString -> -- string : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO CString + + +dOMDOMWindowAtob :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> T.Text -- string + -> m T.Text -- result +dOMDOMWindowAtob _obj string = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + string' <- textToCString string + onException (do + result <- propagateGError $ webkit_dom_dom_window_atob _obj' string' + checkUnexpectedReturnNULL "webkit_dom_dom_window_atob" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + freeMem string' + return result' + ) (do + freeMem string' + ) + +data DOMDOMWindowAtobMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowAtobMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowAtob + +-- method DOMDOMWindow::blur +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_blur" webkit_dom_dom_window_blur :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO () + + +dOMDOMWindowBlur :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m () -- result +dOMDOMWindowBlur _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_blur _obj' + touchManagedPtr _obj + return () + +data DOMDOMWindowBlurMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowBlurMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowBlur + +-- method DOMDOMWindow::btoa +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_btoa" webkit_dom_dom_window_btoa :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CString -> -- string : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO CString + + +dOMDOMWindowBtoa :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> T.Text -- string + -> m T.Text -- result +dOMDOMWindowBtoa _obj string = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + string' <- textToCString string + onException (do + result <- propagateGError $ webkit_dom_dom_window_btoa _obj' string' + checkUnexpectedReturnNULL "webkit_dom_dom_window_btoa" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + freeMem string' + return result' + ) (do + freeMem string' + ) + +data DOMDOMWindowBtoaMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowBtoaMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowBtoa + +-- method DOMDOMWindow::cancel_animation_frame +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_cancel_animation_frame" webkit_dom_dom_window_cancel_animation_frame :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Int64 -> -- id : TBasicType TInt64 + IO () + + +dOMDOMWindowCancelAnimationFrame :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Int64 -- id + -> m () -- result +dOMDOMWindowCancelAnimationFrame _obj id = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_cancel_animation_frame _obj' id + touchManagedPtr _obj + return () + +data DOMDOMWindowCancelAnimationFrameMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowCancelAnimationFrameMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowCancelAnimationFrame + +-- method DOMDOMWindow::capture_events +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_capture_events" webkit_dom_dom_window_capture_events :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO () + + +dOMDOMWindowCaptureEvents :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m () -- result +dOMDOMWindowCaptureEvents _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_capture_events _obj' + touchManagedPtr _obj + return () + +data DOMDOMWindowCaptureEventsMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowCaptureEventsMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowCaptureEvents + +-- method DOMDOMWindow::clear_interval +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "handle", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_clear_interval" webkit_dom_dom_window_clear_interval :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Int64 -> -- handle : TBasicType TInt64 + IO () + + +dOMDOMWindowClearInterval :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Int64 -- handle + -> m () -- result +dOMDOMWindowClearInterval _obj handle = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_clear_interval _obj' handle + touchManagedPtr _obj + return () + +data DOMDOMWindowClearIntervalMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowClearIntervalMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowClearInterval + +-- method DOMDOMWindow::clear_timeout +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "handle", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_clear_timeout" webkit_dom_dom_window_clear_timeout :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Int64 -> -- handle : TBasicType TInt64 + IO () + + +dOMDOMWindowClearTimeout :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Int64 -- handle + -> m () -- result +dOMDOMWindowClearTimeout _obj handle = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_clear_timeout _obj' handle + touchManagedPtr _obj + return () + +data DOMDOMWindowClearTimeoutMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowClearTimeoutMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowClearTimeout + +-- method DOMDOMWindow::close +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_close" webkit_dom_dom_window_close :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO () + + +dOMDOMWindowClose :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m () -- result +dOMDOMWindowClose _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_close _obj' + touchManagedPtr _obj + return () + +data DOMDOMWindowCloseMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowCloseMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowClose + +-- method DOMDOMWindow::confirm +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_confirm" webkit_dom_dom_window_confirm :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CString -> -- message : TBasicType TUTF8 + IO CInt + + +dOMDOMWindowConfirm :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> T.Text -- message + -> m Bool -- result +dOMDOMWindowConfirm _obj message = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + message' <- textToCString message + result <- webkit_dom_dom_window_confirm _obj' message' + let result' = (/= 0) result + touchManagedPtr _obj + freeMem message' + return result' + +data DOMDOMWindowConfirmMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowConfirmMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowConfirm + +-- method DOMDOMWindow::dispatch_event +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_dispatch_event" webkit_dom_dom_window_dispatch_event :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Ptr DOMEvent -> -- evt : TInterface "WebKit" "DOMEvent" + Ptr (Ptr GError) -> -- error + IO CInt + +{-# DEPRECATED dOMDOMWindowDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-} +dOMDOMWindowDispatchEvent :: + (MonadIO m, DOMDOMWindowK a, DOMEventK b) => + a -- _obj + -> b -- evt + -> m () -- result +dOMDOMWindowDispatchEvent _obj evt = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let evt' = unsafeManagedPtrCastPtr evt + onException (do + _ <- propagateGError $ webkit_dom_dom_window_dispatch_event _obj' evt' + touchManagedPtr _obj + touchManagedPtr evt + return () + ) (do + return () + ) + +data DOMDOMWindowDispatchEventMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMDOMWindowK a, DOMEventK b) => MethodInfo DOMDOMWindowDispatchEventMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowDispatchEvent + +-- method DOMDOMWindow::find +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "caseSensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "backwards", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "wrap", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "wholeWord", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "searchInFrames", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "showDialog", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_find" webkit_dom_dom_window_find :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CString -> -- string : TBasicType TUTF8 + CInt -> -- caseSensitive : TBasicType TBoolean + CInt -> -- backwards : TBasicType TBoolean + CInt -> -- wrap : TBasicType TBoolean + CInt -> -- wholeWord : TBasicType TBoolean + CInt -> -- searchInFrames : TBasicType TBoolean + CInt -> -- showDialog : TBasicType TBoolean + IO CInt + + +dOMDOMWindowFind :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> T.Text -- string + -> Bool -- caseSensitive + -> Bool -- backwards + -> Bool -- wrap + -> Bool -- wholeWord + -> Bool -- searchInFrames + -> Bool -- showDialog + -> m Bool -- result +dOMDOMWindowFind _obj string caseSensitive backwards wrap wholeWord searchInFrames showDialog = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + string' <- textToCString string + let caseSensitive' = (fromIntegral . fromEnum) caseSensitive + let backwards' = (fromIntegral . fromEnum) backwards + let wrap' = (fromIntegral . fromEnum) wrap + let wholeWord' = (fromIntegral . fromEnum) wholeWord + let searchInFrames' = (fromIntegral . fromEnum) searchInFrames + let showDialog' = (fromIntegral . fromEnum) showDialog + result <- webkit_dom_dom_window_find _obj' string' caseSensitive' backwards' wrap' wholeWord' searchInFrames' showDialog' + let result' = (/= 0) result + touchManagedPtr _obj + freeMem string' + return result' + +data DOMDOMWindowFindMethodInfo +instance (signature ~ (T.Text -> Bool -> Bool -> Bool -> Bool -> Bool -> Bool -> m Bool), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowFindMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowFind + +-- method DOMDOMWindow::focus +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_focus" webkit_dom_dom_window_focus :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO () + + +dOMDOMWindowFocus :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m () -- result +dOMDOMWindowFocus _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_focus _obj' + touchManagedPtr _obj + return () + +data DOMDOMWindowFocusMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowFocusMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowFocus + +-- method DOMDOMWindow::get_application_cache +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMApplicationCache" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_application_cache" webkit_dom_dom_window_get_application_cache :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMDOMApplicationCache) + + +dOMDOMWindowGetApplicationCache :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMDOMApplicationCache -- result +dOMDOMWindowGetApplicationCache _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_application_cache _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_application_cache" result + result' <- (wrapObject DOMDOMApplicationCache) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetApplicationCacheMethodInfo +instance (signature ~ (m DOMDOMApplicationCache), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetApplicationCacheMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetApplicationCache + +-- method DOMDOMWindow::get_client_information +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMNavigator" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_client_information" webkit_dom_dom_window_get_client_information :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMNavigator) + + +dOMDOMWindowGetClientInformation :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMNavigator -- result +dOMDOMWindowGetClientInformation _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_client_information _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_client_information" result + result' <- (wrapObject DOMNavigator) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetClientInformationMethodInfo +instance (signature ~ (m DOMNavigator), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetClientInformationMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetClientInformation + +-- method DOMDOMWindow::get_closed +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_closed" webkit_dom_dom_window_get_closed :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO CInt + + +dOMDOMWindowGetClosed :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Bool -- result +dOMDOMWindowGetClosed _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_closed _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetClosedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetClosedMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetClosed + +-- method DOMDOMWindow::get_computed_style +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "element", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pseudoElement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMCSSStyleDeclaration" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_computed_style" webkit_dom_dom_window_get_computed_style :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Ptr DOMElement -> -- element : TInterface "WebKit" "DOMElement" + CString -> -- pseudoElement : TBasicType TUTF8 + IO (Ptr DOMCSSStyleDeclaration) + + +dOMDOMWindowGetComputedStyle :: + (MonadIO m, DOMDOMWindowK a, DOMElementK b) => + a -- _obj + -> b -- element + -> Maybe (T.Text) -- pseudoElement + -> m DOMCSSStyleDeclaration -- result +dOMDOMWindowGetComputedStyle _obj element pseudoElement = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let element' = unsafeManagedPtrCastPtr element + maybePseudoElement <- case pseudoElement of + Nothing -> return nullPtr + Just jPseudoElement -> do + jPseudoElement' <- textToCString jPseudoElement + return jPseudoElement' + result <- webkit_dom_dom_window_get_computed_style _obj' element' maybePseudoElement + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_computed_style" result + result' <- (wrapObject DOMCSSStyleDeclaration) result + touchManagedPtr _obj + touchManagedPtr element + freeMem maybePseudoElement + return result' + +data DOMDOMWindowGetComputedStyleMethodInfo +instance (signature ~ (b -> Maybe (T.Text) -> m DOMCSSStyleDeclaration), MonadIO m, DOMDOMWindowK a, DOMElementK b) => MethodInfo DOMDOMWindowGetComputedStyleMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetComputedStyle + +-- method DOMDOMWindow::get_console +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMConsole" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_console" webkit_dom_dom_window_get_console :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMConsole) + + +dOMDOMWindowGetConsole :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMConsole -- result +dOMDOMWindowGetConsole _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_console _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_console" result + result' <- (newObject DOMConsole) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetConsoleMethodInfo +instance (signature ~ (m DOMConsole), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetConsoleMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetConsole + +-- method DOMDOMWindow::get_css +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMWindowCSS" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_css" webkit_dom_dom_window_get_css :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMDOMWindowCSS) + + +dOMDOMWindowGetCss :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMDOMWindowCSS -- result +dOMDOMWindowGetCss _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_css _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_css" result + result' <- (wrapObject DOMDOMWindowCSS) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetCssMethodInfo +instance (signature ~ (m DOMDOMWindowCSS), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetCssMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetCss + +-- method DOMDOMWindow::get_default_status +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_default_status" webkit_dom_dom_window_get_default_status :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO CString + + +dOMDOMWindowGetDefaultStatus :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m T.Text -- result +dOMDOMWindowGetDefaultStatus _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_default_status _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_default_status" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetDefaultStatusMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetDefaultStatusMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetDefaultStatus + +-- method DOMDOMWindow::get_device_pixel_ratio +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TDouble +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_device_pixel_ratio" webkit_dom_dom_window_get_device_pixel_ratio :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO CDouble + + +dOMDOMWindowGetDevicePixelRatio :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Double -- result +dOMDOMWindowGetDevicePixelRatio _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_device_pixel_ratio _obj' + let result' = realToFrac result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetDevicePixelRatioMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetDevicePixelRatioMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetDevicePixelRatio + +-- method DOMDOMWindow::get_document +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDocument" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_document" webkit_dom_dom_window_get_document :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMDocument) + + +dOMDOMWindowGetDocument :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMDocument -- result +dOMDOMWindowGetDocument _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_document _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_document" result + result' <- (newObject DOMDocument) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetDocumentMethodInfo +instance (signature ~ (m DOMDocument), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetDocumentMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetDocument + +-- method DOMDOMWindow::get_frame_element +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_frame_element" webkit_dom_dom_window_get_frame_element :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMElement) + + +dOMDOMWindowGetFrameElement :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMElement -- result +dOMDOMWindowGetFrameElement _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_frame_element _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_frame_element" result + result' <- (newObject DOMElement) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetFrameElementMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetFrameElementMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetFrameElement + +-- method DOMDOMWindow::get_frames +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMWindow" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_frames" webkit_dom_dom_window_get_frames :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMDOMWindow) + + +dOMDOMWindowGetFrames :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMDOMWindow -- result +dOMDOMWindowGetFrames _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_frames _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_frames" result + result' <- (wrapObject DOMDOMWindow) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetFramesMethodInfo +instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetFramesMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetFrames + +-- method DOMDOMWindow::get_history +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMHistory" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_history" webkit_dom_dom_window_get_history :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMHistory) + + +dOMDOMWindowGetHistory :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMHistory -- result +dOMDOMWindowGetHistory _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_history _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_history" result + result' <- (wrapObject DOMHistory) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetHistoryMethodInfo +instance (signature ~ (m DOMHistory), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetHistoryMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetHistory + +-- method DOMDOMWindow::get_inner_height +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_inner_height" webkit_dom_dom_window_get_inner_height :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetInnerHeight :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetInnerHeight _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_inner_height _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetInnerHeightMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetInnerHeightMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetInnerHeight + +-- method DOMDOMWindow::get_inner_width +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_inner_width" webkit_dom_dom_window_get_inner_width :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetInnerWidth :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetInnerWidth _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_inner_width _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetInnerWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetInnerWidthMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetInnerWidth + +-- method DOMDOMWindow::get_length +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_length" webkit_dom_dom_window_get_length :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Word64 + + +dOMDOMWindowGetLength :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Word64 -- result +dOMDOMWindowGetLength _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_length _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetLengthMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetLength + +-- method DOMDOMWindow::get_local_storage +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMStorage" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_local_storage" webkit_dom_dom_window_get_local_storage :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Ptr (Ptr GError) -> -- error + IO (Ptr DOMStorage) + + +dOMDOMWindowGetLocalStorage :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMStorage -- result +dOMDOMWindowGetLocalStorage _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + onException (do + result <- propagateGError $ webkit_dom_dom_window_get_local_storage _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_local_storage" result + result' <- (wrapObject DOMStorage) result + touchManagedPtr _obj + return result' + ) (do + return () + ) + +data DOMDOMWindowGetLocalStorageMethodInfo +instance (signature ~ (m DOMStorage), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetLocalStorageMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetLocalStorage + +-- method DOMDOMWindow::get_locationbar +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMBarProp" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_locationbar" webkit_dom_dom_window_get_locationbar :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMBarProp) + + +dOMDOMWindowGetLocationbar :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMBarProp -- result +dOMDOMWindowGetLocationbar _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_locationbar _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_locationbar" result + result' <- (wrapObject DOMBarProp) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetLocationbarMethodInfo +instance (signature ~ (m DOMBarProp), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetLocationbarMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetLocationbar + +-- method DOMDOMWindow::get_menubar +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMBarProp" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_menubar" webkit_dom_dom_window_get_menubar :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMBarProp) + + +dOMDOMWindowGetMenubar :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMBarProp -- result +dOMDOMWindowGetMenubar _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_menubar _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_menubar" result + result' <- (wrapObject DOMBarProp) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetMenubarMethodInfo +instance (signature ~ (m DOMBarProp), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetMenubarMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetMenubar + +-- method DOMDOMWindow::get_name +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_name" webkit_dom_dom_window_get_name :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO CString + + +dOMDOMWindowGetName :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m T.Text -- result +dOMDOMWindowGetName _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_name _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_name" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetNameMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetName + +-- method DOMDOMWindow::get_navigator +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMNavigator" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_navigator" webkit_dom_dom_window_get_navigator :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMNavigator) + + +dOMDOMWindowGetNavigator :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMNavigator -- result +dOMDOMWindowGetNavigator _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_navigator _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_navigator" result + result' <- (wrapObject DOMNavigator) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetNavigatorMethodInfo +instance (signature ~ (m DOMNavigator), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetNavigatorMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetNavigator + +-- method DOMDOMWindow::get_offscreen_buffering +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_offscreen_buffering" webkit_dom_dom_window_get_offscreen_buffering :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO CInt + + +dOMDOMWindowGetOffscreenBuffering :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Bool -- result +dOMDOMWindowGetOffscreenBuffering _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_offscreen_buffering _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetOffscreenBufferingMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetOffscreenBufferingMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetOffscreenBuffering + +-- method DOMDOMWindow::get_opener +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMWindow" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_opener" webkit_dom_dom_window_get_opener :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMDOMWindow) + + +dOMDOMWindowGetOpener :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMDOMWindow -- result +dOMDOMWindowGetOpener _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_opener _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_opener" result + result' <- (wrapObject DOMDOMWindow) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetOpenerMethodInfo +instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetOpenerMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetOpener + +-- method DOMDOMWindow::get_outer_height +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_outer_height" webkit_dom_dom_window_get_outer_height :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetOuterHeight :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetOuterHeight _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_outer_height _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetOuterHeightMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetOuterHeightMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetOuterHeight + +-- method DOMDOMWindow::get_outer_width +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_outer_width" webkit_dom_dom_window_get_outer_width :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetOuterWidth :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetOuterWidth _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_outer_width _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetOuterWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetOuterWidthMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetOuterWidth + +-- method DOMDOMWindow::get_page_x_offset +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_page_x_offset" webkit_dom_dom_window_get_page_x_offset :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetPageXOffset :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetPageXOffset _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_page_x_offset _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetPageXOffsetMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetPageXOffsetMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetPageXOffset + +-- method DOMDOMWindow::get_page_y_offset +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_page_y_offset" webkit_dom_dom_window_get_page_y_offset :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetPageYOffset :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetPageYOffset _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_page_y_offset _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetPageYOffsetMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetPageYOffsetMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetPageYOffset + +-- method DOMDOMWindow::get_parent +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMWindow" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_parent" webkit_dom_dom_window_get_parent :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMDOMWindow) + + +dOMDOMWindowGetParent :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMDOMWindow -- result +dOMDOMWindowGetParent _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_parent _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_parent" result + result' <- (wrapObject DOMDOMWindow) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetParentMethodInfo +instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetParentMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetParent + +-- method DOMDOMWindow::get_performance +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMPerformance" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_performance" webkit_dom_dom_window_get_performance :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMPerformance) + + +dOMDOMWindowGetPerformance :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMPerformance -- result +dOMDOMWindowGetPerformance _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_performance _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_performance" result + result' <- (wrapObject DOMPerformance) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetPerformanceMethodInfo +instance (signature ~ (m DOMPerformance), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetPerformanceMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetPerformance + +-- method DOMDOMWindow::get_personalbar +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMBarProp" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_personalbar" webkit_dom_dom_window_get_personalbar :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMBarProp) + + +dOMDOMWindowGetPersonalbar :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMBarProp -- result +dOMDOMWindowGetPersonalbar _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_personalbar _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_personalbar" result + result' <- (wrapObject DOMBarProp) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetPersonalbarMethodInfo +instance (signature ~ (m DOMBarProp), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetPersonalbarMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetPersonalbar + +-- method DOMDOMWindow::get_screen +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMScreen" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_screen" webkit_dom_dom_window_get_screen :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMScreen) + + +dOMDOMWindowGetScreen :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMScreen -- result +dOMDOMWindowGetScreen _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_screen _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_screen" result + result' <- (wrapObject DOMScreen) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetScreenMethodInfo +instance (signature ~ (m DOMScreen), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetScreenMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetScreen + +-- method DOMDOMWindow::get_screen_left +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_screen_left" webkit_dom_dom_window_get_screen_left :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetScreenLeft :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetScreenLeft _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_screen_left _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetScreenLeftMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetScreenLeftMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetScreenLeft + +-- method DOMDOMWindow::get_screen_top +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_screen_top" webkit_dom_dom_window_get_screen_top :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetScreenTop :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetScreenTop _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_screen_top _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetScreenTopMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetScreenTopMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetScreenTop + +-- method DOMDOMWindow::get_screen_x +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_screen_x" webkit_dom_dom_window_get_screen_x :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetScreenX :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetScreenX _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_screen_x _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetScreenXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetScreenXMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetScreenX + +-- method DOMDOMWindow::get_screen_y +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_screen_y" webkit_dom_dom_window_get_screen_y :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetScreenY :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetScreenY _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_screen_y _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetScreenYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetScreenYMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetScreenY + +-- method DOMDOMWindow::get_scroll_x +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_scroll_x" webkit_dom_dom_window_get_scroll_x :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetScrollX :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetScrollX _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_scroll_x _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetScrollXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetScrollXMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetScrollX + +-- method DOMDOMWindow::get_scroll_y +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_scroll_y" webkit_dom_dom_window_get_scroll_y :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO Int64 + + +dOMDOMWindowGetScrollY :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m Int64 -- result +dOMDOMWindowGetScrollY _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_scroll_y _obj' + touchManagedPtr _obj + return result + +data DOMDOMWindowGetScrollYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetScrollYMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetScrollY + +-- method DOMDOMWindow::get_scrollbars +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMBarProp" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_scrollbars" webkit_dom_dom_window_get_scrollbars :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMBarProp) + + +dOMDOMWindowGetScrollbars :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMBarProp -- result +dOMDOMWindowGetScrollbars _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_scrollbars _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_scrollbars" result + result' <- (wrapObject DOMBarProp) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetScrollbarsMethodInfo +instance (signature ~ (m DOMBarProp), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetScrollbarsMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetScrollbars + +-- method DOMDOMWindow::get_selection +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMSelection" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_selection" webkit_dom_dom_window_get_selection :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMDOMSelection) + + +dOMDOMWindowGetSelection :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMDOMSelection -- result +dOMDOMWindowGetSelection _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_selection _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_selection" result + result' <- (wrapObject DOMDOMSelection) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetSelectionMethodInfo +instance (signature ~ (m DOMDOMSelection), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetSelectionMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetSelection + +-- method DOMDOMWindow::get_self +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMWindow" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_self" webkit_dom_dom_window_get_self :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMDOMWindow) + + +dOMDOMWindowGetSelf :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMDOMWindow -- result +dOMDOMWindowGetSelf _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_self _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_self" result + result' <- (wrapObject DOMDOMWindow) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetSelfMethodInfo +instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetSelfMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetSelf + +-- method DOMDOMWindow::get_session_storage +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMStorage" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_session_storage" webkit_dom_dom_window_get_session_storage :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Ptr (Ptr GError) -> -- error + IO (Ptr DOMStorage) + + +dOMDOMWindowGetSessionStorage :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMStorage -- result +dOMDOMWindowGetSessionStorage _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + onException (do + result <- propagateGError $ webkit_dom_dom_window_get_session_storage _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_session_storage" result + result' <- (wrapObject DOMStorage) result + touchManagedPtr _obj + return result' + ) (do + return () + ) + +data DOMDOMWindowGetSessionStorageMethodInfo +instance (signature ~ (m DOMStorage), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetSessionStorageMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetSessionStorage + +-- method DOMDOMWindow::get_status +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_status" webkit_dom_dom_window_get_status :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO CString + + +dOMDOMWindowGetStatus :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m T.Text -- result +dOMDOMWindowGetStatus _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_status _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_status" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetStatusMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetStatusMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetStatus + +-- method DOMDOMWindow::get_statusbar +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMBarProp" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_statusbar" webkit_dom_dom_window_get_statusbar :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMBarProp) + + +dOMDOMWindowGetStatusbar :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMBarProp -- result +dOMDOMWindowGetStatusbar _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_statusbar _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_statusbar" result + result' <- (wrapObject DOMBarProp) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetStatusbarMethodInfo +instance (signature ~ (m DOMBarProp), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetStatusbarMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetStatusbar + +-- method DOMDOMWindow::get_style_media +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMStyleMedia" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_style_media" webkit_dom_dom_window_get_style_media :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMStyleMedia) + + +dOMDOMWindowGetStyleMedia :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMStyleMedia -- result +dOMDOMWindowGetStyleMedia _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_style_media _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_style_media" result + result' <- (wrapObject DOMStyleMedia) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetStyleMediaMethodInfo +instance (signature ~ (m DOMStyleMedia), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetStyleMediaMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetStyleMedia + +-- method DOMDOMWindow::get_toolbar +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMBarProp" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_toolbar" webkit_dom_dom_window_get_toolbar :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMBarProp) + + +dOMDOMWindowGetToolbar :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMBarProp -- result +dOMDOMWindowGetToolbar _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_toolbar _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_toolbar" result + result' <- (wrapObject DOMBarProp) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetToolbarMethodInfo +instance (signature ~ (m DOMBarProp), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetToolbarMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetToolbar + +-- method DOMDOMWindow::get_top +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMWindow" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_top" webkit_dom_dom_window_get_top :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMDOMWindow) + + +dOMDOMWindowGetTop :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMDOMWindow -- result +dOMDOMWindowGetTop _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_top _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_top" result + result' <- (wrapObject DOMDOMWindow) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetTopMethodInfo +instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetTopMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetTop + +-- method DOMDOMWindow::get_webkit_storage_info +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMStorageInfo" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_webkit_storage_info" webkit_dom_dom_window_get_webkit_storage_info :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMStorageInfo) + + +dOMDOMWindowGetWebkitStorageInfo :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMStorageInfo -- result +dOMDOMWindowGetWebkitStorageInfo _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_webkit_storage_info _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_webkit_storage_info" result + result' <- (newObject DOMStorageInfo) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetWebkitStorageInfoMethodInfo +instance (signature ~ (m DOMStorageInfo), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetWebkitStorageInfoMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetWebkitStorageInfo + +-- method DOMDOMWindow::get_window +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMWindow" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_get_window" webkit_dom_dom_window_get_window :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO (Ptr DOMDOMWindow) + + +dOMDOMWindowGetWindow :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m DOMDOMWindow -- result +dOMDOMWindowGetWindow _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_dom_window_get_window _obj' + checkUnexpectedReturnNULL "webkit_dom_dom_window_get_window" result + result' <- (wrapObject DOMDOMWindow) result + touchManagedPtr _obj + return result' + +data DOMDOMWindowGetWindowMethodInfo +instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowGetWindowMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowGetWindow + +-- method DOMDOMWindow::match_media +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "query", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMMediaQueryList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_match_media" webkit_dom_dom_window_match_media :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CString -> -- query : TBasicType TUTF8 + IO (Ptr DOMMediaQueryList) + + +dOMDOMWindowMatchMedia :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> T.Text -- query + -> m DOMMediaQueryList -- result +dOMDOMWindowMatchMedia _obj query = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + query' <- textToCString query + result <- webkit_dom_dom_window_match_media _obj' query' + checkUnexpectedReturnNULL "webkit_dom_dom_window_match_media" result + result' <- (wrapObject DOMMediaQueryList) result + touchManagedPtr _obj + freeMem query' + return result' + +data DOMDOMWindowMatchMediaMethodInfo +instance (signature ~ (T.Text -> m DOMMediaQueryList), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowMatchMediaMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowMatchMedia + +-- method DOMDOMWindow::move_by +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_move_by" webkit_dom_dom_window_move_by :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CFloat -> -- x : TBasicType TFloat + CFloat -> -- y : TBasicType TFloat + IO () + + +dOMDOMWindowMoveBy :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Float -- x + -> Float -- y + -> m () -- result +dOMDOMWindowMoveBy _obj x y = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let x' = realToFrac x + let y' = realToFrac y + webkit_dom_dom_window_move_by _obj' x' y' + touchManagedPtr _obj + return () + +data DOMDOMWindowMoveByMethodInfo +instance (signature ~ (Float -> Float -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowMoveByMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowMoveBy + +-- method DOMDOMWindow::move_to +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_move_to" webkit_dom_dom_window_move_to :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CFloat -> -- x : TBasicType TFloat + CFloat -> -- y : TBasicType TFloat + IO () + + +dOMDOMWindowMoveTo :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Float -- x + -> Float -- y + -> m () -- result +dOMDOMWindowMoveTo _obj x y = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let x' = realToFrac x + let y' = realToFrac y + webkit_dom_dom_window_move_to _obj' x' y' + touchManagedPtr _obj + return () + +data DOMDOMWindowMoveToMethodInfo +instance (signature ~ (Float -> Float -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowMoveToMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowMoveTo + +-- method DOMDOMWindow::print +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_print" webkit_dom_dom_window_print :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO () + + +dOMDOMWindowPrint :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m () -- result +dOMDOMWindowPrint _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_print _obj' + touchManagedPtr _obj + return () + +data DOMDOMWindowPrintMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowPrintMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowPrint + +-- method DOMDOMWindow::prompt +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "message", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "defaultValue", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_prompt" webkit_dom_dom_window_prompt :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CString -> -- message : TBasicType TUTF8 + CString -> -- defaultValue : TBasicType TUTF8 + IO CString + + +dOMDOMWindowPrompt :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> T.Text -- message + -> T.Text -- defaultValue + -> m T.Text -- result +dOMDOMWindowPrompt _obj message defaultValue = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + message' <- textToCString message + defaultValue' <- textToCString defaultValue + result <- webkit_dom_dom_window_prompt _obj' message' defaultValue' + checkUnexpectedReturnNULL "webkit_dom_dom_window_prompt" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + freeMem message' + freeMem defaultValue' + return result' + +data DOMDOMWindowPromptMethodInfo +instance (signature ~ (T.Text -> T.Text -> m T.Text), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowPromptMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowPrompt + +-- method DOMDOMWindow::release_events +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_release_events" webkit_dom_dom_window_release_events :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO () + + +dOMDOMWindowReleaseEvents :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m () -- result +dOMDOMWindowReleaseEvents _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_release_events _obj' + touchManagedPtr _obj + return () + +data DOMDOMWindowReleaseEventsMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowReleaseEventsMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowReleaseEvents + +-- method DOMDOMWindow::resize_by +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_resize_by" webkit_dom_dom_window_resize_by :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CFloat -> -- x : TBasicType TFloat + CFloat -> -- y : TBasicType TFloat + IO () + + +dOMDOMWindowResizeBy :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Float -- x + -> Float -- y + -> m () -- result +dOMDOMWindowResizeBy _obj x y = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let x' = realToFrac x + let y' = realToFrac y + webkit_dom_dom_window_resize_by _obj' x' y' + touchManagedPtr _obj + return () + +data DOMDOMWindowResizeByMethodInfo +instance (signature ~ (Float -> Float -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowResizeByMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowResizeBy + +-- method DOMDOMWindow::resize_to +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "width", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "height", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_resize_to" webkit_dom_dom_window_resize_to :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CFloat -> -- width : TBasicType TFloat + CFloat -> -- height : TBasicType TFloat + IO () + + +dOMDOMWindowResizeTo :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Float -- width + -> Float -- height + -> m () -- result +dOMDOMWindowResizeTo _obj width height = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let width' = realToFrac width + let height' = realToFrac height + webkit_dom_dom_window_resize_to _obj' width' height' + touchManagedPtr _obj + return () + +data DOMDOMWindowResizeToMethodInfo +instance (signature ~ (Float -> Float -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowResizeToMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowResizeTo + +-- method DOMDOMWindow::scroll +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_scroll" webkit_dom_dom_window_scroll :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Int64 -> -- x : TBasicType TInt64 + Int64 -> -- y : TBasicType TInt64 + IO () + + +dOMDOMWindowScroll :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Int64 -- x + -> Int64 -- y + -> m () -- result +dOMDOMWindowScroll _obj x y = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_scroll _obj' x y + touchManagedPtr _obj + return () + +data DOMDOMWindowScrollMethodInfo +instance (signature ~ (Int64 -> Int64 -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowScrollMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowScroll + +-- method DOMDOMWindow::scroll_by +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_scroll_by" webkit_dom_dom_window_scroll_by :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Int64 -> -- x : TBasicType TInt64 + Int64 -> -- y : TBasicType TInt64 + IO () + + +dOMDOMWindowScrollBy :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Int64 -- x + -> Int64 -- y + -> m () -- result +dOMDOMWindowScrollBy _obj x y = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_scroll_by _obj' x y + touchManagedPtr _obj + return () + +data DOMDOMWindowScrollByMethodInfo +instance (signature ~ (Int64 -> Int64 -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowScrollByMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowScrollBy + +-- method DOMDOMWindow::scroll_to +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_scroll_to" webkit_dom_dom_window_scroll_to :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Int64 -> -- x : TBasicType TInt64 + Int64 -> -- y : TBasicType TInt64 + IO () + + +dOMDOMWindowScrollTo :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Int64 -- x + -> Int64 -- y + -> m () -- result +dOMDOMWindowScrollTo _obj x y = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_scroll_to _obj' x y + touchManagedPtr _obj + return () + +data DOMDOMWindowScrollToMethodInfo +instance (signature ~ (Int64 -> Int64 -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowScrollToMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowScrollTo + +-- method DOMDOMWindow::set_default_status +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_set_default_status" webkit_dom_dom_window_set_default_status :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMDOMWindowSetDefaultStatus :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMDOMWindowSetDefaultStatus _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_dom_window_set_default_status _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMDOMWindowSetDefaultStatusMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowSetDefaultStatusMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowSetDefaultStatus + +-- method DOMDOMWindow::set_name +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_set_name" webkit_dom_dom_window_set_name :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMDOMWindowSetName :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMDOMWindowSetName _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_dom_window_set_name _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMDOMWindowSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowSetNameMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowSetName + +-- method DOMDOMWindow::set_status +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_set_status" webkit_dom_dom_window_set_status :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMDOMWindowSetStatus :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMDOMWindowSetStatus _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_dom_window_set_status _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMDOMWindowSetStatusMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowSetStatusMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowSetStatus + +-- method DOMDOMWindow::stop +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_stop" webkit_dom_dom_window_stop :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + IO () + + +dOMDOMWindowStop :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> m () -- result +dOMDOMWindowStop _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_stop _obj' + touchManagedPtr _obj + return () + +data DOMDOMWindowStopMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowStopMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowStop + +-- method DOMDOMWindow::webkit_cancel_animation_frame +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_webkit_cancel_animation_frame" webkit_dom_dom_window_webkit_cancel_animation_frame :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Int64 -> -- id : TBasicType TInt64 + IO () + + +dOMDOMWindowWebkitCancelAnimationFrame :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Int64 -- id + -> m () -- result +dOMDOMWindowWebkitCancelAnimationFrame _obj id = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_webkit_cancel_animation_frame _obj' id + touchManagedPtr _obj + return () + +data DOMDOMWindowWebkitCancelAnimationFrameMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowWebkitCancelAnimationFrameMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowWebkitCancelAnimationFrame + +-- method DOMDOMWindow::webkit_cancel_request_animation_frame +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "id", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_webkit_cancel_request_animation_frame" webkit_dom_dom_window_webkit_cancel_request_animation_frame :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Int64 -> -- id : TBasicType TInt64 + IO () + + +dOMDOMWindowWebkitCancelRequestAnimationFrame :: + (MonadIO m, DOMDOMWindowK a) => + a -- _obj + -> Int64 -- id + -> m () -- result +dOMDOMWindowWebkitCancelRequestAnimationFrame _obj id = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_dom_window_webkit_cancel_request_animation_frame _obj' id + touchManagedPtr _obj + return () + +data DOMDOMWindowWebkitCancelRequestAnimationFrameMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMDOMWindowK a) => MethodInfo DOMDOMWindowWebkitCancelRequestAnimationFrameMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowWebkitCancelRequestAnimationFrame + +-- method DOMDOMWindow::webkit_convert_point_from_node_to_page +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "p", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMWebKitPoint" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_webkit_convert_point_from_node_to_page" webkit_dom_dom_window_webkit_convert_point_from_node_to_page :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Ptr DOMNode -> -- node : TInterface "WebKit" "DOMNode" + Ptr DOMWebKitPoint -> -- p : TInterface "WebKit" "DOMWebKitPoint" + IO (Ptr DOMWebKitPoint) + + +dOMDOMWindowWebkitConvertPointFromNodeToPage :: + (MonadIO m, DOMDOMWindowK a, DOMNodeK b, DOMWebKitPointK c) => + a -- _obj + -> b -- node + -> c -- p + -> m DOMWebKitPoint -- result +dOMDOMWindowWebkitConvertPointFromNodeToPage _obj node p = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let node' = unsafeManagedPtrCastPtr node + let p' = unsafeManagedPtrCastPtr p + result <- webkit_dom_dom_window_webkit_convert_point_from_node_to_page _obj' node' p' + checkUnexpectedReturnNULL "webkit_dom_dom_window_webkit_convert_point_from_node_to_page" result + result' <- (wrapObject DOMWebKitPoint) result + touchManagedPtr _obj + touchManagedPtr node + touchManagedPtr p + return result' + +data DOMDOMWindowWebkitConvertPointFromNodeToPageMethodInfo +instance (signature ~ (b -> c -> m DOMWebKitPoint), MonadIO m, DOMDOMWindowK a, DOMNodeK b, DOMWebKitPointK c) => MethodInfo DOMDOMWindowWebkitConvertPointFromNodeToPageMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowWebkitConvertPointFromNodeToPage + +-- method DOMDOMWindow::webkit_convert_point_from_page_to_node +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "p", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMWebKitPoint" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_dom_window_webkit_convert_point_from_page_to_node" webkit_dom_dom_window_webkit_convert_point_from_page_to_node :: + Ptr DOMDOMWindow -> -- _obj : TInterface "WebKit" "DOMDOMWindow" + Ptr DOMNode -> -- node : TInterface "WebKit" "DOMNode" + Ptr DOMWebKitPoint -> -- p : TInterface "WebKit" "DOMWebKitPoint" + IO (Ptr DOMWebKitPoint) + + +dOMDOMWindowWebkitConvertPointFromPageToNode :: + (MonadIO m, DOMDOMWindowK a, DOMNodeK b, DOMWebKitPointK c) => + a -- _obj + -> b -- node + -> c -- p + -> m DOMWebKitPoint -- result +dOMDOMWindowWebkitConvertPointFromPageToNode _obj node p = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let node' = unsafeManagedPtrCastPtr node + let p' = unsafeManagedPtrCastPtr p + result <- webkit_dom_dom_window_webkit_convert_point_from_page_to_node _obj' node' p' + checkUnexpectedReturnNULL "webkit_dom_dom_window_webkit_convert_point_from_page_to_node" result + result' <- (wrapObject DOMWebKitPoint) result + touchManagedPtr _obj + touchManagedPtr node + touchManagedPtr p + return result' + +data DOMDOMWindowWebkitConvertPointFromPageToNodeMethodInfo +instance (signature ~ (b -> c -> m DOMWebKitPoint), MonadIO m, DOMDOMWindowK a, DOMNodeK b, DOMWebKitPointK c) => MethodInfo DOMDOMWindowWebkitConvertPointFromPageToNodeMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowWebkitConvertPointFromPageToNode diff --git a/GI/WebKit/Objects/DOMDOMWindow.hs-boot b/GI/WebKit/Objects/DOMDOMWindow.hs-boot --- a/GI/WebKit/Objects/DOMDOMWindow.hs-boot +++ b/GI/WebKit/Objects/DOMDOMWindow.hs-boot @@ -56,3 +56,82 @@ data DOMDOMWindowTopPropertyInfo data DOMDOMWindowWebkitStorageInfoPropertyInfo data DOMDOMWindowWindowPropertyInfo +data DOMDOMWindowAlertMethodInfo +data DOMDOMWindowAtobMethodInfo +data DOMDOMWindowBlurMethodInfo +data DOMDOMWindowBtoaMethodInfo +data DOMDOMWindowCancelAnimationFrameMethodInfo +data DOMDOMWindowCaptureEventsMethodInfo +data DOMDOMWindowClearIntervalMethodInfo +data DOMDOMWindowClearTimeoutMethodInfo +data DOMDOMWindowCloseMethodInfo +data DOMDOMWindowConfirmMethodInfo +data DOMDOMWindowDispatchEventMethodInfo +data DOMDOMWindowFindMethodInfo +data DOMDOMWindowFocusMethodInfo +data DOMDOMWindowGetApplicationCacheMethodInfo +data DOMDOMWindowGetClientInformationMethodInfo +data DOMDOMWindowGetClosedMethodInfo +data DOMDOMWindowGetComputedStyleMethodInfo +data DOMDOMWindowGetConsoleMethodInfo +data DOMDOMWindowGetCssMethodInfo +data DOMDOMWindowGetDefaultStatusMethodInfo +data DOMDOMWindowGetDevicePixelRatioMethodInfo +data DOMDOMWindowGetDocumentMethodInfo +data DOMDOMWindowGetFrameElementMethodInfo +data DOMDOMWindowGetFramesMethodInfo +data DOMDOMWindowGetHistoryMethodInfo +data DOMDOMWindowGetInnerHeightMethodInfo +data DOMDOMWindowGetInnerWidthMethodInfo +data DOMDOMWindowGetLengthMethodInfo +data DOMDOMWindowGetLocalStorageMethodInfo +data DOMDOMWindowGetLocationbarMethodInfo +data DOMDOMWindowGetMenubarMethodInfo +data DOMDOMWindowGetNameMethodInfo +data DOMDOMWindowGetNavigatorMethodInfo +data DOMDOMWindowGetOffscreenBufferingMethodInfo +data DOMDOMWindowGetOpenerMethodInfo +data DOMDOMWindowGetOuterHeightMethodInfo +data DOMDOMWindowGetOuterWidthMethodInfo +data DOMDOMWindowGetPageXOffsetMethodInfo +data DOMDOMWindowGetPageYOffsetMethodInfo +data DOMDOMWindowGetParentMethodInfo +data DOMDOMWindowGetPerformanceMethodInfo +data DOMDOMWindowGetPersonalbarMethodInfo +data DOMDOMWindowGetScreenMethodInfo +data DOMDOMWindowGetScreenLeftMethodInfo +data DOMDOMWindowGetScreenTopMethodInfo +data DOMDOMWindowGetScreenXMethodInfo +data DOMDOMWindowGetScreenYMethodInfo +data DOMDOMWindowGetScrollXMethodInfo +data DOMDOMWindowGetScrollYMethodInfo +data DOMDOMWindowGetScrollbarsMethodInfo +data DOMDOMWindowGetSelectionMethodInfo +data DOMDOMWindowGetSelfMethodInfo +data DOMDOMWindowGetSessionStorageMethodInfo +data DOMDOMWindowGetStatusMethodInfo +data DOMDOMWindowGetStatusbarMethodInfo +data DOMDOMWindowGetStyleMediaMethodInfo +data DOMDOMWindowGetToolbarMethodInfo +data DOMDOMWindowGetTopMethodInfo +data DOMDOMWindowGetWebkitStorageInfoMethodInfo +data DOMDOMWindowGetWindowMethodInfo +data DOMDOMWindowMatchMediaMethodInfo +data DOMDOMWindowMoveByMethodInfo +data DOMDOMWindowMoveToMethodInfo +data DOMDOMWindowPrintMethodInfo +data DOMDOMWindowPromptMethodInfo +data DOMDOMWindowReleaseEventsMethodInfo +data DOMDOMWindowResizeByMethodInfo +data DOMDOMWindowResizeToMethodInfo +data DOMDOMWindowScrollMethodInfo +data DOMDOMWindowScrollByMethodInfo +data DOMDOMWindowScrollToMethodInfo +data DOMDOMWindowSetDefaultStatusMethodInfo +data DOMDOMWindowSetNameMethodInfo +data DOMDOMWindowSetStatusMethodInfo +data DOMDOMWindowStopMethodInfo +data DOMDOMWindowWebkitCancelAnimationFrameMethodInfo +data DOMDOMWindowWebkitCancelRequestAnimationFrameMethodInfo +data DOMDOMWindowWebkitConvertPointFromNodeToPageMethodInfo +data DOMDOMWindowWebkitConvertPointFromPageToNodeMethodInfo diff --git a/GI/WebKit/Objects/DOMDOMWindowCSS.hs b/GI/WebKit/Objects/DOMDOMWindowCSS.hs --- a/GI/WebKit/Objects/DOMDOMWindowCSS.hs +++ b/GI/WebKit/Objects/DOMDOMWindowCSS.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** dOMDOMWindowCSSSupports + DOMDOMWindowCSSSupportsMethodInfo , dOMDOMWindowCSSSupports , @@ -56,17 +58,50 @@ noDOMDOMWindowCSS :: Maybe DOMDOMWindowCSS noDOMDOMWindowCSS = Nothing +type family ResolveDOMDOMWindowCSSMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDOMWindowCSSMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDOMWindowCSSMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDOMWindowCSSMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDOMWindowCSSMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDOMWindowCSSMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDOMWindowCSSMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDOMWindowCSSMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDOMWindowCSSMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDOMWindowCSSMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDOMWindowCSSMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDOMWindowCSSMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDOMWindowCSSMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDOMWindowCSSMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDOMWindowCSSMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDOMWindowCSSMethod "supports" o = DOMDOMWindowCSSSupportsMethodInfo + ResolveDOMDOMWindowCSSMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDOMWindowCSSMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDOMWindowCSSMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDOMWindowCSSMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDOMWindowCSSMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDOMWindowCSSMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDOMWindowCSSMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDOMWindowCSSMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDOMWindowCSSMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDOMWindowCSSMethod t DOMDOMWindowCSS, MethodInfo info DOMDOMWindowCSS p) => IsLabelProxy t (DOMDOMWindowCSS -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDOMWindowCSSMethod t DOMDOMWindowCSS, MethodInfo info DOMDOMWindowCSS p) => IsLabel t (DOMDOMWindowCSS -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMDOMWindowCSS = DOMDOMWindowCSSAttributeList -type DOMDOMWindowCSSAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMDOMWindowCSSAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDOMWindowCSS = DOMDOMWindowCSSSignalList -type DOMDOMWindowCSSSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDOMWindowCSSSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDOMWindowCSS::supports -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindowCSS", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "property", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDOMWindowCSS", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "property", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDOMWindowCSS", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "property", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -80,10 +115,10 @@ dOMDOMWindowCSSSupports :: (MonadIO m, DOMDOMWindowCSSK a) => - a -> -- _obj - T.Text -> -- property - T.Text -> -- value - m Bool + a -- _obj + -> T.Text -- property + -> T.Text -- value + -> m Bool -- result dOMDOMWindowCSSSupports _obj property value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj property' <- textToCString property @@ -94,5 +129,9 @@ freeMem property' freeMem value' return result' + +data DOMDOMWindowCSSSupportsMethodInfo +instance (signature ~ (T.Text -> T.Text -> m Bool), MonadIO m, DOMDOMWindowCSSK a) => MethodInfo DOMDOMWindowCSSSupportsMethodInfo a signature where + overloadedMethod _ = dOMDOMWindowCSSSupports diff --git a/GI/WebKit/Objects/DOMDOMWindowCSS.hs-boot b/GI/WebKit/Objects/DOMDOMWindowCSS.hs-boot --- a/GI/WebKit/Objects/DOMDOMWindowCSS.hs-boot +++ b/GI/WebKit/Objects/DOMDOMWindowCSS.hs-boot @@ -11,3 +11,4 @@ instance GObject DOMDOMWindowCSS where class GObject o => DOMDOMWindowCSSK o instance (GObject o, IsDescendantOf DOMDOMWindowCSS o) => DOMDOMWindowCSSK o +data DOMDOMWindowCSSSupportsMethodInfo diff --git a/GI/WebKit/Objects/DOMDatabase.hs b/GI/WebKit/Objects/DOMDatabase.hs --- a/GI/WebKit/Objects/DOMDatabase.hs +++ b/GI/WebKit/Objects/DOMDatabase.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** dOMDatabaseGetVersion + DOMDatabaseGetVersionMethodInfo , dOMDatabaseGetVersion , @@ -64,6 +66,40 @@ noDOMDatabase :: Maybe DOMDatabase noDOMDatabase = Nothing +type family ResolveDOMDatabaseMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDatabaseMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDatabaseMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDatabaseMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDatabaseMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDatabaseMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDatabaseMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDatabaseMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDatabaseMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDatabaseMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDatabaseMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDatabaseMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDatabaseMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDatabaseMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDatabaseMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDatabaseMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDatabaseMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDatabaseMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDatabaseMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDatabaseMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDatabaseMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDatabaseMethod "getVersion" o = DOMDatabaseGetVersionMethodInfo + ResolveDOMDatabaseMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDatabaseMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDatabaseMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDatabaseMethod t DOMDatabase, MethodInfo info DOMDatabase p) => IsLabelProxy t (DOMDatabase -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDatabaseMethod t DOMDatabase, MethodInfo info DOMDatabase p) => IsLabel t (DOMDatabase -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "version" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -77,22 +113,21 @@ type AttrSetTypeConstraint DOMDatabaseVersionPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDatabaseVersionPropertyInfo = DOMDatabaseK type AttrGetType DOMDatabaseVersionPropertyInfo = T.Text - type AttrLabel DOMDatabaseVersionPropertyInfo = "DOMDatabase::version" + type AttrLabel DOMDatabaseVersionPropertyInfo = "version" attrGet _ = getDOMDatabaseVersion attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDatabase = DOMDatabaseAttributeList -type DOMDatabaseAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("version", DOMDatabaseVersionPropertyInfo)] :: [(Symbol, *)]) +type DOMDatabaseAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("version", DOMDatabaseVersionPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDatabase = DOMDatabaseSignalList -type DOMDatabaseSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDatabaseSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDatabase::get_version -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -104,8 +139,8 @@ dOMDatabaseGetVersion :: (MonadIO m, DOMDatabaseK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMDatabaseGetVersion _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_database_get_version _obj' @@ -114,5 +149,9 @@ freeMem result touchManagedPtr _obj return result' + +data DOMDatabaseGetVersionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDatabaseK a) => MethodInfo DOMDatabaseGetVersionMethodInfo a signature where + overloadedMethod _ = dOMDatabaseGetVersion diff --git a/GI/WebKit/Objects/DOMDatabase.hs-boot b/GI/WebKit/Objects/DOMDatabase.hs-boot --- a/GI/WebKit/Objects/DOMDatabase.hs-boot +++ b/GI/WebKit/Objects/DOMDatabase.hs-boot @@ -12,3 +12,4 @@ class GObject o => DOMDatabaseK o instance (GObject o, IsDescendantOf DOMDatabase o) => DOMDatabaseK o data DOMDatabaseVersionPropertyInfo +data DOMDatabaseGetVersionMethodInfo diff --git a/GI/WebKit/Objects/DOMDocument.hs b/GI/WebKit/Objects/DOMDocument.hs --- a/GI/WebKit/Objects/DOMDocument.hs +++ b/GI/WebKit/Objects/DOMDocument.hs @@ -1,4151 +1,4678 @@ -{- | -Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte -License : LGPL-2.1 -Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) --} - -module GI.WebKit.Objects.DOMDocument - ( - --- * Exported types - DOMDocument(..) , - DOMDocumentK , - toDOMDocument , - noDOMDocument , - - - -- * Methods --- ** dOMDocumentAdoptNode - dOMDocumentAdoptNode , - - --- ** dOMDocumentCaretRangeFromPoint - dOMDocumentCaretRangeFromPoint , - - --- ** dOMDocumentCreateAttribute - dOMDocumentCreateAttribute , - - --- ** dOMDocumentCreateAttributeNs - dOMDocumentCreateAttributeNs , - - --- ** dOMDocumentCreateCdataSection - dOMDocumentCreateCdataSection , - - --- ** dOMDocumentCreateComment - dOMDocumentCreateComment , - - --- ** dOMDocumentCreateCssStyleDeclaration - dOMDocumentCreateCssStyleDeclaration , - - --- ** dOMDocumentCreateDocumentFragment - dOMDocumentCreateDocumentFragment , - - --- ** dOMDocumentCreateElement - dOMDocumentCreateElement , - - --- ** dOMDocumentCreateElementNs - dOMDocumentCreateElementNs , - - --- ** dOMDocumentCreateEntityReference - dOMDocumentCreateEntityReference , - - --- ** dOMDocumentCreateEvent - dOMDocumentCreateEvent , - - --- ** dOMDocumentCreateExpression - dOMDocumentCreateExpression , - - --- ** dOMDocumentCreateNodeIterator - dOMDocumentCreateNodeIterator , - - --- ** dOMDocumentCreateNsResolver - dOMDocumentCreateNsResolver , - - --- ** dOMDocumentCreateProcessingInstruction - dOMDocumentCreateProcessingInstruction , - - --- ** dOMDocumentCreateRange - dOMDocumentCreateRange , - - --- ** dOMDocumentCreateTextNode - dOMDocumentCreateTextNode , - - --- ** dOMDocumentCreateTouch - dOMDocumentCreateTouch , - - --- ** dOMDocumentCreateTreeWalker - dOMDocumentCreateTreeWalker , - - --- ** dOMDocumentElementFromPoint - dOMDocumentElementFromPoint , - - --- ** dOMDocumentEvaluate - dOMDocumentEvaluate , - - --- ** dOMDocumentExecCommand - dOMDocumentExecCommand , - - --- ** dOMDocumentGetAnchors - dOMDocumentGetAnchors , - - --- ** dOMDocumentGetApplets - dOMDocumentGetApplets , - - --- ** dOMDocumentGetBody - dOMDocumentGetBody , - - --- ** dOMDocumentGetCharacterSet - dOMDocumentGetCharacterSet , - - --- ** dOMDocumentGetCharset - dOMDocumentGetCharset , - - --- ** dOMDocumentGetCompatMode - dOMDocumentGetCompatMode , - - --- ** dOMDocumentGetCookie - dOMDocumentGetCookie , - - --- ** dOMDocumentGetCurrentScript - dOMDocumentGetCurrentScript , - - --- ** dOMDocumentGetDefaultCharset - dOMDocumentGetDefaultCharset , - - --- ** dOMDocumentGetDefaultView - dOMDocumentGetDefaultView , - - --- ** dOMDocumentGetDoctype - dOMDocumentGetDoctype , - - --- ** dOMDocumentGetDocumentElement - dOMDocumentGetDocumentElement , - - --- ** dOMDocumentGetDocumentUri - dOMDocumentGetDocumentUri , - - --- ** dOMDocumentGetDomain - dOMDocumentGetDomain , - - --- ** dOMDocumentGetElementById - dOMDocumentGetElementById , - - --- ** dOMDocumentGetElementsByClassName - dOMDocumentGetElementsByClassName , - - --- ** dOMDocumentGetElementsByName - dOMDocumentGetElementsByName , - - --- ** dOMDocumentGetElementsByTagName - dOMDocumentGetElementsByTagName , - - --- ** dOMDocumentGetElementsByTagNameNs - dOMDocumentGetElementsByTagNameNs , - - --- ** dOMDocumentGetForms - dOMDocumentGetForms , - - --- ** dOMDocumentGetHead - dOMDocumentGetHead , - - --- ** dOMDocumentGetHidden - dOMDocumentGetHidden , - - --- ** dOMDocumentGetImages - dOMDocumentGetImages , - - --- ** dOMDocumentGetImplementation - dOMDocumentGetImplementation , - - --- ** dOMDocumentGetInputEncoding - dOMDocumentGetInputEncoding , - - --- ** dOMDocumentGetLastModified - dOMDocumentGetLastModified , - - --- ** dOMDocumentGetLinks - dOMDocumentGetLinks , - - --- ** dOMDocumentGetOverrideStyle - dOMDocumentGetOverrideStyle , - - --- ** dOMDocumentGetPreferredStylesheetSet - dOMDocumentGetPreferredStylesheetSet , - - --- ** dOMDocumentGetReadyState - dOMDocumentGetReadyState , - - --- ** dOMDocumentGetReferrer - dOMDocumentGetReferrer , - - --- ** dOMDocumentGetSecurityPolicy - dOMDocumentGetSecurityPolicy , - - --- ** dOMDocumentGetSelectedStylesheetSet - dOMDocumentGetSelectedStylesheetSet , - - --- ** dOMDocumentGetStyleSheets - dOMDocumentGetStyleSheets , - - --- ** dOMDocumentGetTitle - dOMDocumentGetTitle , - - --- ** dOMDocumentGetUrl - dOMDocumentGetUrl , - - --- ** dOMDocumentGetVisibilityState - dOMDocumentGetVisibilityState , - - --- ** dOMDocumentGetWebkitCurrentFullScreenElement - dOMDocumentGetWebkitCurrentFullScreenElement, - - --- ** dOMDocumentGetWebkitFullScreenKeyboardInputAllowed - dOMDocumentGetWebkitFullScreenKeyboardInputAllowed, - - --- ** dOMDocumentGetWebkitFullscreenElement - dOMDocumentGetWebkitFullscreenElement , - - --- ** dOMDocumentGetWebkitFullscreenEnabled - dOMDocumentGetWebkitFullscreenEnabled , - - --- ** dOMDocumentGetWebkitHidden - dOMDocumentGetWebkitHidden , - - --- ** dOMDocumentGetWebkitIsFullScreen - dOMDocumentGetWebkitIsFullScreen , - - --- ** dOMDocumentGetWebkitPointerLockElement - dOMDocumentGetWebkitPointerLockElement , - - --- ** dOMDocumentGetWebkitVisibilityState - dOMDocumentGetWebkitVisibilityState , - - --- ** dOMDocumentGetXmlEncoding - dOMDocumentGetXmlEncoding , - - --- ** dOMDocumentGetXmlStandalone - dOMDocumentGetXmlStandalone , - - --- ** dOMDocumentGetXmlVersion - dOMDocumentGetXmlVersion , - - --- ** dOMDocumentImportNode - dOMDocumentImportNode , - - --- ** dOMDocumentQueryCommandEnabled - dOMDocumentQueryCommandEnabled , - - --- ** dOMDocumentQueryCommandIndeterm - dOMDocumentQueryCommandIndeterm , - - --- ** dOMDocumentQueryCommandState - dOMDocumentQueryCommandState , - - --- ** dOMDocumentQueryCommandSupported - dOMDocumentQueryCommandSupported , - - --- ** dOMDocumentQueryCommandValue - dOMDocumentQueryCommandValue , - - --- ** dOMDocumentQuerySelector - dOMDocumentQuerySelector , - - --- ** dOMDocumentQuerySelectorAll - dOMDocumentQuerySelectorAll , - - --- ** dOMDocumentSetBody - dOMDocumentSetBody , - - --- ** dOMDocumentSetCharset - dOMDocumentSetCharset , - - --- ** dOMDocumentSetCookie - dOMDocumentSetCookie , - - --- ** dOMDocumentSetDocumentUri - dOMDocumentSetDocumentUri , - - --- ** dOMDocumentSetSelectedStylesheetSet - dOMDocumentSetSelectedStylesheetSet , - - --- ** dOMDocumentSetTitle - dOMDocumentSetTitle , - - --- ** dOMDocumentSetXmlStandalone - dOMDocumentSetXmlStandalone , - - --- ** dOMDocumentSetXmlVersion - dOMDocumentSetXmlVersion , - - --- ** dOMDocumentWebkitCancelFullScreen - dOMDocumentWebkitCancelFullScreen , - - --- ** dOMDocumentWebkitExitFullscreen - dOMDocumentWebkitExitFullscreen , - - --- ** dOMDocumentWebkitExitPointerLock - dOMDocumentWebkitExitPointerLock , - - --- ** dOMDocumentWebkitGetNamedFlows - dOMDocumentWebkitGetNamedFlows , - - - - - -- * Properties --- ** Anchors - DOMDocumentAnchorsPropertyInfo , - getDOMDocumentAnchors , - - --- ** Applets - DOMDocumentAppletsPropertyInfo , - getDOMDocumentApplets , - - --- ** Body - DOMDocumentBodyPropertyInfo , - getDOMDocumentBody , - - --- ** CharacterSet - DOMDocumentCharacterSetPropertyInfo , - getDOMDocumentCharacterSet , - - --- ** Charset - DOMDocumentCharsetPropertyInfo , - constructDOMDocumentCharset , - getDOMDocumentCharset , - setDOMDocumentCharset , - - --- ** CompatMode - DOMDocumentCompatModePropertyInfo , - getDOMDocumentCompatMode , - - --- ** Cookie - DOMDocumentCookiePropertyInfo , - constructDOMDocumentCookie , - getDOMDocumentCookie , - setDOMDocumentCookie , - - --- ** CurrentScript - DOMDocumentCurrentScriptPropertyInfo , - getDOMDocumentCurrentScript , - - --- ** DefaultCharset - DOMDocumentDefaultCharsetPropertyInfo , - getDOMDocumentDefaultCharset , - - --- ** DefaultView - DOMDocumentDefaultViewPropertyInfo , - getDOMDocumentDefaultView , - - --- ** Doctype - DOMDocumentDoctypePropertyInfo , - getDOMDocumentDoctype , - - --- ** DocumentElement - DOMDocumentDocumentElementPropertyInfo , - getDOMDocumentDocumentElement , - - --- ** DocumentUri - DOMDocumentDocumentUriPropertyInfo , - constructDOMDocumentDocumentUri , - getDOMDocumentDocumentUri , - setDOMDocumentDocumentUri , - - --- ** Domain - DOMDocumentDomainPropertyInfo , - getDOMDocumentDomain , - - --- ** Forms - DOMDocumentFormsPropertyInfo , - getDOMDocumentForms , - - --- ** Head - DOMDocumentHeadPropertyInfo , - getDOMDocumentHead , - - --- ** Hidden - DOMDocumentHiddenPropertyInfo , - getDOMDocumentHidden , - - --- ** Images - DOMDocumentImagesPropertyInfo , - getDOMDocumentImages , - - --- ** Implementation - DOMDocumentImplementationPropertyInfo , - getDOMDocumentImplementation , - - --- ** InputEncoding - DOMDocumentInputEncodingPropertyInfo , - getDOMDocumentInputEncoding , - - --- ** LastModified - DOMDocumentLastModifiedPropertyInfo , - getDOMDocumentLastModified , - - --- ** Links - DOMDocumentLinksPropertyInfo , - getDOMDocumentLinks , - - --- ** PreferredStylesheetSet - DOMDocumentPreferredStylesheetSetPropertyInfo, - getDOMDocumentPreferredStylesheetSet , - - --- ** ReadyState - DOMDocumentReadyStatePropertyInfo , - getDOMDocumentReadyState , - - --- ** Referrer - DOMDocumentReferrerPropertyInfo , - getDOMDocumentReferrer , - - --- ** SecurityPolicy - DOMDocumentSecurityPolicyPropertyInfo , - getDOMDocumentSecurityPolicy , - - --- ** SelectedStylesheetSet - DOMDocumentSelectedStylesheetSetPropertyInfo, - constructDOMDocumentSelectedStylesheetSet, - getDOMDocumentSelectedStylesheetSet , - setDOMDocumentSelectedStylesheetSet , - - --- ** StyleSheets - DOMDocumentStyleSheetsPropertyInfo , - getDOMDocumentStyleSheets , - - --- ** Title - DOMDocumentTitlePropertyInfo , - constructDOMDocumentTitle , - getDOMDocumentTitle , - setDOMDocumentTitle , - - --- ** Url - DOMDocumentUrlPropertyInfo , - getDOMDocumentUrl , - - --- ** VisibilityState - DOMDocumentVisibilityStatePropertyInfo , - getDOMDocumentVisibilityState , - - --- ** WebkitCurrentFullScreenElement - DOMDocumentWebkitCurrentFullScreenElementPropertyInfo, - getDOMDocumentWebkitCurrentFullScreenElement, - - --- ** WebkitFullScreenKeyboardInputAllowed - DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo, - getDOMDocumentWebkitFullScreenKeyboardInputAllowed, - - --- ** WebkitFullscreenElement - DOMDocumentWebkitFullscreenElementPropertyInfo, - getDOMDocumentWebkitFullscreenElement , - - --- ** WebkitFullscreenEnabled - DOMDocumentWebkitFullscreenEnabledPropertyInfo, - getDOMDocumentWebkitFullscreenEnabled , - - --- ** WebkitIsFullScreen - DOMDocumentWebkitIsFullScreenPropertyInfo, - getDOMDocumentWebkitIsFullScreen , - - --- ** WebkitPointerLockElement - DOMDocumentWebkitPointerLockElementPropertyInfo, - getDOMDocumentWebkitPointerLockElement , - - --- ** XmlEncoding - DOMDocumentXmlEncodingPropertyInfo , - getDOMDocumentXmlEncoding , - - --- ** XmlStandalone - DOMDocumentXmlStandalonePropertyInfo , - constructDOMDocumentXmlStandalone , - getDOMDocumentXmlStandalone , - setDOMDocumentXmlStandalone , - - --- ** XmlVersion - DOMDocumentXmlVersionPropertyInfo , - constructDOMDocumentXmlVersion , - getDOMDocumentXmlVersion , - setDOMDocumentXmlVersion , - - - - - ) where - -import Prelude () -import Data.GI.Base.ShortPrelude - -import qualified Data.Text as T -import qualified Data.ByteString.Char8 as B -import qualified Data.Map as Map - -import GI.WebKit.Types -import GI.WebKit.Callbacks -import qualified GI.GObject as GObject - -newtype DOMDocument = DOMDocument (ForeignPtr DOMDocument) -foreign import ccall "webkit_dom_document_get_type" - c_webkit_dom_document_get_type :: IO GType - -type instance ParentTypes DOMDocument = DOMDocumentParentTypes -type DOMDocumentParentTypes = '[DOMNode, DOMObject, GObject.Object, DOMEventTarget] - -instance GObject DOMDocument where - gobjectIsInitiallyUnowned _ = False - gobjectType _ = c_webkit_dom_document_get_type - - -class GObject o => DOMDocumentK o -instance (GObject o, IsDescendantOf DOMDocument o) => DOMDocumentK o - -toDOMDocument :: DOMDocumentK o => o -> IO DOMDocument -toDOMDocument = unsafeCastTo DOMDocument - -noDOMDocument :: Maybe DOMDocument -noDOMDocument = Nothing - --- VVV Prop "anchors" - -- Type: TInterface "WebKit" "DOMHTMLCollection" - -- Flags: [PropertyReadable] - -getDOMDocumentAnchors :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection -getDOMDocumentAnchors obj = liftIO $ getObjectPropertyObject obj "anchors" DOMHTMLCollection - -data DOMDocumentAnchorsPropertyInfo -instance AttrInfo DOMDocumentAnchorsPropertyInfo where - type AttrAllowedOps DOMDocumentAnchorsPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentAnchorsPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentAnchorsPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentAnchorsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMDocumentAnchorsPropertyInfo = "DOMDocument::anchors" - attrGet _ = getDOMDocumentAnchors - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "applets" - -- Type: TInterface "WebKit" "DOMHTMLCollection" - -- Flags: [PropertyReadable] - -getDOMDocumentApplets :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection -getDOMDocumentApplets obj = liftIO $ getObjectPropertyObject obj "applets" DOMHTMLCollection - -data DOMDocumentAppletsPropertyInfo -instance AttrInfo DOMDocumentAppletsPropertyInfo where - type AttrAllowedOps DOMDocumentAppletsPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentAppletsPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentAppletsPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentAppletsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMDocumentAppletsPropertyInfo = "DOMDocument::applets" - attrGet _ = getDOMDocumentApplets - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "body" - -- Type: TInterface "WebKit" "DOMHTMLElement" - -- Flags: [PropertyReadable] - -getDOMDocumentBody :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLElement -getDOMDocumentBody obj = liftIO $ getObjectPropertyObject obj "body" DOMHTMLElement - -data DOMDocumentBodyPropertyInfo -instance AttrInfo DOMDocumentBodyPropertyInfo where - type AttrAllowedOps DOMDocumentBodyPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentBodyPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentBodyPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentBodyPropertyInfo = DOMHTMLElement - type AttrLabel DOMDocumentBodyPropertyInfo = "DOMDocument::body" - attrGet _ = getDOMDocumentBody - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "character-set" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentCharacterSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentCharacterSet obj = liftIO $ getObjectPropertyString obj "character-set" - -data DOMDocumentCharacterSetPropertyInfo -instance AttrInfo DOMDocumentCharacterSetPropertyInfo where - type AttrAllowedOps DOMDocumentCharacterSetPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentCharacterSetPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentCharacterSetPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentCharacterSetPropertyInfo = T.Text - type AttrLabel DOMDocumentCharacterSetPropertyInfo = "DOMDocument::character-set" - attrGet _ = getDOMDocumentCharacterSet - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "charset" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMDocumentCharset :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentCharset obj = liftIO $ getObjectPropertyString obj "charset" - -setDOMDocumentCharset :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () -setDOMDocumentCharset obj val = liftIO $ setObjectPropertyString obj "charset" val - -constructDOMDocumentCharset :: T.Text -> IO ([Char], GValue) -constructDOMDocumentCharset val = constructObjectPropertyString "charset" val - -data DOMDocumentCharsetPropertyInfo -instance AttrInfo DOMDocumentCharsetPropertyInfo where - type AttrAllowedOps DOMDocumentCharsetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMDocumentCharsetPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMDocumentCharsetPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentCharsetPropertyInfo = T.Text - type AttrLabel DOMDocumentCharsetPropertyInfo = "DOMDocument::charset" - attrGet _ = getDOMDocumentCharset - attrSet _ = setDOMDocumentCharset - attrConstruct _ = constructDOMDocumentCharset - --- VVV Prop "compat-mode" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentCompatMode :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentCompatMode obj = liftIO $ getObjectPropertyString obj "compat-mode" - -data DOMDocumentCompatModePropertyInfo -instance AttrInfo DOMDocumentCompatModePropertyInfo where - type AttrAllowedOps DOMDocumentCompatModePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentCompatModePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentCompatModePropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentCompatModePropertyInfo = T.Text - type AttrLabel DOMDocumentCompatModePropertyInfo = "DOMDocument::compat-mode" - attrGet _ = getDOMDocumentCompatMode - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "cookie" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMDocumentCookie :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentCookie obj = liftIO $ getObjectPropertyString obj "cookie" - -setDOMDocumentCookie :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () -setDOMDocumentCookie obj val = liftIO $ setObjectPropertyString obj "cookie" val - -constructDOMDocumentCookie :: T.Text -> IO ([Char], GValue) -constructDOMDocumentCookie val = constructObjectPropertyString "cookie" val - -data DOMDocumentCookiePropertyInfo -instance AttrInfo DOMDocumentCookiePropertyInfo where - type AttrAllowedOps DOMDocumentCookiePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMDocumentCookiePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMDocumentCookiePropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentCookiePropertyInfo = T.Text - type AttrLabel DOMDocumentCookiePropertyInfo = "DOMDocument::cookie" - attrGet _ = getDOMDocumentCookie - attrSet _ = setDOMDocumentCookie - attrConstruct _ = constructDOMDocumentCookie - --- VVV Prop "current-script" - -- Type: TInterface "WebKit" "DOMHTMLScriptElement" - -- Flags: [PropertyReadable] - -getDOMDocumentCurrentScript :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLScriptElement -getDOMDocumentCurrentScript obj = liftIO $ getObjectPropertyObject obj "current-script" DOMHTMLScriptElement - -data DOMDocumentCurrentScriptPropertyInfo -instance AttrInfo DOMDocumentCurrentScriptPropertyInfo where - type AttrAllowedOps DOMDocumentCurrentScriptPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentCurrentScriptPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentCurrentScriptPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentCurrentScriptPropertyInfo = DOMHTMLScriptElement - type AttrLabel DOMDocumentCurrentScriptPropertyInfo = "DOMDocument::current-script" - attrGet _ = getDOMDocumentCurrentScript - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "default-charset" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentDefaultCharset :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentDefaultCharset obj = liftIO $ getObjectPropertyString obj "default-charset" - -data DOMDocumentDefaultCharsetPropertyInfo -instance AttrInfo DOMDocumentDefaultCharsetPropertyInfo where - type AttrAllowedOps DOMDocumentDefaultCharsetPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentDefaultCharsetPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentDefaultCharsetPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentDefaultCharsetPropertyInfo = T.Text - type AttrLabel DOMDocumentDefaultCharsetPropertyInfo = "DOMDocument::default-charset" - attrGet _ = getDOMDocumentDefaultCharset - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "default-view" - -- Type: TInterface "WebKit" "DOMDOMWindow" - -- Flags: [PropertyReadable] - -getDOMDocumentDefaultView :: (MonadIO m, DOMDocumentK o) => o -> m DOMDOMWindow -getDOMDocumentDefaultView obj = liftIO $ getObjectPropertyObject obj "default-view" DOMDOMWindow - -data DOMDocumentDefaultViewPropertyInfo -instance AttrInfo DOMDocumentDefaultViewPropertyInfo where - type AttrAllowedOps DOMDocumentDefaultViewPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentDefaultViewPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentDefaultViewPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentDefaultViewPropertyInfo = DOMDOMWindow - type AttrLabel DOMDocumentDefaultViewPropertyInfo = "DOMDocument::default-view" - attrGet _ = getDOMDocumentDefaultView - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "doctype" - -- Type: TInterface "WebKit" "DOMDocumentType" - -- Flags: [PropertyReadable] - -getDOMDocumentDoctype :: (MonadIO m, DOMDocumentK o) => o -> m DOMDocumentType -getDOMDocumentDoctype obj = liftIO $ getObjectPropertyObject obj "doctype" DOMDocumentType - -data DOMDocumentDoctypePropertyInfo -instance AttrInfo DOMDocumentDoctypePropertyInfo where - type AttrAllowedOps DOMDocumentDoctypePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentDoctypePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentDoctypePropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentDoctypePropertyInfo = DOMDocumentType - type AttrLabel DOMDocumentDoctypePropertyInfo = "DOMDocument::doctype" - attrGet _ = getDOMDocumentDoctype - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "document-element" - -- Type: TInterface "WebKit" "DOMElement" - -- Flags: [PropertyReadable] - -getDOMDocumentDocumentElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement -getDOMDocumentDocumentElement obj = liftIO $ getObjectPropertyObject obj "document-element" DOMElement - -data DOMDocumentDocumentElementPropertyInfo -instance AttrInfo DOMDocumentDocumentElementPropertyInfo where - type AttrAllowedOps DOMDocumentDocumentElementPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentDocumentElementPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentDocumentElementPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentDocumentElementPropertyInfo = DOMElement - type AttrLabel DOMDocumentDocumentElementPropertyInfo = "DOMDocument::document-element" - attrGet _ = getDOMDocumentDocumentElement - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "document-uri" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMDocumentDocumentUri :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentDocumentUri obj = liftIO $ getObjectPropertyString obj "document-uri" - -setDOMDocumentDocumentUri :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () -setDOMDocumentDocumentUri obj val = liftIO $ setObjectPropertyString obj "document-uri" val - -constructDOMDocumentDocumentUri :: T.Text -> IO ([Char], GValue) -constructDOMDocumentDocumentUri val = constructObjectPropertyString "document-uri" val - -data DOMDocumentDocumentUriPropertyInfo -instance AttrInfo DOMDocumentDocumentUriPropertyInfo where - type AttrAllowedOps DOMDocumentDocumentUriPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMDocumentDocumentUriPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMDocumentDocumentUriPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentDocumentUriPropertyInfo = T.Text - type AttrLabel DOMDocumentDocumentUriPropertyInfo = "DOMDocument::document-uri" - attrGet _ = getDOMDocumentDocumentUri - attrSet _ = setDOMDocumentDocumentUri - attrConstruct _ = constructDOMDocumentDocumentUri - --- VVV Prop "domain" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentDomain :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentDomain obj = liftIO $ getObjectPropertyString obj "domain" - -data DOMDocumentDomainPropertyInfo -instance AttrInfo DOMDocumentDomainPropertyInfo where - type AttrAllowedOps DOMDocumentDomainPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentDomainPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentDomainPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentDomainPropertyInfo = T.Text - type AttrLabel DOMDocumentDomainPropertyInfo = "DOMDocument::domain" - attrGet _ = getDOMDocumentDomain - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "forms" - -- Type: TInterface "WebKit" "DOMHTMLCollection" - -- Flags: [PropertyReadable] - -getDOMDocumentForms :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection -getDOMDocumentForms obj = liftIO $ getObjectPropertyObject obj "forms" DOMHTMLCollection - -data DOMDocumentFormsPropertyInfo -instance AttrInfo DOMDocumentFormsPropertyInfo where - type AttrAllowedOps DOMDocumentFormsPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentFormsPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentFormsPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentFormsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMDocumentFormsPropertyInfo = "DOMDocument::forms" - attrGet _ = getDOMDocumentForms - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "head" - -- Type: TInterface "WebKit" "DOMHTMLHeadElement" - -- Flags: [PropertyReadable] - -getDOMDocumentHead :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLHeadElement -getDOMDocumentHead obj = liftIO $ getObjectPropertyObject obj "head" DOMHTMLHeadElement - -data DOMDocumentHeadPropertyInfo -instance AttrInfo DOMDocumentHeadPropertyInfo where - type AttrAllowedOps DOMDocumentHeadPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentHeadPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentHeadPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentHeadPropertyInfo = DOMHTMLHeadElement - type AttrLabel DOMDocumentHeadPropertyInfo = "DOMDocument::head" - attrGet _ = getDOMDocumentHead - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "hidden" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMDocumentHidden :: (MonadIO m, DOMDocumentK o) => o -> m Bool -getDOMDocumentHidden obj = liftIO $ getObjectPropertyBool obj "hidden" - -data DOMDocumentHiddenPropertyInfo -instance AttrInfo DOMDocumentHiddenPropertyInfo where - type AttrAllowedOps DOMDocumentHiddenPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentHiddenPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentHiddenPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentHiddenPropertyInfo = Bool - type AttrLabel DOMDocumentHiddenPropertyInfo = "DOMDocument::hidden" - attrGet _ = getDOMDocumentHidden - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "images" - -- Type: TInterface "WebKit" "DOMHTMLCollection" - -- Flags: [PropertyReadable] - -getDOMDocumentImages :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection -getDOMDocumentImages obj = liftIO $ getObjectPropertyObject obj "images" DOMHTMLCollection - -data DOMDocumentImagesPropertyInfo -instance AttrInfo DOMDocumentImagesPropertyInfo where - type AttrAllowedOps DOMDocumentImagesPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentImagesPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentImagesPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentImagesPropertyInfo = DOMHTMLCollection - type AttrLabel DOMDocumentImagesPropertyInfo = "DOMDocument::images" - attrGet _ = getDOMDocumentImages - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "implementation" - -- Type: TInterface "WebKit" "DOMDOMImplementation" - -- Flags: [PropertyReadable] - -getDOMDocumentImplementation :: (MonadIO m, DOMDocumentK o) => o -> m DOMDOMImplementation -getDOMDocumentImplementation obj = liftIO $ getObjectPropertyObject obj "implementation" DOMDOMImplementation - -data DOMDocumentImplementationPropertyInfo -instance AttrInfo DOMDocumentImplementationPropertyInfo where - type AttrAllowedOps DOMDocumentImplementationPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentImplementationPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentImplementationPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentImplementationPropertyInfo = DOMDOMImplementation - type AttrLabel DOMDocumentImplementationPropertyInfo = "DOMDocument::implementation" - attrGet _ = getDOMDocumentImplementation - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "input-encoding" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentInputEncoding :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentInputEncoding obj = liftIO $ getObjectPropertyString obj "input-encoding" - -data DOMDocumentInputEncodingPropertyInfo -instance AttrInfo DOMDocumentInputEncodingPropertyInfo where - type AttrAllowedOps DOMDocumentInputEncodingPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentInputEncodingPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentInputEncodingPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentInputEncodingPropertyInfo = T.Text - type AttrLabel DOMDocumentInputEncodingPropertyInfo = "DOMDocument::input-encoding" - attrGet _ = getDOMDocumentInputEncoding - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "last-modified" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentLastModified :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentLastModified obj = liftIO $ getObjectPropertyString obj "last-modified" - -data DOMDocumentLastModifiedPropertyInfo -instance AttrInfo DOMDocumentLastModifiedPropertyInfo where - type AttrAllowedOps DOMDocumentLastModifiedPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentLastModifiedPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentLastModifiedPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentLastModifiedPropertyInfo = T.Text - type AttrLabel DOMDocumentLastModifiedPropertyInfo = "DOMDocument::last-modified" - attrGet _ = getDOMDocumentLastModified - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "links" - -- Type: TInterface "WebKit" "DOMHTMLCollection" - -- Flags: [PropertyReadable] - -getDOMDocumentLinks :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection -getDOMDocumentLinks obj = liftIO $ getObjectPropertyObject obj "links" DOMHTMLCollection - -data DOMDocumentLinksPropertyInfo -instance AttrInfo DOMDocumentLinksPropertyInfo where - type AttrAllowedOps DOMDocumentLinksPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentLinksPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentLinksPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentLinksPropertyInfo = DOMHTMLCollection - type AttrLabel DOMDocumentLinksPropertyInfo = "DOMDocument::links" - attrGet _ = getDOMDocumentLinks - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "preferred-stylesheet-set" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentPreferredStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentPreferredStylesheetSet obj = liftIO $ getObjectPropertyString obj "preferred-stylesheet-set" - -data DOMDocumentPreferredStylesheetSetPropertyInfo -instance AttrInfo DOMDocumentPreferredStylesheetSetPropertyInfo where - type AttrAllowedOps DOMDocumentPreferredStylesheetSetPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentPreferredStylesheetSetPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentPreferredStylesheetSetPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentPreferredStylesheetSetPropertyInfo = T.Text - type AttrLabel DOMDocumentPreferredStylesheetSetPropertyInfo = "DOMDocument::preferred-stylesheet-set" - attrGet _ = getDOMDocumentPreferredStylesheetSet - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "ready-state" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentReadyState :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentReadyState obj = liftIO $ getObjectPropertyString obj "ready-state" - -data DOMDocumentReadyStatePropertyInfo -instance AttrInfo DOMDocumentReadyStatePropertyInfo where - type AttrAllowedOps DOMDocumentReadyStatePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentReadyStatePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentReadyStatePropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentReadyStatePropertyInfo = T.Text - type AttrLabel DOMDocumentReadyStatePropertyInfo = "DOMDocument::ready-state" - attrGet _ = getDOMDocumentReadyState - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "referrer" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentReferrer :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentReferrer obj = liftIO $ getObjectPropertyString obj "referrer" - -data DOMDocumentReferrerPropertyInfo -instance AttrInfo DOMDocumentReferrerPropertyInfo where - type AttrAllowedOps DOMDocumentReferrerPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentReferrerPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentReferrerPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentReferrerPropertyInfo = T.Text - type AttrLabel DOMDocumentReferrerPropertyInfo = "DOMDocument::referrer" - attrGet _ = getDOMDocumentReferrer - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "security-policy" - -- Type: TInterface "WebKit" "DOMDOMSecurityPolicy" - -- Flags: [PropertyReadable] - -getDOMDocumentSecurityPolicy :: (MonadIO m, DOMDocumentK o) => o -> m DOMDOMSecurityPolicy -getDOMDocumentSecurityPolicy obj = liftIO $ getObjectPropertyObject obj "security-policy" DOMDOMSecurityPolicy - -data DOMDocumentSecurityPolicyPropertyInfo -instance AttrInfo DOMDocumentSecurityPolicyPropertyInfo where - type AttrAllowedOps DOMDocumentSecurityPolicyPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentSecurityPolicyPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentSecurityPolicyPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentSecurityPolicyPropertyInfo = DOMDOMSecurityPolicy - type AttrLabel DOMDocumentSecurityPolicyPropertyInfo = "DOMDocument::security-policy" - attrGet _ = getDOMDocumentSecurityPolicy - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "selected-stylesheet-set" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMDocumentSelectedStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentSelectedStylesheetSet obj = liftIO $ getObjectPropertyString obj "selected-stylesheet-set" - -setDOMDocumentSelectedStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () -setDOMDocumentSelectedStylesheetSet obj val = liftIO $ setObjectPropertyString obj "selected-stylesheet-set" val - -constructDOMDocumentSelectedStylesheetSet :: T.Text -> IO ([Char], GValue) -constructDOMDocumentSelectedStylesheetSet val = constructObjectPropertyString "selected-stylesheet-set" val - -data DOMDocumentSelectedStylesheetSetPropertyInfo -instance AttrInfo DOMDocumentSelectedStylesheetSetPropertyInfo where - type AttrAllowedOps DOMDocumentSelectedStylesheetSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMDocumentSelectedStylesheetSetPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMDocumentSelectedStylesheetSetPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentSelectedStylesheetSetPropertyInfo = T.Text - type AttrLabel DOMDocumentSelectedStylesheetSetPropertyInfo = "DOMDocument::selected-stylesheet-set" - attrGet _ = getDOMDocumentSelectedStylesheetSet - attrSet _ = setDOMDocumentSelectedStylesheetSet - attrConstruct _ = constructDOMDocumentSelectedStylesheetSet - --- VVV Prop "style-sheets" - -- Type: TInterface "WebKit" "DOMStyleSheetList" - -- Flags: [PropertyReadable] - -getDOMDocumentStyleSheets :: (MonadIO m, DOMDocumentK o) => o -> m DOMStyleSheetList -getDOMDocumentStyleSheets obj = liftIO $ getObjectPropertyObject obj "style-sheets" DOMStyleSheetList - -data DOMDocumentStyleSheetsPropertyInfo -instance AttrInfo DOMDocumentStyleSheetsPropertyInfo where - type AttrAllowedOps DOMDocumentStyleSheetsPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentStyleSheetsPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentStyleSheetsPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentStyleSheetsPropertyInfo = DOMStyleSheetList - type AttrLabel DOMDocumentStyleSheetsPropertyInfo = "DOMDocument::style-sheets" - attrGet _ = getDOMDocumentStyleSheets - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "title" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMDocumentTitle :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentTitle obj = liftIO $ getObjectPropertyString obj "title" - -setDOMDocumentTitle :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () -setDOMDocumentTitle obj val = liftIO $ setObjectPropertyString obj "title" val - -constructDOMDocumentTitle :: T.Text -> IO ([Char], GValue) -constructDOMDocumentTitle val = constructObjectPropertyString "title" val - -data DOMDocumentTitlePropertyInfo -instance AttrInfo DOMDocumentTitlePropertyInfo where - type AttrAllowedOps DOMDocumentTitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMDocumentTitlePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMDocumentTitlePropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentTitlePropertyInfo = T.Text - type AttrLabel DOMDocumentTitlePropertyInfo = "DOMDocument::title" - attrGet _ = getDOMDocumentTitle - attrSet _ = setDOMDocumentTitle - attrConstruct _ = constructDOMDocumentTitle - --- VVV Prop "url" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentUrl :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentUrl obj = liftIO $ getObjectPropertyString obj "url" - -data DOMDocumentUrlPropertyInfo -instance AttrInfo DOMDocumentUrlPropertyInfo where - type AttrAllowedOps DOMDocumentUrlPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentUrlPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentUrlPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentUrlPropertyInfo = T.Text - type AttrLabel DOMDocumentUrlPropertyInfo = "DOMDocument::url" - attrGet _ = getDOMDocumentUrl - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "visibility-state" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentVisibilityState :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentVisibilityState obj = liftIO $ getObjectPropertyString obj "visibility-state" - -data DOMDocumentVisibilityStatePropertyInfo -instance AttrInfo DOMDocumentVisibilityStatePropertyInfo where - type AttrAllowedOps DOMDocumentVisibilityStatePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentVisibilityStatePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentVisibilityStatePropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentVisibilityStatePropertyInfo = T.Text - type AttrLabel DOMDocumentVisibilityStatePropertyInfo = "DOMDocument::visibility-state" - attrGet _ = getDOMDocumentVisibilityState - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "webkit-current-full-screen-element" - -- Type: TInterface "WebKit" "DOMElement" - -- Flags: [PropertyReadable] - -getDOMDocumentWebkitCurrentFullScreenElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement -getDOMDocumentWebkitCurrentFullScreenElement obj = liftIO $ getObjectPropertyObject obj "webkit-current-full-screen-element" DOMElement - -data DOMDocumentWebkitCurrentFullScreenElementPropertyInfo -instance AttrInfo DOMDocumentWebkitCurrentFullScreenElementPropertyInfo where - type AttrAllowedOps DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = DOMElement - type AttrLabel DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = "DOMDocument::webkit-current-full-screen-element" - attrGet _ = getDOMDocumentWebkitCurrentFullScreenElement - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "webkit-full-screen-keyboard-input-allowed" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMDocumentWebkitFullScreenKeyboardInputAllowed :: (MonadIO m, DOMDocumentK o) => o -> m Bool -getDOMDocumentWebkitFullScreenKeyboardInputAllowed obj = liftIO $ getObjectPropertyBool obj "webkit-full-screen-keyboard-input-allowed" - -data DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo -instance AttrInfo DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo where - type AttrAllowedOps DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = Bool - type AttrLabel DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = "DOMDocument::webkit-full-screen-keyboard-input-allowed" - attrGet _ = getDOMDocumentWebkitFullScreenKeyboardInputAllowed - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "webkit-fullscreen-element" - -- Type: TInterface "WebKit" "DOMElement" - -- Flags: [PropertyReadable] - -getDOMDocumentWebkitFullscreenElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement -getDOMDocumentWebkitFullscreenElement obj = liftIO $ getObjectPropertyObject obj "webkit-fullscreen-element" DOMElement - -data DOMDocumentWebkitFullscreenElementPropertyInfo -instance AttrInfo DOMDocumentWebkitFullscreenElementPropertyInfo where - type AttrAllowedOps DOMDocumentWebkitFullscreenElementPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentWebkitFullscreenElementPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentWebkitFullscreenElementPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentWebkitFullscreenElementPropertyInfo = DOMElement - type AttrLabel DOMDocumentWebkitFullscreenElementPropertyInfo = "DOMDocument::webkit-fullscreen-element" - attrGet _ = getDOMDocumentWebkitFullscreenElement - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "webkit-fullscreen-enabled" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMDocumentWebkitFullscreenEnabled :: (MonadIO m, DOMDocumentK o) => o -> m Bool -getDOMDocumentWebkitFullscreenEnabled obj = liftIO $ getObjectPropertyBool obj "webkit-fullscreen-enabled" - -data DOMDocumentWebkitFullscreenEnabledPropertyInfo -instance AttrInfo DOMDocumentWebkitFullscreenEnabledPropertyInfo where - type AttrAllowedOps DOMDocumentWebkitFullscreenEnabledPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentWebkitFullscreenEnabledPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentWebkitFullscreenEnabledPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentWebkitFullscreenEnabledPropertyInfo = Bool - type AttrLabel DOMDocumentWebkitFullscreenEnabledPropertyInfo = "DOMDocument::webkit-fullscreen-enabled" - attrGet _ = getDOMDocumentWebkitFullscreenEnabled - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "webkit-is-full-screen" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMDocumentWebkitIsFullScreen :: (MonadIO m, DOMDocumentK o) => o -> m Bool -getDOMDocumentWebkitIsFullScreen obj = liftIO $ getObjectPropertyBool obj "webkit-is-full-screen" - -data DOMDocumentWebkitIsFullScreenPropertyInfo -instance AttrInfo DOMDocumentWebkitIsFullScreenPropertyInfo where - type AttrAllowedOps DOMDocumentWebkitIsFullScreenPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentWebkitIsFullScreenPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentWebkitIsFullScreenPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentWebkitIsFullScreenPropertyInfo = Bool - type AttrLabel DOMDocumentWebkitIsFullScreenPropertyInfo = "DOMDocument::webkit-is-full-screen" - attrGet _ = getDOMDocumentWebkitIsFullScreen - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "webkit-pointer-lock-element" - -- Type: TInterface "WebKit" "DOMElement" - -- Flags: [PropertyReadable] - -getDOMDocumentWebkitPointerLockElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement -getDOMDocumentWebkitPointerLockElement obj = liftIO $ getObjectPropertyObject obj "webkit-pointer-lock-element" DOMElement - -data DOMDocumentWebkitPointerLockElementPropertyInfo -instance AttrInfo DOMDocumentWebkitPointerLockElementPropertyInfo where - type AttrAllowedOps DOMDocumentWebkitPointerLockElementPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentWebkitPointerLockElementPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentWebkitPointerLockElementPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentWebkitPointerLockElementPropertyInfo = DOMElement - type AttrLabel DOMDocumentWebkitPointerLockElementPropertyInfo = "DOMDocument::webkit-pointer-lock-element" - attrGet _ = getDOMDocumentWebkitPointerLockElement - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "xml-encoding" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMDocumentXmlEncoding :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentXmlEncoding obj = liftIO $ getObjectPropertyString obj "xml-encoding" - -data DOMDocumentXmlEncodingPropertyInfo -instance AttrInfo DOMDocumentXmlEncodingPropertyInfo where - type AttrAllowedOps DOMDocumentXmlEncodingPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMDocumentXmlEncodingPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMDocumentXmlEncodingPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentXmlEncodingPropertyInfo = T.Text - type AttrLabel DOMDocumentXmlEncodingPropertyInfo = "DOMDocument::xml-encoding" - attrGet _ = getDOMDocumentXmlEncoding - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "xml-standalone" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMDocumentXmlStandalone :: (MonadIO m, DOMDocumentK o) => o -> m Bool -getDOMDocumentXmlStandalone obj = liftIO $ getObjectPropertyBool obj "xml-standalone" - -setDOMDocumentXmlStandalone :: (MonadIO m, DOMDocumentK o) => o -> Bool -> m () -setDOMDocumentXmlStandalone obj val = liftIO $ setObjectPropertyBool obj "xml-standalone" val - -constructDOMDocumentXmlStandalone :: Bool -> IO ([Char], GValue) -constructDOMDocumentXmlStandalone val = constructObjectPropertyBool "xml-standalone" val - -data DOMDocumentXmlStandalonePropertyInfo -instance AttrInfo DOMDocumentXmlStandalonePropertyInfo where - type AttrAllowedOps DOMDocumentXmlStandalonePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMDocumentXmlStandalonePropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMDocumentXmlStandalonePropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentXmlStandalonePropertyInfo = Bool - type AttrLabel DOMDocumentXmlStandalonePropertyInfo = "DOMDocument::xml-standalone" - attrGet _ = getDOMDocumentXmlStandalone - attrSet _ = setDOMDocumentXmlStandalone - attrConstruct _ = constructDOMDocumentXmlStandalone - --- VVV Prop "xml-version" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMDocumentXmlVersion :: (MonadIO m, DOMDocumentK o) => o -> m T.Text -getDOMDocumentXmlVersion obj = liftIO $ getObjectPropertyString obj "xml-version" - -setDOMDocumentXmlVersion :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () -setDOMDocumentXmlVersion obj val = liftIO $ setObjectPropertyString obj "xml-version" val - -constructDOMDocumentXmlVersion :: T.Text -> IO ([Char], GValue) -constructDOMDocumentXmlVersion val = constructObjectPropertyString "xml-version" val - -data DOMDocumentXmlVersionPropertyInfo -instance AttrInfo DOMDocumentXmlVersionPropertyInfo where - type AttrAllowedOps DOMDocumentXmlVersionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMDocumentXmlVersionPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMDocumentXmlVersionPropertyInfo = DOMDocumentK - type AttrGetType DOMDocumentXmlVersionPropertyInfo = T.Text - type AttrLabel DOMDocumentXmlVersionPropertyInfo = "DOMDocument::xml-version" - attrGet _ = getDOMDocumentXmlVersion - attrSet _ = setDOMDocumentXmlVersion - attrConstruct _ = constructDOMDocumentXmlVersion - -type instance AttributeList DOMDocument = DOMDocumentAttributeList -type DOMDocumentAttributeList = ('[ '("anchors", DOMDocumentAnchorsPropertyInfo), '("applets", DOMDocumentAppletsPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("body", DOMDocumentBodyPropertyInfo), '("character-set", DOMDocumentCharacterSetPropertyInfo), '("charset", DOMDocumentCharsetPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("compat-mode", DOMDocumentCompatModePropertyInfo), '("cookie", DOMDocumentCookiePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-script", DOMDocumentCurrentScriptPropertyInfo), '("default-charset", DOMDocumentDefaultCharsetPropertyInfo), '("default-view", DOMDocumentDefaultViewPropertyInfo), '("doctype", DOMDocumentDoctypePropertyInfo), '("document-element", DOMDocumentDocumentElementPropertyInfo), '("document-uri", DOMDocumentDocumentUriPropertyInfo), '("domain", DOMDocumentDomainPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("forms", DOMDocumentFormsPropertyInfo), '("head", DOMDocumentHeadPropertyInfo), '("hidden", DOMDocumentHiddenPropertyInfo), '("images", DOMDocumentImagesPropertyInfo), '("implementation", DOMDocumentImplementationPropertyInfo), '("input-encoding", DOMDocumentInputEncodingPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-modified", DOMDocumentLastModifiedPropertyInfo), '("links", DOMDocumentLinksPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("preferred-stylesheet-set", DOMDocumentPreferredStylesheetSetPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("ready-state", DOMDocumentReadyStatePropertyInfo), '("referrer", DOMDocumentReferrerPropertyInfo), '("security-policy", DOMDocumentSecurityPolicyPropertyInfo), '("selected-stylesheet-set", DOMDocumentSelectedStylesheetSetPropertyInfo), '("style-sheets", DOMDocumentStyleSheetsPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMDocumentTitlePropertyInfo), '("url", DOMDocumentUrlPropertyInfo), '("visibility-state", DOMDocumentVisibilityStatePropertyInfo), '("webkit-current-full-screen-element", DOMDocumentWebkitCurrentFullScreenElementPropertyInfo), '("webkit-full-screen-keyboard-input-allowed", DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo), '("webkit-fullscreen-element", DOMDocumentWebkitFullscreenElementPropertyInfo), '("webkit-fullscreen-enabled", DOMDocumentWebkitFullscreenEnabledPropertyInfo), '("webkit-is-full-screen", DOMDocumentWebkitIsFullScreenPropertyInfo), '("webkit-pointer-lock-element", DOMDocumentWebkitPointerLockElementPropertyInfo), '("xml-encoding", DOMDocumentXmlEncodingPropertyInfo), '("xml-standalone", DOMDocumentXmlStandalonePropertyInfo), '("xml-version", DOMDocumentXmlVersionPropertyInfo)] :: [(Symbol, *)]) - -type instance SignalList DOMDocument = DOMDocumentSignalList -type DOMDocumentSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) - --- method DOMDocument::adopt_node --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "source", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "source", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMNode" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_adopt_node" webkit_dom_document_adopt_node :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - Ptr DOMNode -> -- source : TInterface "WebKit" "DOMNode" - Ptr (Ptr GError) -> -- error - IO (Ptr DOMNode) - - -dOMDocumentAdoptNode :: - (MonadIO m, DOMDocumentK a, DOMNodeK b) => - a -> -- _obj - b -> -- source - m DOMNode -dOMDocumentAdoptNode _obj source = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let source' = unsafeManagedPtrCastPtr source - onException (do - result <- propagateGError $ webkit_dom_document_adopt_node _obj' source' - checkUnexpectedReturnNULL "webkit_dom_document_adopt_node" result - result' <- (newObject DOMNode) result - touchManagedPtr _obj - touchManagedPtr source - return result' - ) (do - return () - ) - --- method DOMDocument::caret_range_from_point --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMRange" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_caret_range_from_point" webkit_dom_document_caret_range_from_point :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - Int64 -> -- x : TBasicType TInt64 - Int64 -> -- y : TBasicType TInt64 - IO (Ptr DOMRange) - - -dOMDocumentCaretRangeFromPoint :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - Int64 -> -- x - Int64 -> -- y - m DOMRange -dOMDocumentCaretRangeFromPoint _obj x y = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_caret_range_from_point _obj' x y - checkUnexpectedReturnNULL "webkit_dom_document_caret_range_from_point" result - result' <- (wrapObject DOMRange) result - touchManagedPtr _obj - return result' - --- method DOMDocument::create_attribute --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMAttr" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_attribute" webkit_dom_document_create_attribute :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- name : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO (Ptr DOMAttr) - - -dOMDocumentCreateAttribute :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- name - m DOMAttr -dOMDocumentCreateAttribute _obj name = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - name' <- textToCString name - onException (do - result <- propagateGError $ webkit_dom_document_create_attribute _obj' name' - checkUnexpectedReturnNULL "webkit_dom_document_create_attribute" result - result' <- (newObject DOMAttr) result - touchManagedPtr _obj - freeMem name' - return result' - ) (do - freeMem name' - ) - --- method DOMDocument::create_attribute_ns --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMAttr" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_attribute_ns" webkit_dom_document_create_attribute_ns :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- namespaceURI : TBasicType TUTF8 - CString -> -- qualifiedName : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO (Ptr DOMAttr) - - -dOMDocumentCreateAttributeNs :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - Maybe (T.Text) -> -- namespaceURI - T.Text -> -- qualifiedName - m DOMAttr -dOMDocumentCreateAttributeNs _obj namespaceURI qualifiedName = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - maybeNamespaceURI <- case namespaceURI of - Nothing -> return nullPtr - Just jNamespaceURI -> do - jNamespaceURI' <- textToCString jNamespaceURI - return jNamespaceURI' - qualifiedName' <- textToCString qualifiedName - onException (do - result <- propagateGError $ webkit_dom_document_create_attribute_ns _obj' maybeNamespaceURI qualifiedName' - checkUnexpectedReturnNULL "webkit_dom_document_create_attribute_ns" result - result' <- (newObject DOMAttr) result - touchManagedPtr _obj - freeMem maybeNamespaceURI - freeMem qualifiedName' - return result' - ) (do - freeMem maybeNamespaceURI - freeMem qualifiedName' - ) - --- method DOMDocument::create_cdata_section --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMCDATASection" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_cdata_section" webkit_dom_document_create_cdata_section :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- data : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO (Ptr DOMCDATASection) - - -dOMDocumentCreateCdataSection :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- data - m DOMCDATASection -dOMDocumentCreateCdataSection _obj data_ = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - data_' <- textToCString data_ - onException (do - result <- propagateGError $ webkit_dom_document_create_cdata_section _obj' data_' - checkUnexpectedReturnNULL "webkit_dom_document_create_cdata_section" result - result' <- (newObject DOMCDATASection) result - touchManagedPtr _obj - freeMem data_' - return result' - ) (do - freeMem data_' - ) - --- method DOMDocument::create_comment --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMComment" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_create_comment" webkit_dom_document_create_comment :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- data : TBasicType TUTF8 - IO (Ptr DOMComment) - - -dOMDocumentCreateComment :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- data - m DOMComment -dOMDocumentCreateComment _obj data_ = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - data_' <- textToCString data_ - result <- webkit_dom_document_create_comment _obj' data_' - checkUnexpectedReturnNULL "webkit_dom_document_create_comment" result - result' <- (newObject DOMComment) result - touchManagedPtr _obj - freeMem data_' - return result' - --- method DOMDocument::create_css_style_declaration --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMCSSStyleDeclaration" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_create_css_style_declaration" webkit_dom_document_create_css_style_declaration :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMCSSStyleDeclaration) - - -dOMDocumentCreateCssStyleDeclaration :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMCSSStyleDeclaration -dOMDocumentCreateCssStyleDeclaration _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_create_css_style_declaration _obj' - checkUnexpectedReturnNULL "webkit_dom_document_create_css_style_declaration" result - result' <- (wrapObject DOMCSSStyleDeclaration) result - touchManagedPtr _obj - return result' - --- method DOMDocument::create_document_fragment --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDocumentFragment" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_create_document_fragment" webkit_dom_document_create_document_fragment :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMDocumentFragment) - - -dOMDocumentCreateDocumentFragment :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMDocumentFragment -dOMDocumentCreateDocumentFragment _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_create_document_fragment _obj' - checkUnexpectedReturnNULL "webkit_dom_document_create_document_fragment" result - result' <- (newObject DOMDocumentFragment) result - touchManagedPtr _obj - return result' - --- method DOMDocument::create_element --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tagName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tagName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMElement" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_element" webkit_dom_document_create_element :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- tagName : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO (Ptr DOMElement) - - -dOMDocumentCreateElement :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- tagName - m DOMElement -dOMDocumentCreateElement _obj tagName = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - tagName' <- textToCString tagName - onException (do - result <- propagateGError $ webkit_dom_document_create_element _obj' tagName' - checkUnexpectedReturnNULL "webkit_dom_document_create_element" result - result' <- (newObject DOMElement) result - touchManagedPtr _obj - freeMem tagName' - return result' - ) (do - freeMem tagName' - ) - --- method DOMDocument::create_element_ns --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMElement" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_element_ns" webkit_dom_document_create_element_ns :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- namespaceURI : TBasicType TUTF8 - CString -> -- qualifiedName : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO (Ptr DOMElement) - - -dOMDocumentCreateElementNs :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - Maybe (T.Text) -> -- namespaceURI - T.Text -> -- qualifiedName - m DOMElement -dOMDocumentCreateElementNs _obj namespaceURI qualifiedName = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - maybeNamespaceURI <- case namespaceURI of - Nothing -> return nullPtr - Just jNamespaceURI -> do - jNamespaceURI' <- textToCString jNamespaceURI - return jNamespaceURI' - qualifiedName' <- textToCString qualifiedName - onException (do - result <- propagateGError $ webkit_dom_document_create_element_ns _obj' maybeNamespaceURI qualifiedName' - checkUnexpectedReturnNULL "webkit_dom_document_create_element_ns" result - result' <- (newObject DOMElement) result - touchManagedPtr _obj - freeMem maybeNamespaceURI - freeMem qualifiedName' - return result' - ) (do - freeMem maybeNamespaceURI - freeMem qualifiedName' - ) - --- method DOMDocument::create_entity_reference --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMEntityReference" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_entity_reference" webkit_dom_document_create_entity_reference :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- name : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO (Ptr DOMEntityReference) - - -dOMDocumentCreateEntityReference :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - Maybe (T.Text) -> -- name - m DOMEntityReference -dOMDocumentCreateEntityReference _obj name = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - maybeName <- case name of - Nothing -> return nullPtr - Just jName -> do - jName' <- textToCString jName - return jName' - onException (do - result <- propagateGError $ webkit_dom_document_create_entity_reference _obj' maybeName - checkUnexpectedReturnNULL "webkit_dom_document_create_entity_reference" result - result' <- (newObject DOMEntityReference) result - touchManagedPtr _obj - freeMem maybeName - return result' - ) (do - freeMem maybeName - ) - --- method DOMDocument::create_event --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "eventType", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "eventType", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMEvent" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_event" webkit_dom_document_create_event :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- eventType : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO (Ptr DOMEvent) - - -dOMDocumentCreateEvent :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- eventType - m DOMEvent -dOMDocumentCreateEvent _obj eventType = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - eventType' <- textToCString eventType - onException (do - result <- propagateGError $ webkit_dom_document_create_event _obj' eventType' - checkUnexpectedReturnNULL "webkit_dom_document_create_event" result - result' <- (wrapObject DOMEvent) result - touchManagedPtr _obj - freeMem eventType' - return result' - ) (do - freeMem eventType' - ) - --- method DOMDocument::create_expression --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "expression", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "resolver", argType = TInterface "WebKit" "DOMXPathNSResolver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "expression", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "resolver", argType = TInterface "WebKit" "DOMXPathNSResolver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMXPathExpression" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_expression" webkit_dom_document_create_expression :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- expression : TBasicType TUTF8 - Ptr DOMXPathNSResolver -> -- resolver : TInterface "WebKit" "DOMXPathNSResolver" - Ptr (Ptr GError) -> -- error - IO (Ptr DOMXPathExpression) - - -dOMDocumentCreateExpression :: - (MonadIO m, DOMDocumentK a, DOMXPathNSResolverK b) => - a -> -- _obj - T.Text -> -- expression - b -> -- resolver - m DOMXPathExpression -dOMDocumentCreateExpression _obj expression resolver = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - expression' <- textToCString expression - let resolver' = unsafeManagedPtrCastPtr resolver - onException (do - result <- propagateGError $ webkit_dom_document_create_expression _obj' expression' resolver' - checkUnexpectedReturnNULL "webkit_dom_document_create_expression" result - result' <- (wrapObject DOMXPathExpression) result - touchManagedPtr _obj - touchManagedPtr resolver - freeMem expression' - return result' - ) (do - freeMem expression' - ) - --- method DOMDocument::create_node_iterator --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "root", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "whatToShow", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "filter", argType = TInterface "WebKit" "DOMNodeFilter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "expandEntityReferences", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "root", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "whatToShow", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "filter", argType = TInterface "WebKit" "DOMNodeFilter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "expandEntityReferences", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMNodeIterator" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_node_iterator" webkit_dom_document_create_node_iterator :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - Ptr DOMNode -> -- root : TInterface "WebKit" "DOMNode" - Word64 -> -- whatToShow : TBasicType TUInt64 - Ptr DOMNodeFilter -> -- filter : TInterface "WebKit" "DOMNodeFilter" - CInt -> -- expandEntityReferences : TBasicType TBoolean - Ptr (Ptr GError) -> -- error - IO (Ptr DOMNodeIterator) - - -dOMDocumentCreateNodeIterator :: - (MonadIO m, DOMDocumentK a, DOMNodeK b, DOMNodeFilterK c) => - a -> -- _obj - b -> -- root - Word64 -> -- whatToShow - c -> -- filter - Bool -> -- expandEntityReferences - m DOMNodeIterator -dOMDocumentCreateNodeIterator _obj root whatToShow filter expandEntityReferences = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let root' = unsafeManagedPtrCastPtr root - let filter' = unsafeManagedPtrCastPtr filter - let expandEntityReferences' = (fromIntegral . fromEnum) expandEntityReferences - onException (do - result <- propagateGError $ webkit_dom_document_create_node_iterator _obj' root' whatToShow filter' expandEntityReferences' - checkUnexpectedReturnNULL "webkit_dom_document_create_node_iterator" result - result' <- (wrapObject DOMNodeIterator) result - touchManagedPtr _obj - touchManagedPtr root - touchManagedPtr filter - return result' - ) (do - return () - ) - --- method DOMDocument::create_ns_resolver --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "nodeResolver", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "nodeResolver", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMXPathNSResolver" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_create_ns_resolver" webkit_dom_document_create_ns_resolver :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - Ptr DOMNode -> -- nodeResolver : TInterface "WebKit" "DOMNode" - IO (Ptr DOMXPathNSResolver) - - -dOMDocumentCreateNsResolver :: - (MonadIO m, DOMDocumentK a, DOMNodeK b) => - a -> -- _obj - b -> -- nodeResolver - m DOMXPathNSResolver -dOMDocumentCreateNsResolver _obj nodeResolver = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let nodeResolver' = unsafeManagedPtrCastPtr nodeResolver - result <- webkit_dom_document_create_ns_resolver _obj' nodeResolver' - checkUnexpectedReturnNULL "webkit_dom_document_create_ns_resolver" result - result' <- (wrapObject DOMXPathNSResolver) result - touchManagedPtr _obj - touchManagedPtr nodeResolver - return result' - --- method DOMDocument::create_processing_instruction --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "target", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "target", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMProcessingInstruction" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_processing_instruction" webkit_dom_document_create_processing_instruction :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- target : TBasicType TUTF8 - CString -> -- data : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO (Ptr DOMProcessingInstruction) - - -dOMDocumentCreateProcessingInstruction :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- target - T.Text -> -- data - m DOMProcessingInstruction -dOMDocumentCreateProcessingInstruction _obj target data_ = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - target' <- textToCString target - data_' <- textToCString data_ - onException (do - result <- propagateGError $ webkit_dom_document_create_processing_instruction _obj' target' data_' - checkUnexpectedReturnNULL "webkit_dom_document_create_processing_instruction" result - result' <- (newObject DOMProcessingInstruction) result - touchManagedPtr _obj - freeMem target' - freeMem data_' - return result' - ) (do - freeMem target' - freeMem data_' - ) - --- method DOMDocument::create_range --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMRange" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_create_range" webkit_dom_document_create_range :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMRange) - - -dOMDocumentCreateRange :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMRange -dOMDocumentCreateRange _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_create_range _obj' - checkUnexpectedReturnNULL "webkit_dom_document_create_range" result - result' <- (wrapObject DOMRange) result - touchManagedPtr _obj - return result' - --- method DOMDocument::create_text_node --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMText" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_create_text_node" webkit_dom_document_create_text_node :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- data : TBasicType TUTF8 - IO (Ptr DOMText) - - -dOMDocumentCreateTextNode :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- data - m DOMText -dOMDocumentCreateTextNode _obj data_ = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - data_' <- textToCString data_ - result <- webkit_dom_document_create_text_node _obj' data_' - checkUnexpectedReturnNULL "webkit_dom_document_create_text_node" result - result' <- (newObject DOMText) result - touchManagedPtr _obj - freeMem data_' - return result' - --- method DOMDocument::create_touch --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "window", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "target", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "identifier", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pageX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pageY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "webkitRadiusX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "webkitRadiusY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "webkitRotationAngle", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "webkitForce", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "window", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "target", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "identifier", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pageX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pageY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "webkitRadiusX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "webkitRadiusY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "webkitRotationAngle", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "webkitForce", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMTouch" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_touch" webkit_dom_document_create_touch :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - Ptr DOMDOMWindow -> -- window : TInterface "WebKit" "DOMDOMWindow" - Ptr DOMEventTarget -> -- target : TInterface "WebKit" "DOMEventTarget" - Int64 -> -- identifier : TBasicType TInt64 - Int64 -> -- pageX : TBasicType TInt64 - Int64 -> -- pageY : TBasicType TInt64 - Int64 -> -- screenX : TBasicType TInt64 - Int64 -> -- screenY : TBasicType TInt64 - Int64 -> -- webkitRadiusX : TBasicType TInt64 - Int64 -> -- webkitRadiusY : TBasicType TInt64 - CFloat -> -- webkitRotationAngle : TBasicType TFloat - CFloat -> -- webkitForce : TBasicType TFloat - Ptr (Ptr GError) -> -- error - IO (Ptr DOMTouch) - - -dOMDocumentCreateTouch :: - (MonadIO m, DOMDocumentK a, DOMDOMWindowK b, DOMEventTargetK c) => - a -> -- _obj - b -> -- window - c -> -- target - Int64 -> -- identifier - Int64 -> -- pageX - Int64 -> -- pageY - Int64 -> -- screenX - Int64 -> -- screenY - Int64 -> -- webkitRadiusX - Int64 -> -- webkitRadiusY - Float -> -- webkitRotationAngle - Float -> -- webkitForce - m DOMTouch -dOMDocumentCreateTouch _obj window target identifier pageX pageY screenX screenY webkitRadiusX webkitRadiusY webkitRotationAngle webkitForce = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let window' = unsafeManagedPtrCastPtr window - let target' = unsafeManagedPtrCastPtr target - let webkitRotationAngle' = realToFrac webkitRotationAngle - let webkitForce' = realToFrac webkitForce - onException (do - result <- propagateGError $ webkit_dom_document_create_touch _obj' window' target' identifier pageX pageY screenX screenY webkitRadiusX webkitRadiusY webkitRotationAngle' webkitForce' - checkUnexpectedReturnNULL "webkit_dom_document_create_touch" result - result' <- (wrapObject DOMTouch) result - touchManagedPtr _obj - touchManagedPtr window - touchManagedPtr target - return result' - ) (do - return () - ) - --- method DOMDocument::create_tree_walker --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "root", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "whatToShow", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "filter", argType = TInterface "WebKit" "DOMNodeFilter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "expandEntityReferences", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "root", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "whatToShow", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "filter", argType = TInterface "WebKit" "DOMNodeFilter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "expandEntityReferences", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMTreeWalker" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_create_tree_walker" webkit_dom_document_create_tree_walker :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - Ptr DOMNode -> -- root : TInterface "WebKit" "DOMNode" - Word64 -> -- whatToShow : TBasicType TUInt64 - Ptr DOMNodeFilter -> -- filter : TInterface "WebKit" "DOMNodeFilter" - CInt -> -- expandEntityReferences : TBasicType TBoolean - Ptr (Ptr GError) -> -- error - IO (Ptr DOMTreeWalker) - - -dOMDocumentCreateTreeWalker :: - (MonadIO m, DOMDocumentK a, DOMNodeK b, DOMNodeFilterK c) => - a -> -- _obj - b -> -- root - Word64 -> -- whatToShow - c -> -- filter - Bool -> -- expandEntityReferences - m DOMTreeWalker -dOMDocumentCreateTreeWalker _obj root whatToShow filter expandEntityReferences = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let root' = unsafeManagedPtrCastPtr root - let filter' = unsafeManagedPtrCastPtr filter - let expandEntityReferences' = (fromIntegral . fromEnum) expandEntityReferences - onException (do - result <- propagateGError $ webkit_dom_document_create_tree_walker _obj' root' whatToShow filter' expandEntityReferences' - checkUnexpectedReturnNULL "webkit_dom_document_create_tree_walker" result - result' <- (wrapObject DOMTreeWalker) result - touchManagedPtr _obj - touchManagedPtr root - touchManagedPtr filter - return result' - ) (do - return () - ) - --- method DOMDocument::element_from_point --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_element_from_point" webkit_dom_document_element_from_point :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - Int64 -> -- x : TBasicType TInt64 - Int64 -> -- y : TBasicType TInt64 - IO (Ptr DOMElement) - - -dOMDocumentElementFromPoint :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - Int64 -> -- x - Int64 -> -- y - m DOMElement -dOMDocumentElementFromPoint _obj x y = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_element_from_point _obj' x y - checkUnexpectedReturnNULL "webkit_dom_document_element_from_point" result - result' <- (newObject DOMElement) result - touchManagedPtr _obj - return result' - --- method DOMDocument::evaluate --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "expression", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "contextNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "resolver", argType = TInterface "WebKit" "DOMXPathNSResolver", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "inResult", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "expression", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "contextNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "resolver", argType = TInterface "WebKit" "DOMXPathNSResolver", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "inResult", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMXPathResult" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_evaluate" webkit_dom_document_evaluate :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- expression : TBasicType TUTF8 - Ptr DOMNode -> -- contextNode : TInterface "WebKit" "DOMNode" - Ptr DOMXPathNSResolver -> -- resolver : TInterface "WebKit" "DOMXPathNSResolver" - Word16 -> -- type : TBasicType TUInt16 - Ptr DOMXPathResult -> -- inResult : TInterface "WebKit" "DOMXPathResult" - Ptr (Ptr GError) -> -- error - IO (Ptr DOMXPathResult) - - -dOMDocumentEvaluate :: - (MonadIO m, DOMDocumentK a, DOMNodeK b, DOMXPathNSResolverK c, DOMXPathResultK d) => - a -> -- _obj - T.Text -> -- expression - b -> -- contextNode - Maybe (c) -> -- resolver - Word16 -> -- type - Maybe (d) -> -- inResult - m DOMXPathResult -dOMDocumentEvaluate _obj expression contextNode resolver type_ inResult = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - expression' <- textToCString expression - let contextNode' = unsafeManagedPtrCastPtr contextNode - maybeResolver <- case resolver of - Nothing -> return nullPtr - Just jResolver -> do - let jResolver' = unsafeManagedPtrCastPtr jResolver - return jResolver' - maybeInResult <- case inResult of - Nothing -> return nullPtr - Just jInResult -> do - let jInResult' = unsafeManagedPtrCastPtr jInResult - return jInResult' - onException (do - result <- propagateGError $ webkit_dom_document_evaluate _obj' expression' contextNode' maybeResolver type_ maybeInResult - checkUnexpectedReturnNULL "webkit_dom_document_evaluate" result - result' <- (wrapObject DOMXPathResult) result - touchManagedPtr _obj - touchManagedPtr contextNode - whenJust resolver touchManagedPtr - whenJust inResult touchManagedPtr - freeMem expression' - return result' - ) (do - freeMem expression' - ) - --- method DOMDocument::exec_command --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "userInterface", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "userInterface", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_exec_command" webkit_dom_document_exec_command :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- command : TBasicType TUTF8 - CInt -> -- userInterface : TBasicType TBoolean - CString -> -- value : TBasicType TUTF8 - IO CInt - - -dOMDocumentExecCommand :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- command - Bool -> -- userInterface - T.Text -> -- value - m Bool -dOMDocumentExecCommand _obj command userInterface value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - command' <- textToCString command - let userInterface' = (fromIntegral . fromEnum) userInterface - value' <- textToCString value - result <- webkit_dom_document_exec_command _obj' command' userInterface' value' - let result' = (/= 0) result - touchManagedPtr _obj - freeMem command' - freeMem value' - return result' - --- method DOMDocument::get_anchors --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMHTMLCollection" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_anchors" webkit_dom_document_get_anchors :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMHTMLCollection) - - -dOMDocumentGetAnchors :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMHTMLCollection -dOMDocumentGetAnchors _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_anchors _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_anchors" result - result' <- (wrapObject DOMHTMLCollection) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_applets --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMHTMLCollection" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_applets" webkit_dom_document_get_applets :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMHTMLCollection) - - -dOMDocumentGetApplets :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMHTMLCollection -dOMDocumentGetApplets _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_applets _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_applets" result - result' <- (wrapObject DOMHTMLCollection) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_body --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMHTMLElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_body" webkit_dom_document_get_body :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMHTMLElement) - - -dOMDocumentGetBody :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMHTMLElement -dOMDocumentGetBody _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_body _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_body" result - result' <- (newObject DOMHTMLElement) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_character_set --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_character_set" webkit_dom_document_get_character_set :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetCharacterSet :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetCharacterSet _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_character_set _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_character_set" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_charset --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_charset" webkit_dom_document_get_charset :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetCharset :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetCharset _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_charset _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_charset" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_compat_mode --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_compat_mode" webkit_dom_document_get_compat_mode :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetCompatMode :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetCompatMode _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_compat_mode _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_compat_mode" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_cookie --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_get_cookie" webkit_dom_document_get_cookie :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - Ptr (Ptr GError) -> -- error - IO CString - - -dOMDocumentGetCookie :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetCookie _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - onException (do - result <- propagateGError $ webkit_dom_document_get_cookie _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_cookie" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - ) (do - return () - ) - --- method DOMDocument::get_current_script --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMHTMLScriptElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_current_script" webkit_dom_document_get_current_script :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMHTMLScriptElement) - - -dOMDocumentGetCurrentScript :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMHTMLScriptElement -dOMDocumentGetCurrentScript _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_current_script _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_current_script" result - result' <- (newObject DOMHTMLScriptElement) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_default_charset --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_default_charset" webkit_dom_document_get_default_charset :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetDefaultCharset :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetDefaultCharset _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_default_charset _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_default_charset" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_default_view --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMWindow" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_default_view" webkit_dom_document_get_default_view :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMDOMWindow) - - -dOMDocumentGetDefaultView :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMDOMWindow -dOMDocumentGetDefaultView _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_default_view _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_default_view" result - result' <- (wrapObject DOMDOMWindow) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_doctype --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDocumentType" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_doctype" webkit_dom_document_get_doctype :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMDocumentType) - - -dOMDocumentGetDoctype :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMDocumentType -dOMDocumentGetDoctype _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_doctype _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_doctype" result - result' <- (newObject DOMDocumentType) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_document_element --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_document_element" webkit_dom_document_get_document_element :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMElement) - - -dOMDocumentGetDocumentElement :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMElement -dOMDocumentGetDocumentElement _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_document_element _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_document_element" result - result' <- (newObject DOMElement) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_document_uri --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_document_uri" webkit_dom_document_get_document_uri :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetDocumentUri :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetDocumentUri _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_document_uri _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_document_uri" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_domain --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_domain" webkit_dom_document_get_domain :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetDomain :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetDomain _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_domain _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_domain" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_element_by_id --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "elementId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "elementId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_element_by_id" webkit_dom_document_get_element_by_id :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- elementId : TBasicType TUTF8 - IO (Ptr DOMElement) - - -dOMDocumentGetElementById :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- elementId - m DOMElement -dOMDocumentGetElementById _obj elementId = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - elementId' <- textToCString elementId - result <- webkit_dom_document_get_element_by_id _obj' elementId' - checkUnexpectedReturnNULL "webkit_dom_document_get_element_by_id" result - result' <- (newObject DOMElement) result - touchManagedPtr _obj - freeMem elementId' - return result' - --- method DOMDocument::get_elements_by_class_name --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tagname", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tagname", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMNodeList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_elements_by_class_name" webkit_dom_document_get_elements_by_class_name :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- tagname : TBasicType TUTF8 - IO (Ptr DOMNodeList) - - -dOMDocumentGetElementsByClassName :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- tagname - m DOMNodeList -dOMDocumentGetElementsByClassName _obj tagname = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - tagname' <- textToCString tagname - result <- webkit_dom_document_get_elements_by_class_name _obj' tagname' - checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_class_name" result - result' <- (wrapObject DOMNodeList) result - touchManagedPtr _obj - freeMem tagname' - return result' - --- method DOMDocument::get_elements_by_name --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "elementName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "elementName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMNodeList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_elements_by_name" webkit_dom_document_get_elements_by_name :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- elementName : TBasicType TUTF8 - IO (Ptr DOMNodeList) - - -dOMDocumentGetElementsByName :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- elementName - m DOMNodeList -dOMDocumentGetElementsByName _obj elementName = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - elementName' <- textToCString elementName - result <- webkit_dom_document_get_elements_by_name _obj' elementName' - checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_name" result - result' <- (wrapObject DOMNodeList) result - touchManagedPtr _obj - freeMem elementName' - return result' - --- method DOMDocument::get_elements_by_tag_name --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tagname", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tagname", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMNodeList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_elements_by_tag_name" webkit_dom_document_get_elements_by_tag_name :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- tagname : TBasicType TUTF8 - IO (Ptr DOMNodeList) - - -dOMDocumentGetElementsByTagName :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- tagname - m DOMNodeList -dOMDocumentGetElementsByTagName _obj tagname = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - tagname' <- textToCString tagname - result <- webkit_dom_document_get_elements_by_tag_name _obj' tagname' - checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_tag_name" result - result' <- (wrapObject DOMNodeList) result - touchManagedPtr _obj - freeMem tagname' - return result' - --- method DOMDocument::get_elements_by_tag_name_ns --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMNodeList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_elements_by_tag_name_ns" webkit_dom_document_get_elements_by_tag_name_ns :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- namespaceURI : TBasicType TUTF8 - CString -> -- localName : TBasicType TUTF8 - IO (Ptr DOMNodeList) - - -dOMDocumentGetElementsByTagNameNs :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- namespaceURI - T.Text -> -- localName - m DOMNodeList -dOMDocumentGetElementsByTagNameNs _obj namespaceURI localName = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - namespaceURI' <- textToCString namespaceURI - localName' <- textToCString localName - result <- webkit_dom_document_get_elements_by_tag_name_ns _obj' namespaceURI' localName' - checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_tag_name_ns" result - result' <- (wrapObject DOMNodeList) result - touchManagedPtr _obj - freeMem namespaceURI' - freeMem localName' - return result' - --- method DOMDocument::get_forms --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMHTMLCollection" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_forms" webkit_dom_document_get_forms :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMHTMLCollection) - - -dOMDocumentGetForms :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMHTMLCollection -dOMDocumentGetForms _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_forms _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_forms" result - result' <- (wrapObject DOMHTMLCollection) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_head --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMHTMLHeadElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_head" webkit_dom_document_get_head :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMHTMLHeadElement) - - -dOMDocumentGetHead :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMHTMLHeadElement -dOMDocumentGetHead _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_head _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_head" result - result' <- (newObject DOMHTMLHeadElement) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_hidden --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_hidden" webkit_dom_document_get_hidden :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CInt - - -dOMDocumentGetHidden :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m Bool -dOMDocumentGetHidden _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_hidden _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_images --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMHTMLCollection" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_images" webkit_dom_document_get_images :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMHTMLCollection) - - -dOMDocumentGetImages :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMHTMLCollection -dOMDocumentGetImages _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_images _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_images" result - result' <- (wrapObject DOMHTMLCollection) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_implementation --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMImplementation" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_implementation" webkit_dom_document_get_implementation :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMDOMImplementation) - - -dOMDocumentGetImplementation :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMDOMImplementation -dOMDocumentGetImplementation _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_implementation _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_implementation" result - result' <- (wrapObject DOMDOMImplementation) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_input_encoding --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_input_encoding" webkit_dom_document_get_input_encoding :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetInputEncoding :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetInputEncoding _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_input_encoding _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_input_encoding" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_last_modified --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_last_modified" webkit_dom_document_get_last_modified :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetLastModified :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetLastModified _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_last_modified _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_last_modified" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_links --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMHTMLCollection" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_links" webkit_dom_document_get_links :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMHTMLCollection) - - -dOMDocumentGetLinks :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMHTMLCollection -dOMDocumentGetLinks _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_links _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_links" result - result' <- (wrapObject DOMHTMLCollection) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_override_style --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "element", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pseudoElement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "element", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pseudoElement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMCSSStyleDeclaration" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_override_style" webkit_dom_document_get_override_style :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - Ptr DOMElement -> -- element : TInterface "WebKit" "DOMElement" - CString -> -- pseudoElement : TBasicType TUTF8 - IO (Ptr DOMCSSStyleDeclaration) - - -dOMDocumentGetOverrideStyle :: - (MonadIO m, DOMDocumentK a, DOMElementK b) => - a -> -- _obj - b -> -- element - Maybe (T.Text) -> -- pseudoElement - m DOMCSSStyleDeclaration -dOMDocumentGetOverrideStyle _obj element pseudoElement = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let element' = unsafeManagedPtrCastPtr element - maybePseudoElement <- case pseudoElement of - Nothing -> return nullPtr - Just jPseudoElement -> do - jPseudoElement' <- textToCString jPseudoElement - return jPseudoElement' - result <- webkit_dom_document_get_override_style _obj' element' maybePseudoElement - checkUnexpectedReturnNULL "webkit_dom_document_get_override_style" result - result' <- (wrapObject DOMCSSStyleDeclaration) result - touchManagedPtr _obj - touchManagedPtr element - freeMem maybePseudoElement - return result' - --- method DOMDocument::get_preferred_stylesheet_set --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_preferred_stylesheet_set" webkit_dom_document_get_preferred_stylesheet_set :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetPreferredStylesheetSet :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetPreferredStylesheetSet _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_preferred_stylesheet_set _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_preferred_stylesheet_set" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_ready_state --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_ready_state" webkit_dom_document_get_ready_state :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetReadyState :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetReadyState _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_ready_state _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_ready_state" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_referrer --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_referrer" webkit_dom_document_get_referrer :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetReferrer :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetReferrer _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_referrer _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_referrer" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_security_policy --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMSecurityPolicy" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_security_policy" webkit_dom_document_get_security_policy :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMDOMSecurityPolicy) - - -dOMDocumentGetSecurityPolicy :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMDOMSecurityPolicy -dOMDocumentGetSecurityPolicy _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_security_policy _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_security_policy" result - result' <- (wrapObject DOMDOMSecurityPolicy) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_selected_stylesheet_set --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_selected_stylesheet_set" webkit_dom_document_get_selected_stylesheet_set :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetSelectedStylesheetSet :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetSelectedStylesheetSet _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_selected_stylesheet_set _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_selected_stylesheet_set" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_style_sheets --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMStyleSheetList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_style_sheets" webkit_dom_document_get_style_sheets :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMStyleSheetList) - - -dOMDocumentGetStyleSheets :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMStyleSheetList -dOMDocumentGetStyleSheets _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_style_sheets _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_style_sheets" result - result' <- (newObject DOMStyleSheetList) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_title --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_title" webkit_dom_document_get_title :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetTitle :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetTitle _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_title _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_title" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_url --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_url" webkit_dom_document_get_url :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetUrl :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetUrl _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_url _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_url" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_visibility_state --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_visibility_state" webkit_dom_document_get_visibility_state :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetVisibilityState :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetVisibilityState _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_visibility_state _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_visibility_state" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_webkit_current_full_screen_element --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_webkit_current_full_screen_element" webkit_dom_document_get_webkit_current_full_screen_element :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMElement) - - -dOMDocumentGetWebkitCurrentFullScreenElement :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMElement -dOMDocumentGetWebkitCurrentFullScreenElement _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_webkit_current_full_screen_element _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_webkit_current_full_screen_element" result - result' <- (newObject DOMElement) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_webkit_full_screen_keyboard_input_allowed --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_webkit_full_screen_keyboard_input_allowed" webkit_dom_document_get_webkit_full_screen_keyboard_input_allowed :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CInt - - -dOMDocumentGetWebkitFullScreenKeyboardInputAllowed :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m Bool -dOMDocumentGetWebkitFullScreenKeyboardInputAllowed _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_webkit_full_screen_keyboard_input_allowed _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_webkit_fullscreen_element --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_webkit_fullscreen_element" webkit_dom_document_get_webkit_fullscreen_element :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMElement) - - -dOMDocumentGetWebkitFullscreenElement :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMElement -dOMDocumentGetWebkitFullscreenElement _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_webkit_fullscreen_element _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_webkit_fullscreen_element" result - result' <- (newObject DOMElement) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_webkit_fullscreen_enabled --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_webkit_fullscreen_enabled" webkit_dom_document_get_webkit_fullscreen_enabled :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CInt - - -dOMDocumentGetWebkitFullscreenEnabled :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m Bool -dOMDocumentGetWebkitFullscreenEnabled _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_webkit_fullscreen_enabled _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_webkit_hidden --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_webkit_hidden" webkit_dom_document_get_webkit_hidden :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CInt - -{-# DEPRECATED dOMDocumentGetWebkitHidden ["(Since version 2.2)"]#-} -dOMDocumentGetWebkitHidden :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m Bool -dOMDocumentGetWebkitHidden _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_webkit_hidden _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_webkit_is_full_screen --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_webkit_is_full_screen" webkit_dom_document_get_webkit_is_full_screen :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CInt - - -dOMDocumentGetWebkitIsFullScreen :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m Bool -dOMDocumentGetWebkitIsFullScreen _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_webkit_is_full_screen _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_webkit_pointer_lock_element --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_webkit_pointer_lock_element" webkit_dom_document_get_webkit_pointer_lock_element :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMElement) - - -dOMDocumentGetWebkitPointerLockElement :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMElement -dOMDocumentGetWebkitPointerLockElement _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_webkit_pointer_lock_element _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_webkit_pointer_lock_element" result - result' <- (newObject DOMElement) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_webkit_visibility_state --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_webkit_visibility_state" webkit_dom_document_get_webkit_visibility_state :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - -{-# DEPRECATED dOMDocumentGetWebkitVisibilityState ["(Since version 2.2)"]#-} -dOMDocumentGetWebkitVisibilityState :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetWebkitVisibilityState _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_webkit_visibility_state _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_webkit_visibility_state" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_xml_encoding --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_xml_encoding" webkit_dom_document_get_xml_encoding :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetXmlEncoding :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetXmlEncoding _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_xml_encoding _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_xml_encoding" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_xml_standalone --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_xml_standalone" webkit_dom_document_get_xml_standalone :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CInt - - -dOMDocumentGetXmlStandalone :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m Bool -dOMDocumentGetXmlStandalone _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_xml_standalone _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMDocument::get_xml_version --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_get_xml_version" webkit_dom_document_get_xml_version :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO CString - - -dOMDocumentGetXmlVersion :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m T.Text -dOMDocumentGetXmlVersion _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_get_xml_version _obj' - checkUnexpectedReturnNULL "webkit_dom_document_get_xml_version" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMDocument::import_node --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "importedNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "deep", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "importedNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "deep", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMNode" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_import_node" webkit_dom_document_import_node :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - Ptr DOMNode -> -- importedNode : TInterface "WebKit" "DOMNode" - CInt -> -- deep : TBasicType TBoolean - Ptr (Ptr GError) -> -- error - IO (Ptr DOMNode) - - -dOMDocumentImportNode :: - (MonadIO m, DOMDocumentK a, DOMNodeK b) => - a -> -- _obj - b -> -- importedNode - Bool -> -- deep - m DOMNode -dOMDocumentImportNode _obj importedNode deep = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let importedNode' = unsafeManagedPtrCastPtr importedNode - let deep' = (fromIntegral . fromEnum) deep - onException (do - result <- propagateGError $ webkit_dom_document_import_node _obj' importedNode' deep' - checkUnexpectedReturnNULL "webkit_dom_document_import_node" result - result' <- (newObject DOMNode) result - touchManagedPtr _obj - touchManagedPtr importedNode - return result' - ) (do - return () - ) - --- method DOMDocument::query_command_enabled --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_query_command_enabled" webkit_dom_document_query_command_enabled :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- command : TBasicType TUTF8 - IO CInt - - -dOMDocumentQueryCommandEnabled :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- command - m Bool -dOMDocumentQueryCommandEnabled _obj command = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - command' <- textToCString command - result <- webkit_dom_document_query_command_enabled _obj' command' - let result' = (/= 0) result - touchManagedPtr _obj - freeMem command' - return result' - --- method DOMDocument::query_command_indeterm --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_query_command_indeterm" webkit_dom_document_query_command_indeterm :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- command : TBasicType TUTF8 - IO CInt - - -dOMDocumentQueryCommandIndeterm :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- command - m Bool -dOMDocumentQueryCommandIndeterm _obj command = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - command' <- textToCString command - result <- webkit_dom_document_query_command_indeterm _obj' command' - let result' = (/= 0) result - touchManagedPtr _obj - freeMem command' - return result' - --- method DOMDocument::query_command_state --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_query_command_state" webkit_dom_document_query_command_state :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- command : TBasicType TUTF8 - IO CInt - - -dOMDocumentQueryCommandState :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- command - m Bool -dOMDocumentQueryCommandState _obj command = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - command' <- textToCString command - result <- webkit_dom_document_query_command_state _obj' command' - let result' = (/= 0) result - touchManagedPtr _obj - freeMem command' - return result' - --- method DOMDocument::query_command_supported --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_query_command_supported" webkit_dom_document_query_command_supported :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- command : TBasicType TUTF8 - IO CInt - - -dOMDocumentQueryCommandSupported :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- command - m Bool -dOMDocumentQueryCommandSupported _obj command = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - command' <- textToCString command - result <- webkit_dom_document_query_command_supported _obj' command' - let result' = (/= 0) result - touchManagedPtr _obj - freeMem command' - return result' - --- method DOMDocument::query_command_value --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_query_command_value" webkit_dom_document_query_command_value :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- command : TBasicType TUTF8 - IO CString - - -dOMDocumentQueryCommandValue :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- command - m T.Text -dOMDocumentQueryCommandValue _obj command = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - command' <- textToCString command - result <- webkit_dom_document_query_command_value _obj' command' - checkUnexpectedReturnNULL "webkit_dom_document_query_command_value" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - freeMem command' - return result' - --- method DOMDocument::query_selector --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMElement" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_query_selector" webkit_dom_document_query_selector :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- selectors : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO (Ptr DOMElement) - - -dOMDocumentQuerySelector :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- selectors - m DOMElement -dOMDocumentQuerySelector _obj selectors = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - selectors' <- textToCString selectors - onException (do - result <- propagateGError $ webkit_dom_document_query_selector _obj' selectors' - checkUnexpectedReturnNULL "webkit_dom_document_query_selector" result - result' <- (newObject DOMElement) result - touchManagedPtr _obj - freeMem selectors' - return result' - ) (do - freeMem selectors' - ) - --- method DOMDocument::query_selector_all --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMNodeList" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_query_selector_all" webkit_dom_document_query_selector_all :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- selectors : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO (Ptr DOMNodeList) - - -dOMDocumentQuerySelectorAll :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- selectors - m DOMNodeList -dOMDocumentQuerySelectorAll _obj selectors = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - selectors' <- textToCString selectors - onException (do - result <- propagateGError $ webkit_dom_document_query_selector_all _obj' selectors' - checkUnexpectedReturnNULL "webkit_dom_document_query_selector_all" result - result' <- (wrapObject DOMNodeList) result - touchManagedPtr _obj - freeMem selectors' - return result' - ) (do - freeMem selectors' - ) - --- method DOMDocument::set_body --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_set_body" webkit_dom_document_set_body :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - Ptr DOMHTMLElement -> -- value : TInterface "WebKit" "DOMHTMLElement" - Ptr (Ptr GError) -> -- error - IO () - - -dOMDocumentSetBody :: - (MonadIO m, DOMDocumentK a, DOMHTMLElementK b) => - a -> -- _obj - b -> -- value - m () -dOMDocumentSetBody _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = unsafeManagedPtrCastPtr value - onException (do - propagateGError $ webkit_dom_document_set_body _obj' value' - touchManagedPtr _obj - touchManagedPtr value - return () - ) (do - return () - ) - --- method DOMDocument::set_charset --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_set_charset" webkit_dom_document_set_charset :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMDocumentSetCharset :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMDocumentSetCharset _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_document_set_charset _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMDocument::set_cookie --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_set_cookie" webkit_dom_document_set_cookie :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- value : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO () - - -dOMDocumentSetCookie :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMDocumentSetCookie _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - onException (do - propagateGError $ webkit_dom_document_set_cookie _obj' value' - touchManagedPtr _obj - freeMem value' - return () - ) (do - freeMem value' - ) - --- method DOMDocument::set_document_uri --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_set_document_uri" webkit_dom_document_set_document_uri :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMDocumentSetDocumentUri :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMDocumentSetDocumentUri _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_document_set_document_uri _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMDocument::set_selected_stylesheet_set --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_set_selected_stylesheet_set" webkit_dom_document_set_selected_stylesheet_set :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMDocumentSetSelectedStylesheetSet :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMDocumentSetSelectedStylesheetSet _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_document_set_selected_stylesheet_set _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMDocument::set_title --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_set_title" webkit_dom_document_set_title :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMDocumentSetTitle :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMDocumentSetTitle _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_document_set_title _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMDocument::set_xml_standalone --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_set_xml_standalone" webkit_dom_document_set_xml_standalone :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CInt -> -- value : TBasicType TBoolean - Ptr (Ptr GError) -> -- error - IO () - - -dOMDocumentSetXmlStandalone :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - Bool -> -- value - m () -dOMDocumentSetXmlStandalone _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - onException (do - propagateGError $ webkit_dom_document_set_xml_standalone _obj' value' - touchManagedPtr _obj - return () - ) (do - return () - ) - --- method DOMDocument::set_xml_version --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_document_set_xml_version" webkit_dom_document_set_xml_version :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - CString -> -- value : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO () - - -dOMDocumentSetXmlVersion :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMDocumentSetXmlVersion _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - onException (do - propagateGError $ webkit_dom_document_set_xml_version _obj' value' - touchManagedPtr _obj - freeMem value' - return () - ) (do - freeMem value' - ) - --- method DOMDocument::webkit_cancel_full_screen --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_webkit_cancel_full_screen" webkit_dom_document_webkit_cancel_full_screen :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO () - - -dOMDocumentWebkitCancelFullScreen :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m () -dOMDocumentWebkitCancelFullScreen _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_document_webkit_cancel_full_screen _obj' - touchManagedPtr _obj - return () - --- method DOMDocument::webkit_exit_fullscreen --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_webkit_exit_fullscreen" webkit_dom_document_webkit_exit_fullscreen :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO () - - -dOMDocumentWebkitExitFullscreen :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m () -dOMDocumentWebkitExitFullscreen _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_document_webkit_exit_fullscreen _obj' - touchManagedPtr _obj - return () - --- method DOMDocument::webkit_exit_pointer_lock --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_webkit_exit_pointer_lock" webkit_dom_document_webkit_exit_pointer_lock :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO () - - -dOMDocumentWebkitExitPointerLock :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m () -dOMDocumentWebkitExitPointerLock _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_document_webkit_exit_pointer_lock _obj' - touchManagedPtr _obj - return () - --- method DOMDocument::webkit_get_named_flows --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDOMNamedFlowCollection" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_document_webkit_get_named_flows" webkit_dom_document_webkit_get_named_flows :: - Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" - IO (Ptr DOMDOMNamedFlowCollection) - - -dOMDocumentWebkitGetNamedFlows :: - (MonadIO m, DOMDocumentK a) => - a -> -- _obj - m DOMDOMNamedFlowCollection -dOMDocumentWebkitGetNamedFlows _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_document_webkit_get_named_flows _obj' - checkUnexpectedReturnNULL "webkit_dom_document_webkit_get_named_flows" result - result' <- (wrapObject DOMDOMNamedFlowCollection) result - touchManagedPtr _obj - return result' + +{- | +Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte +License : LGPL-2.1 +Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) +-} + +module GI.WebKit.Objects.DOMDocument + ( + +-- * Exported types + DOMDocument(..) , + DOMDocumentK , + toDOMDocument , + noDOMDocument , + + + -- * Methods +-- ** dOMDocumentAdoptNode + DOMDocumentAdoptNodeMethodInfo , + dOMDocumentAdoptNode , + + +-- ** dOMDocumentCaretRangeFromPoint + DOMDocumentCaretRangeFromPointMethodInfo, + dOMDocumentCaretRangeFromPoint , + + +-- ** dOMDocumentCreateAttribute + DOMDocumentCreateAttributeMethodInfo , + dOMDocumentCreateAttribute , + + +-- ** dOMDocumentCreateAttributeNs + DOMDocumentCreateAttributeNsMethodInfo , + dOMDocumentCreateAttributeNs , + + +-- ** dOMDocumentCreateCdataSection + DOMDocumentCreateCdataSectionMethodInfo , + dOMDocumentCreateCdataSection , + + +-- ** dOMDocumentCreateComment + DOMDocumentCreateCommentMethodInfo , + dOMDocumentCreateComment , + + +-- ** dOMDocumentCreateCssStyleDeclaration + DOMDocumentCreateCssStyleDeclarationMethodInfo, + dOMDocumentCreateCssStyleDeclaration , + + +-- ** dOMDocumentCreateDocumentFragment + DOMDocumentCreateDocumentFragmentMethodInfo, + dOMDocumentCreateDocumentFragment , + + +-- ** dOMDocumentCreateElement + DOMDocumentCreateElementMethodInfo , + dOMDocumentCreateElement , + + +-- ** dOMDocumentCreateElementNs + DOMDocumentCreateElementNsMethodInfo , + dOMDocumentCreateElementNs , + + +-- ** dOMDocumentCreateEntityReference + DOMDocumentCreateEntityReferenceMethodInfo, + dOMDocumentCreateEntityReference , + + +-- ** dOMDocumentCreateEvent + DOMDocumentCreateEventMethodInfo , + dOMDocumentCreateEvent , + + +-- ** dOMDocumentCreateExpression + DOMDocumentCreateExpressionMethodInfo , + dOMDocumentCreateExpression , + + +-- ** dOMDocumentCreateNodeIterator + DOMDocumentCreateNodeIteratorMethodInfo , + dOMDocumentCreateNodeIterator , + + +-- ** dOMDocumentCreateNsResolver + DOMDocumentCreateNsResolverMethodInfo , + dOMDocumentCreateNsResolver , + + +-- ** dOMDocumentCreateProcessingInstruction + DOMDocumentCreateProcessingInstructionMethodInfo, + dOMDocumentCreateProcessingInstruction , + + +-- ** dOMDocumentCreateRange + DOMDocumentCreateRangeMethodInfo , + dOMDocumentCreateRange , + + +-- ** dOMDocumentCreateTextNode + DOMDocumentCreateTextNodeMethodInfo , + dOMDocumentCreateTextNode , + + +-- ** dOMDocumentCreateTouch + DOMDocumentCreateTouchMethodInfo , + dOMDocumentCreateTouch , + + +-- ** dOMDocumentCreateTreeWalker + DOMDocumentCreateTreeWalkerMethodInfo , + dOMDocumentCreateTreeWalker , + + +-- ** dOMDocumentElementFromPoint + DOMDocumentElementFromPointMethodInfo , + dOMDocumentElementFromPoint , + + +-- ** dOMDocumentEvaluate + DOMDocumentEvaluateMethodInfo , + dOMDocumentEvaluate , + + +-- ** dOMDocumentExecCommand + DOMDocumentExecCommandMethodInfo , + dOMDocumentExecCommand , + + +-- ** dOMDocumentGetAnchors + DOMDocumentGetAnchorsMethodInfo , + dOMDocumentGetAnchors , + + +-- ** dOMDocumentGetApplets + DOMDocumentGetAppletsMethodInfo , + dOMDocumentGetApplets , + + +-- ** dOMDocumentGetBody + DOMDocumentGetBodyMethodInfo , + dOMDocumentGetBody , + + +-- ** dOMDocumentGetCharacterSet + DOMDocumentGetCharacterSetMethodInfo , + dOMDocumentGetCharacterSet , + + +-- ** dOMDocumentGetCharset + DOMDocumentGetCharsetMethodInfo , + dOMDocumentGetCharset , + + +-- ** dOMDocumentGetCompatMode + DOMDocumentGetCompatModeMethodInfo , + dOMDocumentGetCompatMode , + + +-- ** dOMDocumentGetCookie + DOMDocumentGetCookieMethodInfo , + dOMDocumentGetCookie , + + +-- ** dOMDocumentGetCurrentScript + DOMDocumentGetCurrentScriptMethodInfo , + dOMDocumentGetCurrentScript , + + +-- ** dOMDocumentGetDefaultCharset + DOMDocumentGetDefaultCharsetMethodInfo , + dOMDocumentGetDefaultCharset , + + +-- ** dOMDocumentGetDefaultView + DOMDocumentGetDefaultViewMethodInfo , + dOMDocumentGetDefaultView , + + +-- ** dOMDocumentGetDoctype + DOMDocumentGetDoctypeMethodInfo , + dOMDocumentGetDoctype , + + +-- ** dOMDocumentGetDocumentElement + DOMDocumentGetDocumentElementMethodInfo , + dOMDocumentGetDocumentElement , + + +-- ** dOMDocumentGetDocumentUri + DOMDocumentGetDocumentUriMethodInfo , + dOMDocumentGetDocumentUri , + + +-- ** dOMDocumentGetDomain + DOMDocumentGetDomainMethodInfo , + dOMDocumentGetDomain , + + +-- ** dOMDocumentGetElementById + DOMDocumentGetElementByIdMethodInfo , + dOMDocumentGetElementById , + + +-- ** dOMDocumentGetElementsByClassName + DOMDocumentGetElementsByClassNameMethodInfo, + dOMDocumentGetElementsByClassName , + + +-- ** dOMDocumentGetElementsByName + DOMDocumentGetElementsByNameMethodInfo , + dOMDocumentGetElementsByName , + + +-- ** dOMDocumentGetElementsByTagName + DOMDocumentGetElementsByTagNameMethodInfo, + dOMDocumentGetElementsByTagName , + + +-- ** dOMDocumentGetElementsByTagNameNs + DOMDocumentGetElementsByTagNameNsMethodInfo, + dOMDocumentGetElementsByTagNameNs , + + +-- ** dOMDocumentGetForms + DOMDocumentGetFormsMethodInfo , + dOMDocumentGetForms , + + +-- ** dOMDocumentGetHead + DOMDocumentGetHeadMethodInfo , + dOMDocumentGetHead , + + +-- ** dOMDocumentGetHidden + DOMDocumentGetHiddenMethodInfo , + dOMDocumentGetHidden , + + +-- ** dOMDocumentGetImages + DOMDocumentGetImagesMethodInfo , + dOMDocumentGetImages , + + +-- ** dOMDocumentGetImplementation + DOMDocumentGetImplementationMethodInfo , + dOMDocumentGetImplementation , + + +-- ** dOMDocumentGetInputEncoding + DOMDocumentGetInputEncodingMethodInfo , + dOMDocumentGetInputEncoding , + + +-- ** dOMDocumentGetLastModified + DOMDocumentGetLastModifiedMethodInfo , + dOMDocumentGetLastModified , + + +-- ** dOMDocumentGetLinks + DOMDocumentGetLinksMethodInfo , + dOMDocumentGetLinks , + + +-- ** dOMDocumentGetOverrideStyle + DOMDocumentGetOverrideStyleMethodInfo , + dOMDocumentGetOverrideStyle , + + +-- ** dOMDocumentGetPreferredStylesheetSet + DOMDocumentGetPreferredStylesheetSetMethodInfo, + dOMDocumentGetPreferredStylesheetSet , + + +-- ** dOMDocumentGetReadyState + DOMDocumentGetReadyStateMethodInfo , + dOMDocumentGetReadyState , + + +-- ** dOMDocumentGetReferrer + DOMDocumentGetReferrerMethodInfo , + dOMDocumentGetReferrer , + + +-- ** dOMDocumentGetSecurityPolicy + DOMDocumentGetSecurityPolicyMethodInfo , + dOMDocumentGetSecurityPolicy , + + +-- ** dOMDocumentGetSelectedStylesheetSet + DOMDocumentGetSelectedStylesheetSetMethodInfo, + dOMDocumentGetSelectedStylesheetSet , + + +-- ** dOMDocumentGetStyleSheets + DOMDocumentGetStyleSheetsMethodInfo , + dOMDocumentGetStyleSheets , + + +-- ** dOMDocumentGetTitle + DOMDocumentGetTitleMethodInfo , + dOMDocumentGetTitle , + + +-- ** dOMDocumentGetUrl + DOMDocumentGetUrlMethodInfo , + dOMDocumentGetUrl , + + +-- ** dOMDocumentGetVisibilityState + DOMDocumentGetVisibilityStateMethodInfo , + dOMDocumentGetVisibilityState , + + +-- ** dOMDocumentGetWebkitCurrentFullScreenElement + DOMDocumentGetWebkitCurrentFullScreenElementMethodInfo, + dOMDocumentGetWebkitCurrentFullScreenElement, + + +-- ** dOMDocumentGetWebkitFullScreenKeyboardInputAllowed + DOMDocumentGetWebkitFullScreenKeyboardInputAllowedMethodInfo, + dOMDocumentGetWebkitFullScreenKeyboardInputAllowed, + + +-- ** dOMDocumentGetWebkitFullscreenElement + DOMDocumentGetWebkitFullscreenElementMethodInfo, + dOMDocumentGetWebkitFullscreenElement , + + +-- ** dOMDocumentGetWebkitFullscreenEnabled + DOMDocumentGetWebkitFullscreenEnabledMethodInfo, + dOMDocumentGetWebkitFullscreenEnabled , + + +-- ** dOMDocumentGetWebkitHidden + DOMDocumentGetWebkitHiddenMethodInfo , + dOMDocumentGetWebkitHidden , + + +-- ** dOMDocumentGetWebkitIsFullScreen + DOMDocumentGetWebkitIsFullScreenMethodInfo, + dOMDocumentGetWebkitIsFullScreen , + + +-- ** dOMDocumentGetWebkitPointerLockElement + DOMDocumentGetWebkitPointerLockElementMethodInfo, + dOMDocumentGetWebkitPointerLockElement , + + +-- ** dOMDocumentGetWebkitVisibilityState + DOMDocumentGetWebkitVisibilityStateMethodInfo, + dOMDocumentGetWebkitVisibilityState , + + +-- ** dOMDocumentGetXmlEncoding + DOMDocumentGetXmlEncodingMethodInfo , + dOMDocumentGetXmlEncoding , + + +-- ** dOMDocumentGetXmlStandalone + DOMDocumentGetXmlStandaloneMethodInfo , + dOMDocumentGetXmlStandalone , + + +-- ** dOMDocumentGetXmlVersion + DOMDocumentGetXmlVersionMethodInfo , + dOMDocumentGetXmlVersion , + + +-- ** dOMDocumentImportNode + DOMDocumentImportNodeMethodInfo , + dOMDocumentImportNode , + + +-- ** dOMDocumentQueryCommandEnabled + DOMDocumentQueryCommandEnabledMethodInfo, + dOMDocumentQueryCommandEnabled , + + +-- ** dOMDocumentQueryCommandIndeterm + DOMDocumentQueryCommandIndetermMethodInfo, + dOMDocumentQueryCommandIndeterm , + + +-- ** dOMDocumentQueryCommandState + DOMDocumentQueryCommandStateMethodInfo , + dOMDocumentQueryCommandState , + + +-- ** dOMDocumentQueryCommandSupported + DOMDocumentQueryCommandSupportedMethodInfo, + dOMDocumentQueryCommandSupported , + + +-- ** dOMDocumentQueryCommandValue + DOMDocumentQueryCommandValueMethodInfo , + dOMDocumentQueryCommandValue , + + +-- ** dOMDocumentQuerySelector + DOMDocumentQuerySelectorMethodInfo , + dOMDocumentQuerySelector , + + +-- ** dOMDocumentQuerySelectorAll + DOMDocumentQuerySelectorAllMethodInfo , + dOMDocumentQuerySelectorAll , + + +-- ** dOMDocumentSetBody + DOMDocumentSetBodyMethodInfo , + dOMDocumentSetBody , + + +-- ** dOMDocumentSetCharset + DOMDocumentSetCharsetMethodInfo , + dOMDocumentSetCharset , + + +-- ** dOMDocumentSetCookie + DOMDocumentSetCookieMethodInfo , + dOMDocumentSetCookie , + + +-- ** dOMDocumentSetDocumentUri + DOMDocumentSetDocumentUriMethodInfo , + dOMDocumentSetDocumentUri , + + +-- ** dOMDocumentSetSelectedStylesheetSet + DOMDocumentSetSelectedStylesheetSetMethodInfo, + dOMDocumentSetSelectedStylesheetSet , + + +-- ** dOMDocumentSetTitle + DOMDocumentSetTitleMethodInfo , + dOMDocumentSetTitle , + + +-- ** dOMDocumentSetXmlStandalone + DOMDocumentSetXmlStandaloneMethodInfo , + dOMDocumentSetXmlStandalone , + + +-- ** dOMDocumentSetXmlVersion + DOMDocumentSetXmlVersionMethodInfo , + dOMDocumentSetXmlVersion , + + +-- ** dOMDocumentWebkitCancelFullScreen + DOMDocumentWebkitCancelFullScreenMethodInfo, + dOMDocumentWebkitCancelFullScreen , + + +-- ** dOMDocumentWebkitExitFullscreen + DOMDocumentWebkitExitFullscreenMethodInfo, + dOMDocumentWebkitExitFullscreen , + + +-- ** dOMDocumentWebkitExitPointerLock + DOMDocumentWebkitExitPointerLockMethodInfo, + dOMDocumentWebkitExitPointerLock , + + +-- ** dOMDocumentWebkitGetNamedFlows + DOMDocumentWebkitGetNamedFlowsMethodInfo, + dOMDocumentWebkitGetNamedFlows , + + + + + -- * Properties +-- ** Anchors + DOMDocumentAnchorsPropertyInfo , + getDOMDocumentAnchors , + + +-- ** Applets + DOMDocumentAppletsPropertyInfo , + getDOMDocumentApplets , + + +-- ** Body + DOMDocumentBodyPropertyInfo , + getDOMDocumentBody , + + +-- ** CharacterSet + DOMDocumentCharacterSetPropertyInfo , + getDOMDocumentCharacterSet , + + +-- ** Charset + DOMDocumentCharsetPropertyInfo , + constructDOMDocumentCharset , + getDOMDocumentCharset , + setDOMDocumentCharset , + + +-- ** CompatMode + DOMDocumentCompatModePropertyInfo , + getDOMDocumentCompatMode , + + +-- ** Cookie + DOMDocumentCookiePropertyInfo , + constructDOMDocumentCookie , + getDOMDocumentCookie , + setDOMDocumentCookie , + + +-- ** CurrentScript + DOMDocumentCurrentScriptPropertyInfo , + getDOMDocumentCurrentScript , + + +-- ** DefaultCharset + DOMDocumentDefaultCharsetPropertyInfo , + getDOMDocumentDefaultCharset , + + +-- ** DefaultView + DOMDocumentDefaultViewPropertyInfo , + getDOMDocumentDefaultView , + + +-- ** Doctype + DOMDocumentDoctypePropertyInfo , + getDOMDocumentDoctype , + + +-- ** DocumentElement + DOMDocumentDocumentElementPropertyInfo , + getDOMDocumentDocumentElement , + + +-- ** DocumentUri + DOMDocumentDocumentUriPropertyInfo , + constructDOMDocumentDocumentUri , + getDOMDocumentDocumentUri , + setDOMDocumentDocumentUri , + + +-- ** Domain + DOMDocumentDomainPropertyInfo , + getDOMDocumentDomain , + + +-- ** Forms + DOMDocumentFormsPropertyInfo , + getDOMDocumentForms , + + +-- ** Head + DOMDocumentHeadPropertyInfo , + getDOMDocumentHead , + + +-- ** Hidden + DOMDocumentHiddenPropertyInfo , + getDOMDocumentHidden , + + +-- ** Images + DOMDocumentImagesPropertyInfo , + getDOMDocumentImages , + + +-- ** Implementation + DOMDocumentImplementationPropertyInfo , + getDOMDocumentImplementation , + + +-- ** InputEncoding + DOMDocumentInputEncodingPropertyInfo , + getDOMDocumentInputEncoding , + + +-- ** LastModified + DOMDocumentLastModifiedPropertyInfo , + getDOMDocumentLastModified , + + +-- ** Links + DOMDocumentLinksPropertyInfo , + getDOMDocumentLinks , + + +-- ** PreferredStylesheetSet + DOMDocumentPreferredStylesheetSetPropertyInfo, + getDOMDocumentPreferredStylesheetSet , + + +-- ** ReadyState + DOMDocumentReadyStatePropertyInfo , + getDOMDocumentReadyState , + + +-- ** Referrer + DOMDocumentReferrerPropertyInfo , + getDOMDocumentReferrer , + + +-- ** SecurityPolicy + DOMDocumentSecurityPolicyPropertyInfo , + getDOMDocumentSecurityPolicy , + + +-- ** SelectedStylesheetSet + DOMDocumentSelectedStylesheetSetPropertyInfo, + constructDOMDocumentSelectedStylesheetSet, + getDOMDocumentSelectedStylesheetSet , + setDOMDocumentSelectedStylesheetSet , + + +-- ** StyleSheets + DOMDocumentStyleSheetsPropertyInfo , + getDOMDocumentStyleSheets , + + +-- ** Title + DOMDocumentTitlePropertyInfo , + constructDOMDocumentTitle , + getDOMDocumentTitle , + setDOMDocumentTitle , + + +-- ** Url + DOMDocumentUrlPropertyInfo , + getDOMDocumentUrl , + + +-- ** VisibilityState + DOMDocumentVisibilityStatePropertyInfo , + getDOMDocumentVisibilityState , + + +-- ** WebkitCurrentFullScreenElement + DOMDocumentWebkitCurrentFullScreenElementPropertyInfo, + getDOMDocumentWebkitCurrentFullScreenElement, + + +-- ** WebkitFullScreenKeyboardInputAllowed + DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo, + getDOMDocumentWebkitFullScreenKeyboardInputAllowed, + + +-- ** WebkitFullscreenElement + DOMDocumentWebkitFullscreenElementPropertyInfo, + getDOMDocumentWebkitFullscreenElement , + + +-- ** WebkitFullscreenEnabled + DOMDocumentWebkitFullscreenEnabledPropertyInfo, + getDOMDocumentWebkitFullscreenEnabled , + + +-- ** WebkitIsFullScreen + DOMDocumentWebkitIsFullScreenPropertyInfo, + getDOMDocumentWebkitIsFullScreen , + + +-- ** WebkitPointerLockElement + DOMDocumentWebkitPointerLockElementPropertyInfo, + getDOMDocumentWebkitPointerLockElement , + + +-- ** XmlEncoding + DOMDocumentXmlEncodingPropertyInfo , + getDOMDocumentXmlEncoding , + + +-- ** XmlStandalone + DOMDocumentXmlStandalonePropertyInfo , + constructDOMDocumentXmlStandalone , + getDOMDocumentXmlStandalone , + setDOMDocumentXmlStandalone , + + +-- ** XmlVersion + DOMDocumentXmlVersionPropertyInfo , + constructDOMDocumentXmlVersion , + getDOMDocumentXmlVersion , + setDOMDocumentXmlVersion , + + + + + ) where + +import Prelude () +import Data.GI.Base.ShortPrelude + +import qualified Data.Text as T +import qualified Data.ByteString.Char8 as B +import qualified Data.Map as Map + +import GI.WebKit.Types +import GI.WebKit.Callbacks +import qualified GI.GObject as GObject + +newtype DOMDocument = DOMDocument (ForeignPtr DOMDocument) +foreign import ccall "webkit_dom_document_get_type" + c_webkit_dom_document_get_type :: IO GType + +type instance ParentTypes DOMDocument = DOMDocumentParentTypes +type DOMDocumentParentTypes = '[DOMNode, DOMObject, GObject.Object, DOMEventTarget] + +instance GObject DOMDocument where + gobjectIsInitiallyUnowned _ = False + gobjectType _ = c_webkit_dom_document_get_type + + +class GObject o => DOMDocumentK o +instance (GObject o, IsDescendantOf DOMDocument o) => DOMDocumentK o + +toDOMDocument :: DOMDocumentK o => o -> IO DOMDocument +toDOMDocument = unsafeCastTo DOMDocument + +noDOMDocument :: Maybe DOMDocument +noDOMDocument = Nothing + +type family ResolveDOMDocumentMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDocumentMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMDocumentMethod "adoptNode" o = DOMDocumentAdoptNodeMethodInfo + ResolveDOMDocumentMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMDocumentMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDocumentMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDocumentMethod "caretRangeFromPoint" o = DOMDocumentCaretRangeFromPointMethodInfo + ResolveDOMDocumentMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMDocumentMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMDocumentMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMDocumentMethod "createAttribute" o = DOMDocumentCreateAttributeMethodInfo + ResolveDOMDocumentMethod "createAttributeNs" o = DOMDocumentCreateAttributeNsMethodInfo + ResolveDOMDocumentMethod "createCdataSection" o = DOMDocumentCreateCdataSectionMethodInfo + ResolveDOMDocumentMethod "createComment" o = DOMDocumentCreateCommentMethodInfo + ResolveDOMDocumentMethod "createCssStyleDeclaration" o = DOMDocumentCreateCssStyleDeclarationMethodInfo + ResolveDOMDocumentMethod "createDocumentFragment" o = DOMDocumentCreateDocumentFragmentMethodInfo + ResolveDOMDocumentMethod "createElement" o = DOMDocumentCreateElementMethodInfo + ResolveDOMDocumentMethod "createElementNs" o = DOMDocumentCreateElementNsMethodInfo + ResolveDOMDocumentMethod "createEntityReference" o = DOMDocumentCreateEntityReferenceMethodInfo + ResolveDOMDocumentMethod "createEvent" o = DOMDocumentCreateEventMethodInfo + ResolveDOMDocumentMethod "createExpression" o = DOMDocumentCreateExpressionMethodInfo + ResolveDOMDocumentMethod "createNodeIterator" o = DOMDocumentCreateNodeIteratorMethodInfo + ResolveDOMDocumentMethod "createNsResolver" o = DOMDocumentCreateNsResolverMethodInfo + ResolveDOMDocumentMethod "createProcessingInstruction" o = DOMDocumentCreateProcessingInstructionMethodInfo + ResolveDOMDocumentMethod "createRange" o = DOMDocumentCreateRangeMethodInfo + ResolveDOMDocumentMethod "createTextNode" o = DOMDocumentCreateTextNodeMethodInfo + ResolveDOMDocumentMethod "createTouch" o = DOMDocumentCreateTouchMethodInfo + ResolveDOMDocumentMethod "createTreeWalker" o = DOMDocumentCreateTreeWalkerMethodInfo + ResolveDOMDocumentMethod "elementFromPoint" o = DOMDocumentElementFromPointMethodInfo + ResolveDOMDocumentMethod "evaluate" o = DOMDocumentEvaluateMethodInfo + ResolveDOMDocumentMethod "execCommand" o = DOMDocumentExecCommandMethodInfo + ResolveDOMDocumentMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDocumentMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDocumentMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMDocumentMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMDocumentMethod "importNode" o = DOMDocumentImportNodeMethodInfo + ResolveDOMDocumentMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMDocumentMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMDocumentMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMDocumentMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDocumentMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMDocumentMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMDocumentMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMDocumentMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMDocumentMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMDocumentMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDocumentMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDocumentMethod "queryCommandEnabled" o = DOMDocumentQueryCommandEnabledMethodInfo + ResolveDOMDocumentMethod "queryCommandIndeterm" o = DOMDocumentQueryCommandIndetermMethodInfo + ResolveDOMDocumentMethod "queryCommandState" o = DOMDocumentQueryCommandStateMethodInfo + ResolveDOMDocumentMethod "queryCommandSupported" o = DOMDocumentQueryCommandSupportedMethodInfo + ResolveDOMDocumentMethod "queryCommandValue" o = DOMDocumentQueryCommandValueMethodInfo + ResolveDOMDocumentMethod "querySelector" o = DOMDocumentQuerySelectorMethodInfo + ResolveDOMDocumentMethod "querySelectorAll" o = DOMDocumentQuerySelectorAllMethodInfo + ResolveDOMDocumentMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDocumentMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDocumentMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMDocumentMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMDocumentMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMDocumentMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDocumentMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDocumentMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDocumentMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDocumentMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDocumentMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDocumentMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDocumentMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDocumentMethod "webkitCancelFullScreen" o = DOMDocumentWebkitCancelFullScreenMethodInfo + ResolveDOMDocumentMethod "webkitExitFullscreen" o = DOMDocumentWebkitExitFullscreenMethodInfo + ResolveDOMDocumentMethod "webkitExitPointerLock" o = DOMDocumentWebkitExitPointerLockMethodInfo + ResolveDOMDocumentMethod "webkitGetNamedFlows" o = DOMDocumentWebkitGetNamedFlowsMethodInfo + ResolveDOMDocumentMethod "getAnchors" o = DOMDocumentGetAnchorsMethodInfo + ResolveDOMDocumentMethod "getApplets" o = DOMDocumentGetAppletsMethodInfo + ResolveDOMDocumentMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMDocumentMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMDocumentMethod "getBody" o = DOMDocumentGetBodyMethodInfo + ResolveDOMDocumentMethod "getCharacterSet" o = DOMDocumentGetCharacterSetMethodInfo + ResolveDOMDocumentMethod "getCharset" o = DOMDocumentGetCharsetMethodInfo + ResolveDOMDocumentMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMDocumentMethod "getCompatMode" o = DOMDocumentGetCompatModeMethodInfo + ResolveDOMDocumentMethod "getCookie" o = DOMDocumentGetCookieMethodInfo + ResolveDOMDocumentMethod "getCurrentScript" o = DOMDocumentGetCurrentScriptMethodInfo + ResolveDOMDocumentMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDocumentMethod "getDefaultCharset" o = DOMDocumentGetDefaultCharsetMethodInfo + ResolveDOMDocumentMethod "getDefaultView" o = DOMDocumentGetDefaultViewMethodInfo + ResolveDOMDocumentMethod "getDoctype" o = DOMDocumentGetDoctypeMethodInfo + ResolveDOMDocumentMethod "getDocumentElement" o = DOMDocumentGetDocumentElementMethodInfo + ResolveDOMDocumentMethod "getDocumentUri" o = DOMDocumentGetDocumentUriMethodInfo + ResolveDOMDocumentMethod "getDomain" o = DOMDocumentGetDomainMethodInfo + ResolveDOMDocumentMethod "getElementById" o = DOMDocumentGetElementByIdMethodInfo + ResolveDOMDocumentMethod "getElementsByClassName" o = DOMDocumentGetElementsByClassNameMethodInfo + ResolveDOMDocumentMethod "getElementsByName" o = DOMDocumentGetElementsByNameMethodInfo + ResolveDOMDocumentMethod "getElementsByTagName" o = DOMDocumentGetElementsByTagNameMethodInfo + ResolveDOMDocumentMethod "getElementsByTagNameNs" o = DOMDocumentGetElementsByTagNameNsMethodInfo + ResolveDOMDocumentMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMDocumentMethod "getForms" o = DOMDocumentGetFormsMethodInfo + ResolveDOMDocumentMethod "getHead" o = DOMDocumentGetHeadMethodInfo + ResolveDOMDocumentMethod "getHidden" o = DOMDocumentGetHiddenMethodInfo + ResolveDOMDocumentMethod "getImages" o = DOMDocumentGetImagesMethodInfo + ResolveDOMDocumentMethod "getImplementation" o = DOMDocumentGetImplementationMethodInfo + ResolveDOMDocumentMethod "getInputEncoding" o = DOMDocumentGetInputEncodingMethodInfo + ResolveDOMDocumentMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMDocumentMethod "getLastModified" o = DOMDocumentGetLastModifiedMethodInfo + ResolveDOMDocumentMethod "getLinks" o = DOMDocumentGetLinksMethodInfo + ResolveDOMDocumentMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMDocumentMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMDocumentMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMDocumentMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMDocumentMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMDocumentMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMDocumentMethod "getOverrideStyle" o = DOMDocumentGetOverrideStyleMethodInfo + ResolveDOMDocumentMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMDocumentMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMDocumentMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMDocumentMethod "getPreferredStylesheetSet" o = DOMDocumentGetPreferredStylesheetSetMethodInfo + ResolveDOMDocumentMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMDocumentMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMDocumentMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDocumentMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDocumentMethod "getReadyState" o = DOMDocumentGetReadyStateMethodInfo + ResolveDOMDocumentMethod "getReferrer" o = DOMDocumentGetReferrerMethodInfo + ResolveDOMDocumentMethod "getSecurityPolicy" o = DOMDocumentGetSecurityPolicyMethodInfo + ResolveDOMDocumentMethod "getSelectedStylesheetSet" o = DOMDocumentGetSelectedStylesheetSetMethodInfo + ResolveDOMDocumentMethod "getStyleSheets" o = DOMDocumentGetStyleSheetsMethodInfo + ResolveDOMDocumentMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMDocumentMethod "getTitle" o = DOMDocumentGetTitleMethodInfo + ResolveDOMDocumentMethod "getUrl" o = DOMDocumentGetUrlMethodInfo + ResolveDOMDocumentMethod "getVisibilityState" o = DOMDocumentGetVisibilityStateMethodInfo + ResolveDOMDocumentMethod "getWebkitCurrentFullScreenElement" o = DOMDocumentGetWebkitCurrentFullScreenElementMethodInfo + ResolveDOMDocumentMethod "getWebkitFullScreenKeyboardInputAllowed" o = DOMDocumentGetWebkitFullScreenKeyboardInputAllowedMethodInfo + ResolveDOMDocumentMethod "getWebkitFullscreenElement" o = DOMDocumentGetWebkitFullscreenElementMethodInfo + ResolveDOMDocumentMethod "getWebkitFullscreenEnabled" o = DOMDocumentGetWebkitFullscreenEnabledMethodInfo + ResolveDOMDocumentMethod "getWebkitHidden" o = DOMDocumentGetWebkitHiddenMethodInfo + ResolveDOMDocumentMethod "getWebkitIsFullScreen" o = DOMDocumentGetWebkitIsFullScreenMethodInfo + ResolveDOMDocumentMethod "getWebkitPointerLockElement" o = DOMDocumentGetWebkitPointerLockElementMethodInfo + ResolveDOMDocumentMethod "getWebkitVisibilityState" o = DOMDocumentGetWebkitVisibilityStateMethodInfo + ResolveDOMDocumentMethod "getXmlEncoding" o = DOMDocumentGetXmlEncodingMethodInfo + ResolveDOMDocumentMethod "getXmlStandalone" o = DOMDocumentGetXmlStandaloneMethodInfo + ResolveDOMDocumentMethod "getXmlVersion" o = DOMDocumentGetXmlVersionMethodInfo + ResolveDOMDocumentMethod "setBody" o = DOMDocumentSetBodyMethodInfo + ResolveDOMDocumentMethod "setCharset" o = DOMDocumentSetCharsetMethodInfo + ResolveDOMDocumentMethod "setCookie" o = DOMDocumentSetCookieMethodInfo + ResolveDOMDocumentMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDocumentMethod "setDocumentUri" o = DOMDocumentSetDocumentUriMethodInfo + ResolveDOMDocumentMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMDocumentMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMDocumentMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDocumentMethod "setSelectedStylesheetSet" o = DOMDocumentSetSelectedStylesheetSetMethodInfo + ResolveDOMDocumentMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMDocumentMethod "setTitle" o = DOMDocumentSetTitleMethodInfo + ResolveDOMDocumentMethod "setXmlStandalone" o = DOMDocumentSetXmlStandaloneMethodInfo + ResolveDOMDocumentMethod "setXmlVersion" o = DOMDocumentSetXmlVersionMethodInfo + ResolveDOMDocumentMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDocumentMethod t DOMDocument, MethodInfo info DOMDocument p) => IsLabelProxy t (DOMDocument -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDocumentMethod t DOMDocument, MethodInfo info DOMDocument p) => IsLabel t (DOMDocument -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + +-- VVV Prop "anchors" + -- Type: TInterface "WebKit" "DOMHTMLCollection" + -- Flags: [PropertyReadable] + +getDOMDocumentAnchors :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection +getDOMDocumentAnchors obj = liftIO $ getObjectPropertyObject obj "anchors" DOMHTMLCollection + +data DOMDocumentAnchorsPropertyInfo +instance AttrInfo DOMDocumentAnchorsPropertyInfo where + type AttrAllowedOps DOMDocumentAnchorsPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentAnchorsPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentAnchorsPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentAnchorsPropertyInfo = DOMHTMLCollection + type AttrLabel DOMDocumentAnchorsPropertyInfo = "anchors" + attrGet _ = getDOMDocumentAnchors + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "applets" + -- Type: TInterface "WebKit" "DOMHTMLCollection" + -- Flags: [PropertyReadable] + +getDOMDocumentApplets :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection +getDOMDocumentApplets obj = liftIO $ getObjectPropertyObject obj "applets" DOMHTMLCollection + +data DOMDocumentAppletsPropertyInfo +instance AttrInfo DOMDocumentAppletsPropertyInfo where + type AttrAllowedOps DOMDocumentAppletsPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentAppletsPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentAppletsPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentAppletsPropertyInfo = DOMHTMLCollection + type AttrLabel DOMDocumentAppletsPropertyInfo = "applets" + attrGet _ = getDOMDocumentApplets + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "body" + -- Type: TInterface "WebKit" "DOMHTMLElement" + -- Flags: [PropertyReadable] + +getDOMDocumentBody :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLElement +getDOMDocumentBody obj = liftIO $ getObjectPropertyObject obj "body" DOMHTMLElement + +data DOMDocumentBodyPropertyInfo +instance AttrInfo DOMDocumentBodyPropertyInfo where + type AttrAllowedOps DOMDocumentBodyPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentBodyPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentBodyPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentBodyPropertyInfo = DOMHTMLElement + type AttrLabel DOMDocumentBodyPropertyInfo = "body" + attrGet _ = getDOMDocumentBody + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "character-set" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentCharacterSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentCharacterSet obj = liftIO $ getObjectPropertyString obj "character-set" + +data DOMDocumentCharacterSetPropertyInfo +instance AttrInfo DOMDocumentCharacterSetPropertyInfo where + type AttrAllowedOps DOMDocumentCharacterSetPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentCharacterSetPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentCharacterSetPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentCharacterSetPropertyInfo = T.Text + type AttrLabel DOMDocumentCharacterSetPropertyInfo = "character-set" + attrGet _ = getDOMDocumentCharacterSet + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "charset" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMDocumentCharset :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentCharset obj = liftIO $ getObjectPropertyString obj "charset" + +setDOMDocumentCharset :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () +setDOMDocumentCharset obj val = liftIO $ setObjectPropertyString obj "charset" val + +constructDOMDocumentCharset :: T.Text -> IO ([Char], GValue) +constructDOMDocumentCharset val = constructObjectPropertyString "charset" val + +data DOMDocumentCharsetPropertyInfo +instance AttrInfo DOMDocumentCharsetPropertyInfo where + type AttrAllowedOps DOMDocumentCharsetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMDocumentCharsetPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMDocumentCharsetPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentCharsetPropertyInfo = T.Text + type AttrLabel DOMDocumentCharsetPropertyInfo = "charset" + attrGet _ = getDOMDocumentCharset + attrSet _ = setDOMDocumentCharset + attrConstruct _ = constructDOMDocumentCharset + +-- VVV Prop "compat-mode" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentCompatMode :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentCompatMode obj = liftIO $ getObjectPropertyString obj "compat-mode" + +data DOMDocumentCompatModePropertyInfo +instance AttrInfo DOMDocumentCompatModePropertyInfo where + type AttrAllowedOps DOMDocumentCompatModePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentCompatModePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentCompatModePropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentCompatModePropertyInfo = T.Text + type AttrLabel DOMDocumentCompatModePropertyInfo = "compat-mode" + attrGet _ = getDOMDocumentCompatMode + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "cookie" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMDocumentCookie :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentCookie obj = liftIO $ getObjectPropertyString obj "cookie" + +setDOMDocumentCookie :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () +setDOMDocumentCookie obj val = liftIO $ setObjectPropertyString obj "cookie" val + +constructDOMDocumentCookie :: T.Text -> IO ([Char], GValue) +constructDOMDocumentCookie val = constructObjectPropertyString "cookie" val + +data DOMDocumentCookiePropertyInfo +instance AttrInfo DOMDocumentCookiePropertyInfo where + type AttrAllowedOps DOMDocumentCookiePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMDocumentCookiePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMDocumentCookiePropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentCookiePropertyInfo = T.Text + type AttrLabel DOMDocumentCookiePropertyInfo = "cookie" + attrGet _ = getDOMDocumentCookie + attrSet _ = setDOMDocumentCookie + attrConstruct _ = constructDOMDocumentCookie + +-- VVV Prop "current-script" + -- Type: TInterface "WebKit" "DOMHTMLScriptElement" + -- Flags: [PropertyReadable] + +getDOMDocumentCurrentScript :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLScriptElement +getDOMDocumentCurrentScript obj = liftIO $ getObjectPropertyObject obj "current-script" DOMHTMLScriptElement + +data DOMDocumentCurrentScriptPropertyInfo +instance AttrInfo DOMDocumentCurrentScriptPropertyInfo where + type AttrAllowedOps DOMDocumentCurrentScriptPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentCurrentScriptPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentCurrentScriptPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentCurrentScriptPropertyInfo = DOMHTMLScriptElement + type AttrLabel DOMDocumentCurrentScriptPropertyInfo = "current-script" + attrGet _ = getDOMDocumentCurrentScript + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "default-charset" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentDefaultCharset :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentDefaultCharset obj = liftIO $ getObjectPropertyString obj "default-charset" + +data DOMDocumentDefaultCharsetPropertyInfo +instance AttrInfo DOMDocumentDefaultCharsetPropertyInfo where + type AttrAllowedOps DOMDocumentDefaultCharsetPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentDefaultCharsetPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentDefaultCharsetPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentDefaultCharsetPropertyInfo = T.Text + type AttrLabel DOMDocumentDefaultCharsetPropertyInfo = "default-charset" + attrGet _ = getDOMDocumentDefaultCharset + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "default-view" + -- Type: TInterface "WebKit" "DOMDOMWindow" + -- Flags: [PropertyReadable] + +getDOMDocumentDefaultView :: (MonadIO m, DOMDocumentK o) => o -> m DOMDOMWindow +getDOMDocumentDefaultView obj = liftIO $ getObjectPropertyObject obj "default-view" DOMDOMWindow + +data DOMDocumentDefaultViewPropertyInfo +instance AttrInfo DOMDocumentDefaultViewPropertyInfo where + type AttrAllowedOps DOMDocumentDefaultViewPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentDefaultViewPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentDefaultViewPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentDefaultViewPropertyInfo = DOMDOMWindow + type AttrLabel DOMDocumentDefaultViewPropertyInfo = "default-view" + attrGet _ = getDOMDocumentDefaultView + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "doctype" + -- Type: TInterface "WebKit" "DOMDocumentType" + -- Flags: [PropertyReadable] + +getDOMDocumentDoctype :: (MonadIO m, DOMDocumentK o) => o -> m DOMDocumentType +getDOMDocumentDoctype obj = liftIO $ getObjectPropertyObject obj "doctype" DOMDocumentType + +data DOMDocumentDoctypePropertyInfo +instance AttrInfo DOMDocumentDoctypePropertyInfo where + type AttrAllowedOps DOMDocumentDoctypePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentDoctypePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentDoctypePropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentDoctypePropertyInfo = DOMDocumentType + type AttrLabel DOMDocumentDoctypePropertyInfo = "doctype" + attrGet _ = getDOMDocumentDoctype + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "document-element" + -- Type: TInterface "WebKit" "DOMElement" + -- Flags: [PropertyReadable] + +getDOMDocumentDocumentElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement +getDOMDocumentDocumentElement obj = liftIO $ getObjectPropertyObject obj "document-element" DOMElement + +data DOMDocumentDocumentElementPropertyInfo +instance AttrInfo DOMDocumentDocumentElementPropertyInfo where + type AttrAllowedOps DOMDocumentDocumentElementPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentDocumentElementPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentDocumentElementPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentDocumentElementPropertyInfo = DOMElement + type AttrLabel DOMDocumentDocumentElementPropertyInfo = "document-element" + attrGet _ = getDOMDocumentDocumentElement + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "document-uri" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMDocumentDocumentUri :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentDocumentUri obj = liftIO $ getObjectPropertyString obj "document-uri" + +setDOMDocumentDocumentUri :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () +setDOMDocumentDocumentUri obj val = liftIO $ setObjectPropertyString obj "document-uri" val + +constructDOMDocumentDocumentUri :: T.Text -> IO ([Char], GValue) +constructDOMDocumentDocumentUri val = constructObjectPropertyString "document-uri" val + +data DOMDocumentDocumentUriPropertyInfo +instance AttrInfo DOMDocumentDocumentUriPropertyInfo where + type AttrAllowedOps DOMDocumentDocumentUriPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMDocumentDocumentUriPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMDocumentDocumentUriPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentDocumentUriPropertyInfo = T.Text + type AttrLabel DOMDocumentDocumentUriPropertyInfo = "document-uri" + attrGet _ = getDOMDocumentDocumentUri + attrSet _ = setDOMDocumentDocumentUri + attrConstruct _ = constructDOMDocumentDocumentUri + +-- VVV Prop "domain" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentDomain :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentDomain obj = liftIO $ getObjectPropertyString obj "domain" + +data DOMDocumentDomainPropertyInfo +instance AttrInfo DOMDocumentDomainPropertyInfo where + type AttrAllowedOps DOMDocumentDomainPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentDomainPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentDomainPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentDomainPropertyInfo = T.Text + type AttrLabel DOMDocumentDomainPropertyInfo = "domain" + attrGet _ = getDOMDocumentDomain + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "forms" + -- Type: TInterface "WebKit" "DOMHTMLCollection" + -- Flags: [PropertyReadable] + +getDOMDocumentForms :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection +getDOMDocumentForms obj = liftIO $ getObjectPropertyObject obj "forms" DOMHTMLCollection + +data DOMDocumentFormsPropertyInfo +instance AttrInfo DOMDocumentFormsPropertyInfo where + type AttrAllowedOps DOMDocumentFormsPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentFormsPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentFormsPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentFormsPropertyInfo = DOMHTMLCollection + type AttrLabel DOMDocumentFormsPropertyInfo = "forms" + attrGet _ = getDOMDocumentForms + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "head" + -- Type: TInterface "WebKit" "DOMHTMLHeadElement" + -- Flags: [PropertyReadable] + +getDOMDocumentHead :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLHeadElement +getDOMDocumentHead obj = liftIO $ getObjectPropertyObject obj "head" DOMHTMLHeadElement + +data DOMDocumentHeadPropertyInfo +instance AttrInfo DOMDocumentHeadPropertyInfo where + type AttrAllowedOps DOMDocumentHeadPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentHeadPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentHeadPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentHeadPropertyInfo = DOMHTMLHeadElement + type AttrLabel DOMDocumentHeadPropertyInfo = "head" + attrGet _ = getDOMDocumentHead + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "hidden" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMDocumentHidden :: (MonadIO m, DOMDocumentK o) => o -> m Bool +getDOMDocumentHidden obj = liftIO $ getObjectPropertyBool obj "hidden" + +data DOMDocumentHiddenPropertyInfo +instance AttrInfo DOMDocumentHiddenPropertyInfo where + type AttrAllowedOps DOMDocumentHiddenPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentHiddenPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentHiddenPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentHiddenPropertyInfo = Bool + type AttrLabel DOMDocumentHiddenPropertyInfo = "hidden" + attrGet _ = getDOMDocumentHidden + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "images" + -- Type: TInterface "WebKit" "DOMHTMLCollection" + -- Flags: [PropertyReadable] + +getDOMDocumentImages :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection +getDOMDocumentImages obj = liftIO $ getObjectPropertyObject obj "images" DOMHTMLCollection + +data DOMDocumentImagesPropertyInfo +instance AttrInfo DOMDocumentImagesPropertyInfo where + type AttrAllowedOps DOMDocumentImagesPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentImagesPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentImagesPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentImagesPropertyInfo = DOMHTMLCollection + type AttrLabel DOMDocumentImagesPropertyInfo = "images" + attrGet _ = getDOMDocumentImages + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "implementation" + -- Type: TInterface "WebKit" "DOMDOMImplementation" + -- Flags: [PropertyReadable] + +getDOMDocumentImplementation :: (MonadIO m, DOMDocumentK o) => o -> m DOMDOMImplementation +getDOMDocumentImplementation obj = liftIO $ getObjectPropertyObject obj "implementation" DOMDOMImplementation + +data DOMDocumentImplementationPropertyInfo +instance AttrInfo DOMDocumentImplementationPropertyInfo where + type AttrAllowedOps DOMDocumentImplementationPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentImplementationPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentImplementationPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentImplementationPropertyInfo = DOMDOMImplementation + type AttrLabel DOMDocumentImplementationPropertyInfo = "implementation" + attrGet _ = getDOMDocumentImplementation + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "input-encoding" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentInputEncoding :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentInputEncoding obj = liftIO $ getObjectPropertyString obj "input-encoding" + +data DOMDocumentInputEncodingPropertyInfo +instance AttrInfo DOMDocumentInputEncodingPropertyInfo where + type AttrAllowedOps DOMDocumentInputEncodingPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentInputEncodingPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentInputEncodingPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentInputEncodingPropertyInfo = T.Text + type AttrLabel DOMDocumentInputEncodingPropertyInfo = "input-encoding" + attrGet _ = getDOMDocumentInputEncoding + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "last-modified" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentLastModified :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentLastModified obj = liftIO $ getObjectPropertyString obj "last-modified" + +data DOMDocumentLastModifiedPropertyInfo +instance AttrInfo DOMDocumentLastModifiedPropertyInfo where + type AttrAllowedOps DOMDocumentLastModifiedPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentLastModifiedPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentLastModifiedPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentLastModifiedPropertyInfo = T.Text + type AttrLabel DOMDocumentLastModifiedPropertyInfo = "last-modified" + attrGet _ = getDOMDocumentLastModified + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "links" + -- Type: TInterface "WebKit" "DOMHTMLCollection" + -- Flags: [PropertyReadable] + +getDOMDocumentLinks :: (MonadIO m, DOMDocumentK o) => o -> m DOMHTMLCollection +getDOMDocumentLinks obj = liftIO $ getObjectPropertyObject obj "links" DOMHTMLCollection + +data DOMDocumentLinksPropertyInfo +instance AttrInfo DOMDocumentLinksPropertyInfo where + type AttrAllowedOps DOMDocumentLinksPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentLinksPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentLinksPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentLinksPropertyInfo = DOMHTMLCollection + type AttrLabel DOMDocumentLinksPropertyInfo = "links" + attrGet _ = getDOMDocumentLinks + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "preferred-stylesheet-set" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentPreferredStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentPreferredStylesheetSet obj = liftIO $ getObjectPropertyString obj "preferred-stylesheet-set" + +data DOMDocumentPreferredStylesheetSetPropertyInfo +instance AttrInfo DOMDocumentPreferredStylesheetSetPropertyInfo where + type AttrAllowedOps DOMDocumentPreferredStylesheetSetPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentPreferredStylesheetSetPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentPreferredStylesheetSetPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentPreferredStylesheetSetPropertyInfo = T.Text + type AttrLabel DOMDocumentPreferredStylesheetSetPropertyInfo = "preferred-stylesheet-set" + attrGet _ = getDOMDocumentPreferredStylesheetSet + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "ready-state" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentReadyState :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentReadyState obj = liftIO $ getObjectPropertyString obj "ready-state" + +data DOMDocumentReadyStatePropertyInfo +instance AttrInfo DOMDocumentReadyStatePropertyInfo where + type AttrAllowedOps DOMDocumentReadyStatePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentReadyStatePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentReadyStatePropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentReadyStatePropertyInfo = T.Text + type AttrLabel DOMDocumentReadyStatePropertyInfo = "ready-state" + attrGet _ = getDOMDocumentReadyState + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "referrer" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentReferrer :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentReferrer obj = liftIO $ getObjectPropertyString obj "referrer" + +data DOMDocumentReferrerPropertyInfo +instance AttrInfo DOMDocumentReferrerPropertyInfo where + type AttrAllowedOps DOMDocumentReferrerPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentReferrerPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentReferrerPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentReferrerPropertyInfo = T.Text + type AttrLabel DOMDocumentReferrerPropertyInfo = "referrer" + attrGet _ = getDOMDocumentReferrer + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "security-policy" + -- Type: TInterface "WebKit" "DOMDOMSecurityPolicy" + -- Flags: [PropertyReadable] + +getDOMDocumentSecurityPolicy :: (MonadIO m, DOMDocumentK o) => o -> m DOMDOMSecurityPolicy +getDOMDocumentSecurityPolicy obj = liftIO $ getObjectPropertyObject obj "security-policy" DOMDOMSecurityPolicy + +data DOMDocumentSecurityPolicyPropertyInfo +instance AttrInfo DOMDocumentSecurityPolicyPropertyInfo where + type AttrAllowedOps DOMDocumentSecurityPolicyPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentSecurityPolicyPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentSecurityPolicyPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentSecurityPolicyPropertyInfo = DOMDOMSecurityPolicy + type AttrLabel DOMDocumentSecurityPolicyPropertyInfo = "security-policy" + attrGet _ = getDOMDocumentSecurityPolicy + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "selected-stylesheet-set" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMDocumentSelectedStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentSelectedStylesheetSet obj = liftIO $ getObjectPropertyString obj "selected-stylesheet-set" + +setDOMDocumentSelectedStylesheetSet :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () +setDOMDocumentSelectedStylesheetSet obj val = liftIO $ setObjectPropertyString obj "selected-stylesheet-set" val + +constructDOMDocumentSelectedStylesheetSet :: T.Text -> IO ([Char], GValue) +constructDOMDocumentSelectedStylesheetSet val = constructObjectPropertyString "selected-stylesheet-set" val + +data DOMDocumentSelectedStylesheetSetPropertyInfo +instance AttrInfo DOMDocumentSelectedStylesheetSetPropertyInfo where + type AttrAllowedOps DOMDocumentSelectedStylesheetSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMDocumentSelectedStylesheetSetPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMDocumentSelectedStylesheetSetPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentSelectedStylesheetSetPropertyInfo = T.Text + type AttrLabel DOMDocumentSelectedStylesheetSetPropertyInfo = "selected-stylesheet-set" + attrGet _ = getDOMDocumentSelectedStylesheetSet + attrSet _ = setDOMDocumentSelectedStylesheetSet + attrConstruct _ = constructDOMDocumentSelectedStylesheetSet + +-- VVV Prop "style-sheets" + -- Type: TInterface "WebKit" "DOMStyleSheetList" + -- Flags: [PropertyReadable] + +getDOMDocumentStyleSheets :: (MonadIO m, DOMDocumentK o) => o -> m DOMStyleSheetList +getDOMDocumentStyleSheets obj = liftIO $ getObjectPropertyObject obj "style-sheets" DOMStyleSheetList + +data DOMDocumentStyleSheetsPropertyInfo +instance AttrInfo DOMDocumentStyleSheetsPropertyInfo where + type AttrAllowedOps DOMDocumentStyleSheetsPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentStyleSheetsPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentStyleSheetsPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentStyleSheetsPropertyInfo = DOMStyleSheetList + type AttrLabel DOMDocumentStyleSheetsPropertyInfo = "style-sheets" + attrGet _ = getDOMDocumentStyleSheets + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "title" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMDocumentTitle :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentTitle obj = liftIO $ getObjectPropertyString obj "title" + +setDOMDocumentTitle :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () +setDOMDocumentTitle obj val = liftIO $ setObjectPropertyString obj "title" val + +constructDOMDocumentTitle :: T.Text -> IO ([Char], GValue) +constructDOMDocumentTitle val = constructObjectPropertyString "title" val + +data DOMDocumentTitlePropertyInfo +instance AttrInfo DOMDocumentTitlePropertyInfo where + type AttrAllowedOps DOMDocumentTitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMDocumentTitlePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMDocumentTitlePropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentTitlePropertyInfo = T.Text + type AttrLabel DOMDocumentTitlePropertyInfo = "title" + attrGet _ = getDOMDocumentTitle + attrSet _ = setDOMDocumentTitle + attrConstruct _ = constructDOMDocumentTitle + +-- VVV Prop "url" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentUrl :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentUrl obj = liftIO $ getObjectPropertyString obj "url" + +data DOMDocumentUrlPropertyInfo +instance AttrInfo DOMDocumentUrlPropertyInfo where + type AttrAllowedOps DOMDocumentUrlPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentUrlPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentUrlPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentUrlPropertyInfo = T.Text + type AttrLabel DOMDocumentUrlPropertyInfo = "url" + attrGet _ = getDOMDocumentUrl + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "visibility-state" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentVisibilityState :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentVisibilityState obj = liftIO $ getObjectPropertyString obj "visibility-state" + +data DOMDocumentVisibilityStatePropertyInfo +instance AttrInfo DOMDocumentVisibilityStatePropertyInfo where + type AttrAllowedOps DOMDocumentVisibilityStatePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentVisibilityStatePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentVisibilityStatePropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentVisibilityStatePropertyInfo = T.Text + type AttrLabel DOMDocumentVisibilityStatePropertyInfo = "visibility-state" + attrGet _ = getDOMDocumentVisibilityState + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "webkit-current-full-screen-element" + -- Type: TInterface "WebKit" "DOMElement" + -- Flags: [PropertyReadable] + +getDOMDocumentWebkitCurrentFullScreenElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement +getDOMDocumentWebkitCurrentFullScreenElement obj = liftIO $ getObjectPropertyObject obj "webkit-current-full-screen-element" DOMElement + +data DOMDocumentWebkitCurrentFullScreenElementPropertyInfo +instance AttrInfo DOMDocumentWebkitCurrentFullScreenElementPropertyInfo where + type AttrAllowedOps DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = DOMElement + type AttrLabel DOMDocumentWebkitCurrentFullScreenElementPropertyInfo = "webkit-current-full-screen-element" + attrGet _ = getDOMDocumentWebkitCurrentFullScreenElement + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "webkit-full-screen-keyboard-input-allowed" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMDocumentWebkitFullScreenKeyboardInputAllowed :: (MonadIO m, DOMDocumentK o) => o -> m Bool +getDOMDocumentWebkitFullScreenKeyboardInputAllowed obj = liftIO $ getObjectPropertyBool obj "webkit-full-screen-keyboard-input-allowed" + +data DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo +instance AttrInfo DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo where + type AttrAllowedOps DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = Bool + type AttrLabel DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo = "webkit-full-screen-keyboard-input-allowed" + attrGet _ = getDOMDocumentWebkitFullScreenKeyboardInputAllowed + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "webkit-fullscreen-element" + -- Type: TInterface "WebKit" "DOMElement" + -- Flags: [PropertyReadable] + +getDOMDocumentWebkitFullscreenElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement +getDOMDocumentWebkitFullscreenElement obj = liftIO $ getObjectPropertyObject obj "webkit-fullscreen-element" DOMElement + +data DOMDocumentWebkitFullscreenElementPropertyInfo +instance AttrInfo DOMDocumentWebkitFullscreenElementPropertyInfo where + type AttrAllowedOps DOMDocumentWebkitFullscreenElementPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentWebkitFullscreenElementPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentWebkitFullscreenElementPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentWebkitFullscreenElementPropertyInfo = DOMElement + type AttrLabel DOMDocumentWebkitFullscreenElementPropertyInfo = "webkit-fullscreen-element" + attrGet _ = getDOMDocumentWebkitFullscreenElement + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "webkit-fullscreen-enabled" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMDocumentWebkitFullscreenEnabled :: (MonadIO m, DOMDocumentK o) => o -> m Bool +getDOMDocumentWebkitFullscreenEnabled obj = liftIO $ getObjectPropertyBool obj "webkit-fullscreen-enabled" + +data DOMDocumentWebkitFullscreenEnabledPropertyInfo +instance AttrInfo DOMDocumentWebkitFullscreenEnabledPropertyInfo where + type AttrAllowedOps DOMDocumentWebkitFullscreenEnabledPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentWebkitFullscreenEnabledPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentWebkitFullscreenEnabledPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentWebkitFullscreenEnabledPropertyInfo = Bool + type AttrLabel DOMDocumentWebkitFullscreenEnabledPropertyInfo = "webkit-fullscreen-enabled" + attrGet _ = getDOMDocumentWebkitFullscreenEnabled + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "webkit-is-full-screen" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMDocumentWebkitIsFullScreen :: (MonadIO m, DOMDocumentK o) => o -> m Bool +getDOMDocumentWebkitIsFullScreen obj = liftIO $ getObjectPropertyBool obj "webkit-is-full-screen" + +data DOMDocumentWebkitIsFullScreenPropertyInfo +instance AttrInfo DOMDocumentWebkitIsFullScreenPropertyInfo where + type AttrAllowedOps DOMDocumentWebkitIsFullScreenPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentWebkitIsFullScreenPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentWebkitIsFullScreenPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentWebkitIsFullScreenPropertyInfo = Bool + type AttrLabel DOMDocumentWebkitIsFullScreenPropertyInfo = "webkit-is-full-screen" + attrGet _ = getDOMDocumentWebkitIsFullScreen + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "webkit-pointer-lock-element" + -- Type: TInterface "WebKit" "DOMElement" + -- Flags: [PropertyReadable] + +getDOMDocumentWebkitPointerLockElement :: (MonadIO m, DOMDocumentK o) => o -> m DOMElement +getDOMDocumentWebkitPointerLockElement obj = liftIO $ getObjectPropertyObject obj "webkit-pointer-lock-element" DOMElement + +data DOMDocumentWebkitPointerLockElementPropertyInfo +instance AttrInfo DOMDocumentWebkitPointerLockElementPropertyInfo where + type AttrAllowedOps DOMDocumentWebkitPointerLockElementPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentWebkitPointerLockElementPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentWebkitPointerLockElementPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentWebkitPointerLockElementPropertyInfo = DOMElement + type AttrLabel DOMDocumentWebkitPointerLockElementPropertyInfo = "webkit-pointer-lock-element" + attrGet _ = getDOMDocumentWebkitPointerLockElement + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "xml-encoding" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMDocumentXmlEncoding :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentXmlEncoding obj = liftIO $ getObjectPropertyString obj "xml-encoding" + +data DOMDocumentXmlEncodingPropertyInfo +instance AttrInfo DOMDocumentXmlEncodingPropertyInfo where + type AttrAllowedOps DOMDocumentXmlEncodingPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMDocumentXmlEncodingPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMDocumentXmlEncodingPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentXmlEncodingPropertyInfo = T.Text + type AttrLabel DOMDocumentXmlEncodingPropertyInfo = "xml-encoding" + attrGet _ = getDOMDocumentXmlEncoding + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "xml-standalone" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMDocumentXmlStandalone :: (MonadIO m, DOMDocumentK o) => o -> m Bool +getDOMDocumentXmlStandalone obj = liftIO $ getObjectPropertyBool obj "xml-standalone" + +setDOMDocumentXmlStandalone :: (MonadIO m, DOMDocumentK o) => o -> Bool -> m () +setDOMDocumentXmlStandalone obj val = liftIO $ setObjectPropertyBool obj "xml-standalone" val + +constructDOMDocumentXmlStandalone :: Bool -> IO ([Char], GValue) +constructDOMDocumentXmlStandalone val = constructObjectPropertyBool "xml-standalone" val + +data DOMDocumentXmlStandalonePropertyInfo +instance AttrInfo DOMDocumentXmlStandalonePropertyInfo where + type AttrAllowedOps DOMDocumentXmlStandalonePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMDocumentXmlStandalonePropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMDocumentXmlStandalonePropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentXmlStandalonePropertyInfo = Bool + type AttrLabel DOMDocumentXmlStandalonePropertyInfo = "xml-standalone" + attrGet _ = getDOMDocumentXmlStandalone + attrSet _ = setDOMDocumentXmlStandalone + attrConstruct _ = constructDOMDocumentXmlStandalone + +-- VVV Prop "xml-version" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMDocumentXmlVersion :: (MonadIO m, DOMDocumentK o) => o -> m T.Text +getDOMDocumentXmlVersion obj = liftIO $ getObjectPropertyString obj "xml-version" + +setDOMDocumentXmlVersion :: (MonadIO m, DOMDocumentK o) => o -> T.Text -> m () +setDOMDocumentXmlVersion obj val = liftIO $ setObjectPropertyString obj "xml-version" val + +constructDOMDocumentXmlVersion :: T.Text -> IO ([Char], GValue) +constructDOMDocumentXmlVersion val = constructObjectPropertyString "xml-version" val + +data DOMDocumentXmlVersionPropertyInfo +instance AttrInfo DOMDocumentXmlVersionPropertyInfo where + type AttrAllowedOps DOMDocumentXmlVersionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMDocumentXmlVersionPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMDocumentXmlVersionPropertyInfo = DOMDocumentK + type AttrGetType DOMDocumentXmlVersionPropertyInfo = T.Text + type AttrLabel DOMDocumentXmlVersionPropertyInfo = "xml-version" + attrGet _ = getDOMDocumentXmlVersion + attrSet _ = setDOMDocumentXmlVersion + attrConstruct _ = constructDOMDocumentXmlVersion + +type instance AttributeList DOMDocument = DOMDocumentAttributeList +type DOMDocumentAttributeList = ('[ '("anchors", DOMDocumentAnchorsPropertyInfo), '("applets", DOMDocumentAppletsPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("body", DOMDocumentBodyPropertyInfo), '("characterSet", DOMDocumentCharacterSetPropertyInfo), '("charset", DOMDocumentCharsetPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("compatMode", DOMDocumentCompatModePropertyInfo), '("cookie", DOMDocumentCookiePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentScript", DOMDocumentCurrentScriptPropertyInfo), '("defaultCharset", DOMDocumentDefaultCharsetPropertyInfo), '("defaultView", DOMDocumentDefaultViewPropertyInfo), '("doctype", DOMDocumentDoctypePropertyInfo), '("documentElement", DOMDocumentDocumentElementPropertyInfo), '("documentUri", DOMDocumentDocumentUriPropertyInfo), '("domain", DOMDocumentDomainPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("forms", DOMDocumentFormsPropertyInfo), '("head", DOMDocumentHeadPropertyInfo), '("hidden", DOMDocumentHiddenPropertyInfo), '("images", DOMDocumentImagesPropertyInfo), '("implementation", DOMDocumentImplementationPropertyInfo), '("inputEncoding", DOMDocumentInputEncodingPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastModified", DOMDocumentLastModifiedPropertyInfo), '("links", DOMDocumentLinksPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("preferredStylesheetSet", DOMDocumentPreferredStylesheetSetPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("readyState", DOMDocumentReadyStatePropertyInfo), '("referrer", DOMDocumentReferrerPropertyInfo), '("securityPolicy", DOMDocumentSecurityPolicyPropertyInfo), '("selectedStylesheetSet", DOMDocumentSelectedStylesheetSetPropertyInfo), '("styleSheets", DOMDocumentStyleSheetsPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMDocumentTitlePropertyInfo), '("url", DOMDocumentUrlPropertyInfo), '("visibilityState", DOMDocumentVisibilityStatePropertyInfo), '("webkitCurrentFullScreenElement", DOMDocumentWebkitCurrentFullScreenElementPropertyInfo), '("webkitFullScreenKeyboardInputAllowed", DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo), '("webkitFullscreenElement", DOMDocumentWebkitFullscreenElementPropertyInfo), '("webkitFullscreenEnabled", DOMDocumentWebkitFullscreenEnabledPropertyInfo), '("webkitIsFullScreen", DOMDocumentWebkitIsFullScreenPropertyInfo), '("webkitPointerLockElement", DOMDocumentWebkitPointerLockElementPropertyInfo), '("xmlEncoding", DOMDocumentXmlEncodingPropertyInfo), '("xmlStandalone", DOMDocumentXmlStandalonePropertyInfo), '("xmlVersion", DOMDocumentXmlVersionPropertyInfo)] :: [(Symbol, *)]) + +type instance SignalList DOMDocument = DOMDocumentSignalList +type DOMDocumentSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) + +-- method DOMDocument::adopt_node +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "source", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMNode" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_adopt_node" webkit_dom_document_adopt_node :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + Ptr DOMNode -> -- source : TInterface "WebKit" "DOMNode" + Ptr (Ptr GError) -> -- error + IO (Ptr DOMNode) + + +dOMDocumentAdoptNode :: + (MonadIO m, DOMDocumentK a, DOMNodeK b) => + a -- _obj + -> b -- source + -> m DOMNode -- result +dOMDocumentAdoptNode _obj source = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let source' = unsafeManagedPtrCastPtr source + onException (do + result <- propagateGError $ webkit_dom_document_adopt_node _obj' source' + checkUnexpectedReturnNULL "webkit_dom_document_adopt_node" result + result' <- (newObject DOMNode) result + touchManagedPtr _obj + touchManagedPtr source + return result' + ) (do + return () + ) + +data DOMDocumentAdoptNodeMethodInfo +instance (signature ~ (b -> m DOMNode), MonadIO m, DOMDocumentK a, DOMNodeK b) => MethodInfo DOMDocumentAdoptNodeMethodInfo a signature where + overloadedMethod _ = dOMDocumentAdoptNode + +-- method DOMDocument::caret_range_from_point +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMRange" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_caret_range_from_point" webkit_dom_document_caret_range_from_point :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + Int64 -> -- x : TBasicType TInt64 + Int64 -> -- y : TBasicType TInt64 + IO (Ptr DOMRange) + + +dOMDocumentCaretRangeFromPoint :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> Int64 -- x + -> Int64 -- y + -> m DOMRange -- result +dOMDocumentCaretRangeFromPoint _obj x y = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_caret_range_from_point _obj' x y + checkUnexpectedReturnNULL "webkit_dom_document_caret_range_from_point" result + result' <- (wrapObject DOMRange) result + touchManagedPtr _obj + return result' + +data DOMDocumentCaretRangeFromPointMethodInfo +instance (signature ~ (Int64 -> Int64 -> m DOMRange), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCaretRangeFromPointMethodInfo a signature where + overloadedMethod _ = dOMDocumentCaretRangeFromPoint + +-- method DOMDocument::create_attribute +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMAttr" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_attribute" webkit_dom_document_create_attribute :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- name : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO (Ptr DOMAttr) + + +dOMDocumentCreateAttribute :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- name + -> m DOMAttr -- result +dOMDocumentCreateAttribute _obj name = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + name' <- textToCString name + onException (do + result <- propagateGError $ webkit_dom_document_create_attribute _obj' name' + checkUnexpectedReturnNULL "webkit_dom_document_create_attribute" result + result' <- (newObject DOMAttr) result + touchManagedPtr _obj + freeMem name' + return result' + ) (do + freeMem name' + ) + +data DOMDocumentCreateAttributeMethodInfo +instance (signature ~ (T.Text -> m DOMAttr), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateAttributeMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateAttribute + +-- method DOMDocument::create_attribute_ns +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMAttr" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_attribute_ns" webkit_dom_document_create_attribute_ns :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- namespaceURI : TBasicType TUTF8 + CString -> -- qualifiedName : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO (Ptr DOMAttr) + + +dOMDocumentCreateAttributeNs :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> Maybe (T.Text) -- namespaceURI + -> T.Text -- qualifiedName + -> m DOMAttr -- result +dOMDocumentCreateAttributeNs _obj namespaceURI qualifiedName = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + maybeNamespaceURI <- case namespaceURI of + Nothing -> return nullPtr + Just jNamespaceURI -> do + jNamespaceURI' <- textToCString jNamespaceURI + return jNamespaceURI' + qualifiedName' <- textToCString qualifiedName + onException (do + result <- propagateGError $ webkit_dom_document_create_attribute_ns _obj' maybeNamespaceURI qualifiedName' + checkUnexpectedReturnNULL "webkit_dom_document_create_attribute_ns" result + result' <- (newObject DOMAttr) result + touchManagedPtr _obj + freeMem maybeNamespaceURI + freeMem qualifiedName' + return result' + ) (do + freeMem maybeNamespaceURI + freeMem qualifiedName' + ) + +data DOMDocumentCreateAttributeNsMethodInfo +instance (signature ~ (Maybe (T.Text) -> T.Text -> m DOMAttr), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateAttributeNsMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateAttributeNs + +-- method DOMDocument::create_cdata_section +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMCDATASection" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_cdata_section" webkit_dom_document_create_cdata_section :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- data : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO (Ptr DOMCDATASection) + + +dOMDocumentCreateCdataSection :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- data_ + -> m DOMCDATASection -- result +dOMDocumentCreateCdataSection _obj data_ = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + data_' <- textToCString data_ + onException (do + result <- propagateGError $ webkit_dom_document_create_cdata_section _obj' data_' + checkUnexpectedReturnNULL "webkit_dom_document_create_cdata_section" result + result' <- (newObject DOMCDATASection) result + touchManagedPtr _obj + freeMem data_' + return result' + ) (do + freeMem data_' + ) + +data DOMDocumentCreateCdataSectionMethodInfo +instance (signature ~ (T.Text -> m DOMCDATASection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateCdataSectionMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateCdataSection + +-- method DOMDocument::create_comment +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMComment" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_comment" webkit_dom_document_create_comment :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- data : TBasicType TUTF8 + IO (Ptr DOMComment) + + +dOMDocumentCreateComment :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- data_ + -> m DOMComment -- result +dOMDocumentCreateComment _obj data_ = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + data_' <- textToCString data_ + result <- webkit_dom_document_create_comment _obj' data_' + checkUnexpectedReturnNULL "webkit_dom_document_create_comment" result + result' <- (newObject DOMComment) result + touchManagedPtr _obj + freeMem data_' + return result' + +data DOMDocumentCreateCommentMethodInfo +instance (signature ~ (T.Text -> m DOMComment), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateCommentMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateComment + +-- method DOMDocument::create_css_style_declaration +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMCSSStyleDeclaration" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_css_style_declaration" webkit_dom_document_create_css_style_declaration :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMCSSStyleDeclaration) + + +dOMDocumentCreateCssStyleDeclaration :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMCSSStyleDeclaration -- result +dOMDocumentCreateCssStyleDeclaration _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_create_css_style_declaration _obj' + checkUnexpectedReturnNULL "webkit_dom_document_create_css_style_declaration" result + result' <- (wrapObject DOMCSSStyleDeclaration) result + touchManagedPtr _obj + return result' + +data DOMDocumentCreateCssStyleDeclarationMethodInfo +instance (signature ~ (m DOMCSSStyleDeclaration), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateCssStyleDeclarationMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateCssStyleDeclaration + +-- method DOMDocument::create_document_fragment +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDocumentFragment" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_document_fragment" webkit_dom_document_create_document_fragment :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMDocumentFragment) + + +dOMDocumentCreateDocumentFragment :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMDocumentFragment -- result +dOMDocumentCreateDocumentFragment _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_create_document_fragment _obj' + checkUnexpectedReturnNULL "webkit_dom_document_create_document_fragment" result + result' <- (newObject DOMDocumentFragment) result + touchManagedPtr _obj + return result' + +data DOMDocumentCreateDocumentFragmentMethodInfo +instance (signature ~ (m DOMDocumentFragment), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateDocumentFragmentMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateDocumentFragment + +-- method DOMDocument::create_element +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tagName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMElement" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_element" webkit_dom_document_create_element :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- tagName : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO (Ptr DOMElement) + + +dOMDocumentCreateElement :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- tagName + -> m DOMElement -- result +dOMDocumentCreateElement _obj tagName = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + tagName' <- textToCString tagName + onException (do + result <- propagateGError $ webkit_dom_document_create_element _obj' tagName' + checkUnexpectedReturnNULL "webkit_dom_document_create_element" result + result' <- (newObject DOMElement) result + touchManagedPtr _obj + freeMem tagName' + return result' + ) (do + freeMem tagName' + ) + +data DOMDocumentCreateElementMethodInfo +instance (signature ~ (T.Text -> m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateElementMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateElement + +-- method DOMDocument::create_element_ns +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMElement" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_element_ns" webkit_dom_document_create_element_ns :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- namespaceURI : TBasicType TUTF8 + CString -> -- qualifiedName : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO (Ptr DOMElement) + + +dOMDocumentCreateElementNs :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> Maybe (T.Text) -- namespaceURI + -> T.Text -- qualifiedName + -> m DOMElement -- result +dOMDocumentCreateElementNs _obj namespaceURI qualifiedName = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + maybeNamespaceURI <- case namespaceURI of + Nothing -> return nullPtr + Just jNamespaceURI -> do + jNamespaceURI' <- textToCString jNamespaceURI + return jNamespaceURI' + qualifiedName' <- textToCString qualifiedName + onException (do + result <- propagateGError $ webkit_dom_document_create_element_ns _obj' maybeNamespaceURI qualifiedName' + checkUnexpectedReturnNULL "webkit_dom_document_create_element_ns" result + result' <- (newObject DOMElement) result + touchManagedPtr _obj + freeMem maybeNamespaceURI + freeMem qualifiedName' + return result' + ) (do + freeMem maybeNamespaceURI + freeMem qualifiedName' + ) + +data DOMDocumentCreateElementNsMethodInfo +instance (signature ~ (Maybe (T.Text) -> T.Text -> m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateElementNsMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateElementNs + +-- method DOMDocument::create_entity_reference +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMEntityReference" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_entity_reference" webkit_dom_document_create_entity_reference :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- name : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO (Ptr DOMEntityReference) + + +dOMDocumentCreateEntityReference :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> Maybe (T.Text) -- name + -> m DOMEntityReference -- result +dOMDocumentCreateEntityReference _obj name = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + maybeName <- case name of + Nothing -> return nullPtr + Just jName -> do + jName' <- textToCString jName + return jName' + onException (do + result <- propagateGError $ webkit_dom_document_create_entity_reference _obj' maybeName + checkUnexpectedReturnNULL "webkit_dom_document_create_entity_reference" result + result' <- (newObject DOMEntityReference) result + touchManagedPtr _obj + freeMem maybeName + return result' + ) (do + freeMem maybeName + ) + +data DOMDocumentCreateEntityReferenceMethodInfo +instance (signature ~ (Maybe (T.Text) -> m DOMEntityReference), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateEntityReferenceMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateEntityReference + +-- method DOMDocument::create_event +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "eventType", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMEvent" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_event" webkit_dom_document_create_event :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- eventType : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO (Ptr DOMEvent) + + +dOMDocumentCreateEvent :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- eventType + -> m DOMEvent -- result +dOMDocumentCreateEvent _obj eventType = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + eventType' <- textToCString eventType + onException (do + result <- propagateGError $ webkit_dom_document_create_event _obj' eventType' + checkUnexpectedReturnNULL "webkit_dom_document_create_event" result + result' <- (wrapObject DOMEvent) result + touchManagedPtr _obj + freeMem eventType' + return result' + ) (do + freeMem eventType' + ) + +data DOMDocumentCreateEventMethodInfo +instance (signature ~ (T.Text -> m DOMEvent), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateEventMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateEvent + +-- method DOMDocument::create_expression +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "expression", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "resolver", argType = TInterface "WebKit" "DOMXPathNSResolver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMXPathExpression" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_expression" webkit_dom_document_create_expression :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- expression : TBasicType TUTF8 + Ptr DOMXPathNSResolver -> -- resolver : TInterface "WebKit" "DOMXPathNSResolver" + Ptr (Ptr GError) -> -- error + IO (Ptr DOMXPathExpression) + + +dOMDocumentCreateExpression :: + (MonadIO m, DOMDocumentK a, DOMXPathNSResolverK b) => + a -- _obj + -> T.Text -- expression + -> b -- resolver + -> m DOMXPathExpression -- result +dOMDocumentCreateExpression _obj expression resolver = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + expression' <- textToCString expression + let resolver' = unsafeManagedPtrCastPtr resolver + onException (do + result <- propagateGError $ webkit_dom_document_create_expression _obj' expression' resolver' + checkUnexpectedReturnNULL "webkit_dom_document_create_expression" result + result' <- (wrapObject DOMXPathExpression) result + touchManagedPtr _obj + touchManagedPtr resolver + freeMem expression' + return result' + ) (do + freeMem expression' + ) + +data DOMDocumentCreateExpressionMethodInfo +instance (signature ~ (T.Text -> b -> m DOMXPathExpression), MonadIO m, DOMDocumentK a, DOMXPathNSResolverK b) => MethodInfo DOMDocumentCreateExpressionMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateExpression + +-- method DOMDocument::create_node_iterator +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "root", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "whatToShow", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "filter", argType = TInterface "WebKit" "DOMNodeFilter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "expandEntityReferences", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMNodeIterator" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_node_iterator" webkit_dom_document_create_node_iterator :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + Ptr DOMNode -> -- root : TInterface "WebKit" "DOMNode" + Word64 -> -- whatToShow : TBasicType TUInt64 + Ptr DOMNodeFilter -> -- filter : TInterface "WebKit" "DOMNodeFilter" + CInt -> -- expandEntityReferences : TBasicType TBoolean + Ptr (Ptr GError) -> -- error + IO (Ptr DOMNodeIterator) + + +dOMDocumentCreateNodeIterator :: + (MonadIO m, DOMDocumentK a, DOMNodeK b, DOMNodeFilterK c) => + a -- _obj + -> b -- root + -> Word64 -- whatToShow + -> c -- filter + -> Bool -- expandEntityReferences + -> m DOMNodeIterator -- result +dOMDocumentCreateNodeIterator _obj root whatToShow filter expandEntityReferences = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let root' = unsafeManagedPtrCastPtr root + let filter' = unsafeManagedPtrCastPtr filter + let expandEntityReferences' = (fromIntegral . fromEnum) expandEntityReferences + onException (do + result <- propagateGError $ webkit_dom_document_create_node_iterator _obj' root' whatToShow filter' expandEntityReferences' + checkUnexpectedReturnNULL "webkit_dom_document_create_node_iterator" result + result' <- (wrapObject DOMNodeIterator) result + touchManagedPtr _obj + touchManagedPtr root + touchManagedPtr filter + return result' + ) (do + return () + ) + +data DOMDocumentCreateNodeIteratorMethodInfo +instance (signature ~ (b -> Word64 -> c -> Bool -> m DOMNodeIterator), MonadIO m, DOMDocumentK a, DOMNodeK b, DOMNodeFilterK c) => MethodInfo DOMDocumentCreateNodeIteratorMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateNodeIterator + +-- method DOMDocument::create_ns_resolver +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "nodeResolver", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMXPathNSResolver" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_ns_resolver" webkit_dom_document_create_ns_resolver :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + Ptr DOMNode -> -- nodeResolver : TInterface "WebKit" "DOMNode" + IO (Ptr DOMXPathNSResolver) + + +dOMDocumentCreateNsResolver :: + (MonadIO m, DOMDocumentK a, DOMNodeK b) => + a -- _obj + -> b -- nodeResolver + -> m DOMXPathNSResolver -- result +dOMDocumentCreateNsResolver _obj nodeResolver = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let nodeResolver' = unsafeManagedPtrCastPtr nodeResolver + result <- webkit_dom_document_create_ns_resolver _obj' nodeResolver' + checkUnexpectedReturnNULL "webkit_dom_document_create_ns_resolver" result + result' <- (wrapObject DOMXPathNSResolver) result + touchManagedPtr _obj + touchManagedPtr nodeResolver + return result' + +data DOMDocumentCreateNsResolverMethodInfo +instance (signature ~ (b -> m DOMXPathNSResolver), MonadIO m, DOMDocumentK a, DOMNodeK b) => MethodInfo DOMDocumentCreateNsResolverMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateNsResolver + +-- method DOMDocument::create_processing_instruction +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "target", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMProcessingInstruction" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_processing_instruction" webkit_dom_document_create_processing_instruction :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- target : TBasicType TUTF8 + CString -> -- data : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO (Ptr DOMProcessingInstruction) + + +dOMDocumentCreateProcessingInstruction :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- target + -> T.Text -- data_ + -> m DOMProcessingInstruction -- result +dOMDocumentCreateProcessingInstruction _obj target data_ = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + target' <- textToCString target + data_' <- textToCString data_ + onException (do + result <- propagateGError $ webkit_dom_document_create_processing_instruction _obj' target' data_' + checkUnexpectedReturnNULL "webkit_dom_document_create_processing_instruction" result + result' <- (newObject DOMProcessingInstruction) result + touchManagedPtr _obj + freeMem target' + freeMem data_' + return result' + ) (do + freeMem target' + freeMem data_' + ) + +data DOMDocumentCreateProcessingInstructionMethodInfo +instance (signature ~ (T.Text -> T.Text -> m DOMProcessingInstruction), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateProcessingInstructionMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateProcessingInstruction + +-- method DOMDocument::create_range +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMRange" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_range" webkit_dom_document_create_range :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMRange) + + +dOMDocumentCreateRange :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMRange -- result +dOMDocumentCreateRange _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_create_range _obj' + checkUnexpectedReturnNULL "webkit_dom_document_create_range" result + result' <- (wrapObject DOMRange) result + touchManagedPtr _obj + return result' + +data DOMDocumentCreateRangeMethodInfo +instance (signature ~ (m DOMRange), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateRangeMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateRange + +-- method DOMDocument::create_text_node +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMText" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_text_node" webkit_dom_document_create_text_node :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- data : TBasicType TUTF8 + IO (Ptr DOMText) + + +dOMDocumentCreateTextNode :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- data_ + -> m DOMText -- result +dOMDocumentCreateTextNode _obj data_ = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + data_' <- textToCString data_ + result <- webkit_dom_document_create_text_node _obj' data_' + checkUnexpectedReturnNULL "webkit_dom_document_create_text_node" result + result' <- (newObject DOMText) result + touchManagedPtr _obj + freeMem data_' + return result' + +data DOMDocumentCreateTextNodeMethodInfo +instance (signature ~ (T.Text -> m DOMText), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentCreateTextNodeMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateTextNode + +-- method DOMDocument::create_touch +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "window", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "target", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "identifier", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pageX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pageY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "screenX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "screenY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "webkitRadiusX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "webkitRadiusY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "webkitRotationAngle", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "webkitForce", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMTouch" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_touch" webkit_dom_document_create_touch :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + Ptr DOMDOMWindow -> -- window : TInterface "WebKit" "DOMDOMWindow" + Ptr DOMEventTarget -> -- target : TInterface "WebKit" "DOMEventTarget" + Int64 -> -- identifier : TBasicType TInt64 + Int64 -> -- pageX : TBasicType TInt64 + Int64 -> -- pageY : TBasicType TInt64 + Int64 -> -- screenX : TBasicType TInt64 + Int64 -> -- screenY : TBasicType TInt64 + Int64 -> -- webkitRadiusX : TBasicType TInt64 + Int64 -> -- webkitRadiusY : TBasicType TInt64 + CFloat -> -- webkitRotationAngle : TBasicType TFloat + CFloat -> -- webkitForce : TBasicType TFloat + Ptr (Ptr GError) -> -- error + IO (Ptr DOMTouch) + + +dOMDocumentCreateTouch :: + (MonadIO m, DOMDocumentK a, DOMDOMWindowK b, DOMEventTargetK c) => + a -- _obj + -> b -- window + -> c -- target + -> Int64 -- identifier + -> Int64 -- pageX + -> Int64 -- pageY + -> Int64 -- screenX + -> Int64 -- screenY + -> Int64 -- webkitRadiusX + -> Int64 -- webkitRadiusY + -> Float -- webkitRotationAngle + -> Float -- webkitForce + -> m DOMTouch -- result +dOMDocumentCreateTouch _obj window target identifier pageX pageY screenX screenY webkitRadiusX webkitRadiusY webkitRotationAngle webkitForce = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let window' = unsafeManagedPtrCastPtr window + let target' = unsafeManagedPtrCastPtr target + let webkitRotationAngle' = realToFrac webkitRotationAngle + let webkitForce' = realToFrac webkitForce + onException (do + result <- propagateGError $ webkit_dom_document_create_touch _obj' window' target' identifier pageX pageY screenX screenY webkitRadiusX webkitRadiusY webkitRotationAngle' webkitForce' + checkUnexpectedReturnNULL "webkit_dom_document_create_touch" result + result' <- (wrapObject DOMTouch) result + touchManagedPtr _obj + touchManagedPtr window + touchManagedPtr target + return result' + ) (do + return () + ) + +data DOMDocumentCreateTouchMethodInfo +instance (signature ~ (b -> c -> Int64 -> Int64 -> Int64 -> Int64 -> Int64 -> Int64 -> Int64 -> Float -> Float -> m DOMTouch), MonadIO m, DOMDocumentK a, DOMDOMWindowK b, DOMEventTargetK c) => MethodInfo DOMDocumentCreateTouchMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateTouch + +-- method DOMDocument::create_tree_walker +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "root", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "whatToShow", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "filter", argType = TInterface "WebKit" "DOMNodeFilter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "expandEntityReferences", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMTreeWalker" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_create_tree_walker" webkit_dom_document_create_tree_walker :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + Ptr DOMNode -> -- root : TInterface "WebKit" "DOMNode" + Word64 -> -- whatToShow : TBasicType TUInt64 + Ptr DOMNodeFilter -> -- filter : TInterface "WebKit" "DOMNodeFilter" + CInt -> -- expandEntityReferences : TBasicType TBoolean + Ptr (Ptr GError) -> -- error + IO (Ptr DOMTreeWalker) + + +dOMDocumentCreateTreeWalker :: + (MonadIO m, DOMDocumentK a, DOMNodeK b, DOMNodeFilterK c) => + a -- _obj + -> b -- root + -> Word64 -- whatToShow + -> c -- filter + -> Bool -- expandEntityReferences + -> m DOMTreeWalker -- result +dOMDocumentCreateTreeWalker _obj root whatToShow filter expandEntityReferences = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let root' = unsafeManagedPtrCastPtr root + let filter' = unsafeManagedPtrCastPtr filter + let expandEntityReferences' = (fromIntegral . fromEnum) expandEntityReferences + onException (do + result <- propagateGError $ webkit_dom_document_create_tree_walker _obj' root' whatToShow filter' expandEntityReferences' + checkUnexpectedReturnNULL "webkit_dom_document_create_tree_walker" result + result' <- (wrapObject DOMTreeWalker) result + touchManagedPtr _obj + touchManagedPtr root + touchManagedPtr filter + return result' + ) (do + return () + ) + +data DOMDocumentCreateTreeWalkerMethodInfo +instance (signature ~ (b -> Word64 -> c -> Bool -> m DOMTreeWalker), MonadIO m, DOMDocumentK a, DOMNodeK b, DOMNodeFilterK c) => MethodInfo DOMDocumentCreateTreeWalkerMethodInfo a signature where + overloadedMethod _ = dOMDocumentCreateTreeWalker + +-- method DOMDocument::element_from_point +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_element_from_point" webkit_dom_document_element_from_point :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + Int64 -> -- x : TBasicType TInt64 + Int64 -> -- y : TBasicType TInt64 + IO (Ptr DOMElement) + + +dOMDocumentElementFromPoint :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> Int64 -- x + -> Int64 -- y + -> m DOMElement -- result +dOMDocumentElementFromPoint _obj x y = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_element_from_point _obj' x y + checkUnexpectedReturnNULL "webkit_dom_document_element_from_point" result + result' <- (newObject DOMElement) result + touchManagedPtr _obj + return result' + +data DOMDocumentElementFromPointMethodInfo +instance (signature ~ (Int64 -> Int64 -> m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentElementFromPointMethodInfo a signature where + overloadedMethod _ = dOMDocumentElementFromPoint + +-- method DOMDocument::evaluate +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "expression", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "contextNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "resolver", argType = TInterface "WebKit" "DOMXPathNSResolver", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "type", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "inResult", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMXPathResult" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_evaluate" webkit_dom_document_evaluate :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- expression : TBasicType TUTF8 + Ptr DOMNode -> -- contextNode : TInterface "WebKit" "DOMNode" + Ptr DOMXPathNSResolver -> -- resolver : TInterface "WebKit" "DOMXPathNSResolver" + Word16 -> -- type : TBasicType TUInt16 + Ptr DOMXPathResult -> -- inResult : TInterface "WebKit" "DOMXPathResult" + Ptr (Ptr GError) -> -- error + IO (Ptr DOMXPathResult) + + +dOMDocumentEvaluate :: + (MonadIO m, DOMDocumentK a, DOMNodeK b, DOMXPathNSResolverK c, DOMXPathResultK d) => + a -- _obj + -> T.Text -- expression + -> b -- contextNode + -> Maybe (c) -- resolver + -> Word16 -- type_ + -> Maybe (d) -- inResult + -> m DOMXPathResult -- result +dOMDocumentEvaluate _obj expression contextNode resolver type_ inResult = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + expression' <- textToCString expression + let contextNode' = unsafeManagedPtrCastPtr contextNode + maybeResolver <- case resolver of + Nothing -> return nullPtr + Just jResolver -> do + let jResolver' = unsafeManagedPtrCastPtr jResolver + return jResolver' + maybeInResult <- case inResult of + Nothing -> return nullPtr + Just jInResult -> do + let jInResult' = unsafeManagedPtrCastPtr jInResult + return jInResult' + onException (do + result <- propagateGError $ webkit_dom_document_evaluate _obj' expression' contextNode' maybeResolver type_ maybeInResult + checkUnexpectedReturnNULL "webkit_dom_document_evaluate" result + result' <- (wrapObject DOMXPathResult) result + touchManagedPtr _obj + touchManagedPtr contextNode + whenJust resolver touchManagedPtr + whenJust inResult touchManagedPtr + freeMem expression' + return result' + ) (do + freeMem expression' + ) + +data DOMDocumentEvaluateMethodInfo +instance (signature ~ (T.Text -> b -> Maybe (c) -> Word16 -> Maybe (d) -> m DOMXPathResult), MonadIO m, DOMDocumentK a, DOMNodeK b, DOMXPathNSResolverK c, DOMXPathResultK d) => MethodInfo DOMDocumentEvaluateMethodInfo a signature where + overloadedMethod _ = dOMDocumentEvaluate + +-- method DOMDocument::exec_command +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "userInterface", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_exec_command" webkit_dom_document_exec_command :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- command : TBasicType TUTF8 + CInt -> -- userInterface : TBasicType TBoolean + CString -> -- value : TBasicType TUTF8 + IO CInt + + +dOMDocumentExecCommand :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- command + -> Bool -- userInterface + -> T.Text -- value + -> m Bool -- result +dOMDocumentExecCommand _obj command userInterface value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + command' <- textToCString command + let userInterface' = (fromIntegral . fromEnum) userInterface + value' <- textToCString value + result <- webkit_dom_document_exec_command _obj' command' userInterface' value' + let result' = (/= 0) result + touchManagedPtr _obj + freeMem command' + freeMem value' + return result' + +data DOMDocumentExecCommandMethodInfo +instance (signature ~ (T.Text -> Bool -> T.Text -> m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentExecCommandMethodInfo a signature where + overloadedMethod _ = dOMDocumentExecCommand + +-- method DOMDocument::get_anchors +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMHTMLCollection" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_anchors" webkit_dom_document_get_anchors :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMHTMLCollection) + + +dOMDocumentGetAnchors :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMHTMLCollection -- result +dOMDocumentGetAnchors _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_anchors _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_anchors" result + result' <- (wrapObject DOMHTMLCollection) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetAnchorsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetAnchorsMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetAnchors + +-- method DOMDocument::get_applets +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMHTMLCollection" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_applets" webkit_dom_document_get_applets :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMHTMLCollection) + + +dOMDocumentGetApplets :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMHTMLCollection -- result +dOMDocumentGetApplets _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_applets _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_applets" result + result' <- (wrapObject DOMHTMLCollection) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetAppletsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetAppletsMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetApplets + +-- method DOMDocument::get_body +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMHTMLElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_body" webkit_dom_document_get_body :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMHTMLElement) + + +dOMDocumentGetBody :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMHTMLElement -- result +dOMDocumentGetBody _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_body _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_body" result + result' <- (newObject DOMHTMLElement) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetBodyMethodInfo +instance (signature ~ (m DOMHTMLElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetBodyMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetBody + +-- method DOMDocument::get_character_set +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_character_set" webkit_dom_document_get_character_set :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetCharacterSet :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetCharacterSet _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_character_set _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_character_set" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetCharacterSetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetCharacterSetMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetCharacterSet + +-- method DOMDocument::get_charset +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_charset" webkit_dom_document_get_charset :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetCharset :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetCharset _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_charset _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_charset" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetCharsetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetCharsetMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetCharset + +-- method DOMDocument::get_compat_mode +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_compat_mode" webkit_dom_document_get_compat_mode :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetCompatMode :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetCompatMode _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_compat_mode _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_compat_mode" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetCompatModeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetCompatModeMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetCompatMode + +-- method DOMDocument::get_cookie +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_cookie" webkit_dom_document_get_cookie :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + Ptr (Ptr GError) -> -- error + IO CString + + +dOMDocumentGetCookie :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetCookie _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + onException (do + result <- propagateGError $ webkit_dom_document_get_cookie _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_cookie" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + ) (do + return () + ) + +data DOMDocumentGetCookieMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetCookieMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetCookie + +-- method DOMDocument::get_current_script +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMHTMLScriptElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_current_script" webkit_dom_document_get_current_script :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMHTMLScriptElement) + + +dOMDocumentGetCurrentScript :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMHTMLScriptElement -- result +dOMDocumentGetCurrentScript _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_current_script _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_current_script" result + result' <- (newObject DOMHTMLScriptElement) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetCurrentScriptMethodInfo +instance (signature ~ (m DOMHTMLScriptElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetCurrentScriptMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetCurrentScript + +-- method DOMDocument::get_default_charset +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_default_charset" webkit_dom_document_get_default_charset :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetDefaultCharset :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetDefaultCharset _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_default_charset _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_default_charset" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetDefaultCharsetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDefaultCharsetMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetDefaultCharset + +-- method DOMDocument::get_default_view +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMWindow" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_default_view" webkit_dom_document_get_default_view :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMDOMWindow) + + +dOMDocumentGetDefaultView :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMDOMWindow -- result +dOMDocumentGetDefaultView _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_default_view _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_default_view" result + result' <- (wrapObject DOMDOMWindow) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetDefaultViewMethodInfo +instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDefaultViewMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetDefaultView + +-- method DOMDocument::get_doctype +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDocumentType" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_doctype" webkit_dom_document_get_doctype :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMDocumentType) + + +dOMDocumentGetDoctype :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMDocumentType -- result +dOMDocumentGetDoctype _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_doctype _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_doctype" result + result' <- (newObject DOMDocumentType) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetDoctypeMethodInfo +instance (signature ~ (m DOMDocumentType), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDoctypeMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetDoctype + +-- method DOMDocument::get_document_element +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_document_element" webkit_dom_document_get_document_element :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMElement) + + +dOMDocumentGetDocumentElement :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMElement -- result +dOMDocumentGetDocumentElement _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_document_element _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_document_element" result + result' <- (newObject DOMElement) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetDocumentElementMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDocumentElementMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetDocumentElement + +-- method DOMDocument::get_document_uri +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_document_uri" webkit_dom_document_get_document_uri :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetDocumentUri :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetDocumentUri _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_document_uri _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_document_uri" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetDocumentUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDocumentUriMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetDocumentUri + +-- method DOMDocument::get_domain +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_domain" webkit_dom_document_get_domain :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetDomain :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetDomain _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_domain _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_domain" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetDomainMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetDomainMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetDomain + +-- method DOMDocument::get_element_by_id +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "elementId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_element_by_id" webkit_dom_document_get_element_by_id :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- elementId : TBasicType TUTF8 + IO (Ptr DOMElement) + + +dOMDocumentGetElementById :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- elementId + -> m DOMElement -- result +dOMDocumentGetElementById _obj elementId = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + elementId' <- textToCString elementId + result <- webkit_dom_document_get_element_by_id _obj' elementId' + checkUnexpectedReturnNULL "webkit_dom_document_get_element_by_id" result + result' <- (newObject DOMElement) result + touchManagedPtr _obj + freeMem elementId' + return result' + +data DOMDocumentGetElementByIdMethodInfo +instance (signature ~ (T.Text -> m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementByIdMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetElementById + +-- method DOMDocument::get_elements_by_class_name +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tagname", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMNodeList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_elements_by_class_name" webkit_dom_document_get_elements_by_class_name :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- tagname : TBasicType TUTF8 + IO (Ptr DOMNodeList) + + +dOMDocumentGetElementsByClassName :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- tagname + -> m DOMNodeList -- result +dOMDocumentGetElementsByClassName _obj tagname = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + tagname' <- textToCString tagname + result <- webkit_dom_document_get_elements_by_class_name _obj' tagname' + checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_class_name" result + result' <- (wrapObject DOMNodeList) result + touchManagedPtr _obj + freeMem tagname' + return result' + +data DOMDocumentGetElementsByClassNameMethodInfo +instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementsByClassNameMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetElementsByClassName + +-- method DOMDocument::get_elements_by_name +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "elementName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMNodeList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_elements_by_name" webkit_dom_document_get_elements_by_name :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- elementName : TBasicType TUTF8 + IO (Ptr DOMNodeList) + + +dOMDocumentGetElementsByName :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- elementName + -> m DOMNodeList -- result +dOMDocumentGetElementsByName _obj elementName = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + elementName' <- textToCString elementName + result <- webkit_dom_document_get_elements_by_name _obj' elementName' + checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_name" result + result' <- (wrapObject DOMNodeList) result + touchManagedPtr _obj + freeMem elementName' + return result' + +data DOMDocumentGetElementsByNameMethodInfo +instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementsByNameMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetElementsByName + +-- method DOMDocument::get_elements_by_tag_name +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tagname", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMNodeList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_elements_by_tag_name" webkit_dom_document_get_elements_by_tag_name :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- tagname : TBasicType TUTF8 + IO (Ptr DOMNodeList) + + +dOMDocumentGetElementsByTagName :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- tagname + -> m DOMNodeList -- result +dOMDocumentGetElementsByTagName _obj tagname = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + tagname' <- textToCString tagname + result <- webkit_dom_document_get_elements_by_tag_name _obj' tagname' + checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_tag_name" result + result' <- (wrapObject DOMNodeList) result + touchManagedPtr _obj + freeMem tagname' + return result' + +data DOMDocumentGetElementsByTagNameMethodInfo +instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementsByTagNameMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetElementsByTagName + +-- method DOMDocument::get_elements_by_tag_name_ns +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMNodeList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_elements_by_tag_name_ns" webkit_dom_document_get_elements_by_tag_name_ns :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- namespaceURI : TBasicType TUTF8 + CString -> -- localName : TBasicType TUTF8 + IO (Ptr DOMNodeList) + + +dOMDocumentGetElementsByTagNameNs :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- namespaceURI + -> T.Text -- localName + -> m DOMNodeList -- result +dOMDocumentGetElementsByTagNameNs _obj namespaceURI localName = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + namespaceURI' <- textToCString namespaceURI + localName' <- textToCString localName + result <- webkit_dom_document_get_elements_by_tag_name_ns _obj' namespaceURI' localName' + checkUnexpectedReturnNULL "webkit_dom_document_get_elements_by_tag_name_ns" result + result' <- (wrapObject DOMNodeList) result + touchManagedPtr _obj + freeMem namespaceURI' + freeMem localName' + return result' + +data DOMDocumentGetElementsByTagNameNsMethodInfo +instance (signature ~ (T.Text -> T.Text -> m DOMNodeList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetElementsByTagNameNsMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetElementsByTagNameNs + +-- method DOMDocument::get_forms +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMHTMLCollection" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_forms" webkit_dom_document_get_forms :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMHTMLCollection) + + +dOMDocumentGetForms :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMHTMLCollection -- result +dOMDocumentGetForms _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_forms _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_forms" result + result' <- (wrapObject DOMHTMLCollection) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetFormsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetFormsMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetForms + +-- method DOMDocument::get_head +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMHTMLHeadElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_head" webkit_dom_document_get_head :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMHTMLHeadElement) + + +dOMDocumentGetHead :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMHTMLHeadElement -- result +dOMDocumentGetHead _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_head _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_head" result + result' <- (newObject DOMHTMLHeadElement) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetHeadMethodInfo +instance (signature ~ (m DOMHTMLHeadElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetHeadMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetHead + +-- method DOMDocument::get_hidden +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_hidden" webkit_dom_document_get_hidden :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CInt + + +dOMDocumentGetHidden :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m Bool -- result +dOMDocumentGetHidden _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_hidden _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetHiddenMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetHiddenMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetHidden + +-- method DOMDocument::get_images +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMHTMLCollection" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_images" webkit_dom_document_get_images :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMHTMLCollection) + + +dOMDocumentGetImages :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMHTMLCollection -- result +dOMDocumentGetImages _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_images _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_images" result + result' <- (wrapObject DOMHTMLCollection) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetImagesMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetImagesMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetImages + +-- method DOMDocument::get_implementation +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMImplementation" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_implementation" webkit_dom_document_get_implementation :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMDOMImplementation) + + +dOMDocumentGetImplementation :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMDOMImplementation -- result +dOMDocumentGetImplementation _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_implementation _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_implementation" result + result' <- (wrapObject DOMDOMImplementation) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetImplementationMethodInfo +instance (signature ~ (m DOMDOMImplementation), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetImplementationMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetImplementation + +-- method DOMDocument::get_input_encoding +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_input_encoding" webkit_dom_document_get_input_encoding :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetInputEncoding :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetInputEncoding _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_input_encoding _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_input_encoding" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetInputEncodingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetInputEncodingMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetInputEncoding + +-- method DOMDocument::get_last_modified +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_last_modified" webkit_dom_document_get_last_modified :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetLastModified :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetLastModified _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_last_modified _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_last_modified" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetLastModifiedMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetLastModifiedMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetLastModified + +-- method DOMDocument::get_links +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMHTMLCollection" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_links" webkit_dom_document_get_links :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMHTMLCollection) + + +dOMDocumentGetLinks :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMHTMLCollection -- result +dOMDocumentGetLinks _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_links _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_links" result + result' <- (wrapObject DOMHTMLCollection) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetLinksMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetLinksMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetLinks + +-- method DOMDocument::get_override_style +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "element", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pseudoElement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMCSSStyleDeclaration" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_override_style" webkit_dom_document_get_override_style :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + Ptr DOMElement -> -- element : TInterface "WebKit" "DOMElement" + CString -> -- pseudoElement : TBasicType TUTF8 + IO (Ptr DOMCSSStyleDeclaration) + + +dOMDocumentGetOverrideStyle :: + (MonadIO m, DOMDocumentK a, DOMElementK b) => + a -- _obj + -> b -- element + -> Maybe (T.Text) -- pseudoElement + -> m DOMCSSStyleDeclaration -- result +dOMDocumentGetOverrideStyle _obj element pseudoElement = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let element' = unsafeManagedPtrCastPtr element + maybePseudoElement <- case pseudoElement of + Nothing -> return nullPtr + Just jPseudoElement -> do + jPseudoElement' <- textToCString jPseudoElement + return jPseudoElement' + result <- webkit_dom_document_get_override_style _obj' element' maybePseudoElement + checkUnexpectedReturnNULL "webkit_dom_document_get_override_style" result + result' <- (wrapObject DOMCSSStyleDeclaration) result + touchManagedPtr _obj + touchManagedPtr element + freeMem maybePseudoElement + return result' + +data DOMDocumentGetOverrideStyleMethodInfo +instance (signature ~ (b -> Maybe (T.Text) -> m DOMCSSStyleDeclaration), MonadIO m, DOMDocumentK a, DOMElementK b) => MethodInfo DOMDocumentGetOverrideStyleMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetOverrideStyle + +-- method DOMDocument::get_preferred_stylesheet_set +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_preferred_stylesheet_set" webkit_dom_document_get_preferred_stylesheet_set :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetPreferredStylesheetSet :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetPreferredStylesheetSet _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_preferred_stylesheet_set _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_preferred_stylesheet_set" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetPreferredStylesheetSetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetPreferredStylesheetSetMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetPreferredStylesheetSet + +-- method DOMDocument::get_ready_state +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_ready_state" webkit_dom_document_get_ready_state :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetReadyState :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetReadyState _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_ready_state _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_ready_state" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetReadyStateMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetReadyStateMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetReadyState + +-- method DOMDocument::get_referrer +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_referrer" webkit_dom_document_get_referrer :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetReferrer :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetReferrer _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_referrer _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_referrer" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetReferrerMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetReferrerMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetReferrer + +-- method DOMDocument::get_security_policy +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMSecurityPolicy" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_security_policy" webkit_dom_document_get_security_policy :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMDOMSecurityPolicy) + + +dOMDocumentGetSecurityPolicy :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMDOMSecurityPolicy -- result +dOMDocumentGetSecurityPolicy _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_security_policy _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_security_policy" result + result' <- (wrapObject DOMDOMSecurityPolicy) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetSecurityPolicyMethodInfo +instance (signature ~ (m DOMDOMSecurityPolicy), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetSecurityPolicyMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetSecurityPolicy + +-- method DOMDocument::get_selected_stylesheet_set +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_selected_stylesheet_set" webkit_dom_document_get_selected_stylesheet_set :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetSelectedStylesheetSet :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetSelectedStylesheetSet _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_selected_stylesheet_set _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_selected_stylesheet_set" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetSelectedStylesheetSetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetSelectedStylesheetSetMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetSelectedStylesheetSet + +-- method DOMDocument::get_style_sheets +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMStyleSheetList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_style_sheets" webkit_dom_document_get_style_sheets :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMStyleSheetList) + + +dOMDocumentGetStyleSheets :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMStyleSheetList -- result +dOMDocumentGetStyleSheets _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_style_sheets _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_style_sheets" result + result' <- (newObject DOMStyleSheetList) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetStyleSheetsMethodInfo +instance (signature ~ (m DOMStyleSheetList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetStyleSheetsMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetStyleSheets + +-- method DOMDocument::get_title +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_title" webkit_dom_document_get_title :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetTitle :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetTitle _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_title _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_title" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetTitleMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetTitleMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetTitle + +-- method DOMDocument::get_url +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_url" webkit_dom_document_get_url :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetUrl :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetUrl _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_url _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_url" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetUrlMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetUrlMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetUrl + +-- method DOMDocument::get_visibility_state +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_visibility_state" webkit_dom_document_get_visibility_state :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetVisibilityState :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetVisibilityState _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_visibility_state _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_visibility_state" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetVisibilityStateMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetVisibilityStateMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetVisibilityState + +-- method DOMDocument::get_webkit_current_full_screen_element +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_webkit_current_full_screen_element" webkit_dom_document_get_webkit_current_full_screen_element :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMElement) + + +dOMDocumentGetWebkitCurrentFullScreenElement :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMElement -- result +dOMDocumentGetWebkitCurrentFullScreenElement _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_webkit_current_full_screen_element _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_webkit_current_full_screen_element" result + result' <- (newObject DOMElement) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetWebkitCurrentFullScreenElementMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetWebkitCurrentFullScreenElementMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetWebkitCurrentFullScreenElement + +-- method DOMDocument::get_webkit_full_screen_keyboard_input_allowed +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_webkit_full_screen_keyboard_input_allowed" webkit_dom_document_get_webkit_full_screen_keyboard_input_allowed :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CInt + + +dOMDocumentGetWebkitFullScreenKeyboardInputAllowed :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m Bool -- result +dOMDocumentGetWebkitFullScreenKeyboardInputAllowed _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_webkit_full_screen_keyboard_input_allowed _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetWebkitFullScreenKeyboardInputAllowedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetWebkitFullScreenKeyboardInputAllowedMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetWebkitFullScreenKeyboardInputAllowed + +-- method DOMDocument::get_webkit_fullscreen_element +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_webkit_fullscreen_element" webkit_dom_document_get_webkit_fullscreen_element :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMElement) + + +dOMDocumentGetWebkitFullscreenElement :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMElement -- result +dOMDocumentGetWebkitFullscreenElement _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_webkit_fullscreen_element _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_webkit_fullscreen_element" result + result' <- (newObject DOMElement) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetWebkitFullscreenElementMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetWebkitFullscreenElementMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetWebkitFullscreenElement + +-- method DOMDocument::get_webkit_fullscreen_enabled +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_webkit_fullscreen_enabled" webkit_dom_document_get_webkit_fullscreen_enabled :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CInt + + +dOMDocumentGetWebkitFullscreenEnabled :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m Bool -- result +dOMDocumentGetWebkitFullscreenEnabled _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_webkit_fullscreen_enabled _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetWebkitFullscreenEnabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetWebkitFullscreenEnabledMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetWebkitFullscreenEnabled + +-- method DOMDocument::get_webkit_hidden +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_webkit_hidden" webkit_dom_document_get_webkit_hidden :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CInt + +{-# DEPRECATED dOMDocumentGetWebkitHidden ["(Since version 2.2)"]#-} +dOMDocumentGetWebkitHidden :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m Bool -- result +dOMDocumentGetWebkitHidden _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_webkit_hidden _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetWebkitHiddenMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetWebkitHiddenMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetWebkitHidden + +-- method DOMDocument::get_webkit_is_full_screen +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_webkit_is_full_screen" webkit_dom_document_get_webkit_is_full_screen :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CInt + + +dOMDocumentGetWebkitIsFullScreen :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m Bool -- result +dOMDocumentGetWebkitIsFullScreen _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_webkit_is_full_screen _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetWebkitIsFullScreenMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetWebkitIsFullScreenMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetWebkitIsFullScreen + +-- method DOMDocument::get_webkit_pointer_lock_element +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_webkit_pointer_lock_element" webkit_dom_document_get_webkit_pointer_lock_element :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMElement) + + +dOMDocumentGetWebkitPointerLockElement :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMElement -- result +dOMDocumentGetWebkitPointerLockElement _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_webkit_pointer_lock_element _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_webkit_pointer_lock_element" result + result' <- (newObject DOMElement) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetWebkitPointerLockElementMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetWebkitPointerLockElementMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetWebkitPointerLockElement + +-- method DOMDocument::get_webkit_visibility_state +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_webkit_visibility_state" webkit_dom_document_get_webkit_visibility_state :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + +{-# DEPRECATED dOMDocumentGetWebkitVisibilityState ["(Since version 2.2)"]#-} +dOMDocumentGetWebkitVisibilityState :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetWebkitVisibilityState _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_webkit_visibility_state _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_webkit_visibility_state" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetWebkitVisibilityStateMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetWebkitVisibilityStateMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetWebkitVisibilityState + +-- method DOMDocument::get_xml_encoding +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_xml_encoding" webkit_dom_document_get_xml_encoding :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetXmlEncoding :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetXmlEncoding _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_xml_encoding _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_xml_encoding" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetXmlEncodingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetXmlEncodingMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetXmlEncoding + +-- method DOMDocument::get_xml_standalone +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_xml_standalone" webkit_dom_document_get_xml_standalone :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CInt + + +dOMDocumentGetXmlStandalone :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m Bool -- result +dOMDocumentGetXmlStandalone _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_xml_standalone _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMDocumentGetXmlStandaloneMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetXmlStandaloneMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetXmlStandalone + +-- method DOMDocument::get_xml_version +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_get_xml_version" webkit_dom_document_get_xml_version :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO CString + + +dOMDocumentGetXmlVersion :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m T.Text -- result +dOMDocumentGetXmlVersion _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_get_xml_version _obj' + checkUnexpectedReturnNULL "webkit_dom_document_get_xml_version" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMDocumentGetXmlVersionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentGetXmlVersionMethodInfo a signature where + overloadedMethod _ = dOMDocumentGetXmlVersion + +-- method DOMDocument::import_node +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "importedNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "deep", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMNode" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_import_node" webkit_dom_document_import_node :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + Ptr DOMNode -> -- importedNode : TInterface "WebKit" "DOMNode" + CInt -> -- deep : TBasicType TBoolean + Ptr (Ptr GError) -> -- error + IO (Ptr DOMNode) + + +dOMDocumentImportNode :: + (MonadIO m, DOMDocumentK a, DOMNodeK b) => + a -- _obj + -> b -- importedNode + -> Bool -- deep + -> m DOMNode -- result +dOMDocumentImportNode _obj importedNode deep = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let importedNode' = unsafeManagedPtrCastPtr importedNode + let deep' = (fromIntegral . fromEnum) deep + onException (do + result <- propagateGError $ webkit_dom_document_import_node _obj' importedNode' deep' + checkUnexpectedReturnNULL "webkit_dom_document_import_node" result + result' <- (newObject DOMNode) result + touchManagedPtr _obj + touchManagedPtr importedNode + return result' + ) (do + return () + ) + +data DOMDocumentImportNodeMethodInfo +instance (signature ~ (b -> Bool -> m DOMNode), MonadIO m, DOMDocumentK a, DOMNodeK b) => MethodInfo DOMDocumentImportNodeMethodInfo a signature where + overloadedMethod _ = dOMDocumentImportNode + +-- method DOMDocument::query_command_enabled +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_query_command_enabled" webkit_dom_document_query_command_enabled :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- command : TBasicType TUTF8 + IO CInt + + +dOMDocumentQueryCommandEnabled :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- command + -> m Bool -- result +dOMDocumentQueryCommandEnabled _obj command = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + command' <- textToCString command + result <- webkit_dom_document_query_command_enabled _obj' command' + let result' = (/= 0) result + touchManagedPtr _obj + freeMem command' + return result' + +data DOMDocumentQueryCommandEnabledMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQueryCommandEnabledMethodInfo a signature where + overloadedMethod _ = dOMDocumentQueryCommandEnabled + +-- method DOMDocument::query_command_indeterm +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_query_command_indeterm" webkit_dom_document_query_command_indeterm :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- command : TBasicType TUTF8 + IO CInt + + +dOMDocumentQueryCommandIndeterm :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- command + -> m Bool -- result +dOMDocumentQueryCommandIndeterm _obj command = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + command' <- textToCString command + result <- webkit_dom_document_query_command_indeterm _obj' command' + let result' = (/= 0) result + touchManagedPtr _obj + freeMem command' + return result' + +data DOMDocumentQueryCommandIndetermMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQueryCommandIndetermMethodInfo a signature where + overloadedMethod _ = dOMDocumentQueryCommandIndeterm + +-- method DOMDocument::query_command_state +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_query_command_state" webkit_dom_document_query_command_state :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- command : TBasicType TUTF8 + IO CInt + + +dOMDocumentQueryCommandState :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- command + -> m Bool -- result +dOMDocumentQueryCommandState _obj command = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + command' <- textToCString command + result <- webkit_dom_document_query_command_state _obj' command' + let result' = (/= 0) result + touchManagedPtr _obj + freeMem command' + return result' + +data DOMDocumentQueryCommandStateMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQueryCommandStateMethodInfo a signature where + overloadedMethod _ = dOMDocumentQueryCommandState + +-- method DOMDocument::query_command_supported +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_query_command_supported" webkit_dom_document_query_command_supported :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- command : TBasicType TUTF8 + IO CInt + + +dOMDocumentQueryCommandSupported :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- command + -> m Bool -- result +dOMDocumentQueryCommandSupported _obj command = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + command' <- textToCString command + result <- webkit_dom_document_query_command_supported _obj' command' + let result' = (/= 0) result + touchManagedPtr _obj + freeMem command' + return result' + +data DOMDocumentQueryCommandSupportedMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQueryCommandSupportedMethodInfo a signature where + overloadedMethod _ = dOMDocumentQueryCommandSupported + +-- method DOMDocument::query_command_value +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "command", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_query_command_value" webkit_dom_document_query_command_value :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- command : TBasicType TUTF8 + IO CString + + +dOMDocumentQueryCommandValue :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- command + -> m T.Text -- result +dOMDocumentQueryCommandValue _obj command = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + command' <- textToCString command + result <- webkit_dom_document_query_command_value _obj' command' + checkUnexpectedReturnNULL "webkit_dom_document_query_command_value" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + freeMem command' + return result' + +data DOMDocumentQueryCommandValueMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQueryCommandValueMethodInfo a signature where + overloadedMethod _ = dOMDocumentQueryCommandValue + +-- method DOMDocument::query_selector +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMElement" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_query_selector" webkit_dom_document_query_selector :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- selectors : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO (Ptr DOMElement) + + +dOMDocumentQuerySelector :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- selectors + -> m DOMElement -- result +dOMDocumentQuerySelector _obj selectors = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + selectors' <- textToCString selectors + onException (do + result <- propagateGError $ webkit_dom_document_query_selector _obj' selectors' + checkUnexpectedReturnNULL "webkit_dom_document_query_selector" result + result' <- (newObject DOMElement) result + touchManagedPtr _obj + freeMem selectors' + return result' + ) (do + freeMem selectors' + ) + +data DOMDocumentQuerySelectorMethodInfo +instance (signature ~ (T.Text -> m DOMElement), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQuerySelectorMethodInfo a signature where + overloadedMethod _ = dOMDocumentQuerySelector + +-- method DOMDocument::query_selector_all +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMNodeList" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_query_selector_all" webkit_dom_document_query_selector_all :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- selectors : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO (Ptr DOMNodeList) + + +dOMDocumentQuerySelectorAll :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- selectors + -> m DOMNodeList -- result +dOMDocumentQuerySelectorAll _obj selectors = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + selectors' <- textToCString selectors + onException (do + result <- propagateGError $ webkit_dom_document_query_selector_all _obj' selectors' + checkUnexpectedReturnNULL "webkit_dom_document_query_selector_all" result + result' <- (wrapObject DOMNodeList) result + touchManagedPtr _obj + freeMem selectors' + return result' + ) (do + freeMem selectors' + ) + +data DOMDocumentQuerySelectorAllMethodInfo +instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentQuerySelectorAllMethodInfo a signature where + overloadedMethod _ = dOMDocumentQuerySelectorAll + +-- method DOMDocument::set_body +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_set_body" webkit_dom_document_set_body :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + Ptr DOMHTMLElement -> -- value : TInterface "WebKit" "DOMHTMLElement" + Ptr (Ptr GError) -> -- error + IO () + + +dOMDocumentSetBody :: + (MonadIO m, DOMDocumentK a, DOMHTMLElementK b) => + a -- _obj + -> b -- value + -> m () -- result +dOMDocumentSetBody _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = unsafeManagedPtrCastPtr value + onException (do + propagateGError $ webkit_dom_document_set_body _obj' value' + touchManagedPtr _obj + touchManagedPtr value + return () + ) (do + return () + ) + +data DOMDocumentSetBodyMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMDocumentK a, DOMHTMLElementK b) => MethodInfo DOMDocumentSetBodyMethodInfo a signature where + overloadedMethod _ = dOMDocumentSetBody + +-- method DOMDocument::set_charset +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_set_charset" webkit_dom_document_set_charset :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMDocumentSetCharset :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMDocumentSetCharset _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_document_set_charset _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMDocumentSetCharsetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetCharsetMethodInfo a signature where + overloadedMethod _ = dOMDocumentSetCharset + +-- method DOMDocument::set_cookie +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_set_cookie" webkit_dom_document_set_cookie :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- value : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO () + + +dOMDocumentSetCookie :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMDocumentSetCookie _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + onException (do + propagateGError $ webkit_dom_document_set_cookie _obj' value' + touchManagedPtr _obj + freeMem value' + return () + ) (do + freeMem value' + ) + +data DOMDocumentSetCookieMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetCookieMethodInfo a signature where + overloadedMethod _ = dOMDocumentSetCookie + +-- method DOMDocument::set_document_uri +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_set_document_uri" webkit_dom_document_set_document_uri :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMDocumentSetDocumentUri :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMDocumentSetDocumentUri _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_document_set_document_uri _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMDocumentSetDocumentUriMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetDocumentUriMethodInfo a signature where + overloadedMethod _ = dOMDocumentSetDocumentUri + +-- method DOMDocument::set_selected_stylesheet_set +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_set_selected_stylesheet_set" webkit_dom_document_set_selected_stylesheet_set :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMDocumentSetSelectedStylesheetSet :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMDocumentSetSelectedStylesheetSet _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_document_set_selected_stylesheet_set _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMDocumentSetSelectedStylesheetSetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetSelectedStylesheetSetMethodInfo a signature where + overloadedMethod _ = dOMDocumentSetSelectedStylesheetSet + +-- method DOMDocument::set_title +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_set_title" webkit_dom_document_set_title :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMDocumentSetTitle :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMDocumentSetTitle _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_document_set_title _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMDocumentSetTitleMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetTitleMethodInfo a signature where + overloadedMethod _ = dOMDocumentSetTitle + +-- method DOMDocument::set_xml_standalone +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_set_xml_standalone" webkit_dom_document_set_xml_standalone :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CInt -> -- value : TBasicType TBoolean + Ptr (Ptr GError) -> -- error + IO () + + +dOMDocumentSetXmlStandalone :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMDocumentSetXmlStandalone _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + onException (do + propagateGError $ webkit_dom_document_set_xml_standalone _obj' value' + touchManagedPtr _obj + return () + ) (do + return () + ) + +data DOMDocumentSetXmlStandaloneMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetXmlStandaloneMethodInfo a signature where + overloadedMethod _ = dOMDocumentSetXmlStandalone + +-- method DOMDocument::set_xml_version +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_document_set_xml_version" webkit_dom_document_set_xml_version :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + CString -> -- value : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO () + + +dOMDocumentSetXmlVersion :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMDocumentSetXmlVersion _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + onException (do + propagateGError $ webkit_dom_document_set_xml_version _obj' value' + touchManagedPtr _obj + freeMem value' + return () + ) (do + freeMem value' + ) + +data DOMDocumentSetXmlVersionMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentSetXmlVersionMethodInfo a signature where + overloadedMethod _ = dOMDocumentSetXmlVersion + +-- method DOMDocument::webkit_cancel_full_screen +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_webkit_cancel_full_screen" webkit_dom_document_webkit_cancel_full_screen :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO () + + +dOMDocumentWebkitCancelFullScreen :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m () -- result +dOMDocumentWebkitCancelFullScreen _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_document_webkit_cancel_full_screen _obj' + touchManagedPtr _obj + return () + +data DOMDocumentWebkitCancelFullScreenMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentWebkitCancelFullScreenMethodInfo a signature where + overloadedMethod _ = dOMDocumentWebkitCancelFullScreen + +-- method DOMDocument::webkit_exit_fullscreen +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_webkit_exit_fullscreen" webkit_dom_document_webkit_exit_fullscreen :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO () + + +dOMDocumentWebkitExitFullscreen :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m () -- result +dOMDocumentWebkitExitFullscreen _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_document_webkit_exit_fullscreen _obj' + touchManagedPtr _obj + return () + +data DOMDocumentWebkitExitFullscreenMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentWebkitExitFullscreenMethodInfo a signature where + overloadedMethod _ = dOMDocumentWebkitExitFullscreen + +-- method DOMDocument::webkit_exit_pointer_lock +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_webkit_exit_pointer_lock" webkit_dom_document_webkit_exit_pointer_lock :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO () + + +dOMDocumentWebkitExitPointerLock :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m () -- result +dOMDocumentWebkitExitPointerLock _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_document_webkit_exit_pointer_lock _obj' + touchManagedPtr _obj + return () + +data DOMDocumentWebkitExitPointerLockMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentWebkitExitPointerLockMethodInfo a signature where + overloadedMethod _ = dOMDocumentWebkitExitPointerLock + +-- method DOMDocument::webkit_get_named_flows +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDOMNamedFlowCollection" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_document_webkit_get_named_flows" webkit_dom_document_webkit_get_named_flows :: + Ptr DOMDocument -> -- _obj : TInterface "WebKit" "DOMDocument" + IO (Ptr DOMDOMNamedFlowCollection) + + +dOMDocumentWebkitGetNamedFlows :: + (MonadIO m, DOMDocumentK a) => + a -- _obj + -> m DOMDOMNamedFlowCollection -- result +dOMDocumentWebkitGetNamedFlows _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_document_webkit_get_named_flows _obj' + checkUnexpectedReturnNULL "webkit_dom_document_webkit_get_named_flows" result + result' <- (wrapObject DOMDOMNamedFlowCollection) result + touchManagedPtr _obj + return result' + +data DOMDocumentWebkitGetNamedFlowsMethodInfo +instance (signature ~ (m DOMDOMNamedFlowCollection), MonadIO m, DOMDocumentK a) => MethodInfo DOMDocumentWebkitGetNamedFlowsMethodInfo a signature where + overloadedMethod _ = dOMDocumentWebkitGetNamedFlows diff --git a/GI/WebKit/Objects/DOMDocument.hs-boot b/GI/WebKit/Objects/DOMDocument.hs-boot --- a/GI/WebKit/Objects/DOMDocument.hs-boot +++ b/GI/WebKit/Objects/DOMDocument.hs-boot @@ -51,3 +51,94 @@ data DOMDocumentXmlEncodingPropertyInfo data DOMDocumentXmlStandalonePropertyInfo data DOMDocumentXmlVersionPropertyInfo +data DOMDocumentAdoptNodeMethodInfo +data DOMDocumentCaretRangeFromPointMethodInfo +data DOMDocumentCreateAttributeMethodInfo +data DOMDocumentCreateAttributeNsMethodInfo +data DOMDocumentCreateCdataSectionMethodInfo +data DOMDocumentCreateCommentMethodInfo +data DOMDocumentCreateCssStyleDeclarationMethodInfo +data DOMDocumentCreateDocumentFragmentMethodInfo +data DOMDocumentCreateElementMethodInfo +data DOMDocumentCreateElementNsMethodInfo +data DOMDocumentCreateEntityReferenceMethodInfo +data DOMDocumentCreateEventMethodInfo +data DOMDocumentCreateExpressionMethodInfo +data DOMDocumentCreateNodeIteratorMethodInfo +data DOMDocumentCreateNsResolverMethodInfo +data DOMDocumentCreateProcessingInstructionMethodInfo +data DOMDocumentCreateRangeMethodInfo +data DOMDocumentCreateTextNodeMethodInfo +data DOMDocumentCreateTouchMethodInfo +data DOMDocumentCreateTreeWalkerMethodInfo +data DOMDocumentElementFromPointMethodInfo +data DOMDocumentEvaluateMethodInfo +data DOMDocumentExecCommandMethodInfo +data DOMDocumentGetAnchorsMethodInfo +data DOMDocumentGetAppletsMethodInfo +data DOMDocumentGetBodyMethodInfo +data DOMDocumentGetCharacterSetMethodInfo +data DOMDocumentGetCharsetMethodInfo +data DOMDocumentGetCompatModeMethodInfo +data DOMDocumentGetCookieMethodInfo +data DOMDocumentGetCurrentScriptMethodInfo +data DOMDocumentGetDefaultCharsetMethodInfo +data DOMDocumentGetDefaultViewMethodInfo +data DOMDocumentGetDoctypeMethodInfo +data DOMDocumentGetDocumentElementMethodInfo +data DOMDocumentGetDocumentUriMethodInfo +data DOMDocumentGetDomainMethodInfo +data DOMDocumentGetElementByIdMethodInfo +data DOMDocumentGetElementsByClassNameMethodInfo +data DOMDocumentGetElementsByNameMethodInfo +data DOMDocumentGetElementsByTagNameMethodInfo +data DOMDocumentGetElementsByTagNameNsMethodInfo +data DOMDocumentGetFormsMethodInfo +data DOMDocumentGetHeadMethodInfo +data DOMDocumentGetHiddenMethodInfo +data DOMDocumentGetImagesMethodInfo +data DOMDocumentGetImplementationMethodInfo +data DOMDocumentGetInputEncodingMethodInfo +data DOMDocumentGetLastModifiedMethodInfo +data DOMDocumentGetLinksMethodInfo +data DOMDocumentGetOverrideStyleMethodInfo +data DOMDocumentGetPreferredStylesheetSetMethodInfo +data DOMDocumentGetReadyStateMethodInfo +data DOMDocumentGetReferrerMethodInfo +data DOMDocumentGetSecurityPolicyMethodInfo +data DOMDocumentGetSelectedStylesheetSetMethodInfo +data DOMDocumentGetStyleSheetsMethodInfo +data DOMDocumentGetTitleMethodInfo +data DOMDocumentGetUrlMethodInfo +data DOMDocumentGetVisibilityStateMethodInfo +data DOMDocumentGetWebkitCurrentFullScreenElementMethodInfo +data DOMDocumentGetWebkitFullScreenKeyboardInputAllowedMethodInfo +data DOMDocumentGetWebkitFullscreenElementMethodInfo +data DOMDocumentGetWebkitFullscreenEnabledMethodInfo +data DOMDocumentGetWebkitHiddenMethodInfo +data DOMDocumentGetWebkitIsFullScreenMethodInfo +data DOMDocumentGetWebkitPointerLockElementMethodInfo +data DOMDocumentGetWebkitVisibilityStateMethodInfo +data DOMDocumentGetXmlEncodingMethodInfo +data DOMDocumentGetXmlStandaloneMethodInfo +data DOMDocumentGetXmlVersionMethodInfo +data DOMDocumentImportNodeMethodInfo +data DOMDocumentQueryCommandEnabledMethodInfo +data DOMDocumentQueryCommandIndetermMethodInfo +data DOMDocumentQueryCommandStateMethodInfo +data DOMDocumentQueryCommandSupportedMethodInfo +data DOMDocumentQueryCommandValueMethodInfo +data DOMDocumentQuerySelectorMethodInfo +data DOMDocumentQuerySelectorAllMethodInfo +data DOMDocumentSetBodyMethodInfo +data DOMDocumentSetCharsetMethodInfo +data DOMDocumentSetCookieMethodInfo +data DOMDocumentSetDocumentUriMethodInfo +data DOMDocumentSetSelectedStylesheetSetMethodInfo +data DOMDocumentSetTitleMethodInfo +data DOMDocumentSetXmlStandaloneMethodInfo +data DOMDocumentSetXmlVersionMethodInfo +data DOMDocumentWebkitCancelFullScreenMethodInfo +data DOMDocumentWebkitExitFullscreenMethodInfo +data DOMDocumentWebkitExitPointerLockMethodInfo +data DOMDocumentWebkitGetNamedFlowsMethodInfo diff --git a/GI/WebKit/Objects/DOMDocumentFragment.hs b/GI/WebKit/Objects/DOMDocumentFragment.hs --- a/GI/WebKit/Objects/DOMDocumentFragment.hs +++ b/GI/WebKit/Objects/DOMDocumentFragment.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMDocumentFragmentQuerySelector + DOMDocumentFragmentQuerySelectorMethodInfo, dOMDocumentFragmentQuerySelector , -- ** dOMDocumentFragmentQuerySelectorAll + DOMDocumentFragmentQuerySelectorAllMethodInfo, dOMDocumentFragmentQuerySelectorAll , @@ -60,17 +63,89 @@ noDOMDocumentFragment :: Maybe DOMDocumentFragment noDOMDocumentFragment = Nothing +type family ResolveDOMDocumentFragmentMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDocumentFragmentMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMDocumentFragmentMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMDocumentFragmentMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDocumentFragmentMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDocumentFragmentMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMDocumentFragmentMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMDocumentFragmentMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMDocumentFragmentMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDocumentFragmentMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDocumentFragmentMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMDocumentFragmentMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMDocumentFragmentMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMDocumentFragmentMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMDocumentFragmentMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMDocumentFragmentMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDocumentFragmentMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMDocumentFragmentMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMDocumentFragmentMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMDocumentFragmentMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMDocumentFragmentMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMDocumentFragmentMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDocumentFragmentMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDocumentFragmentMethod "querySelector" o = DOMDocumentFragmentQuerySelectorMethodInfo + ResolveDOMDocumentFragmentMethod "querySelectorAll" o = DOMDocumentFragmentQuerySelectorAllMethodInfo + ResolveDOMDocumentFragmentMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDocumentFragmentMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDocumentFragmentMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMDocumentFragmentMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMDocumentFragmentMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMDocumentFragmentMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDocumentFragmentMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDocumentFragmentMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDocumentFragmentMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDocumentFragmentMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDocumentFragmentMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDocumentFragmentMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDocumentFragmentMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDocumentFragmentMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMDocumentFragmentMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMDocumentFragmentMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMDocumentFragmentMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDocumentFragmentMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMDocumentFragmentMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMDocumentFragmentMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMDocumentFragmentMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMDocumentFragmentMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMDocumentFragmentMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMDocumentFragmentMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMDocumentFragmentMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMDocumentFragmentMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMDocumentFragmentMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMDocumentFragmentMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMDocumentFragmentMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMDocumentFragmentMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMDocumentFragmentMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDocumentFragmentMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDocumentFragmentMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMDocumentFragmentMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDocumentFragmentMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMDocumentFragmentMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMDocumentFragmentMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDocumentFragmentMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMDocumentFragmentMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDocumentFragmentMethod t DOMDocumentFragment, MethodInfo info DOMDocumentFragment p) => IsLabelProxy t (DOMDocumentFragment -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDocumentFragmentMethod t DOMDocumentFragment, MethodInfo info DOMDocumentFragment p) => IsLabel t (DOMDocumentFragment -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMDocumentFragment = DOMDocumentFragmentAttributeList -type DOMDocumentFragmentAttributeList = ('[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) +type DOMDocumentFragmentAttributeList = ('[ '("baseUri", DOMNodeBaseUriPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDocumentFragment = DOMDocumentFragmentSignalList -type DOMDocumentFragmentSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDocumentFragmentSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDocumentFragment::query_selector -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentFragment", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocumentFragment", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentFragment", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : True -- Skip return : False @@ -84,9 +159,9 @@ dOMDocumentFragmentQuerySelector :: (MonadIO m, DOMDocumentFragmentK a) => - a -> -- _obj - T.Text -> -- selectors - m DOMElement + a -- _obj + -> T.Text -- selectors + -> m DOMElement -- result dOMDocumentFragmentQuerySelector _obj selectors = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj selectors' <- textToCString selectors @@ -101,11 +176,14 @@ freeMem selectors' ) +data DOMDocumentFragmentQuerySelectorMethodInfo +instance (signature ~ (T.Text -> m DOMElement), MonadIO m, DOMDocumentFragmentK a) => MethodInfo DOMDocumentFragmentQuerySelectorMethodInfo a signature where + overloadedMethod _ = dOMDocumentFragmentQuerySelector + -- method DOMDocumentFragment::query_selector_all -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentFragment", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocumentFragment", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentFragment", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : True -- Skip return : False @@ -119,9 +197,9 @@ dOMDocumentFragmentQuerySelectorAll :: (MonadIO m, DOMDocumentFragmentK a) => - a -> -- _obj - T.Text -> -- selectors - m DOMNodeList + a -- _obj + -> T.Text -- selectors + -> m DOMNodeList -- result dOMDocumentFragmentQuerySelectorAll _obj selectors = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj selectors' <- textToCString selectors @@ -135,5 +213,9 @@ ) (do freeMem selectors' ) + +data DOMDocumentFragmentQuerySelectorAllMethodInfo +instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMDocumentFragmentK a) => MethodInfo DOMDocumentFragmentQuerySelectorAllMethodInfo a signature where + overloadedMethod _ = dOMDocumentFragmentQuerySelectorAll diff --git a/GI/WebKit/Objects/DOMDocumentFragment.hs-boot b/GI/WebKit/Objects/DOMDocumentFragment.hs-boot --- a/GI/WebKit/Objects/DOMDocumentFragment.hs-boot +++ b/GI/WebKit/Objects/DOMDocumentFragment.hs-boot @@ -11,3 +11,5 @@ instance GObject DOMDocumentFragment where class GObject o => DOMDocumentFragmentK o instance (GObject o, IsDescendantOf DOMDocumentFragment o) => DOMDocumentFragmentK o +data DOMDocumentFragmentQuerySelectorMethodInfo +data DOMDocumentFragmentQuerySelectorAllMethodInfo diff --git a/GI/WebKit/Objects/DOMDocumentType.hs b/GI/WebKit/Objects/DOMDocumentType.hs --- a/GI/WebKit/Objects/DOMDocumentType.hs +++ b/GI/WebKit/Objects/DOMDocumentType.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,30 +18,37 @@ -- * Methods -- ** dOMDocumentTypeGetEntities + DOMDocumentTypeGetEntitiesMethodInfo , dOMDocumentTypeGetEntities , -- ** dOMDocumentTypeGetInternalSubset + DOMDocumentTypeGetInternalSubsetMethodInfo, dOMDocumentTypeGetInternalSubset , -- ** dOMDocumentTypeGetName + DOMDocumentTypeGetNameMethodInfo , dOMDocumentTypeGetName , -- ** dOMDocumentTypeGetNotations + DOMDocumentTypeGetNotationsMethodInfo , dOMDocumentTypeGetNotations , -- ** dOMDocumentTypeGetPublicId + DOMDocumentTypeGetPublicIdMethodInfo , dOMDocumentTypeGetPublicId , -- ** dOMDocumentTypeGetSystemId + DOMDocumentTypeGetSystemIdMethodInfo , dOMDocumentTypeGetSystemId , -- ** dOMDocumentTypeRemove + DOMDocumentTypeRemoveMethodInfo , dOMDocumentTypeRemove , @@ -113,6 +121,84 @@ noDOMDocumentType :: Maybe DOMDocumentType noDOMDocumentType = Nothing +type family ResolveDOMDocumentTypeMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMDocumentTypeMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMDocumentTypeMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMDocumentTypeMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMDocumentTypeMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMDocumentTypeMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMDocumentTypeMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMDocumentTypeMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMDocumentTypeMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMDocumentTypeMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMDocumentTypeMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMDocumentTypeMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMDocumentTypeMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMDocumentTypeMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMDocumentTypeMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMDocumentTypeMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMDocumentTypeMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMDocumentTypeMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMDocumentTypeMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMDocumentTypeMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMDocumentTypeMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMDocumentTypeMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMDocumentTypeMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMDocumentTypeMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMDocumentTypeMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMDocumentTypeMethod "remove" o = DOMDocumentTypeRemoveMethodInfo + ResolveDOMDocumentTypeMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMDocumentTypeMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMDocumentTypeMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMDocumentTypeMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMDocumentTypeMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMDocumentTypeMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMDocumentTypeMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMDocumentTypeMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMDocumentTypeMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMDocumentTypeMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMDocumentTypeMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMDocumentTypeMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMDocumentTypeMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMDocumentTypeMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMDocumentTypeMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMDocumentTypeMethod "getEntities" o = DOMDocumentTypeGetEntitiesMethodInfo + ResolveDOMDocumentTypeMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMDocumentTypeMethod "getInternalSubset" o = DOMDocumentTypeGetInternalSubsetMethodInfo + ResolveDOMDocumentTypeMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMDocumentTypeMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMDocumentTypeMethod "getName" o = DOMDocumentTypeGetNameMethodInfo + ResolveDOMDocumentTypeMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMDocumentTypeMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMDocumentTypeMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMDocumentTypeMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMDocumentTypeMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMDocumentTypeMethod "getNotations" o = DOMDocumentTypeGetNotationsMethodInfo + ResolveDOMDocumentTypeMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMDocumentTypeMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMDocumentTypeMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMDocumentTypeMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMDocumentTypeMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMDocumentTypeMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMDocumentTypeMethod "getPublicId" o = DOMDocumentTypeGetPublicIdMethodInfo + ResolveDOMDocumentTypeMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMDocumentTypeMethod "getSystemId" o = DOMDocumentTypeGetSystemIdMethodInfo + ResolveDOMDocumentTypeMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMDocumentTypeMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMDocumentTypeMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMDocumentTypeMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMDocumentTypeMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMDocumentTypeMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMDocumentTypeMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMDocumentTypeMethod t DOMDocumentType, MethodInfo info DOMDocumentType p) => IsLabelProxy t (DOMDocumentType -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMDocumentTypeMethod t DOMDocumentType, MethodInfo info DOMDocumentType p) => IsLabel t (DOMDocumentType -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "entities" -- Type: TInterface "WebKit" "DOMNamedNodeMap" -- Flags: [PropertyReadable] @@ -126,7 +212,7 @@ type AttrSetTypeConstraint DOMDocumentTypeEntitiesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentTypeEntitiesPropertyInfo = DOMDocumentTypeK type AttrGetType DOMDocumentTypeEntitiesPropertyInfo = DOMNamedNodeMap - type AttrLabel DOMDocumentTypeEntitiesPropertyInfo = "DOMDocumentType::entities" + type AttrLabel DOMDocumentTypeEntitiesPropertyInfo = "entities" attrGet _ = getDOMDocumentTypeEntities attrSet _ = undefined attrConstruct _ = undefined @@ -144,7 +230,7 @@ type AttrSetTypeConstraint DOMDocumentTypeInternalSubsetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentTypeInternalSubsetPropertyInfo = DOMDocumentTypeK type AttrGetType DOMDocumentTypeInternalSubsetPropertyInfo = T.Text - type AttrLabel DOMDocumentTypeInternalSubsetPropertyInfo = "DOMDocumentType::internal-subset" + type AttrLabel DOMDocumentTypeInternalSubsetPropertyInfo = "internal-subset" attrGet _ = getDOMDocumentTypeInternalSubset attrSet _ = undefined attrConstruct _ = undefined @@ -162,7 +248,7 @@ type AttrSetTypeConstraint DOMDocumentTypeNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentTypeNamePropertyInfo = DOMDocumentTypeK type AttrGetType DOMDocumentTypeNamePropertyInfo = T.Text - type AttrLabel DOMDocumentTypeNamePropertyInfo = "DOMDocumentType::name" + type AttrLabel DOMDocumentTypeNamePropertyInfo = "name" attrGet _ = getDOMDocumentTypeName attrSet _ = undefined attrConstruct _ = undefined @@ -180,7 +266,7 @@ type AttrSetTypeConstraint DOMDocumentTypeNotationsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentTypeNotationsPropertyInfo = DOMDocumentTypeK type AttrGetType DOMDocumentTypeNotationsPropertyInfo = DOMNamedNodeMap - type AttrLabel DOMDocumentTypeNotationsPropertyInfo = "DOMDocumentType::notations" + type AttrLabel DOMDocumentTypeNotationsPropertyInfo = "notations" attrGet _ = getDOMDocumentTypeNotations attrSet _ = undefined attrConstruct _ = undefined @@ -198,7 +284,7 @@ type AttrSetTypeConstraint DOMDocumentTypePublicIdPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentTypePublicIdPropertyInfo = DOMDocumentTypeK type AttrGetType DOMDocumentTypePublicIdPropertyInfo = T.Text - type AttrLabel DOMDocumentTypePublicIdPropertyInfo = "DOMDocumentType::public-id" + type AttrLabel DOMDocumentTypePublicIdPropertyInfo = "public-id" attrGet _ = getDOMDocumentTypePublicId attrSet _ = undefined attrConstruct _ = undefined @@ -216,22 +302,21 @@ type AttrSetTypeConstraint DOMDocumentTypeSystemIdPropertyInfo = (~) () type AttrBaseTypeConstraint DOMDocumentTypeSystemIdPropertyInfo = DOMDocumentTypeK type AttrGetType DOMDocumentTypeSystemIdPropertyInfo = T.Text - type AttrLabel DOMDocumentTypeSystemIdPropertyInfo = "DOMDocumentType::system-id" + type AttrLabel DOMDocumentTypeSystemIdPropertyInfo = "system-id" attrGet _ = getDOMDocumentTypeSystemId attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMDocumentType = DOMDocumentTypeAttributeList -type DOMDocumentTypeAttributeList = ('[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("entities", DOMDocumentTypeEntitiesPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("internal-subset", DOMDocumentTypeInternalSubsetPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMDocumentTypeNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("notations", DOMDocumentTypeNotationsPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("public-id", DOMDocumentTypePublicIdPropertyInfo), '("system-id", DOMDocumentTypeSystemIdPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) +type DOMDocumentTypeAttributeList = ('[ '("baseUri", DOMNodeBaseUriPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("entities", DOMDocumentTypeEntitiesPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("internalSubset", DOMDocumentTypeInternalSubsetPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMDocumentTypeNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("notations", DOMDocumentTypeNotationsPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("publicId", DOMDocumentTypePublicIdPropertyInfo), '("systemId", DOMDocumentTypeSystemIdPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMDocumentType = DOMDocumentTypeSignalList -type DOMDocumentTypeSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMDocumentTypeSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMDocumentType::get_entities -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNamedNodeMap" -- throws : False -- Skip return : False @@ -243,8 +328,8 @@ dOMDocumentTypeGetEntities :: (MonadIO m, DOMDocumentTypeK a) => - a -> -- _obj - m DOMNamedNodeMap + a -- _obj + -> m DOMNamedNodeMap -- result dOMDocumentTypeGetEntities _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_type_get_entities _obj' @@ -253,11 +338,14 @@ touchManagedPtr _obj return result' +data DOMDocumentTypeGetEntitiesMethodInfo +instance (signature ~ (m DOMNamedNodeMap), MonadIO m, DOMDocumentTypeK a) => MethodInfo DOMDocumentTypeGetEntitiesMethodInfo a signature where + overloadedMethod _ = dOMDocumentTypeGetEntities + -- method DOMDocumentType::get_internal_subset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -269,8 +357,8 @@ dOMDocumentTypeGetInternalSubset :: (MonadIO m, DOMDocumentTypeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMDocumentTypeGetInternalSubset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_type_get_internal_subset _obj' @@ -280,11 +368,14 @@ touchManagedPtr _obj return result' +data DOMDocumentTypeGetInternalSubsetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentTypeK a) => MethodInfo DOMDocumentTypeGetInternalSubsetMethodInfo a signature where + overloadedMethod _ = dOMDocumentTypeGetInternalSubset + -- method DOMDocumentType::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -296,8 +387,8 @@ dOMDocumentTypeGetName :: (MonadIO m, DOMDocumentTypeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMDocumentTypeGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_type_get_name _obj' @@ -307,11 +398,14 @@ touchManagedPtr _obj return result' +data DOMDocumentTypeGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentTypeK a) => MethodInfo DOMDocumentTypeGetNameMethodInfo a signature where + overloadedMethod _ = dOMDocumentTypeGetName + -- method DOMDocumentType::get_notations -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNamedNodeMap" -- throws : False -- Skip return : False @@ -323,8 +417,8 @@ dOMDocumentTypeGetNotations :: (MonadIO m, DOMDocumentTypeK a) => - a -> -- _obj - m DOMNamedNodeMap + a -- _obj + -> m DOMNamedNodeMap -- result dOMDocumentTypeGetNotations _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_type_get_notations _obj' @@ -333,11 +427,14 @@ touchManagedPtr _obj return result' +data DOMDocumentTypeGetNotationsMethodInfo +instance (signature ~ (m DOMNamedNodeMap), MonadIO m, DOMDocumentTypeK a) => MethodInfo DOMDocumentTypeGetNotationsMethodInfo a signature where + overloadedMethod _ = dOMDocumentTypeGetNotations + -- method DOMDocumentType::get_public_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -349,8 +446,8 @@ dOMDocumentTypeGetPublicId :: (MonadIO m, DOMDocumentTypeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMDocumentTypeGetPublicId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_type_get_public_id _obj' @@ -360,11 +457,14 @@ touchManagedPtr _obj return result' +data DOMDocumentTypeGetPublicIdMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentTypeK a) => MethodInfo DOMDocumentTypeGetPublicIdMethodInfo a signature where + overloadedMethod _ = dOMDocumentTypeGetPublicId + -- method DOMDocumentType::get_system_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -376,8 +476,8 @@ dOMDocumentTypeGetSystemId :: (MonadIO m, DOMDocumentTypeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMDocumentTypeGetSystemId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_document_type_get_system_id _obj' @@ -387,11 +487,14 @@ touchManagedPtr _obj return result' +data DOMDocumentTypeGetSystemIdMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMDocumentTypeK a) => MethodInfo DOMDocumentTypeGetSystemIdMethodInfo a signature where + overloadedMethod _ = dOMDocumentTypeGetSystemId + -- method DOMDocumentType::remove -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMDocumentType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -404,8 +507,8 @@ dOMDocumentTypeRemove :: (MonadIO m, DOMDocumentTypeK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMDocumentTypeRemove _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -415,5 +518,9 @@ ) (do return () ) + +data DOMDocumentTypeRemoveMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMDocumentTypeK a) => MethodInfo DOMDocumentTypeRemoveMethodInfo a signature where + overloadedMethod _ = dOMDocumentTypeRemove diff --git a/GI/WebKit/Objects/DOMDocumentType.hs-boot b/GI/WebKit/Objects/DOMDocumentType.hs-boot --- a/GI/WebKit/Objects/DOMDocumentType.hs-boot +++ b/GI/WebKit/Objects/DOMDocumentType.hs-boot @@ -17,3 +17,10 @@ data DOMDocumentTypeNotationsPropertyInfo data DOMDocumentTypePublicIdPropertyInfo data DOMDocumentTypeSystemIdPropertyInfo +data DOMDocumentTypeGetEntitiesMethodInfo +data DOMDocumentTypeGetInternalSubsetMethodInfo +data DOMDocumentTypeGetNameMethodInfo +data DOMDocumentTypeGetNotationsMethodInfo +data DOMDocumentTypeGetPublicIdMethodInfo +data DOMDocumentTypeGetSystemIdMethodInfo +data DOMDocumentTypeRemoveMethodInfo diff --git a/GI/WebKit/Objects/DOMElement.hs b/GI/WebKit/Objects/DOMElement.hs --- a/GI/WebKit/Objects/DOMElement.hs +++ b/GI/WebKit/Objects/DOMElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,242 +18,302 @@ -- * Methods -- ** dOMElementBlur + DOMElementBlurMethodInfo , dOMElementBlur , -- ** dOMElementFocus + DOMElementFocusMethodInfo , dOMElementFocus , -- ** dOMElementGetAttribute + DOMElementGetAttributeMethodInfo , dOMElementGetAttribute , -- ** dOMElementGetAttributeNode + DOMElementGetAttributeNodeMethodInfo , dOMElementGetAttributeNode , -- ** dOMElementGetAttributeNodeNs + DOMElementGetAttributeNodeNsMethodInfo , dOMElementGetAttributeNodeNs , -- ** dOMElementGetAttributeNs + DOMElementGetAttributeNsMethodInfo , dOMElementGetAttributeNs , -- ** dOMElementGetAttributes + DOMElementGetAttributesMethodInfo , dOMElementGetAttributes , -- ** dOMElementGetChildElementCount + DOMElementGetChildElementCountMethodInfo, dOMElementGetChildElementCount , -- ** dOMElementGetClassList + DOMElementGetClassListMethodInfo , dOMElementGetClassList , -- ** dOMElementGetClassName + DOMElementGetClassNameMethodInfo , dOMElementGetClassName , -- ** dOMElementGetClientHeight + DOMElementGetClientHeightMethodInfo , dOMElementGetClientHeight , -- ** dOMElementGetClientLeft + DOMElementGetClientLeftMethodInfo , dOMElementGetClientLeft , -- ** dOMElementGetClientTop + DOMElementGetClientTopMethodInfo , dOMElementGetClientTop , -- ** dOMElementGetClientWidth + DOMElementGetClientWidthMethodInfo , dOMElementGetClientWidth , -- ** dOMElementGetElementsByClassName + DOMElementGetElementsByClassNameMethodInfo, dOMElementGetElementsByClassName , -- ** dOMElementGetElementsByTagName + DOMElementGetElementsByTagNameMethodInfo, dOMElementGetElementsByTagName , -- ** dOMElementGetElementsByTagNameNs + DOMElementGetElementsByTagNameNsMethodInfo, dOMElementGetElementsByTagNameNs , -- ** dOMElementGetFirstElementChild + DOMElementGetFirstElementChildMethodInfo, dOMElementGetFirstElementChild , -- ** dOMElementGetId + DOMElementGetIdMethodInfo , dOMElementGetId , -- ** dOMElementGetLastElementChild + DOMElementGetLastElementChildMethodInfo , dOMElementGetLastElementChild , -- ** dOMElementGetNextElementSibling + DOMElementGetNextElementSiblingMethodInfo, dOMElementGetNextElementSibling , -- ** dOMElementGetOffsetHeight + DOMElementGetOffsetHeightMethodInfo , dOMElementGetOffsetHeight , -- ** dOMElementGetOffsetLeft + DOMElementGetOffsetLeftMethodInfo , dOMElementGetOffsetLeft , -- ** dOMElementGetOffsetParent + DOMElementGetOffsetParentMethodInfo , dOMElementGetOffsetParent , -- ** dOMElementGetOffsetTop + DOMElementGetOffsetTopMethodInfo , dOMElementGetOffsetTop , -- ** dOMElementGetOffsetWidth + DOMElementGetOffsetWidthMethodInfo , dOMElementGetOffsetWidth , -- ** dOMElementGetPreviousElementSibling + DOMElementGetPreviousElementSiblingMethodInfo, dOMElementGetPreviousElementSibling , -- ** dOMElementGetScrollHeight + DOMElementGetScrollHeightMethodInfo , dOMElementGetScrollHeight , -- ** dOMElementGetScrollLeft + DOMElementGetScrollLeftMethodInfo , dOMElementGetScrollLeft , -- ** dOMElementGetScrollTop + DOMElementGetScrollTopMethodInfo , dOMElementGetScrollTop , -- ** dOMElementGetScrollWidth + DOMElementGetScrollWidthMethodInfo , dOMElementGetScrollWidth , -- ** dOMElementGetStyle + DOMElementGetStyleMethodInfo , dOMElementGetStyle , -- ** dOMElementGetTagName + DOMElementGetTagNameMethodInfo , dOMElementGetTagName , -- ** dOMElementGetWebkitRegionOverflow + DOMElementGetWebkitRegionOverflowMethodInfo, dOMElementGetWebkitRegionOverflow , -- ** dOMElementGetWebkitRegionOverset + DOMElementGetWebkitRegionOversetMethodInfo, dOMElementGetWebkitRegionOverset , -- ** dOMElementHasAttribute + DOMElementHasAttributeMethodInfo , dOMElementHasAttribute , -- ** dOMElementHasAttributeNs + DOMElementHasAttributeNsMethodInfo , dOMElementHasAttributeNs , -- ** dOMElementHasAttributes + DOMElementHasAttributesMethodInfo , dOMElementHasAttributes , -- ** dOMElementQuerySelector + DOMElementQuerySelectorMethodInfo , dOMElementQuerySelector , -- ** dOMElementQuerySelectorAll + DOMElementQuerySelectorAllMethodInfo , dOMElementQuerySelectorAll , -- ** dOMElementRemove + DOMElementRemoveMethodInfo , dOMElementRemove , -- ** dOMElementRemoveAttribute + DOMElementRemoveAttributeMethodInfo , dOMElementRemoveAttribute , -- ** dOMElementRemoveAttributeNode + DOMElementRemoveAttributeNodeMethodInfo , dOMElementRemoveAttributeNode , -- ** dOMElementRemoveAttributeNs + DOMElementRemoveAttributeNsMethodInfo , dOMElementRemoveAttributeNs , -- ** dOMElementScrollByLines + DOMElementScrollByLinesMethodInfo , dOMElementScrollByLines , -- ** dOMElementScrollByPages + DOMElementScrollByPagesMethodInfo , dOMElementScrollByPages , -- ** dOMElementScrollIntoView + DOMElementScrollIntoViewMethodInfo , dOMElementScrollIntoView , -- ** dOMElementScrollIntoViewIfNeeded + DOMElementScrollIntoViewIfNeededMethodInfo, dOMElementScrollIntoViewIfNeeded , -- ** dOMElementSetAttribute + DOMElementSetAttributeMethodInfo , dOMElementSetAttribute , -- ** dOMElementSetAttributeNode + DOMElementSetAttributeNodeMethodInfo , dOMElementSetAttributeNode , -- ** dOMElementSetAttributeNodeNs + DOMElementSetAttributeNodeNsMethodInfo , dOMElementSetAttributeNodeNs , -- ** dOMElementSetAttributeNs + DOMElementSetAttributeNsMethodInfo , dOMElementSetAttributeNs , -- ** dOMElementSetClassName + DOMElementSetClassNameMethodInfo , dOMElementSetClassName , -- ** dOMElementSetId + DOMElementSetIdMethodInfo , dOMElementSetId , -- ** dOMElementSetScrollLeft + DOMElementSetScrollLeftMethodInfo , dOMElementSetScrollLeft , -- ** dOMElementSetScrollTop + DOMElementSetScrollTopMethodInfo , dOMElementSetScrollTop , -- ** dOMElementWebkitMatchesSelector + DOMElementWebkitMatchesSelectorMethodInfo, dOMElementWebkitMatchesSelector , -- ** dOMElementWebkitRequestFullScreen + DOMElementWebkitRequestFullScreenMethodInfo, dOMElementWebkitRequestFullScreen , -- ** dOMElementWebkitRequestFullscreen + DOMElementWebkitRequestFullscreenMethodInfo, dOMElementWebkitRequestFullscreen , -- ** dOMElementWebkitRequestPointerLock + DOMElementWebkitRequestPointerLockMethodInfo, dOMElementWebkitRequestPointerLock , @@ -428,6 +489,133 @@ noDOMElement :: Maybe DOMElement noDOMElement = Nothing +type family ResolveDOMElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMElementMethod "getClassList" o = DOMElementGetClassListMethodInfo + ResolveDOMElementMethod "getClassName" o = DOMElementGetClassNameMethodInfo + ResolveDOMElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMElementMethod "getId" o = DOMElementGetIdMethodInfo + ResolveDOMElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMElementMethod "setClassName" o = DOMElementSetClassNameMethodInfo + ResolveDOMElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMElementMethod "setId" o = DOMElementSetIdMethodInfo + ResolveDOMElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMElementMethod t DOMElement, MethodInfo info DOMElement p) => IsLabelProxy t (DOMElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMElementMethod t DOMElement, MethodInfo info DOMElement p) => IsLabel t (DOMElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "attributes" -- Type: TInterface "WebKit" "DOMNamedNodeMap" -- Flags: [PropertyReadable] @@ -441,7 +629,7 @@ type AttrSetTypeConstraint DOMElementAttributesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementAttributesPropertyInfo = DOMElementK type AttrGetType DOMElementAttributesPropertyInfo = DOMNamedNodeMap - type AttrLabel DOMElementAttributesPropertyInfo = "DOMElement::attributes" + type AttrLabel DOMElementAttributesPropertyInfo = "attributes" attrGet _ = getDOMElementAttributes attrSet _ = undefined attrConstruct _ = undefined @@ -459,7 +647,7 @@ type AttrSetTypeConstraint DOMElementChildElementCountPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementChildElementCountPropertyInfo = DOMElementK type AttrGetType DOMElementChildElementCountPropertyInfo = Word64 - type AttrLabel DOMElementChildElementCountPropertyInfo = "DOMElement::child-element-count" + type AttrLabel DOMElementChildElementCountPropertyInfo = "child-element-count" attrGet _ = getDOMElementChildElementCount attrSet _ = undefined attrConstruct _ = undefined @@ -477,7 +665,7 @@ type AttrSetTypeConstraint DOMElementClassListPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementClassListPropertyInfo = DOMElementK type AttrGetType DOMElementClassListPropertyInfo = DOMDOMTokenList - type AttrLabel DOMElementClassListPropertyInfo = "DOMElement::class-list" + type AttrLabel DOMElementClassListPropertyInfo = "class-list" attrGet _ = getDOMElementClassList attrSet _ = undefined attrConstruct _ = undefined @@ -501,7 +689,7 @@ type AttrSetTypeConstraint DOMElementClassNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMElementClassNamePropertyInfo = DOMElementK type AttrGetType DOMElementClassNamePropertyInfo = T.Text - type AttrLabel DOMElementClassNamePropertyInfo = "DOMElement::class-name" + type AttrLabel DOMElementClassNamePropertyInfo = "class-name" attrGet _ = getDOMElementClassName attrSet _ = setDOMElementClassName attrConstruct _ = constructDOMElementClassName @@ -519,7 +707,7 @@ type AttrSetTypeConstraint DOMElementClientHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementClientHeightPropertyInfo = DOMElementK type AttrGetType DOMElementClientHeightPropertyInfo = Int64 - type AttrLabel DOMElementClientHeightPropertyInfo = "DOMElement::client-height" + type AttrLabel DOMElementClientHeightPropertyInfo = "client-height" attrGet _ = getDOMElementClientHeight attrSet _ = undefined attrConstruct _ = undefined @@ -537,7 +725,7 @@ type AttrSetTypeConstraint DOMElementClientLeftPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementClientLeftPropertyInfo = DOMElementK type AttrGetType DOMElementClientLeftPropertyInfo = Int64 - type AttrLabel DOMElementClientLeftPropertyInfo = "DOMElement::client-left" + type AttrLabel DOMElementClientLeftPropertyInfo = "client-left" attrGet _ = getDOMElementClientLeft attrSet _ = undefined attrConstruct _ = undefined @@ -555,7 +743,7 @@ type AttrSetTypeConstraint DOMElementClientTopPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementClientTopPropertyInfo = DOMElementK type AttrGetType DOMElementClientTopPropertyInfo = Int64 - type AttrLabel DOMElementClientTopPropertyInfo = "DOMElement::client-top" + type AttrLabel DOMElementClientTopPropertyInfo = "client-top" attrGet _ = getDOMElementClientTop attrSet _ = undefined attrConstruct _ = undefined @@ -573,7 +761,7 @@ type AttrSetTypeConstraint DOMElementClientWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementClientWidthPropertyInfo = DOMElementK type AttrGetType DOMElementClientWidthPropertyInfo = Int64 - type AttrLabel DOMElementClientWidthPropertyInfo = "DOMElement::client-width" + type AttrLabel DOMElementClientWidthPropertyInfo = "client-width" attrGet _ = getDOMElementClientWidth attrSet _ = undefined attrConstruct _ = undefined @@ -591,7 +779,7 @@ type AttrSetTypeConstraint DOMElementFirstElementChildPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementFirstElementChildPropertyInfo = DOMElementK type AttrGetType DOMElementFirstElementChildPropertyInfo = DOMElement - type AttrLabel DOMElementFirstElementChildPropertyInfo = "DOMElement::first-element-child" + type AttrLabel DOMElementFirstElementChildPropertyInfo = "first-element-child" attrGet _ = getDOMElementFirstElementChild attrSet _ = undefined attrConstruct _ = undefined @@ -615,7 +803,7 @@ type AttrSetTypeConstraint DOMElementIdPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMElementIdPropertyInfo = DOMElementK type AttrGetType DOMElementIdPropertyInfo = T.Text - type AttrLabel DOMElementIdPropertyInfo = "DOMElement::id" + type AttrLabel DOMElementIdPropertyInfo = "id" attrGet _ = getDOMElementId attrSet _ = setDOMElementId attrConstruct _ = constructDOMElementId @@ -633,7 +821,7 @@ type AttrSetTypeConstraint DOMElementLastElementChildPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementLastElementChildPropertyInfo = DOMElementK type AttrGetType DOMElementLastElementChildPropertyInfo = DOMElement - type AttrLabel DOMElementLastElementChildPropertyInfo = "DOMElement::last-element-child" + type AttrLabel DOMElementLastElementChildPropertyInfo = "last-element-child" attrGet _ = getDOMElementLastElementChild attrSet _ = undefined attrConstruct _ = undefined @@ -651,7 +839,7 @@ type AttrSetTypeConstraint DOMElementNextElementSiblingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementNextElementSiblingPropertyInfo = DOMElementK type AttrGetType DOMElementNextElementSiblingPropertyInfo = DOMElement - type AttrLabel DOMElementNextElementSiblingPropertyInfo = "DOMElement::next-element-sibling" + type AttrLabel DOMElementNextElementSiblingPropertyInfo = "next-element-sibling" attrGet _ = getDOMElementNextElementSibling attrSet _ = undefined attrConstruct _ = undefined @@ -669,7 +857,7 @@ type AttrSetTypeConstraint DOMElementOffsetHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementOffsetHeightPropertyInfo = DOMElementK type AttrGetType DOMElementOffsetHeightPropertyInfo = Int64 - type AttrLabel DOMElementOffsetHeightPropertyInfo = "DOMElement::offset-height" + type AttrLabel DOMElementOffsetHeightPropertyInfo = "offset-height" attrGet _ = getDOMElementOffsetHeight attrSet _ = undefined attrConstruct _ = undefined @@ -687,7 +875,7 @@ type AttrSetTypeConstraint DOMElementOffsetLeftPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementOffsetLeftPropertyInfo = DOMElementK type AttrGetType DOMElementOffsetLeftPropertyInfo = Int64 - type AttrLabel DOMElementOffsetLeftPropertyInfo = "DOMElement::offset-left" + type AttrLabel DOMElementOffsetLeftPropertyInfo = "offset-left" attrGet _ = getDOMElementOffsetLeft attrSet _ = undefined attrConstruct _ = undefined @@ -705,7 +893,7 @@ type AttrSetTypeConstraint DOMElementOffsetParentPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementOffsetParentPropertyInfo = DOMElementK type AttrGetType DOMElementOffsetParentPropertyInfo = DOMElement - type AttrLabel DOMElementOffsetParentPropertyInfo = "DOMElement::offset-parent" + type AttrLabel DOMElementOffsetParentPropertyInfo = "offset-parent" attrGet _ = getDOMElementOffsetParent attrSet _ = undefined attrConstruct _ = undefined @@ -723,7 +911,7 @@ type AttrSetTypeConstraint DOMElementOffsetTopPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementOffsetTopPropertyInfo = DOMElementK type AttrGetType DOMElementOffsetTopPropertyInfo = Int64 - type AttrLabel DOMElementOffsetTopPropertyInfo = "DOMElement::offset-top" + type AttrLabel DOMElementOffsetTopPropertyInfo = "offset-top" attrGet _ = getDOMElementOffsetTop attrSet _ = undefined attrConstruct _ = undefined @@ -741,7 +929,7 @@ type AttrSetTypeConstraint DOMElementOffsetWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementOffsetWidthPropertyInfo = DOMElementK type AttrGetType DOMElementOffsetWidthPropertyInfo = Int64 - type AttrLabel DOMElementOffsetWidthPropertyInfo = "DOMElement::offset-width" + type AttrLabel DOMElementOffsetWidthPropertyInfo = "offset-width" attrGet _ = getDOMElementOffsetWidth attrSet _ = undefined attrConstruct _ = undefined @@ -759,7 +947,7 @@ type AttrSetTypeConstraint DOMElementPreviousElementSiblingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementPreviousElementSiblingPropertyInfo = DOMElementK type AttrGetType DOMElementPreviousElementSiblingPropertyInfo = DOMElement - type AttrLabel DOMElementPreviousElementSiblingPropertyInfo = "DOMElement::previous-element-sibling" + type AttrLabel DOMElementPreviousElementSiblingPropertyInfo = "previous-element-sibling" attrGet _ = getDOMElementPreviousElementSibling attrSet _ = undefined attrConstruct _ = undefined @@ -777,7 +965,7 @@ type AttrSetTypeConstraint DOMElementScrollHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementScrollHeightPropertyInfo = DOMElementK type AttrGetType DOMElementScrollHeightPropertyInfo = Int64 - type AttrLabel DOMElementScrollHeightPropertyInfo = "DOMElement::scroll-height" + type AttrLabel DOMElementScrollHeightPropertyInfo = "scroll-height" attrGet _ = getDOMElementScrollHeight attrSet _ = undefined attrConstruct _ = undefined @@ -801,7 +989,7 @@ type AttrSetTypeConstraint DOMElementScrollLeftPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMElementScrollLeftPropertyInfo = DOMElementK type AttrGetType DOMElementScrollLeftPropertyInfo = Int64 - type AttrLabel DOMElementScrollLeftPropertyInfo = "DOMElement::scroll-left" + type AttrLabel DOMElementScrollLeftPropertyInfo = "scroll-left" attrGet _ = getDOMElementScrollLeft attrSet _ = setDOMElementScrollLeft attrConstruct _ = constructDOMElementScrollLeft @@ -825,7 +1013,7 @@ type AttrSetTypeConstraint DOMElementScrollTopPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMElementScrollTopPropertyInfo = DOMElementK type AttrGetType DOMElementScrollTopPropertyInfo = Int64 - type AttrLabel DOMElementScrollTopPropertyInfo = "DOMElement::scroll-top" + type AttrLabel DOMElementScrollTopPropertyInfo = "scroll-top" attrGet _ = getDOMElementScrollTop attrSet _ = setDOMElementScrollTop attrConstruct _ = constructDOMElementScrollTop @@ -843,7 +1031,7 @@ type AttrSetTypeConstraint DOMElementScrollWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementScrollWidthPropertyInfo = DOMElementK type AttrGetType DOMElementScrollWidthPropertyInfo = Int64 - type AttrLabel DOMElementScrollWidthPropertyInfo = "DOMElement::scroll-width" + type AttrLabel DOMElementScrollWidthPropertyInfo = "scroll-width" attrGet _ = getDOMElementScrollWidth attrSet _ = undefined attrConstruct _ = undefined @@ -861,7 +1049,7 @@ type AttrSetTypeConstraint DOMElementStylePropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementStylePropertyInfo = DOMElementK type AttrGetType DOMElementStylePropertyInfo = DOMCSSStyleDeclaration - type AttrLabel DOMElementStylePropertyInfo = "DOMElement::style" + type AttrLabel DOMElementStylePropertyInfo = "style" attrGet _ = getDOMElementStyle attrSet _ = undefined attrConstruct _ = undefined @@ -879,7 +1067,7 @@ type AttrSetTypeConstraint DOMElementTagNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementTagNamePropertyInfo = DOMElementK type AttrGetType DOMElementTagNamePropertyInfo = T.Text - type AttrLabel DOMElementTagNamePropertyInfo = "DOMElement::tag-name" + type AttrLabel DOMElementTagNamePropertyInfo = "tag-name" attrGet _ = getDOMElementTagName attrSet _ = undefined attrConstruct _ = undefined @@ -897,22 +1085,21 @@ type AttrSetTypeConstraint DOMElementWebkitRegionOversetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMElementWebkitRegionOversetPropertyInfo = DOMElementK type AttrGetType DOMElementWebkitRegionOversetPropertyInfo = T.Text - type AttrLabel DOMElementWebkitRegionOversetPropertyInfo = "DOMElement::webkit-region-overset" + type AttrLabel DOMElementWebkitRegionOversetPropertyInfo = "webkit-region-overset" attrGet _ = getDOMElementWebkitRegionOverset attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMElement = DOMElementAttributeList -type DOMElementAttributeList = ('[ '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("id", DOMElementIdPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo)] :: [(Symbol, *)]) +type DOMElementAttributeList = ('[ '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("id", DOMElementIdPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMElement = DOMElementSignalList -type DOMElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMElement::blur -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -924,19 +1111,22 @@ dOMElementBlur :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMElementBlur _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_blur _obj' touchManagedPtr _obj return () +data DOMElementBlurMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementBlurMethodInfo a signature where + overloadedMethod _ = dOMElementBlur + -- method DOMElement::focus -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -948,19 +1138,22 @@ dOMElementFocus :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMElementFocus _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_focus _obj' touchManagedPtr _obj return () +data DOMElementFocusMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementFocusMethodInfo a signature where + overloadedMethod _ = dOMElementFocus + -- method DOMElement::get_attribute -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -973,9 +1166,9 @@ dOMElementGetAttribute :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- name - m T.Text + a -- _obj + -> T.Text -- name + -> m T.Text -- result dOMElementGetAttribute _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -987,11 +1180,14 @@ freeMem name' return result' +data DOMElementGetAttributeMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetAttributeMethodInfo a signature where + overloadedMethod _ = dOMElementGetAttribute + -- method DOMElement::get_attribute_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMAttr" -- throws : False -- Skip return : False @@ -1004,9 +1200,9 @@ dOMElementGetAttributeNode :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- name - m DOMAttr + a -- _obj + -> T.Text -- name + -> m DOMAttr -- result dOMElementGetAttributeNode _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -1017,11 +1213,14 @@ freeMem name' return result' +data DOMElementGetAttributeNodeMethodInfo +instance (signature ~ (T.Text -> m DOMAttr), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetAttributeNodeMethodInfo a signature where + overloadedMethod _ = dOMElementGetAttributeNode + -- method DOMElement::get_attribute_node_ns -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMAttr" -- throws : False -- Skip return : False @@ -1035,10 +1234,10 @@ dOMElementGetAttributeNodeNs :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- namespaceURI - T.Text -> -- localName - m DOMAttr + a -- _obj + -> T.Text -- namespaceURI + -> T.Text -- localName + -> m DOMAttr -- result dOMElementGetAttributeNodeNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI @@ -1051,11 +1250,14 @@ freeMem localName' return result' +data DOMElementGetAttributeNodeNsMethodInfo +instance (signature ~ (T.Text -> T.Text -> m DOMAttr), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetAttributeNodeNsMethodInfo a signature where + overloadedMethod _ = dOMElementGetAttributeNodeNs + -- method DOMElement::get_attribute_ns -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1069,10 +1271,10 @@ dOMElementGetAttributeNs :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- namespaceURI - T.Text -> -- localName - m T.Text + a -- _obj + -> T.Text -- namespaceURI + -> T.Text -- localName + -> m T.Text -- result dOMElementGetAttributeNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI @@ -1086,11 +1288,14 @@ freeMem localName' return result' +data DOMElementGetAttributeNsMethodInfo +instance (signature ~ (T.Text -> T.Text -> m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetAttributeNsMethodInfo a signature where + overloadedMethod _ = dOMElementGetAttributeNs + -- method DOMElement::get_attributes -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNamedNodeMap" -- throws : False -- Skip return : False @@ -1102,8 +1307,8 @@ dOMElementGetAttributes :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m DOMNamedNodeMap + a -- _obj + -> m DOMNamedNodeMap -- result dOMElementGetAttributes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_attributes _obj' @@ -1112,11 +1317,14 @@ touchManagedPtr _obj return result' +data DOMElementGetAttributesMethodInfo +instance (signature ~ (m DOMNamedNodeMap), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetAttributesMethodInfo a signature where + overloadedMethod _ = dOMElementGetAttributes + -- method DOMElement::get_child_element_count -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -1128,19 +1336,22 @@ dOMElementGetChildElementCount :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMElementGetChildElementCount _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_child_element_count _obj' touchManagedPtr _obj return result +data DOMElementGetChildElementCountMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetChildElementCountMethodInfo a signature where + overloadedMethod _ = dOMElementGetChildElementCount + -- method DOMElement::get_class_list -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMTokenList" -- throws : False -- Skip return : False @@ -1152,8 +1363,8 @@ dOMElementGetClassList :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m DOMDOMTokenList + a -- _obj + -> m DOMDOMTokenList -- result dOMElementGetClassList _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_class_list _obj' @@ -1162,11 +1373,14 @@ touchManagedPtr _obj return result' +data DOMElementGetClassListMethodInfo +instance (signature ~ (m DOMDOMTokenList), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetClassListMethodInfo a signature where + overloadedMethod _ = dOMElementGetClassList + -- method DOMElement::get_class_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1178,8 +1392,8 @@ dOMElementGetClassName :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMElementGetClassName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_class_name _obj' @@ -1189,11 +1403,14 @@ touchManagedPtr _obj return result' +data DOMElementGetClassNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetClassNameMethodInfo a signature where + overloadedMethod _ = dOMElementGetClassName + -- method DOMElement::get_client_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1205,19 +1422,22 @@ dOMElementGetClientHeight :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetClientHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_client_height _obj' touchManagedPtr _obj return result +data DOMElementGetClientHeightMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetClientHeightMethodInfo a signature where + overloadedMethod _ = dOMElementGetClientHeight + -- method DOMElement::get_client_left -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1229,19 +1449,22 @@ dOMElementGetClientLeft :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetClientLeft _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_client_left _obj' touchManagedPtr _obj return result +data DOMElementGetClientLeftMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetClientLeftMethodInfo a signature where + overloadedMethod _ = dOMElementGetClientLeft + -- method DOMElement::get_client_top -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1253,19 +1476,22 @@ dOMElementGetClientTop :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetClientTop _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_client_top _obj' touchManagedPtr _obj return result +data DOMElementGetClientTopMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetClientTopMethodInfo a signature where + overloadedMethod _ = dOMElementGetClientTop + -- method DOMElement::get_client_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1277,19 +1503,22 @@ dOMElementGetClientWidth :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetClientWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_client_width _obj' touchManagedPtr _obj return result +data DOMElementGetClientWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetClientWidthMethodInfo a signature where + overloadedMethod _ = dOMElementGetClientWidth + -- method DOMElement::get_elements_by_class_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -1302,9 +1531,9 @@ dOMElementGetElementsByClassName :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- name - m DOMNodeList + a -- _obj + -> T.Text -- name + -> m DOMNodeList -- result dOMElementGetElementsByClassName _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -1315,11 +1544,14 @@ freeMem name' return result' +data DOMElementGetElementsByClassNameMethodInfo +instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetElementsByClassNameMethodInfo a signature where + overloadedMethod _ = dOMElementGetElementsByClassName + -- method DOMElement::get_elements_by_tag_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -1332,9 +1564,9 @@ dOMElementGetElementsByTagName :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- name - m DOMNodeList + a -- _obj + -> T.Text -- name + -> m DOMNodeList -- result dOMElementGetElementsByTagName _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -1345,11 +1577,14 @@ freeMem name' return result' +data DOMElementGetElementsByTagNameMethodInfo +instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetElementsByTagNameMethodInfo a signature where + overloadedMethod _ = dOMElementGetElementsByTagName + -- method DOMElement::get_elements_by_tag_name_ns -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -1363,10 +1598,10 @@ dOMElementGetElementsByTagNameNs :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- namespaceURI - T.Text -> -- localName - m DOMNodeList + a -- _obj + -> T.Text -- namespaceURI + -> T.Text -- localName + -> m DOMNodeList -- result dOMElementGetElementsByTagNameNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI @@ -1379,11 +1614,14 @@ freeMem localName' return result' +data DOMElementGetElementsByTagNameNsMethodInfo +instance (signature ~ (T.Text -> T.Text -> m DOMNodeList), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetElementsByTagNameNsMethodInfo a signature where + overloadedMethod _ = dOMElementGetElementsByTagNameNs + -- method DOMElement::get_first_element_child -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : False -- Skip return : False @@ -1395,8 +1633,8 @@ dOMElementGetFirstElementChild :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m DOMElement + a -- _obj + -> m DOMElement -- result dOMElementGetFirstElementChild _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_first_element_child _obj' @@ -1405,11 +1643,14 @@ touchManagedPtr _obj return result' +data DOMElementGetFirstElementChildMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetFirstElementChildMethodInfo a signature where + overloadedMethod _ = dOMElementGetFirstElementChild + -- method DOMElement::get_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1421,8 +1662,8 @@ dOMElementGetId :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMElementGetId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_id _obj' @@ -1432,11 +1673,14 @@ touchManagedPtr _obj return result' +data DOMElementGetIdMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetIdMethodInfo a signature where + overloadedMethod _ = dOMElementGetId + -- method DOMElement::get_last_element_child -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : False -- Skip return : False @@ -1448,8 +1692,8 @@ dOMElementGetLastElementChild :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m DOMElement + a -- _obj + -> m DOMElement -- result dOMElementGetLastElementChild _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_last_element_child _obj' @@ -1458,11 +1702,14 @@ touchManagedPtr _obj return result' +data DOMElementGetLastElementChildMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetLastElementChildMethodInfo a signature where + overloadedMethod _ = dOMElementGetLastElementChild + -- method DOMElement::get_next_element_sibling -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : False -- Skip return : False @@ -1474,8 +1721,8 @@ dOMElementGetNextElementSibling :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m DOMElement + a -- _obj + -> m DOMElement -- result dOMElementGetNextElementSibling _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_next_element_sibling _obj' @@ -1484,11 +1731,14 @@ touchManagedPtr _obj return result' +data DOMElementGetNextElementSiblingMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetNextElementSiblingMethodInfo a signature where + overloadedMethod _ = dOMElementGetNextElementSibling + -- method DOMElement::get_offset_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1500,19 +1750,22 @@ dOMElementGetOffsetHeight :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetOffsetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_offset_height _obj' touchManagedPtr _obj return result +data DOMElementGetOffsetHeightMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetOffsetHeightMethodInfo a signature where + overloadedMethod _ = dOMElementGetOffsetHeight + -- method DOMElement::get_offset_left -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1524,19 +1777,22 @@ dOMElementGetOffsetLeft :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetOffsetLeft _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_offset_left _obj' touchManagedPtr _obj return result +data DOMElementGetOffsetLeftMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetOffsetLeftMethodInfo a signature where + overloadedMethod _ = dOMElementGetOffsetLeft + -- method DOMElement::get_offset_parent -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : False -- Skip return : False @@ -1548,8 +1804,8 @@ dOMElementGetOffsetParent :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m DOMElement + a -- _obj + -> m DOMElement -- result dOMElementGetOffsetParent _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_offset_parent _obj' @@ -1558,11 +1814,14 @@ touchManagedPtr _obj return result' +data DOMElementGetOffsetParentMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetOffsetParentMethodInfo a signature where + overloadedMethod _ = dOMElementGetOffsetParent + -- method DOMElement::get_offset_top -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1574,19 +1833,22 @@ dOMElementGetOffsetTop :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetOffsetTop _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_offset_top _obj' touchManagedPtr _obj return result +data DOMElementGetOffsetTopMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetOffsetTopMethodInfo a signature where + overloadedMethod _ = dOMElementGetOffsetTop + -- method DOMElement::get_offset_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1598,19 +1860,22 @@ dOMElementGetOffsetWidth :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetOffsetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_offset_width _obj' touchManagedPtr _obj return result +data DOMElementGetOffsetWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetOffsetWidthMethodInfo a signature where + overloadedMethod _ = dOMElementGetOffsetWidth + -- method DOMElement::get_previous_element_sibling -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : False -- Skip return : False @@ -1622,8 +1887,8 @@ dOMElementGetPreviousElementSibling :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m DOMElement + a -- _obj + -> m DOMElement -- result dOMElementGetPreviousElementSibling _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_previous_element_sibling _obj' @@ -1632,11 +1897,14 @@ touchManagedPtr _obj return result' +data DOMElementGetPreviousElementSiblingMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetPreviousElementSiblingMethodInfo a signature where + overloadedMethod _ = dOMElementGetPreviousElementSibling + -- method DOMElement::get_scroll_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1648,19 +1916,22 @@ dOMElementGetScrollHeight :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetScrollHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_scroll_height _obj' touchManagedPtr _obj return result +data DOMElementGetScrollHeightMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetScrollHeightMethodInfo a signature where + overloadedMethod _ = dOMElementGetScrollHeight + -- method DOMElement::get_scroll_left -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1672,19 +1943,22 @@ dOMElementGetScrollLeft :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetScrollLeft _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_scroll_left _obj' touchManagedPtr _obj return result +data DOMElementGetScrollLeftMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetScrollLeftMethodInfo a signature where + overloadedMethod _ = dOMElementGetScrollLeft + -- method DOMElement::get_scroll_top -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1696,19 +1970,22 @@ dOMElementGetScrollTop :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetScrollTop _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_scroll_top _obj' touchManagedPtr _obj return result +data DOMElementGetScrollTopMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetScrollTopMethodInfo a signature where + overloadedMethod _ = dOMElementGetScrollTop + -- method DOMElement::get_scroll_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1720,19 +1997,22 @@ dOMElementGetScrollWidth :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMElementGetScrollWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_scroll_width _obj' touchManagedPtr _obj return result +data DOMElementGetScrollWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetScrollWidthMethodInfo a signature where + overloadedMethod _ = dOMElementGetScrollWidth + -- method DOMElement::get_style -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMCSSStyleDeclaration" -- throws : False -- Skip return : False @@ -1744,8 +2024,8 @@ dOMElementGetStyle :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m DOMCSSStyleDeclaration + a -- _obj + -> m DOMCSSStyleDeclaration -- result dOMElementGetStyle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_style _obj' @@ -1754,11 +2034,14 @@ touchManagedPtr _obj return result' +data DOMElementGetStyleMethodInfo +instance (signature ~ (m DOMCSSStyleDeclaration), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetStyleMethodInfo a signature where + overloadedMethod _ = dOMElementGetStyle + -- method DOMElement::get_tag_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1770,8 +2053,8 @@ dOMElementGetTagName :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMElementGetTagName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_tag_name _obj' @@ -1781,11 +2064,14 @@ touchManagedPtr _obj return result' +data DOMElementGetTagNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetTagNameMethodInfo a signature where + overloadedMethod _ = dOMElementGetTagName + -- method DOMElement::get_webkit_region_overflow -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1797,8 +2083,8 @@ {-# DEPRECATED dOMElementGetWebkitRegionOverflow ["(Since version 1.10)","Use webkit_dom_element_get_webkit_region_overset() instead."]#-} dOMElementGetWebkitRegionOverflow :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMElementGetWebkitRegionOverflow _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_webkit_region_overflow _obj' @@ -1808,11 +2094,14 @@ touchManagedPtr _obj return result' +data DOMElementGetWebkitRegionOverflowMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetWebkitRegionOverflowMethodInfo a signature where + overloadedMethod _ = dOMElementGetWebkitRegionOverflow + -- method DOMElement::get_webkit_region_overset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1824,8 +2113,8 @@ dOMElementGetWebkitRegionOverset :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMElementGetWebkitRegionOverset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_get_webkit_region_overset _obj' @@ -1835,11 +2124,14 @@ touchManagedPtr _obj return result' +data DOMElementGetWebkitRegionOversetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMElementK a) => MethodInfo DOMElementGetWebkitRegionOversetMethodInfo a signature where + overloadedMethod _ = dOMElementGetWebkitRegionOverset + -- method DOMElement::has_attribute -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1852,9 +2144,9 @@ dOMElementHasAttribute :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- name - m Bool + a -- _obj + -> T.Text -- name + -> m Bool -- result dOMElementHasAttribute _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -1864,11 +2156,14 @@ freeMem name' return result' +data DOMElementHasAttributeMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMElementK a) => MethodInfo DOMElementHasAttributeMethodInfo a signature where + overloadedMethod _ = dOMElementHasAttribute + -- method DOMElement::has_attribute_ns -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1882,10 +2177,10 @@ dOMElementHasAttributeNs :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- namespaceURI - T.Text -> -- localName - m Bool + a -- _obj + -> T.Text -- namespaceURI + -> T.Text -- localName + -> m Bool -- result dOMElementHasAttributeNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI @@ -1897,11 +2192,14 @@ freeMem localName' return result' +data DOMElementHasAttributeNsMethodInfo +instance (signature ~ (T.Text -> T.Text -> m Bool), MonadIO m, DOMElementK a) => MethodInfo DOMElementHasAttributeNsMethodInfo a signature where + overloadedMethod _ = dOMElementHasAttributeNs + -- method DOMElement::has_attributes -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1913,8 +2211,8 @@ dOMElementHasAttributes :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMElementHasAttributes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_element_has_attributes _obj' @@ -1922,11 +2220,14 @@ touchManagedPtr _obj return result' +data DOMElementHasAttributesMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMElementK a) => MethodInfo DOMElementHasAttributesMethodInfo a signature where + overloadedMethod _ = dOMElementHasAttributes + -- method DOMElement::query_selector -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : True -- Skip return : False @@ -1940,9 +2241,9 @@ dOMElementQuerySelector :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- selectors - m DOMElement + a -- _obj + -> T.Text -- selectors + -> m DOMElement -- result dOMElementQuerySelector _obj selectors = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj selectors' <- textToCString selectors @@ -1957,11 +2258,14 @@ freeMem selectors' ) +data DOMElementQuerySelectorMethodInfo +instance (signature ~ (T.Text -> m DOMElement), MonadIO m, DOMElementK a) => MethodInfo DOMElementQuerySelectorMethodInfo a signature where + overloadedMethod _ = dOMElementQuerySelector + -- method DOMElement::query_selector_all -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : True -- Skip return : False @@ -1975,9 +2279,9 @@ dOMElementQuerySelectorAll :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- selectors - m DOMNodeList + a -- _obj + -> T.Text -- selectors + -> m DOMNodeList -- result dOMElementQuerySelectorAll _obj selectors = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj selectors' <- textToCString selectors @@ -1992,11 +2296,14 @@ freeMem selectors' ) +data DOMElementQuerySelectorAllMethodInfo +instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMElementK a) => MethodInfo DOMElementQuerySelectorAllMethodInfo a signature where + overloadedMethod _ = dOMElementQuerySelectorAll + -- method DOMElement::remove -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -2009,8 +2316,8 @@ dOMElementRemove :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMElementRemove _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -2021,11 +2328,14 @@ return () ) +data DOMElementRemoveMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementRemoveMethodInfo a signature where + overloadedMethod _ = dOMElementRemove + -- method DOMElement::remove_attribute -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2038,9 +2348,9 @@ dOMElementRemoveAttribute :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- name - m () + a -- _obj + -> T.Text -- name + -> m () -- result dOMElementRemoveAttribute _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -2049,11 +2359,14 @@ freeMem name' return () +data DOMElementRemoveAttributeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementRemoveAttributeMethodInfo a signature where + overloadedMethod _ = dOMElementRemoveAttribute + -- method DOMElement::remove_attribute_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "oldAttr", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "oldAttr", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "oldAttr", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMAttr" -- throws : True -- Skip return : False @@ -2067,9 +2380,9 @@ dOMElementRemoveAttributeNode :: (MonadIO m, DOMElementK a, DOMAttrK b) => - a -> -- _obj - b -> -- oldAttr - m DOMAttr + a -- _obj + -> b -- oldAttr + -> m DOMAttr -- result dOMElementRemoveAttributeNode _obj oldAttr = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let oldAttr' = unsafeManagedPtrCastPtr oldAttr @@ -2084,11 +2397,14 @@ return () ) +data DOMElementRemoveAttributeNodeMethodInfo +instance (signature ~ (b -> m DOMAttr), MonadIO m, DOMElementK a, DOMAttrK b) => MethodInfo DOMElementRemoveAttributeNodeMethodInfo a signature where + overloadedMethod _ = dOMElementRemoveAttributeNode + -- method DOMElement::remove_attribute_ns -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2102,10 +2418,10 @@ dOMElementRemoveAttributeNs :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- namespaceURI - T.Text -> -- localName - m () + a -- _obj + -> T.Text -- namespaceURI + -> T.Text -- localName + -> m () -- result dOMElementRemoveAttributeNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI @@ -2116,11 +2432,14 @@ freeMem localName' return () +data DOMElementRemoveAttributeNsMethodInfo +instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementRemoveAttributeNsMethodInfo a signature where + overloadedMethod _ = dOMElementRemoveAttributeNs + -- method DOMElement::scroll_by_lines -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "lines", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "lines", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "lines", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2133,20 +2452,23 @@ dOMElementScrollByLines :: (MonadIO m, DOMElementK a) => - a -> -- _obj - Int64 -> -- lines - m () + a -- _obj + -> Int64 -- lines + -> m () -- result dOMElementScrollByLines _obj lines = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_scroll_by_lines _obj' lines touchManagedPtr _obj return () +data DOMElementScrollByLinesMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementScrollByLinesMethodInfo a signature where + overloadedMethod _ = dOMElementScrollByLines + -- method DOMElement::scroll_by_pages -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pages", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pages", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "pages", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2159,20 +2481,23 @@ dOMElementScrollByPages :: (MonadIO m, DOMElementK a) => - a -> -- _obj - Int64 -> -- pages - m () + a -- _obj + -> Int64 -- pages + -> m () -- result dOMElementScrollByPages _obj pages = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_scroll_by_pages _obj' pages touchManagedPtr _obj return () +data DOMElementScrollByPagesMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementScrollByPagesMethodInfo a signature where + overloadedMethod _ = dOMElementScrollByPages + -- method DOMElement::scroll_into_view -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "alignWithTop", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "alignWithTop", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "alignWithTop", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2185,9 +2510,9 @@ dOMElementScrollIntoView :: (MonadIO m, DOMElementK a) => - a -> -- _obj - Bool -> -- alignWithTop - m () + a -- _obj + -> Bool -- alignWithTop + -> m () -- result dOMElementScrollIntoView _obj alignWithTop = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let alignWithTop' = (fromIntegral . fromEnum) alignWithTop @@ -2195,11 +2520,14 @@ touchManagedPtr _obj return () +data DOMElementScrollIntoViewMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementScrollIntoViewMethodInfo a signature where + overloadedMethod _ = dOMElementScrollIntoView + -- method DOMElement::scroll_into_view_if_needed -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "centerIfNeeded", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "centerIfNeeded", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "centerIfNeeded", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2212,9 +2540,9 @@ dOMElementScrollIntoViewIfNeeded :: (MonadIO m, DOMElementK a) => - a -> -- _obj - Bool -> -- centerIfNeeded - m () + a -- _obj + -> Bool -- centerIfNeeded + -> m () -- result dOMElementScrollIntoViewIfNeeded _obj centerIfNeeded = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let centerIfNeeded' = (fromIntegral . fromEnum) centerIfNeeded @@ -2222,11 +2550,14 @@ touchManagedPtr _obj return () +data DOMElementScrollIntoViewIfNeededMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementScrollIntoViewIfNeededMethodInfo a signature where + overloadedMethod _ = dOMElementScrollIntoViewIfNeeded + -- method DOMElement::set_attribute -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -2241,10 +2572,10 @@ dOMElementSetAttribute :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- name - T.Text -> -- value - m () + a -- _obj + -> T.Text -- name + -> T.Text -- value + -> m () -- result dOMElementSetAttribute _obj name value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -2260,11 +2591,14 @@ freeMem value' ) +data DOMElementSetAttributeMethodInfo +instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetAttributeMethodInfo a signature where + overloadedMethod _ = dOMElementSetAttribute + -- method DOMElement::set_attribute_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newAttr", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "newAttr", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newAttr", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMAttr" -- throws : True -- Skip return : False @@ -2278,9 +2612,9 @@ dOMElementSetAttributeNode :: (MonadIO m, DOMElementK a, DOMAttrK b) => - a -> -- _obj - b -> -- newAttr - m DOMAttr + a -- _obj + -> b -- newAttr + -> m DOMAttr -- result dOMElementSetAttributeNode _obj newAttr = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let newAttr' = unsafeManagedPtrCastPtr newAttr @@ -2295,11 +2629,14 @@ return () ) +data DOMElementSetAttributeNodeMethodInfo +instance (signature ~ (b -> m DOMAttr), MonadIO m, DOMElementK a, DOMAttrK b) => MethodInfo DOMElementSetAttributeNodeMethodInfo a signature where + overloadedMethod _ = dOMElementSetAttributeNode + -- method DOMElement::set_attribute_node_ns -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newAttr", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "newAttr", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newAttr", argType = TInterface "WebKit" "DOMAttr", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMAttr" -- throws : True -- Skip return : False @@ -2313,9 +2650,9 @@ dOMElementSetAttributeNodeNs :: (MonadIO m, DOMElementK a, DOMAttrK b) => - a -> -- _obj - b -> -- newAttr - m DOMAttr + a -- _obj + -> b -- newAttr + -> m DOMAttr -- result dOMElementSetAttributeNodeNs _obj newAttr = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let newAttr' = unsafeManagedPtrCastPtr newAttr @@ -2330,11 +2667,14 @@ return () ) +data DOMElementSetAttributeNodeNsMethodInfo +instance (signature ~ (b -> m DOMAttr), MonadIO m, DOMElementK a, DOMAttrK b) => MethodInfo DOMElementSetAttributeNodeNsMethodInfo a signature where + overloadedMethod _ = dOMElementSetAttributeNodeNs + -- method DOMElement::set_attribute_ns -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "qualifiedName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -2350,11 +2690,11 @@ dOMElementSetAttributeNs :: (MonadIO m, DOMElementK a) => - a -> -- _obj - Maybe (T.Text) -> -- namespaceURI - T.Text -> -- qualifiedName - T.Text -> -- value - m () + a -- _obj + -> Maybe (T.Text) -- namespaceURI + -> T.Text -- qualifiedName + -> T.Text -- value + -> m () -- result dOMElementSetAttributeNs _obj namespaceURI qualifiedName value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybeNamespaceURI <- case namespaceURI of @@ -2377,11 +2717,14 @@ freeMem value' ) +data DOMElementSetAttributeNsMethodInfo +instance (signature ~ (Maybe (T.Text) -> T.Text -> T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetAttributeNsMethodInfo a signature where + overloadedMethod _ = dOMElementSetAttributeNs + -- method DOMElement::set_class_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2394,9 +2737,9 @@ dOMElementSetClassName :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMElementSetClassName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -2405,11 +2748,14 @@ freeMem value' return () +data DOMElementSetClassNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetClassNameMethodInfo a signature where + overloadedMethod _ = dOMElementSetClassName + -- method DOMElement::set_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2422,9 +2768,9 @@ dOMElementSetId :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMElementSetId _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -2433,11 +2779,14 @@ freeMem value' return () +data DOMElementSetIdMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetIdMethodInfo a signature where + overloadedMethod _ = dOMElementSetId + -- method DOMElement::set_scroll_left -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2450,20 +2799,23 @@ dOMElementSetScrollLeft :: (MonadIO m, DOMElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMElementSetScrollLeft _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_set_scroll_left _obj' value touchManagedPtr _obj return () +data DOMElementSetScrollLeftMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetScrollLeftMethodInfo a signature where + overloadedMethod _ = dOMElementSetScrollLeft + -- method DOMElement::set_scroll_top -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2476,20 +2828,23 @@ dOMElementSetScrollTop :: (MonadIO m, DOMElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMElementSetScrollTop _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_set_scroll_top _obj' value touchManagedPtr _obj return () +data DOMElementSetScrollTopMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementSetScrollTopMethodInfo a signature where + overloadedMethod _ = dOMElementSetScrollTop + -- method DOMElement::webkit_matches_selector -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectors", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -2503,9 +2858,9 @@ dOMElementWebkitMatchesSelector :: (MonadIO m, DOMElementK a) => - a -> -- _obj - T.Text -> -- selectors - m () + a -- _obj + -> T.Text -- selectors + -> m () -- result dOMElementWebkitMatchesSelector _obj selectors = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj selectors' <- textToCString selectors @@ -2518,11 +2873,14 @@ freeMem selectors' ) +data DOMElementWebkitMatchesSelectorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementWebkitMatchesSelectorMethodInfo a signature where + overloadedMethod _ = dOMElementWebkitMatchesSelector + -- method DOMElement::webkit_request_full_screen -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "flags", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flags", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "flags", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2535,20 +2893,23 @@ dOMElementWebkitRequestFullScreen :: (MonadIO m, DOMElementK a) => - a -> -- _obj - Word16 -> -- flags - m () + a -- _obj + -> Word16 -- flags + -> m () -- result dOMElementWebkitRequestFullScreen _obj flags = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_webkit_request_full_screen _obj' flags touchManagedPtr _obj return () +data DOMElementWebkitRequestFullScreenMethodInfo +instance (signature ~ (Word16 -> m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementWebkitRequestFullScreenMethodInfo a signature where + overloadedMethod _ = dOMElementWebkitRequestFullScreen + -- method DOMElement::webkit_request_fullscreen -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2560,19 +2921,22 @@ dOMElementWebkitRequestFullscreen :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMElementWebkitRequestFullscreen _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_webkit_request_fullscreen _obj' touchManagedPtr _obj return () +data DOMElementWebkitRequestFullscreenMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementWebkitRequestFullscreenMethodInfo a signature where + overloadedMethod _ = dOMElementWebkitRequestFullscreen + -- method DOMElement::webkit_request_pointer_lock -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2584,12 +2948,16 @@ dOMElementWebkitRequestPointerLock :: (MonadIO m, DOMElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMElementWebkitRequestPointerLock _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_element_webkit_request_pointer_lock _obj' touchManagedPtr _obj return () + +data DOMElementWebkitRequestPointerLockMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMElementK a) => MethodInfo DOMElementWebkitRequestPointerLockMethodInfo a signature where + overloadedMethod _ = dOMElementWebkitRequestPointerLock diff --git a/GI/WebKit/Objects/DOMElement.hs-boot b/GI/WebKit/Objects/DOMElement.hs-boot --- a/GI/WebKit/Objects/DOMElement.hs-boot +++ b/GI/WebKit/Objects/DOMElement.hs-boot @@ -36,3 +36,63 @@ data DOMElementStylePropertyInfo data DOMElementTagNamePropertyInfo data DOMElementWebkitRegionOversetPropertyInfo +data DOMElementBlurMethodInfo +data DOMElementFocusMethodInfo +data DOMElementGetAttributeMethodInfo +data DOMElementGetAttributeNodeMethodInfo +data DOMElementGetAttributeNodeNsMethodInfo +data DOMElementGetAttributeNsMethodInfo +data DOMElementGetAttributesMethodInfo +data DOMElementGetChildElementCountMethodInfo +data DOMElementGetClassListMethodInfo +data DOMElementGetClassNameMethodInfo +data DOMElementGetClientHeightMethodInfo +data DOMElementGetClientLeftMethodInfo +data DOMElementGetClientTopMethodInfo +data DOMElementGetClientWidthMethodInfo +data DOMElementGetElementsByClassNameMethodInfo +data DOMElementGetElementsByTagNameMethodInfo +data DOMElementGetElementsByTagNameNsMethodInfo +data DOMElementGetFirstElementChildMethodInfo +data DOMElementGetIdMethodInfo +data DOMElementGetLastElementChildMethodInfo +data DOMElementGetNextElementSiblingMethodInfo +data DOMElementGetOffsetHeightMethodInfo +data DOMElementGetOffsetLeftMethodInfo +data DOMElementGetOffsetParentMethodInfo +data DOMElementGetOffsetTopMethodInfo +data DOMElementGetOffsetWidthMethodInfo +data DOMElementGetPreviousElementSiblingMethodInfo +data DOMElementGetScrollHeightMethodInfo +data DOMElementGetScrollLeftMethodInfo +data DOMElementGetScrollTopMethodInfo +data DOMElementGetScrollWidthMethodInfo +data DOMElementGetStyleMethodInfo +data DOMElementGetTagNameMethodInfo +data DOMElementGetWebkitRegionOverflowMethodInfo +data DOMElementGetWebkitRegionOversetMethodInfo +data DOMElementHasAttributeMethodInfo +data DOMElementHasAttributeNsMethodInfo +data DOMElementHasAttributesMethodInfo +data DOMElementQuerySelectorMethodInfo +data DOMElementQuerySelectorAllMethodInfo +data DOMElementRemoveMethodInfo +data DOMElementRemoveAttributeMethodInfo +data DOMElementRemoveAttributeNodeMethodInfo +data DOMElementRemoveAttributeNsMethodInfo +data DOMElementScrollByLinesMethodInfo +data DOMElementScrollByPagesMethodInfo +data DOMElementScrollIntoViewMethodInfo +data DOMElementScrollIntoViewIfNeededMethodInfo +data DOMElementSetAttributeMethodInfo +data DOMElementSetAttributeNodeMethodInfo +data DOMElementSetAttributeNodeNsMethodInfo +data DOMElementSetAttributeNsMethodInfo +data DOMElementSetClassNameMethodInfo +data DOMElementSetIdMethodInfo +data DOMElementSetScrollLeftMethodInfo +data DOMElementSetScrollTopMethodInfo +data DOMElementWebkitMatchesSelectorMethodInfo +data DOMElementWebkitRequestFullScreenMethodInfo +data DOMElementWebkitRequestFullscreenMethodInfo +data DOMElementWebkitRequestPointerLockMethodInfo diff --git a/GI/WebKit/Objects/DOMEntityReference.hs b/GI/WebKit/Objects/DOMEntityReference.hs --- a/GI/WebKit/Objects/DOMEntityReference.hs +++ b/GI/WebKit/Objects/DOMEntityReference.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -49,10 +50,81 @@ noDOMEntityReference :: Maybe DOMEntityReference noDOMEntityReference = Nothing +type family ResolveDOMEntityReferenceMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMEntityReferenceMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMEntityReferenceMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMEntityReferenceMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMEntityReferenceMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMEntityReferenceMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMEntityReferenceMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMEntityReferenceMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMEntityReferenceMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMEntityReferenceMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMEntityReferenceMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMEntityReferenceMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMEntityReferenceMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMEntityReferenceMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMEntityReferenceMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMEntityReferenceMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMEntityReferenceMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMEntityReferenceMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMEntityReferenceMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMEntityReferenceMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMEntityReferenceMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMEntityReferenceMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMEntityReferenceMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMEntityReferenceMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMEntityReferenceMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMEntityReferenceMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMEntityReferenceMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMEntityReferenceMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMEntityReferenceMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMEntityReferenceMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMEntityReferenceMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMEntityReferenceMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMEntityReferenceMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMEntityReferenceMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMEntityReferenceMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMEntityReferenceMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMEntityReferenceMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMEntityReferenceMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMEntityReferenceMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMEntityReferenceMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMEntityReferenceMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMEntityReferenceMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMEntityReferenceMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMEntityReferenceMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMEntityReferenceMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMEntityReferenceMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMEntityReferenceMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMEntityReferenceMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMEntityReferenceMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMEntityReferenceMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMEntityReferenceMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMEntityReferenceMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMEntityReferenceMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMEntityReferenceMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMEntityReferenceMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMEntityReferenceMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMEntityReferenceMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMEntityReferenceMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMEntityReferenceMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMEntityReferenceMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMEntityReferenceMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMEntityReferenceMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMEntityReferenceMethod t DOMEntityReference, MethodInfo info DOMEntityReference p) => IsLabelProxy t (DOMEntityReference -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMEntityReferenceMethod t DOMEntityReference, MethodInfo info DOMEntityReference p) => IsLabel t (DOMEntityReference -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMEntityReference = DOMEntityReferenceAttributeList -type DOMEntityReferenceAttributeList = ('[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) +type DOMEntityReferenceAttributeList = ('[ '("baseUri", DOMNodeBaseUriPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMEntityReference = DOMEntityReferenceSignalList -type DOMEntityReferenceSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMEntityReferenceSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/DOMEvent.hs b/GI/WebKit/Objects/DOMEvent.hs --- a/GI/WebKit/Objects/DOMEvent.hs +++ b/GI/WebKit/Objects/DOMEvent.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,66 +18,82 @@ -- * Methods -- ** dOMEventGetBubbles + DOMEventGetBubblesMethodInfo , dOMEventGetBubbles , -- ** dOMEventGetCancelBubble + DOMEventGetCancelBubbleMethodInfo , dOMEventGetCancelBubble , -- ** dOMEventGetCancelable + DOMEventGetCancelableMethodInfo , dOMEventGetCancelable , -- ** dOMEventGetCurrentTarget + DOMEventGetCurrentTargetMethodInfo , dOMEventGetCurrentTarget , -- ** dOMEventGetDefaultPrevented + DOMEventGetDefaultPreventedMethodInfo , dOMEventGetDefaultPrevented , -- ** dOMEventGetEventPhase + DOMEventGetEventPhaseMethodInfo , dOMEventGetEventPhase , -- ** dOMEventGetReturnValue + DOMEventGetReturnValueMethodInfo , dOMEventGetReturnValue , -- ** dOMEventGetSrcElement + DOMEventGetSrcElementMethodInfo , dOMEventGetSrcElement , -- ** dOMEventGetTarget + DOMEventGetTargetMethodInfo , dOMEventGetTarget , -- ** dOMEventGetTimeStamp + DOMEventGetTimeStampMethodInfo , dOMEventGetTimeStamp , -- ** dOMEventInitEvent + DOMEventInitEventMethodInfo , dOMEventInitEvent , -- ** dOMEventPreventDefault + DOMEventPreventDefaultMethodInfo , dOMEventPreventDefault , -- ** dOMEventSetCancelBubble + DOMEventSetCancelBubbleMethodInfo , dOMEventSetCancelBubble , -- ** dOMEventSetReturnValue + DOMEventSetReturnValueMethodInfo , dOMEventSetReturnValue , -- ** dOMEventStopImmediatePropagation + DOMEventStopImmediatePropagationMethodInfo, dOMEventStopImmediatePropagation , -- ** dOMEventStopPropagation + DOMEventStopPropagationMethodInfo , dOMEventStopPropagation , @@ -178,6 +195,55 @@ noDOMEvent :: Maybe DOMEvent noDOMEvent = Nothing +type family ResolveDOMEventMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMEventMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMEventMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMEventMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMEventMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMEventMethod "initEvent" o = DOMEventInitEventMethodInfo + ResolveDOMEventMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMEventMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMEventMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMEventMethod "preventDefault" o = DOMEventPreventDefaultMethodInfo + ResolveDOMEventMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMEventMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMEventMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMEventMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMEventMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMEventMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMEventMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMEventMethod "stopImmediatePropagation" o = DOMEventStopImmediatePropagationMethodInfo + ResolveDOMEventMethod "stopPropagation" o = DOMEventStopPropagationMethodInfo + ResolveDOMEventMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMEventMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMEventMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMEventMethod "getBubbles" o = DOMEventGetBubblesMethodInfo + ResolveDOMEventMethod "getCancelBubble" o = DOMEventGetCancelBubbleMethodInfo + ResolveDOMEventMethod "getCancelable" o = DOMEventGetCancelableMethodInfo + ResolveDOMEventMethod "getCurrentTarget" o = DOMEventGetCurrentTargetMethodInfo + ResolveDOMEventMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMEventMethod "getDefaultPrevented" o = DOMEventGetDefaultPreventedMethodInfo + ResolveDOMEventMethod "getEventPhase" o = DOMEventGetEventPhaseMethodInfo + ResolveDOMEventMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMEventMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMEventMethod "getReturnValue" o = DOMEventGetReturnValueMethodInfo + ResolveDOMEventMethod "getSrcElement" o = DOMEventGetSrcElementMethodInfo + ResolveDOMEventMethod "getTarget" o = DOMEventGetTargetMethodInfo + ResolveDOMEventMethod "getTimeStamp" o = DOMEventGetTimeStampMethodInfo + ResolveDOMEventMethod "setCancelBubble" o = DOMEventSetCancelBubbleMethodInfo + ResolveDOMEventMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMEventMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMEventMethod "setReturnValue" o = DOMEventSetReturnValueMethodInfo + ResolveDOMEventMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMEventMethod t DOMEvent, MethodInfo info DOMEvent p) => IsLabelProxy t (DOMEvent -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMEventMethod t DOMEvent, MethodInfo info DOMEvent p) => IsLabel t (DOMEvent -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "bubbles" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -191,7 +257,7 @@ type AttrSetTypeConstraint DOMEventBubblesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMEventBubblesPropertyInfo = DOMEventK type AttrGetType DOMEventBubblesPropertyInfo = Bool - type AttrLabel DOMEventBubblesPropertyInfo = "DOMEvent::bubbles" + type AttrLabel DOMEventBubblesPropertyInfo = "bubbles" attrGet _ = getDOMEventBubbles attrSet _ = undefined attrConstruct _ = undefined @@ -215,7 +281,7 @@ type AttrSetTypeConstraint DOMEventCancelBubblePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMEventCancelBubblePropertyInfo = DOMEventK type AttrGetType DOMEventCancelBubblePropertyInfo = Bool - type AttrLabel DOMEventCancelBubblePropertyInfo = "DOMEvent::cancel-bubble" + type AttrLabel DOMEventCancelBubblePropertyInfo = "cancel-bubble" attrGet _ = getDOMEventCancelBubble attrSet _ = setDOMEventCancelBubble attrConstruct _ = constructDOMEventCancelBubble @@ -233,7 +299,7 @@ type AttrSetTypeConstraint DOMEventCancelablePropertyInfo = (~) () type AttrBaseTypeConstraint DOMEventCancelablePropertyInfo = DOMEventK type AttrGetType DOMEventCancelablePropertyInfo = Bool - type AttrLabel DOMEventCancelablePropertyInfo = "DOMEvent::cancelable" + type AttrLabel DOMEventCancelablePropertyInfo = "cancelable" attrGet _ = getDOMEventCancelable attrSet _ = undefined attrConstruct _ = undefined @@ -251,7 +317,7 @@ type AttrSetTypeConstraint DOMEventCurrentTargetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMEventCurrentTargetPropertyInfo = DOMEventK type AttrGetType DOMEventCurrentTargetPropertyInfo = DOMEventTarget - type AttrLabel DOMEventCurrentTargetPropertyInfo = "DOMEvent::current-target" + type AttrLabel DOMEventCurrentTargetPropertyInfo = "current-target" attrGet _ = getDOMEventCurrentTarget attrSet _ = undefined attrConstruct _ = undefined @@ -269,7 +335,7 @@ type AttrSetTypeConstraint DOMEventDefaultPreventedPropertyInfo = (~) () type AttrBaseTypeConstraint DOMEventDefaultPreventedPropertyInfo = DOMEventK type AttrGetType DOMEventDefaultPreventedPropertyInfo = Bool - type AttrLabel DOMEventDefaultPreventedPropertyInfo = "DOMEvent::default-prevented" + type AttrLabel DOMEventDefaultPreventedPropertyInfo = "default-prevented" attrGet _ = getDOMEventDefaultPrevented attrSet _ = undefined attrConstruct _ = undefined @@ -287,7 +353,7 @@ type AttrSetTypeConstraint DOMEventEventPhasePropertyInfo = (~) () type AttrBaseTypeConstraint DOMEventEventPhasePropertyInfo = DOMEventK type AttrGetType DOMEventEventPhasePropertyInfo = Word32 - type AttrLabel DOMEventEventPhasePropertyInfo = "DOMEvent::event-phase" + type AttrLabel DOMEventEventPhasePropertyInfo = "event-phase" attrGet _ = getDOMEventEventPhase attrSet _ = undefined attrConstruct _ = undefined @@ -311,7 +377,7 @@ type AttrSetTypeConstraint DOMEventReturnValuePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMEventReturnValuePropertyInfo = DOMEventK type AttrGetType DOMEventReturnValuePropertyInfo = Bool - type AttrLabel DOMEventReturnValuePropertyInfo = "DOMEvent::return-value" + type AttrLabel DOMEventReturnValuePropertyInfo = "return-value" attrGet _ = getDOMEventReturnValue attrSet _ = setDOMEventReturnValue attrConstruct _ = constructDOMEventReturnValue @@ -329,7 +395,7 @@ type AttrSetTypeConstraint DOMEventSrcElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMEventSrcElementPropertyInfo = DOMEventK type AttrGetType DOMEventSrcElementPropertyInfo = DOMEventTarget - type AttrLabel DOMEventSrcElementPropertyInfo = "DOMEvent::src-element" + type AttrLabel DOMEventSrcElementPropertyInfo = "src-element" attrGet _ = getDOMEventSrcElement attrSet _ = undefined attrConstruct _ = undefined @@ -347,7 +413,7 @@ type AttrSetTypeConstraint DOMEventTargetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMEventTargetPropertyInfo = DOMEventK type AttrGetType DOMEventTargetPropertyInfo = DOMEventTarget - type AttrLabel DOMEventTargetPropertyInfo = "DOMEvent::target" + type AttrLabel DOMEventTargetPropertyInfo = "target" attrGet _ = getDOMEventTarget attrSet _ = undefined attrConstruct _ = undefined @@ -365,7 +431,7 @@ type AttrSetTypeConstraint DOMEventTimeStampPropertyInfo = (~) () type AttrBaseTypeConstraint DOMEventTimeStampPropertyInfo = DOMEventK type AttrGetType DOMEventTimeStampPropertyInfo = Word32 - type AttrLabel DOMEventTimeStampPropertyInfo = "DOMEvent::time-stamp" + type AttrLabel DOMEventTimeStampPropertyInfo = "time-stamp" attrGet _ = getDOMEventTimeStamp attrSet _ = undefined attrConstruct _ = undefined @@ -383,22 +449,21 @@ type AttrSetTypeConstraint DOMEventTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMEventTypePropertyInfo = DOMEventK type AttrGetType DOMEventTypePropertyInfo = T.Text - type AttrLabel DOMEventTypePropertyInfo = "DOMEvent::type" + type AttrLabel DOMEventTypePropertyInfo = "type" attrGet _ = getDOMEventType attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMEvent = DOMEventAttributeList -type DOMEventAttributeList = ('[ '("bubbles", DOMEventBubblesPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo)] :: [(Symbol, *)]) +type DOMEventAttributeList = ('[ '("bubbles", DOMEventBubblesPropertyInfo), '("cancelBubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentTarget", DOMEventCurrentTargetPropertyInfo), '("defaultPrevented", DOMEventDefaultPreventedPropertyInfo), '("eventPhase", DOMEventEventPhasePropertyInfo), '("returnValue", DOMEventReturnValuePropertyInfo), '("srcElement", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("timeStamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMEvent = DOMEventSignalList -type DOMEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMEvent::get_bubbles -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -410,8 +475,8 @@ dOMEventGetBubbles :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMEventGetBubbles _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_event_get_bubbles _obj' @@ -419,11 +484,14 @@ touchManagedPtr _obj return result' +data DOMEventGetBubblesMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMEventK a) => MethodInfo DOMEventGetBubblesMethodInfo a signature where + overloadedMethod _ = dOMEventGetBubbles + -- method DOMEvent::get_cancel_bubble -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -435,8 +503,8 @@ dOMEventGetCancelBubble :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMEventGetCancelBubble _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_event_get_cancel_bubble _obj' @@ -444,11 +512,14 @@ touchManagedPtr _obj return result' +data DOMEventGetCancelBubbleMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMEventK a) => MethodInfo DOMEventGetCancelBubbleMethodInfo a signature where + overloadedMethod _ = dOMEventGetCancelBubble + -- method DOMEvent::get_cancelable -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -460,8 +531,8 @@ dOMEventGetCancelable :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMEventGetCancelable _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_event_get_cancelable _obj' @@ -469,11 +540,14 @@ touchManagedPtr _obj return result' +data DOMEventGetCancelableMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMEventK a) => MethodInfo DOMEventGetCancelableMethodInfo a signature where + overloadedMethod _ = dOMEventGetCancelable + -- method DOMEvent::get_current_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMEventTarget" -- throws : False -- Skip return : False @@ -485,8 +559,8 @@ dOMEventGetCurrentTarget :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m DOMEventTarget + a -- _obj + -> m DOMEventTarget -- result dOMEventGetCurrentTarget _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_event_get_current_target _obj' @@ -495,11 +569,14 @@ touchManagedPtr _obj return result' +data DOMEventGetCurrentTargetMethodInfo +instance (signature ~ (m DOMEventTarget), MonadIO m, DOMEventK a) => MethodInfo DOMEventGetCurrentTargetMethodInfo a signature where + overloadedMethod _ = dOMEventGetCurrentTarget + -- method DOMEvent::get_default_prevented -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -511,8 +588,8 @@ dOMEventGetDefaultPrevented :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMEventGetDefaultPrevented _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_event_get_default_prevented _obj' @@ -520,11 +597,14 @@ touchManagedPtr _obj return result' +data DOMEventGetDefaultPreventedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMEventK a) => MethodInfo DOMEventGetDefaultPreventedMethodInfo a signature where + overloadedMethod _ = dOMEventGetDefaultPrevented + -- method DOMEvent::get_event_phase -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt16 -- throws : False -- Skip return : False @@ -536,19 +616,22 @@ dOMEventGetEventPhase :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m Word16 + a -- _obj + -> m Word16 -- result dOMEventGetEventPhase _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_event_get_event_phase _obj' touchManagedPtr _obj return result +data DOMEventGetEventPhaseMethodInfo +instance (signature ~ (m Word16), MonadIO m, DOMEventK a) => MethodInfo DOMEventGetEventPhaseMethodInfo a signature where + overloadedMethod _ = dOMEventGetEventPhase + -- method DOMEvent::get_return_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -560,8 +643,8 @@ dOMEventGetReturnValue :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMEventGetReturnValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_event_get_return_value _obj' @@ -569,11 +652,14 @@ touchManagedPtr _obj return result' +data DOMEventGetReturnValueMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMEventK a) => MethodInfo DOMEventGetReturnValueMethodInfo a signature where + overloadedMethod _ = dOMEventGetReturnValue + -- method DOMEvent::get_src_element -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMEventTarget" -- throws : False -- Skip return : False @@ -585,8 +671,8 @@ dOMEventGetSrcElement :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m DOMEventTarget + a -- _obj + -> m DOMEventTarget -- result dOMEventGetSrcElement _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_event_get_src_element _obj' @@ -595,11 +681,14 @@ touchManagedPtr _obj return result' +data DOMEventGetSrcElementMethodInfo +instance (signature ~ (m DOMEventTarget), MonadIO m, DOMEventK a) => MethodInfo DOMEventGetSrcElementMethodInfo a signature where + overloadedMethod _ = dOMEventGetSrcElement + -- method DOMEvent::get_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMEventTarget" -- throws : False -- Skip return : False @@ -611,8 +700,8 @@ dOMEventGetTarget :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m DOMEventTarget + a -- _obj + -> m DOMEventTarget -- result dOMEventGetTarget _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_event_get_target _obj' @@ -621,11 +710,14 @@ touchManagedPtr _obj return result' +data DOMEventGetTargetMethodInfo +instance (signature ~ (m DOMEventTarget), MonadIO m, DOMEventK a) => MethodInfo DOMEventGetTargetMethodInfo a signature where + overloadedMethod _ = dOMEventGetTarget + -- method DOMEvent::get_time_stamp -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt32 -- throws : False -- Skip return : False @@ -637,19 +729,22 @@ dOMEventGetTimeStamp :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m Word32 + a -- _obj + -> m Word32 -- result dOMEventGetTimeStamp _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_event_get_time_stamp _obj' touchManagedPtr _obj return result +data DOMEventGetTimeStampMethodInfo +instance (signature ~ (m Word32), MonadIO m, DOMEventK a) => MethodInfo DOMEventGetTimeStampMethodInfo a signature where + overloadedMethod _ = dOMEventGetTimeStamp + -- method DOMEvent::init_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "eventTypeArg", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "canBubbleArg", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cancelableArg", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "eventTypeArg", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "canBubbleArg", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cancelableArg", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "eventTypeArg", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "canBubbleArg", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cancelableArg", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -664,11 +759,11 @@ dOMEventInitEvent :: (MonadIO m, DOMEventK a) => - a -> -- _obj - T.Text -> -- eventTypeArg - Bool -> -- canBubbleArg - Bool -> -- cancelableArg - m () + a -- _obj + -> T.Text -- eventTypeArg + -> Bool -- canBubbleArg + -> Bool -- cancelableArg + -> m () -- result dOMEventInitEvent _obj eventTypeArg canBubbleArg cancelableArg = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj eventTypeArg' <- textToCString eventTypeArg @@ -679,11 +774,14 @@ freeMem eventTypeArg' return () +data DOMEventInitEventMethodInfo +instance (signature ~ (T.Text -> Bool -> Bool -> m ()), MonadIO m, DOMEventK a) => MethodInfo DOMEventInitEventMethodInfo a signature where + overloadedMethod _ = dOMEventInitEvent + -- method DOMEvent::prevent_default -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -695,19 +793,22 @@ dOMEventPreventDefault :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMEventPreventDefault _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_event_prevent_default _obj' touchManagedPtr _obj return () +data DOMEventPreventDefaultMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMEventK a) => MethodInfo DOMEventPreventDefaultMethodInfo a signature where + overloadedMethod _ = dOMEventPreventDefault + -- method DOMEvent::set_cancel_bubble -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -720,9 +821,9 @@ dOMEventSetCancelBubble :: (MonadIO m, DOMEventK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMEventSetCancelBubble _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -730,11 +831,14 @@ touchManagedPtr _obj return () +data DOMEventSetCancelBubbleMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMEventK a) => MethodInfo DOMEventSetCancelBubbleMethodInfo a signature where + overloadedMethod _ = dOMEventSetCancelBubble + -- method DOMEvent::set_return_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -747,9 +851,9 @@ dOMEventSetReturnValue :: (MonadIO m, DOMEventK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMEventSetReturnValue _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -757,11 +861,14 @@ touchManagedPtr _obj return () +data DOMEventSetReturnValueMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMEventK a) => MethodInfo DOMEventSetReturnValueMethodInfo a signature where + overloadedMethod _ = dOMEventSetReturnValue + -- method DOMEvent::stop_immediate_propagation -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -773,19 +880,22 @@ dOMEventStopImmediatePropagation :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMEventStopImmediatePropagation _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_event_stop_immediate_propagation _obj' touchManagedPtr _obj return () +data DOMEventStopImmediatePropagationMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMEventK a) => MethodInfo DOMEventStopImmediatePropagationMethodInfo a signature where + overloadedMethod _ = dOMEventStopImmediatePropagation + -- method DOMEvent::stop_propagation -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -797,12 +907,16 @@ dOMEventStopPropagation :: (MonadIO m, DOMEventK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMEventStopPropagation _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_event_stop_propagation _obj' touchManagedPtr _obj return () + +data DOMEventStopPropagationMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMEventK a) => MethodInfo DOMEventStopPropagationMethodInfo a signature where + overloadedMethod _ = dOMEventStopPropagation diff --git a/GI/WebKit/Objects/DOMEvent.hs-boot b/GI/WebKit/Objects/DOMEvent.hs-boot --- a/GI/WebKit/Objects/DOMEvent.hs-boot +++ b/GI/WebKit/Objects/DOMEvent.hs-boot @@ -22,3 +22,19 @@ data DOMEventTargetPropertyInfo data DOMEventTimeStampPropertyInfo data DOMEventTypePropertyInfo +data DOMEventGetBubblesMethodInfo +data DOMEventGetCancelBubbleMethodInfo +data DOMEventGetCancelableMethodInfo +data DOMEventGetCurrentTargetMethodInfo +data DOMEventGetDefaultPreventedMethodInfo +data DOMEventGetEventPhaseMethodInfo +data DOMEventGetReturnValueMethodInfo +data DOMEventGetSrcElementMethodInfo +data DOMEventGetTargetMethodInfo +data DOMEventGetTimeStampMethodInfo +data DOMEventInitEventMethodInfo +data DOMEventPreventDefaultMethodInfo +data DOMEventSetCancelBubbleMethodInfo +data DOMEventSetReturnValueMethodInfo +data DOMEventStopImmediatePropagationMethodInfo +data DOMEventStopPropagationMethodInfo diff --git a/GI/WebKit/Objects/DOMFile.hs b/GI/WebKit/Objects/DOMFile.hs --- a/GI/WebKit/Objects/DOMFile.hs +++ b/GI/WebKit/Objects/DOMFile.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMFileGetName + DOMFileGetNameMethodInfo , dOMFileGetName , -- ** dOMFileGetWebkitRelativePath + DOMFileGetWebkitRelativePathMethodInfo , dOMFileGetWebkitRelativePath , @@ -73,6 +76,44 @@ noDOMFile :: Maybe DOMFile noDOMFile = Nothing +type family ResolveDOMFileMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMFileMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMFileMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMFileMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMFileMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMFileMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMFileMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMFileMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMFileMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMFileMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMFileMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMFileMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMFileMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMFileMethod "slice" o = DOMBlobSliceMethodInfo + ResolveDOMFileMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMFileMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMFileMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMFileMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMFileMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMFileMethod "webkitSlice" o = DOMBlobWebkitSliceMethodInfo + ResolveDOMFileMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMFileMethod "getName" o = DOMFileGetNameMethodInfo + ResolveDOMFileMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMFileMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMFileMethod "getSize" o = DOMBlobGetSizeMethodInfo + ResolveDOMFileMethod "getWebkitRelativePath" o = DOMFileGetWebkitRelativePathMethodInfo + ResolveDOMFileMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMFileMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMFileMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMFileMethod t DOMFile, MethodInfo info DOMFile p) => IsLabelProxy t (DOMFile -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMFileMethod t DOMFile, MethodInfo info DOMFile p) => IsLabel t (DOMFile -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "name" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -86,7 +127,7 @@ type AttrSetTypeConstraint DOMFileNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMFileNamePropertyInfo = DOMFileK type AttrGetType DOMFileNamePropertyInfo = T.Text - type AttrLabel DOMFileNamePropertyInfo = "DOMFile::name" + type AttrLabel DOMFileNamePropertyInfo = "name" attrGet _ = getDOMFileName attrSet _ = undefined attrConstruct _ = undefined @@ -104,22 +145,21 @@ type AttrSetTypeConstraint DOMFileWebkitRelativePathPropertyInfo = (~) () type AttrBaseTypeConstraint DOMFileWebkitRelativePathPropertyInfo = DOMFileK type AttrGetType DOMFileWebkitRelativePathPropertyInfo = T.Text - type AttrLabel DOMFileWebkitRelativePathPropertyInfo = "DOMFile::webkit-relative-path" + type AttrLabel DOMFileWebkitRelativePathPropertyInfo = "webkit-relative-path" attrGet _ = getDOMFileWebkitRelativePath attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMFile = DOMFileAttributeList -type DOMFileAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("name", DOMFileNamePropertyInfo), '("size", DOMBlobSizePropertyInfo), '("type", DOMBlobTypePropertyInfo), '("webkit-relative-path", DOMFileWebkitRelativePathPropertyInfo)] :: [(Symbol, *)]) +type DOMFileAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("name", DOMFileNamePropertyInfo), '("size", DOMBlobSizePropertyInfo), '("type", DOMBlobTypePropertyInfo), '("webkitRelativePath", DOMFileWebkitRelativePathPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMFile = DOMFileSignalList -type DOMFileSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMFileSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMFile::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMFile", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMFile", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMFile", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -131,8 +171,8 @@ dOMFileGetName :: (MonadIO m, DOMFileK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMFileGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_file_get_name _obj' @@ -142,11 +182,14 @@ touchManagedPtr _obj return result' +data DOMFileGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMFileK a) => MethodInfo DOMFileGetNameMethodInfo a signature where + overloadedMethod _ = dOMFileGetName + -- method DOMFile::get_webkit_relative_path -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMFile", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMFile", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMFile", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -158,8 +201,8 @@ dOMFileGetWebkitRelativePath :: (MonadIO m, DOMFileK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMFileGetWebkitRelativePath _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_file_get_webkit_relative_path _obj' @@ -168,5 +211,9 @@ freeMem result touchManagedPtr _obj return result' + +data DOMFileGetWebkitRelativePathMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMFileK a) => MethodInfo DOMFileGetWebkitRelativePathMethodInfo a signature where + overloadedMethod _ = dOMFileGetWebkitRelativePath diff --git a/GI/WebKit/Objects/DOMFile.hs-boot b/GI/WebKit/Objects/DOMFile.hs-boot --- a/GI/WebKit/Objects/DOMFile.hs-boot +++ b/GI/WebKit/Objects/DOMFile.hs-boot @@ -13,3 +13,5 @@ instance (GObject o, IsDescendantOf DOMFile o) => DOMFileK o data DOMFileNamePropertyInfo data DOMFileWebkitRelativePathPropertyInfo +data DOMFileGetNameMethodInfo +data DOMFileGetWebkitRelativePathMethodInfo diff --git a/GI/WebKit/Objects/DOMFileList.hs b/GI/WebKit/Objects/DOMFileList.hs --- a/GI/WebKit/Objects/DOMFileList.hs +++ b/GI/WebKit/Objects/DOMFileList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMFileListGetLength + DOMFileListGetLengthMethodInfo , dOMFileListGetLength , -- ** dOMFileListItem + DOMFileListItemMethodInfo , dOMFileListItem , @@ -68,6 +71,41 @@ noDOMFileList :: Maybe DOMFileList noDOMFileList = Nothing +type family ResolveDOMFileListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMFileListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMFileListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMFileListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMFileListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMFileListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMFileListMethod "item" o = DOMFileListItemMethodInfo + ResolveDOMFileListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMFileListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMFileListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMFileListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMFileListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMFileListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMFileListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMFileListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMFileListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMFileListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMFileListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMFileListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMFileListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMFileListMethod "getLength" o = DOMFileListGetLengthMethodInfo + ResolveDOMFileListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMFileListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMFileListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMFileListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMFileListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMFileListMethod t DOMFileList, MethodInfo info DOMFileList p) => IsLabelProxy t (DOMFileList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMFileListMethod t DOMFileList, MethodInfo info DOMFileList p) => IsLabel t (DOMFileList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -81,22 +119,21 @@ type AttrSetTypeConstraint DOMFileListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMFileListLengthPropertyInfo = DOMFileListK type AttrGetType DOMFileListLengthPropertyInfo = Word64 - type AttrLabel DOMFileListLengthPropertyInfo = "DOMFileList::length" + type AttrLabel DOMFileListLengthPropertyInfo = "length" attrGet _ = getDOMFileListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMFileList = DOMFileListAttributeList -type DOMFileListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMFileListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMFileListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMFileListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMFileList = DOMFileListSignalList -type DOMFileListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMFileListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMFileList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMFileList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMFileList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMFileList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -108,19 +145,22 @@ dOMFileListGetLength :: (MonadIO m, DOMFileListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMFileListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_file_list_get_length _obj' touchManagedPtr _obj return result +data DOMFileListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMFileListK a) => MethodInfo DOMFileListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMFileListGetLength + -- method DOMFileList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMFileList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMFileList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMFileList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMFile" -- throws : False -- Skip return : False @@ -133,9 +173,9 @@ dOMFileListItem :: (MonadIO m, DOMFileListK a) => - a -> -- _obj - Word64 -> -- index - m DOMFile + a -- _obj + -> Word64 -- index + -> m DOMFile -- result dOMFileListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_file_list_item _obj' index @@ -143,5 +183,9 @@ result' <- (wrapObject DOMFile) result touchManagedPtr _obj return result' + +data DOMFileListItemMethodInfo +instance (signature ~ (Word64 -> m DOMFile), MonadIO m, DOMFileListK a) => MethodInfo DOMFileListItemMethodInfo a signature where + overloadedMethod _ = dOMFileListItem diff --git a/GI/WebKit/Objects/DOMFileList.hs-boot b/GI/WebKit/Objects/DOMFileList.hs-boot --- a/GI/WebKit/Objects/DOMFileList.hs-boot +++ b/GI/WebKit/Objects/DOMFileList.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMFileListK o instance (GObject o, IsDescendantOf DOMFileList o) => DOMFileListK o data DOMFileListLengthPropertyInfo +data DOMFileListGetLengthMethodInfo +data DOMFileListItemMethodInfo diff --git a/GI/WebKit/Objects/DOMGamepad.hs b/GI/WebKit/Objects/DOMGamepad.hs --- a/GI/WebKit/Objects/DOMGamepad.hs +++ b/GI/WebKit/Objects/DOMGamepad.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMGamepadGetId + DOMGamepadGetIdMethodInfo , dOMGamepadGetId , -- ** dOMGamepadGetIndex + DOMGamepadGetIndexMethodInfo , dOMGamepadGetIndex , -- ** dOMGamepadGetTimestamp + DOMGamepadGetTimestampMethodInfo , dOMGamepadGetTimestamp , @@ -82,6 +86,42 @@ noDOMGamepad :: Maybe DOMGamepad noDOMGamepad = Nothing +type family ResolveDOMGamepadMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMGamepadMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMGamepadMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMGamepadMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMGamepadMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMGamepadMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMGamepadMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMGamepadMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMGamepadMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMGamepadMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMGamepadMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMGamepadMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMGamepadMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMGamepadMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMGamepadMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMGamepadMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMGamepadMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMGamepadMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMGamepadMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMGamepadMethod "getId" o = DOMGamepadGetIdMethodInfo + ResolveDOMGamepadMethod "getIndex" o = DOMGamepadGetIndexMethodInfo + ResolveDOMGamepadMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMGamepadMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMGamepadMethod "getTimestamp" o = DOMGamepadGetTimestampMethodInfo + ResolveDOMGamepadMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMGamepadMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMGamepadMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMGamepadMethod t DOMGamepad, MethodInfo info DOMGamepad p) => IsLabelProxy t (DOMGamepad -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMGamepadMethod t DOMGamepad, MethodInfo info DOMGamepad p) => IsLabel t (DOMGamepad -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "id" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -95,7 +135,7 @@ type AttrSetTypeConstraint DOMGamepadIdPropertyInfo = (~) () type AttrBaseTypeConstraint DOMGamepadIdPropertyInfo = DOMGamepadK type AttrGetType DOMGamepadIdPropertyInfo = T.Text - type AttrLabel DOMGamepadIdPropertyInfo = "DOMGamepad::id" + type AttrLabel DOMGamepadIdPropertyInfo = "id" attrGet _ = getDOMGamepadId attrSet _ = undefined attrConstruct _ = undefined @@ -113,7 +153,7 @@ type AttrSetTypeConstraint DOMGamepadIndexPropertyInfo = (~) () type AttrBaseTypeConstraint DOMGamepadIndexPropertyInfo = DOMGamepadK type AttrGetType DOMGamepadIndexPropertyInfo = Word64 - type AttrLabel DOMGamepadIndexPropertyInfo = "DOMGamepad::index" + type AttrLabel DOMGamepadIndexPropertyInfo = "index" attrGet _ = getDOMGamepadIndex attrSet _ = undefined attrConstruct _ = undefined @@ -131,22 +171,21 @@ type AttrSetTypeConstraint DOMGamepadTimestampPropertyInfo = (~) () type AttrBaseTypeConstraint DOMGamepadTimestampPropertyInfo = DOMGamepadK type AttrGetType DOMGamepadTimestampPropertyInfo = Word64 - type AttrLabel DOMGamepadTimestampPropertyInfo = "DOMGamepad::timestamp" + type AttrLabel DOMGamepadTimestampPropertyInfo = "timestamp" attrGet _ = getDOMGamepadTimestamp attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMGamepad = DOMGamepadAttributeList -type DOMGamepadAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("id", DOMGamepadIdPropertyInfo), '("index", DOMGamepadIndexPropertyInfo), '("timestamp", DOMGamepadTimestampPropertyInfo)] :: [(Symbol, *)]) +type DOMGamepadAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("id", DOMGamepadIdPropertyInfo), '("index", DOMGamepadIndexPropertyInfo), '("timestamp", DOMGamepadTimestampPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMGamepad = DOMGamepadSignalList -type DOMGamepadSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMGamepadSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMGamepad::get_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGamepad", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMGamepad", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGamepad", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -158,8 +197,8 @@ dOMGamepadGetId :: (MonadIO m, DOMGamepadK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMGamepadGetId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_gamepad_get_id _obj' @@ -169,11 +208,14 @@ touchManagedPtr _obj return result' +data DOMGamepadGetIdMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMGamepadK a) => MethodInfo DOMGamepadGetIdMethodInfo a signature where + overloadedMethod _ = dOMGamepadGetId + -- method DOMGamepad::get_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGamepad", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMGamepad", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGamepad", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -185,19 +227,22 @@ dOMGamepadGetIndex :: (MonadIO m, DOMGamepadK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMGamepadGetIndex _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_gamepad_get_index _obj' touchManagedPtr _obj return result +data DOMGamepadGetIndexMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMGamepadK a) => MethodInfo DOMGamepadGetIndexMethodInfo a signature where + overloadedMethod _ = dOMGamepadGetIndex + -- method DOMGamepad::get_timestamp -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGamepad", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMGamepad", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGamepad", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -209,12 +254,16 @@ dOMGamepadGetTimestamp :: (MonadIO m, DOMGamepadK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMGamepadGetTimestamp _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_gamepad_get_timestamp _obj' touchManagedPtr _obj return result + +data DOMGamepadGetTimestampMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMGamepadK a) => MethodInfo DOMGamepadGetTimestampMethodInfo a signature where + overloadedMethod _ = dOMGamepadGetTimestamp diff --git a/GI/WebKit/Objects/DOMGamepad.hs-boot b/GI/WebKit/Objects/DOMGamepad.hs-boot --- a/GI/WebKit/Objects/DOMGamepad.hs-boot +++ b/GI/WebKit/Objects/DOMGamepad.hs-boot @@ -14,3 +14,6 @@ data DOMGamepadIdPropertyInfo data DOMGamepadIndexPropertyInfo data DOMGamepadTimestampPropertyInfo +data DOMGamepadGetIdMethodInfo +data DOMGamepadGetIndexMethodInfo +data DOMGamepadGetTimestampMethodInfo diff --git a/GI/WebKit/Objects/DOMGamepadList.hs b/GI/WebKit/Objects/DOMGamepadList.hs --- a/GI/WebKit/Objects/DOMGamepadList.hs +++ b/GI/WebKit/Objects/DOMGamepadList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMGamepadListGetLength + DOMGamepadListGetLengthMethodInfo , dOMGamepadListGetLength , -- ** dOMGamepadListItem + DOMGamepadListItemMethodInfo , dOMGamepadListItem , @@ -68,6 +71,41 @@ noDOMGamepadList :: Maybe DOMGamepadList noDOMGamepadList = Nothing +type family ResolveDOMGamepadListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMGamepadListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMGamepadListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMGamepadListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMGamepadListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMGamepadListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMGamepadListMethod "item" o = DOMGamepadListItemMethodInfo + ResolveDOMGamepadListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMGamepadListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMGamepadListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMGamepadListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMGamepadListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMGamepadListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMGamepadListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMGamepadListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMGamepadListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMGamepadListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMGamepadListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMGamepadListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMGamepadListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMGamepadListMethod "getLength" o = DOMGamepadListGetLengthMethodInfo + ResolveDOMGamepadListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMGamepadListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMGamepadListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMGamepadListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMGamepadListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMGamepadListMethod t DOMGamepadList, MethodInfo info DOMGamepadList p) => IsLabelProxy t (DOMGamepadList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMGamepadListMethod t DOMGamepadList, MethodInfo info DOMGamepadList p) => IsLabel t (DOMGamepadList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -81,22 +119,21 @@ type AttrSetTypeConstraint DOMGamepadListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMGamepadListLengthPropertyInfo = DOMGamepadListK type AttrGetType DOMGamepadListLengthPropertyInfo = Word64 - type AttrLabel DOMGamepadListLengthPropertyInfo = "DOMGamepadList::length" + type AttrLabel DOMGamepadListLengthPropertyInfo = "length" attrGet _ = getDOMGamepadListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMGamepadList = DOMGamepadListAttributeList -type DOMGamepadListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMGamepadListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMGamepadListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMGamepadListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMGamepadList = DOMGamepadListSignalList -type DOMGamepadListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMGamepadListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMGamepadList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGamepadList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMGamepadList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGamepadList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -108,19 +145,22 @@ dOMGamepadListGetLength :: (MonadIO m, DOMGamepadListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMGamepadListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_gamepad_list_get_length _obj' touchManagedPtr _obj return result +data DOMGamepadListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMGamepadListK a) => MethodInfo DOMGamepadListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMGamepadListGetLength + -- method DOMGamepadList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGamepadList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMGamepadList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGamepadList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMGamepad" -- throws : False -- Skip return : False @@ -133,9 +173,9 @@ dOMGamepadListItem :: (MonadIO m, DOMGamepadListK a) => - a -> -- _obj - Word64 -> -- index - m DOMGamepad + a -- _obj + -> Word64 -- index + -> m DOMGamepad -- result dOMGamepadListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_gamepad_list_item _obj' index @@ -143,5 +183,9 @@ result' <- (wrapObject DOMGamepad) result touchManagedPtr _obj return result' + +data DOMGamepadListItemMethodInfo +instance (signature ~ (Word64 -> m DOMGamepad), MonadIO m, DOMGamepadListK a) => MethodInfo DOMGamepadListItemMethodInfo a signature where + overloadedMethod _ = dOMGamepadListItem diff --git a/GI/WebKit/Objects/DOMGamepadList.hs-boot b/GI/WebKit/Objects/DOMGamepadList.hs-boot --- a/GI/WebKit/Objects/DOMGamepadList.hs-boot +++ b/GI/WebKit/Objects/DOMGamepadList.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMGamepadListK o instance (GObject o, IsDescendantOf DOMGamepadList o) => DOMGamepadListK o data DOMGamepadListLengthPropertyInfo +data DOMGamepadListGetLengthMethodInfo +data DOMGamepadListItemMethodInfo diff --git a/GI/WebKit/Objects/DOMGeolocation.hs b/GI/WebKit/Objects/DOMGeolocation.hs --- a/GI/WebKit/Objects/DOMGeolocation.hs +++ b/GI/WebKit/Objects/DOMGeolocation.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** dOMGeolocationClearWatch + DOMGeolocationClearWatchMethodInfo , dOMGeolocationClearWatch , @@ -56,17 +58,50 @@ noDOMGeolocation :: Maybe DOMGeolocation noDOMGeolocation = Nothing +type family ResolveDOMGeolocationMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMGeolocationMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMGeolocationMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMGeolocationMethod "clearWatch" o = DOMGeolocationClearWatchMethodInfo + ResolveDOMGeolocationMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMGeolocationMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMGeolocationMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMGeolocationMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMGeolocationMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMGeolocationMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMGeolocationMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMGeolocationMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMGeolocationMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMGeolocationMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMGeolocationMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMGeolocationMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMGeolocationMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMGeolocationMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMGeolocationMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMGeolocationMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMGeolocationMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMGeolocationMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMGeolocationMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMGeolocationMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMGeolocationMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMGeolocationMethod t DOMGeolocation, MethodInfo info DOMGeolocation p) => IsLabelProxy t (DOMGeolocation -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMGeolocationMethod t DOMGeolocation, MethodInfo info DOMGeolocation p) => IsLabel t (DOMGeolocation -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMGeolocation = DOMGeolocationAttributeList -type DOMGeolocationAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMGeolocationAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMGeolocation = DOMGeolocationSignalList -type DOMGeolocationSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMGeolocationSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMGeolocation::clear_watch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGeolocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "watchID", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMGeolocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "watchID", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMGeolocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "watchID", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -79,13 +114,17 @@ dOMGeolocationClearWatch :: (MonadIO m, DOMGeolocationK a) => - a -> -- _obj - Int64 -> -- watchID - m () + a -- _obj + -> Int64 -- watchID + -> m () -- result dOMGeolocationClearWatch _obj watchID = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_geolocation_clear_watch _obj' watchID touchManagedPtr _obj return () + +data DOMGeolocationClearWatchMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMGeolocationK a) => MethodInfo DOMGeolocationClearWatchMethodInfo a signature where + overloadedMethod _ = dOMGeolocationClearWatch diff --git a/GI/WebKit/Objects/DOMGeolocation.hs-boot b/GI/WebKit/Objects/DOMGeolocation.hs-boot --- a/GI/WebKit/Objects/DOMGeolocation.hs-boot +++ b/GI/WebKit/Objects/DOMGeolocation.hs-boot @@ -11,3 +11,4 @@ instance GObject DOMGeolocation where class GObject o => DOMGeolocationK o instance (GObject o, IsDescendantOf DOMGeolocation o) => DOMGeolocationK o +data DOMGeolocationClearWatchMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLAnchorElement.hs b/GI/WebKit/Objects/DOMHTMLAnchorElement.hs --- a/GI/WebKit/Objects/DOMHTMLAnchorElement.hs +++ b/GI/WebKit/Objects/DOMHTMLAnchorElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,154 +18,192 @@ -- * Methods -- ** dOMHTMLAnchorElementGetCharset + DOMHTMLAnchorElementGetCharsetMethodInfo, dOMHTMLAnchorElementGetCharset , -- ** dOMHTMLAnchorElementGetCoords + DOMHTMLAnchorElementGetCoordsMethodInfo , dOMHTMLAnchorElementGetCoords , -- ** dOMHTMLAnchorElementGetDownload + DOMHTMLAnchorElementGetDownloadMethodInfo, dOMHTMLAnchorElementGetDownload , -- ** dOMHTMLAnchorElementGetHash + DOMHTMLAnchorElementGetHashMethodInfo , dOMHTMLAnchorElementGetHash , -- ** dOMHTMLAnchorElementGetHost + DOMHTMLAnchorElementGetHostMethodInfo , dOMHTMLAnchorElementGetHost , -- ** dOMHTMLAnchorElementGetHostname + DOMHTMLAnchorElementGetHostnameMethodInfo, dOMHTMLAnchorElementGetHostname , -- ** dOMHTMLAnchorElementGetHref + DOMHTMLAnchorElementGetHrefMethodInfo , dOMHTMLAnchorElementGetHref , -- ** dOMHTMLAnchorElementGetHreflang + DOMHTMLAnchorElementGetHreflangMethodInfo, dOMHTMLAnchorElementGetHreflang , -- ** dOMHTMLAnchorElementGetName + DOMHTMLAnchorElementGetNameMethodInfo , dOMHTMLAnchorElementGetName , -- ** dOMHTMLAnchorElementGetOrigin + DOMHTMLAnchorElementGetOriginMethodInfo , dOMHTMLAnchorElementGetOrigin , -- ** dOMHTMLAnchorElementGetPathname + DOMHTMLAnchorElementGetPathnameMethodInfo, dOMHTMLAnchorElementGetPathname , -- ** dOMHTMLAnchorElementGetPing + DOMHTMLAnchorElementGetPingMethodInfo , dOMHTMLAnchorElementGetPing , -- ** dOMHTMLAnchorElementGetPort + DOMHTMLAnchorElementGetPortMethodInfo , dOMHTMLAnchorElementGetPort , -- ** dOMHTMLAnchorElementGetProtocol + DOMHTMLAnchorElementGetProtocolMethodInfo, dOMHTMLAnchorElementGetProtocol , -- ** dOMHTMLAnchorElementGetRel + DOMHTMLAnchorElementGetRelMethodInfo , dOMHTMLAnchorElementGetRel , -- ** dOMHTMLAnchorElementGetRev + DOMHTMLAnchorElementGetRevMethodInfo , dOMHTMLAnchorElementGetRev , -- ** dOMHTMLAnchorElementGetSearch + DOMHTMLAnchorElementGetSearchMethodInfo , dOMHTMLAnchorElementGetSearch , -- ** dOMHTMLAnchorElementGetShape + DOMHTMLAnchorElementGetShapeMethodInfo , dOMHTMLAnchorElementGetShape , -- ** dOMHTMLAnchorElementGetTarget + DOMHTMLAnchorElementGetTargetMethodInfo , dOMHTMLAnchorElementGetTarget , -- ** dOMHTMLAnchorElementGetText + DOMHTMLAnchorElementGetTextMethodInfo , dOMHTMLAnchorElementGetText , -- ** dOMHTMLAnchorElementSetCharset + DOMHTMLAnchorElementSetCharsetMethodInfo, dOMHTMLAnchorElementSetCharset , -- ** dOMHTMLAnchorElementSetCoords + DOMHTMLAnchorElementSetCoordsMethodInfo , dOMHTMLAnchorElementSetCoords , -- ** dOMHTMLAnchorElementSetDownload + DOMHTMLAnchorElementSetDownloadMethodInfo, dOMHTMLAnchorElementSetDownload , -- ** dOMHTMLAnchorElementSetHash + DOMHTMLAnchorElementSetHashMethodInfo , dOMHTMLAnchorElementSetHash , -- ** dOMHTMLAnchorElementSetHost + DOMHTMLAnchorElementSetHostMethodInfo , dOMHTMLAnchorElementSetHost , -- ** dOMHTMLAnchorElementSetHostname + DOMHTMLAnchorElementSetHostnameMethodInfo, dOMHTMLAnchorElementSetHostname , -- ** dOMHTMLAnchorElementSetHref + DOMHTMLAnchorElementSetHrefMethodInfo , dOMHTMLAnchorElementSetHref , -- ** dOMHTMLAnchorElementSetHreflang + DOMHTMLAnchorElementSetHreflangMethodInfo, dOMHTMLAnchorElementSetHreflang , -- ** dOMHTMLAnchorElementSetName + DOMHTMLAnchorElementSetNameMethodInfo , dOMHTMLAnchorElementSetName , -- ** dOMHTMLAnchorElementSetPathname + DOMHTMLAnchorElementSetPathnameMethodInfo, dOMHTMLAnchorElementSetPathname , -- ** dOMHTMLAnchorElementSetPing + DOMHTMLAnchorElementSetPingMethodInfo , dOMHTMLAnchorElementSetPing , -- ** dOMHTMLAnchorElementSetPort + DOMHTMLAnchorElementSetPortMethodInfo , dOMHTMLAnchorElementSetPort , -- ** dOMHTMLAnchorElementSetProtocol + DOMHTMLAnchorElementSetProtocolMethodInfo, dOMHTMLAnchorElementSetProtocol , -- ** dOMHTMLAnchorElementSetRel + DOMHTMLAnchorElementSetRelMethodInfo , dOMHTMLAnchorElementSetRel , -- ** dOMHTMLAnchorElementSetRev + DOMHTMLAnchorElementSetRevMethodInfo , dOMHTMLAnchorElementSetRev , -- ** dOMHTMLAnchorElementSetSearch + DOMHTMLAnchorElementSetSearchMethodInfo , dOMHTMLAnchorElementSetSearch , -- ** dOMHTMLAnchorElementSetShape + DOMHTMLAnchorElementSetShapeMethodInfo , dOMHTMLAnchorElementSetShape , -- ** dOMHTMLAnchorElementSetTarget + DOMHTMLAnchorElementSetTargetMethodInfo , dOMHTMLAnchorElementSetTarget , @@ -350,6 +389,209 @@ noDOMHTMLAnchorElement :: Maybe DOMHTMLAnchorElement noDOMHTMLAnchorElement = Nothing +type family ResolveDOMHTMLAnchorElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLAnchorElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLAnchorElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLAnchorElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLAnchorElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLAnchorElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLAnchorElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLAnchorElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLAnchorElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLAnchorElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLAnchorElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLAnchorElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLAnchorElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLAnchorElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLAnchorElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLAnchorElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLAnchorElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLAnchorElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLAnchorElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLAnchorElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLAnchorElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLAnchorElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLAnchorElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLAnchorElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLAnchorElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLAnchorElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLAnchorElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLAnchorElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLAnchorElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLAnchorElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLAnchorElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLAnchorElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLAnchorElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLAnchorElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLAnchorElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLAnchorElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLAnchorElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLAnchorElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLAnchorElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLAnchorElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLAnchorElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLAnchorElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLAnchorElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLAnchorElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLAnchorElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLAnchorElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLAnchorElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLAnchorElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLAnchorElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLAnchorElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLAnchorElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLAnchorElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLAnchorElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLAnchorElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLAnchorElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLAnchorElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLAnchorElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLAnchorElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLAnchorElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLAnchorElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLAnchorElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLAnchorElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLAnchorElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLAnchorElementMethod "getCharset" o = DOMHTMLAnchorElementGetCharsetMethodInfo + ResolveDOMHTMLAnchorElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLAnchorElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLAnchorElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLAnchorElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLAnchorElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLAnchorElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLAnchorElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLAnchorElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLAnchorElementMethod "getCoords" o = DOMHTMLAnchorElementGetCoordsMethodInfo + ResolveDOMHTMLAnchorElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLAnchorElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLAnchorElementMethod "getDownload" o = DOMHTMLAnchorElementGetDownloadMethodInfo + ResolveDOMHTMLAnchorElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLAnchorElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLAnchorElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLAnchorElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLAnchorElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLAnchorElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLAnchorElementMethod "getHash" o = DOMHTMLAnchorElementGetHashMethodInfo + ResolveDOMHTMLAnchorElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLAnchorElementMethod "getHost" o = DOMHTMLAnchorElementGetHostMethodInfo + ResolveDOMHTMLAnchorElementMethod "getHostname" o = DOMHTMLAnchorElementGetHostnameMethodInfo + ResolveDOMHTMLAnchorElementMethod "getHref" o = DOMHTMLAnchorElementGetHrefMethodInfo + ResolveDOMHTMLAnchorElementMethod "getHreflang" o = DOMHTMLAnchorElementGetHreflangMethodInfo + ResolveDOMHTMLAnchorElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLAnchorElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLAnchorElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLAnchorElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLAnchorElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLAnchorElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLAnchorElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLAnchorElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLAnchorElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLAnchorElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLAnchorElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLAnchorElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLAnchorElementMethod "getName" o = DOMHTMLAnchorElementGetNameMethodInfo + ResolveDOMHTMLAnchorElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLAnchorElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLAnchorElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLAnchorElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLAnchorElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLAnchorElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLAnchorElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLAnchorElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLAnchorElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLAnchorElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLAnchorElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLAnchorElementMethod "getOrigin" o = DOMHTMLAnchorElementGetOriginMethodInfo + ResolveDOMHTMLAnchorElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLAnchorElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLAnchorElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLAnchorElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLAnchorElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLAnchorElementMethod "getPathname" o = DOMHTMLAnchorElementGetPathnameMethodInfo + ResolveDOMHTMLAnchorElementMethod "getPing" o = DOMHTMLAnchorElementGetPingMethodInfo + ResolveDOMHTMLAnchorElementMethod "getPort" o = DOMHTMLAnchorElementGetPortMethodInfo + ResolveDOMHTMLAnchorElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLAnchorElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLAnchorElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLAnchorElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLAnchorElementMethod "getProtocol" o = DOMHTMLAnchorElementGetProtocolMethodInfo + ResolveDOMHTMLAnchorElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLAnchorElementMethod "getRel" o = DOMHTMLAnchorElementGetRelMethodInfo + ResolveDOMHTMLAnchorElementMethod "getRev" o = DOMHTMLAnchorElementGetRevMethodInfo + ResolveDOMHTMLAnchorElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLAnchorElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLAnchorElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLAnchorElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLAnchorElementMethod "getSearch" o = DOMHTMLAnchorElementGetSearchMethodInfo + ResolveDOMHTMLAnchorElementMethod "getShape" o = DOMHTMLAnchorElementGetShapeMethodInfo + ResolveDOMHTMLAnchorElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLAnchorElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLAnchorElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLAnchorElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLAnchorElementMethod "getTarget" o = DOMHTMLAnchorElementGetTargetMethodInfo + ResolveDOMHTMLAnchorElementMethod "getText" o = DOMHTMLAnchorElementGetTextMethodInfo + ResolveDOMHTMLAnchorElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLAnchorElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLAnchorElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLAnchorElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLAnchorElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLAnchorElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLAnchorElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLAnchorElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLAnchorElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLAnchorElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLAnchorElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLAnchorElementMethod "setCharset" o = DOMHTMLAnchorElementSetCharsetMethodInfo + ResolveDOMHTMLAnchorElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLAnchorElementMethod "setCoords" o = DOMHTMLAnchorElementSetCoordsMethodInfo + ResolveDOMHTMLAnchorElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLAnchorElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLAnchorElementMethod "setDownload" o = DOMHTMLAnchorElementSetDownloadMethodInfo + ResolveDOMHTMLAnchorElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLAnchorElementMethod "setHash" o = DOMHTMLAnchorElementSetHashMethodInfo + ResolveDOMHTMLAnchorElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLAnchorElementMethod "setHost" o = DOMHTMLAnchorElementSetHostMethodInfo + ResolveDOMHTMLAnchorElementMethod "setHostname" o = DOMHTMLAnchorElementSetHostnameMethodInfo + ResolveDOMHTMLAnchorElementMethod "setHref" o = DOMHTMLAnchorElementSetHrefMethodInfo + ResolveDOMHTMLAnchorElementMethod "setHreflang" o = DOMHTMLAnchorElementSetHreflangMethodInfo + ResolveDOMHTMLAnchorElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLAnchorElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLAnchorElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLAnchorElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLAnchorElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLAnchorElementMethod "setName" o = DOMHTMLAnchorElementSetNameMethodInfo + ResolveDOMHTMLAnchorElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLAnchorElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLAnchorElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLAnchorElementMethod "setPathname" o = DOMHTMLAnchorElementSetPathnameMethodInfo + ResolveDOMHTMLAnchorElementMethod "setPing" o = DOMHTMLAnchorElementSetPingMethodInfo + ResolveDOMHTMLAnchorElementMethod "setPort" o = DOMHTMLAnchorElementSetPortMethodInfo + ResolveDOMHTMLAnchorElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLAnchorElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLAnchorElementMethod "setProtocol" o = DOMHTMLAnchorElementSetProtocolMethodInfo + ResolveDOMHTMLAnchorElementMethod "setRel" o = DOMHTMLAnchorElementSetRelMethodInfo + ResolveDOMHTMLAnchorElementMethod "setRev" o = DOMHTMLAnchorElementSetRevMethodInfo + ResolveDOMHTMLAnchorElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLAnchorElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLAnchorElementMethod "setSearch" o = DOMHTMLAnchorElementSetSearchMethodInfo + ResolveDOMHTMLAnchorElementMethod "setShape" o = DOMHTMLAnchorElementSetShapeMethodInfo + ResolveDOMHTMLAnchorElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLAnchorElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLAnchorElementMethod "setTarget" o = DOMHTMLAnchorElementSetTargetMethodInfo + ResolveDOMHTMLAnchorElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLAnchorElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLAnchorElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLAnchorElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLAnchorElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLAnchorElementMethod t DOMHTMLAnchorElement, MethodInfo info DOMHTMLAnchorElement p) => IsLabelProxy t (DOMHTMLAnchorElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLAnchorElementMethod t DOMHTMLAnchorElement, MethodInfo info DOMHTMLAnchorElement p) => IsLabel t (DOMHTMLAnchorElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "charset" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -369,7 +611,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementCharsetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementCharsetPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementCharsetPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementCharsetPropertyInfo = "DOMHTMLAnchorElement::charset" + type AttrLabel DOMHTMLAnchorElementCharsetPropertyInfo = "charset" attrGet _ = getDOMHTMLAnchorElementCharset attrSet _ = setDOMHTMLAnchorElementCharset attrConstruct _ = constructDOMHTMLAnchorElementCharset @@ -393,7 +635,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementCoordsPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementCoordsPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementCoordsPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementCoordsPropertyInfo = "DOMHTMLAnchorElement::coords" + type AttrLabel DOMHTMLAnchorElementCoordsPropertyInfo = "coords" attrGet _ = getDOMHTMLAnchorElementCoords attrSet _ = setDOMHTMLAnchorElementCoords attrConstruct _ = constructDOMHTMLAnchorElementCoords @@ -417,7 +659,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementDownloadPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementDownloadPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementDownloadPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementDownloadPropertyInfo = "DOMHTMLAnchorElement::download" + type AttrLabel DOMHTMLAnchorElementDownloadPropertyInfo = "download" attrGet _ = getDOMHTMLAnchorElementDownload attrSet _ = setDOMHTMLAnchorElementDownload attrConstruct _ = constructDOMHTMLAnchorElementDownload @@ -441,7 +683,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementHashPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementHashPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementHashPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementHashPropertyInfo = "DOMHTMLAnchorElement::hash" + type AttrLabel DOMHTMLAnchorElementHashPropertyInfo = "hash" attrGet _ = getDOMHTMLAnchorElementHash attrSet _ = setDOMHTMLAnchorElementHash attrConstruct _ = constructDOMHTMLAnchorElementHash @@ -465,7 +707,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementHostPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementHostPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementHostPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementHostPropertyInfo = "DOMHTMLAnchorElement::host" + type AttrLabel DOMHTMLAnchorElementHostPropertyInfo = "host" attrGet _ = getDOMHTMLAnchorElementHost attrSet _ = setDOMHTMLAnchorElementHost attrConstruct _ = constructDOMHTMLAnchorElementHost @@ -489,7 +731,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementHostnamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementHostnamePropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementHostnamePropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementHostnamePropertyInfo = "DOMHTMLAnchorElement::hostname" + type AttrLabel DOMHTMLAnchorElementHostnamePropertyInfo = "hostname" attrGet _ = getDOMHTMLAnchorElementHostname attrSet _ = setDOMHTMLAnchorElementHostname attrConstruct _ = constructDOMHTMLAnchorElementHostname @@ -513,7 +755,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementHrefPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementHrefPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementHrefPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementHrefPropertyInfo = "DOMHTMLAnchorElement::href" + type AttrLabel DOMHTMLAnchorElementHrefPropertyInfo = "href" attrGet _ = getDOMHTMLAnchorElementHref attrSet _ = setDOMHTMLAnchorElementHref attrConstruct _ = constructDOMHTMLAnchorElementHref @@ -537,7 +779,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementHreflangPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementHreflangPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementHreflangPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementHreflangPropertyInfo = "DOMHTMLAnchorElement::hreflang" + type AttrLabel DOMHTMLAnchorElementHreflangPropertyInfo = "hreflang" attrGet _ = getDOMHTMLAnchorElementHreflang attrSet _ = setDOMHTMLAnchorElementHreflang attrConstruct _ = constructDOMHTMLAnchorElementHreflang @@ -561,7 +803,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementNamePropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementNamePropertyInfo = "DOMHTMLAnchorElement::name" + type AttrLabel DOMHTMLAnchorElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLAnchorElementName attrSet _ = setDOMHTMLAnchorElementName attrConstruct _ = constructDOMHTMLAnchorElementName @@ -579,7 +821,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementOriginPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLAnchorElementOriginPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementOriginPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementOriginPropertyInfo = "DOMHTMLAnchorElement::origin" + type AttrLabel DOMHTMLAnchorElementOriginPropertyInfo = "origin" attrGet _ = getDOMHTMLAnchorElementOrigin attrSet _ = undefined attrConstruct _ = undefined @@ -603,7 +845,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementPathnamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementPathnamePropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementPathnamePropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementPathnamePropertyInfo = "DOMHTMLAnchorElement::pathname" + type AttrLabel DOMHTMLAnchorElementPathnamePropertyInfo = "pathname" attrGet _ = getDOMHTMLAnchorElementPathname attrSet _ = setDOMHTMLAnchorElementPathname attrConstruct _ = constructDOMHTMLAnchorElementPathname @@ -627,7 +869,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementPingPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementPingPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementPingPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementPingPropertyInfo = "DOMHTMLAnchorElement::ping" + type AttrLabel DOMHTMLAnchorElementPingPropertyInfo = "ping" attrGet _ = getDOMHTMLAnchorElementPing attrSet _ = setDOMHTMLAnchorElementPing attrConstruct _ = constructDOMHTMLAnchorElementPing @@ -651,7 +893,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementPortPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementPortPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementPortPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementPortPropertyInfo = "DOMHTMLAnchorElement::port" + type AttrLabel DOMHTMLAnchorElementPortPropertyInfo = "port" attrGet _ = getDOMHTMLAnchorElementPort attrSet _ = setDOMHTMLAnchorElementPort attrConstruct _ = constructDOMHTMLAnchorElementPort @@ -675,7 +917,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementProtocolPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementProtocolPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementProtocolPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementProtocolPropertyInfo = "DOMHTMLAnchorElement::protocol" + type AttrLabel DOMHTMLAnchorElementProtocolPropertyInfo = "protocol" attrGet _ = getDOMHTMLAnchorElementProtocol attrSet _ = setDOMHTMLAnchorElementProtocol attrConstruct _ = constructDOMHTMLAnchorElementProtocol @@ -699,7 +941,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementRelPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementRelPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementRelPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementRelPropertyInfo = "DOMHTMLAnchorElement::rel" + type AttrLabel DOMHTMLAnchorElementRelPropertyInfo = "rel" attrGet _ = getDOMHTMLAnchorElementRel attrSet _ = setDOMHTMLAnchorElementRel attrConstruct _ = constructDOMHTMLAnchorElementRel @@ -723,7 +965,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementRevPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementRevPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementRevPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementRevPropertyInfo = "DOMHTMLAnchorElement::rev" + type AttrLabel DOMHTMLAnchorElementRevPropertyInfo = "rev" attrGet _ = getDOMHTMLAnchorElementRev attrSet _ = setDOMHTMLAnchorElementRev attrConstruct _ = constructDOMHTMLAnchorElementRev @@ -747,7 +989,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementSearchPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementSearchPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementSearchPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementSearchPropertyInfo = "DOMHTMLAnchorElement::search" + type AttrLabel DOMHTMLAnchorElementSearchPropertyInfo = "search" attrGet _ = getDOMHTMLAnchorElementSearch attrSet _ = setDOMHTMLAnchorElementSearch attrConstruct _ = constructDOMHTMLAnchorElementSearch @@ -771,7 +1013,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementShapePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementShapePropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementShapePropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementShapePropertyInfo = "DOMHTMLAnchorElement::shape" + type AttrLabel DOMHTMLAnchorElementShapePropertyInfo = "shape" attrGet _ = getDOMHTMLAnchorElementShape attrSet _ = setDOMHTMLAnchorElementShape attrConstruct _ = constructDOMHTMLAnchorElementShape @@ -795,7 +1037,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementTargetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementTargetPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementTargetPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementTargetPropertyInfo = "DOMHTMLAnchorElement::target" + type AttrLabel DOMHTMLAnchorElementTargetPropertyInfo = "target" attrGet _ = getDOMHTMLAnchorElementTarget attrSet _ = setDOMHTMLAnchorElementTarget attrConstruct _ = constructDOMHTMLAnchorElementTarget @@ -813,7 +1055,7 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementTextPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLAnchorElementTextPropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementTextPropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementTextPropertyInfo = "DOMHTMLAnchorElement::text" + type AttrLabel DOMHTMLAnchorElementTextPropertyInfo = "text" attrGet _ = getDOMHTMLAnchorElementText attrSet _ = undefined attrConstruct _ = undefined @@ -837,22 +1079,21 @@ type AttrSetTypeConstraint DOMHTMLAnchorElementTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAnchorElementTypePropertyInfo = DOMHTMLAnchorElementK type AttrGetType DOMHTMLAnchorElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLAnchorElementTypePropertyInfo = "DOMHTMLAnchorElement::type" + type AttrLabel DOMHTMLAnchorElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLAnchorElementType attrSet _ = setDOMHTMLAnchorElementType attrConstruct _ = constructDOMHTMLAnchorElementType type instance AttributeList DOMHTMLAnchorElement = DOMHTMLAnchorElementAttributeList -type DOMHTMLAnchorElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("charset", DOMHTMLAnchorElementCharsetPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("coords", DOMHTMLAnchorElementCoordsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("download", DOMHTMLAnchorElementDownloadPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hash", DOMHTMLAnchorElementHashPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("host", DOMHTMLAnchorElementHostPropertyInfo), '("hostname", DOMHTMLAnchorElementHostnamePropertyInfo), '("href", DOMHTMLAnchorElementHrefPropertyInfo), '("hreflang", DOMHTMLAnchorElementHreflangPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLAnchorElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("origin", DOMHTMLAnchorElementOriginPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("pathname", DOMHTMLAnchorElementPathnamePropertyInfo), '("ping", DOMHTMLAnchorElementPingPropertyInfo), '("port", DOMHTMLAnchorElementPortPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("protocol", DOMHTMLAnchorElementProtocolPropertyInfo), '("rel", DOMHTMLAnchorElementRelPropertyInfo), '("rev", DOMHTMLAnchorElementRevPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("search", DOMHTMLAnchorElementSearchPropertyInfo), '("shape", DOMHTMLAnchorElementShapePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("target", DOMHTMLAnchorElementTargetPropertyInfo), '("text", DOMHTMLAnchorElementTextPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLAnchorElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLAnchorElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("charset", DOMHTMLAnchorElementCharsetPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coords", DOMHTMLAnchorElementCoordsPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("download", DOMHTMLAnchorElementDownloadPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hash", DOMHTMLAnchorElementHashPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("host", DOMHTMLAnchorElementHostPropertyInfo), '("hostname", DOMHTMLAnchorElementHostnamePropertyInfo), '("href", DOMHTMLAnchorElementHrefPropertyInfo), '("hreflang", DOMHTMLAnchorElementHreflangPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLAnchorElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("origin", DOMHTMLAnchorElementOriginPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("pathname", DOMHTMLAnchorElementPathnamePropertyInfo), '("ping", DOMHTMLAnchorElementPingPropertyInfo), '("port", DOMHTMLAnchorElementPortPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("protocol", DOMHTMLAnchorElementProtocolPropertyInfo), '("rel", DOMHTMLAnchorElementRelPropertyInfo), '("rev", DOMHTMLAnchorElementRevPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("search", DOMHTMLAnchorElementSearchPropertyInfo), '("shape", DOMHTMLAnchorElementShapePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("target", DOMHTMLAnchorElementTargetPropertyInfo), '("text", DOMHTMLAnchorElementTextPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLAnchorElementTypePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLAnchorElement = DOMHTMLAnchorElementSignalList -type DOMHTMLAnchorElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLAnchorElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLAnchorElement::get_charset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -864,8 +1105,8 @@ dOMHTMLAnchorElementGetCharset :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetCharset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_charset _obj' @@ -875,11 +1116,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetCharsetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetCharsetMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetCharset + -- method DOMHTMLAnchorElement::get_coords -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -891,8 +1135,8 @@ dOMHTMLAnchorElementGetCoords :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetCoords _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_coords _obj' @@ -902,11 +1146,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetCoordsMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetCoordsMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetCoords + -- method DOMHTMLAnchorElement::get_download -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -918,8 +1165,8 @@ dOMHTMLAnchorElementGetDownload :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetDownload _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_download _obj' @@ -929,11 +1176,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetDownloadMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetDownloadMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetDownload + -- method DOMHTMLAnchorElement::get_hash -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -945,8 +1195,8 @@ dOMHTMLAnchorElementGetHash :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetHash _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_hash _obj' @@ -956,11 +1206,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetHashMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetHashMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetHash + -- method DOMHTMLAnchorElement::get_host -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -972,8 +1225,8 @@ dOMHTMLAnchorElementGetHost :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetHost _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_host _obj' @@ -983,11 +1236,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetHostMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetHostMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetHost + -- method DOMHTMLAnchorElement::get_hostname -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -999,8 +1255,8 @@ dOMHTMLAnchorElementGetHostname :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetHostname _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_hostname _obj' @@ -1010,11 +1266,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetHostnameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetHostnameMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetHostname + -- method DOMHTMLAnchorElement::get_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1026,8 +1285,8 @@ dOMHTMLAnchorElementGetHref :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetHref _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_href _obj' @@ -1037,11 +1296,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetHrefMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetHrefMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetHref + -- method DOMHTMLAnchorElement::get_hreflang -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1053,8 +1315,8 @@ dOMHTMLAnchorElementGetHreflang :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetHreflang _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_hreflang _obj' @@ -1064,11 +1326,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetHreflangMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetHreflangMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetHreflang + -- method DOMHTMLAnchorElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1080,8 +1345,8 @@ dOMHTMLAnchorElementGetName :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_name _obj' @@ -1091,11 +1356,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetName + -- method DOMHTMLAnchorElement::get_origin -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1107,8 +1375,8 @@ dOMHTMLAnchorElementGetOrigin :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetOrigin _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_origin _obj' @@ -1118,11 +1386,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetOriginMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetOriginMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetOrigin + -- method DOMHTMLAnchorElement::get_pathname -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1134,8 +1405,8 @@ dOMHTMLAnchorElementGetPathname :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetPathname _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_pathname _obj' @@ -1145,11 +1416,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetPathnameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetPathnameMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetPathname + -- method DOMHTMLAnchorElement::get_ping -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1161,8 +1435,8 @@ dOMHTMLAnchorElementGetPing :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetPing _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_ping _obj' @@ -1172,11 +1446,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetPingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetPingMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetPing + -- method DOMHTMLAnchorElement::get_port -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1188,8 +1465,8 @@ dOMHTMLAnchorElementGetPort :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetPort _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_port _obj' @@ -1199,11 +1476,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetPortMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetPortMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetPort + -- method DOMHTMLAnchorElement::get_protocol -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1215,8 +1495,8 @@ dOMHTMLAnchorElementGetProtocol :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetProtocol _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_protocol _obj' @@ -1226,11 +1506,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetProtocolMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetProtocolMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetProtocol + -- method DOMHTMLAnchorElement::get_rel -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1242,8 +1525,8 @@ dOMHTMLAnchorElementGetRel :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetRel _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_rel _obj' @@ -1253,11 +1536,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetRelMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetRelMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetRel + -- method DOMHTMLAnchorElement::get_rev -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1269,8 +1555,8 @@ dOMHTMLAnchorElementGetRev :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetRev _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_rev _obj' @@ -1280,11 +1566,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetRevMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetRevMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetRev + -- method DOMHTMLAnchorElement::get_search -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1296,8 +1585,8 @@ dOMHTMLAnchorElementGetSearch :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetSearch _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_search _obj' @@ -1307,11 +1596,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetSearchMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetSearchMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetSearch + -- method DOMHTMLAnchorElement::get_shape -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1323,8 +1615,8 @@ dOMHTMLAnchorElementGetShape :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetShape _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_shape _obj' @@ -1334,11 +1626,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetShapeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetShapeMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetShape + -- method DOMHTMLAnchorElement::get_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1350,8 +1645,8 @@ dOMHTMLAnchorElementGetTarget :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetTarget _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_target _obj' @@ -1361,11 +1656,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetTargetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetTarget + -- method DOMHTMLAnchorElement::get_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1377,8 +1675,8 @@ dOMHTMLAnchorElementGetText :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAnchorElementGetText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_anchor_element_get_text _obj' @@ -1388,11 +1686,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAnchorElementGetTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementGetTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementGetText + -- method DOMHTMLAnchorElement::set_charset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1405,9 +1706,9 @@ dOMHTMLAnchorElementSetCharset :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetCharset _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1416,11 +1717,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetCharsetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetCharsetMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetCharset + -- method DOMHTMLAnchorElement::set_coords -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1433,9 +1737,9 @@ dOMHTMLAnchorElementSetCoords :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetCoords _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1444,11 +1748,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetCoordsMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetCoordsMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetCoords + -- method DOMHTMLAnchorElement::set_download -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1461,9 +1768,9 @@ dOMHTMLAnchorElementSetDownload :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetDownload _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1472,11 +1779,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetDownloadMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetDownloadMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetDownload + -- method DOMHTMLAnchorElement::set_hash -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1489,9 +1799,9 @@ dOMHTMLAnchorElementSetHash :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetHash _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1500,11 +1810,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetHashMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetHashMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetHash + -- method DOMHTMLAnchorElement::set_host -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1517,9 +1830,9 @@ dOMHTMLAnchorElementSetHost :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetHost _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1528,11 +1841,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetHostMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetHostMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetHost + -- method DOMHTMLAnchorElement::set_hostname -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1545,9 +1861,9 @@ dOMHTMLAnchorElementSetHostname :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetHostname _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1556,11 +1872,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetHostnameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetHostnameMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetHostname + -- method DOMHTMLAnchorElement::set_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1573,9 +1892,9 @@ dOMHTMLAnchorElementSetHref :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetHref _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1584,11 +1903,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetHrefMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetHrefMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetHref + -- method DOMHTMLAnchorElement::set_hreflang -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1601,9 +1923,9 @@ dOMHTMLAnchorElementSetHreflang :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetHreflang _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1612,11 +1934,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetHreflangMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetHreflangMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetHreflang + -- method DOMHTMLAnchorElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1629,9 +1954,9 @@ dOMHTMLAnchorElementSetName :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1640,11 +1965,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetName + -- method DOMHTMLAnchorElement::set_pathname -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1657,9 +1985,9 @@ dOMHTMLAnchorElementSetPathname :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetPathname _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1668,11 +1996,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetPathnameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetPathnameMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetPathname + -- method DOMHTMLAnchorElement::set_ping -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1685,9 +2016,9 @@ dOMHTMLAnchorElementSetPing :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetPing _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1696,11 +2027,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetPingMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetPingMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetPing + -- method DOMHTMLAnchorElement::set_port -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1713,9 +2047,9 @@ dOMHTMLAnchorElementSetPort :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetPort _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1724,11 +2058,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetPortMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetPortMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetPort + -- method DOMHTMLAnchorElement::set_protocol -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1741,9 +2078,9 @@ dOMHTMLAnchorElementSetProtocol :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetProtocol _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1752,11 +2089,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetProtocolMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetProtocolMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetProtocol + -- method DOMHTMLAnchorElement::set_rel -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1769,9 +2109,9 @@ dOMHTMLAnchorElementSetRel :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetRel _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1780,11 +2120,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetRelMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetRelMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetRel + -- method DOMHTMLAnchorElement::set_rev -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1797,9 +2140,9 @@ dOMHTMLAnchorElementSetRev :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetRev _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1808,11 +2151,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetRevMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetRevMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetRev + -- method DOMHTMLAnchorElement::set_search -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1825,9 +2171,9 @@ dOMHTMLAnchorElementSetSearch :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetSearch _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1836,11 +2182,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetSearchMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetSearchMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetSearch + -- method DOMHTMLAnchorElement::set_shape -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1853,9 +2202,9 @@ dOMHTMLAnchorElementSetShape :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetShape _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1864,11 +2213,14 @@ freeMem value' return () +data DOMHTMLAnchorElementSetShapeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetShapeMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetShape + -- method DOMHTMLAnchorElement::set_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAnchorElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1881,9 +2233,9 @@ dOMHTMLAnchorElementSetTarget :: (MonadIO m, DOMHTMLAnchorElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAnchorElementSetTarget _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1891,5 +2243,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLAnchorElementSetTargetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAnchorElementK a) => MethodInfo DOMHTMLAnchorElementSetTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLAnchorElementSetTarget diff --git a/GI/WebKit/Objects/DOMHTMLAnchorElement.hs-boot b/GI/WebKit/Objects/DOMHTMLAnchorElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLAnchorElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLAnchorElement.hs-boot @@ -32,3 +32,41 @@ data DOMHTMLAnchorElementTargetPropertyInfo data DOMHTMLAnchorElementTextPropertyInfo data DOMHTMLAnchorElementTypePropertyInfo +data DOMHTMLAnchorElementGetCharsetMethodInfo +data DOMHTMLAnchorElementGetCoordsMethodInfo +data DOMHTMLAnchorElementGetDownloadMethodInfo +data DOMHTMLAnchorElementGetHashMethodInfo +data DOMHTMLAnchorElementGetHostMethodInfo +data DOMHTMLAnchorElementGetHostnameMethodInfo +data DOMHTMLAnchorElementGetHrefMethodInfo +data DOMHTMLAnchorElementGetHreflangMethodInfo +data DOMHTMLAnchorElementGetNameMethodInfo +data DOMHTMLAnchorElementGetOriginMethodInfo +data DOMHTMLAnchorElementGetPathnameMethodInfo +data DOMHTMLAnchorElementGetPingMethodInfo +data DOMHTMLAnchorElementGetPortMethodInfo +data DOMHTMLAnchorElementGetProtocolMethodInfo +data DOMHTMLAnchorElementGetRelMethodInfo +data DOMHTMLAnchorElementGetRevMethodInfo +data DOMHTMLAnchorElementGetSearchMethodInfo +data DOMHTMLAnchorElementGetShapeMethodInfo +data DOMHTMLAnchorElementGetTargetMethodInfo +data DOMHTMLAnchorElementGetTextMethodInfo +data DOMHTMLAnchorElementSetCharsetMethodInfo +data DOMHTMLAnchorElementSetCoordsMethodInfo +data DOMHTMLAnchorElementSetDownloadMethodInfo +data DOMHTMLAnchorElementSetHashMethodInfo +data DOMHTMLAnchorElementSetHostMethodInfo +data DOMHTMLAnchorElementSetHostnameMethodInfo +data DOMHTMLAnchorElementSetHrefMethodInfo +data DOMHTMLAnchorElementSetHreflangMethodInfo +data DOMHTMLAnchorElementSetNameMethodInfo +data DOMHTMLAnchorElementSetPathnameMethodInfo +data DOMHTMLAnchorElementSetPingMethodInfo +data DOMHTMLAnchorElementSetPortMethodInfo +data DOMHTMLAnchorElementSetProtocolMethodInfo +data DOMHTMLAnchorElementSetRelMethodInfo +data DOMHTMLAnchorElementSetRevMethodInfo +data DOMHTMLAnchorElementSetSearchMethodInfo +data DOMHTMLAnchorElementSetShapeMethodInfo +data DOMHTMLAnchorElementSetTargetMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLAppletElement.hs b/GI/WebKit/Objects/DOMHTMLAppletElement.hs --- a/GI/WebKit/Objects/DOMHTMLAppletElement.hs +++ b/GI/WebKit/Objects/DOMHTMLAppletElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,90 +18,112 @@ -- * Methods -- ** dOMHTMLAppletElementGetAlign + DOMHTMLAppletElementGetAlignMethodInfo , dOMHTMLAppletElementGetAlign , -- ** dOMHTMLAppletElementGetAlt + DOMHTMLAppletElementGetAltMethodInfo , dOMHTMLAppletElementGetAlt , -- ** dOMHTMLAppletElementGetArchive + DOMHTMLAppletElementGetArchiveMethodInfo, dOMHTMLAppletElementGetArchive , -- ** dOMHTMLAppletElementGetCode + DOMHTMLAppletElementGetCodeMethodInfo , dOMHTMLAppletElementGetCode , -- ** dOMHTMLAppletElementGetCodeBase + DOMHTMLAppletElementGetCodeBaseMethodInfo, dOMHTMLAppletElementGetCodeBase , -- ** dOMHTMLAppletElementGetHeight + DOMHTMLAppletElementGetHeightMethodInfo , dOMHTMLAppletElementGetHeight , -- ** dOMHTMLAppletElementGetHspace + DOMHTMLAppletElementGetHspaceMethodInfo , dOMHTMLAppletElementGetHspace , -- ** dOMHTMLAppletElementGetName + DOMHTMLAppletElementGetNameMethodInfo , dOMHTMLAppletElementGetName , -- ** dOMHTMLAppletElementGetObject + DOMHTMLAppletElementGetObjectMethodInfo , dOMHTMLAppletElementGetObject , -- ** dOMHTMLAppletElementGetVspace + DOMHTMLAppletElementGetVspaceMethodInfo , dOMHTMLAppletElementGetVspace , -- ** dOMHTMLAppletElementGetWidth + DOMHTMLAppletElementGetWidthMethodInfo , dOMHTMLAppletElementGetWidth , -- ** dOMHTMLAppletElementSetAlign + DOMHTMLAppletElementSetAlignMethodInfo , dOMHTMLAppletElementSetAlign , -- ** dOMHTMLAppletElementSetAlt + DOMHTMLAppletElementSetAltMethodInfo , dOMHTMLAppletElementSetAlt , -- ** dOMHTMLAppletElementSetArchive + DOMHTMLAppletElementSetArchiveMethodInfo, dOMHTMLAppletElementSetArchive , -- ** dOMHTMLAppletElementSetCode + DOMHTMLAppletElementSetCodeMethodInfo , dOMHTMLAppletElementSetCode , -- ** dOMHTMLAppletElementSetCodeBase + DOMHTMLAppletElementSetCodeBaseMethodInfo, dOMHTMLAppletElementSetCodeBase , -- ** dOMHTMLAppletElementSetHeight + DOMHTMLAppletElementSetHeightMethodInfo , dOMHTMLAppletElementSetHeight , -- ** dOMHTMLAppletElementSetHspace + DOMHTMLAppletElementSetHspaceMethodInfo , dOMHTMLAppletElementSetHspace , -- ** dOMHTMLAppletElementSetName + DOMHTMLAppletElementSetNameMethodInfo , dOMHTMLAppletElementSetName , -- ** dOMHTMLAppletElementSetObject + DOMHTMLAppletElementSetObjectMethodInfo , dOMHTMLAppletElementSetObject , -- ** dOMHTMLAppletElementSetVspace + DOMHTMLAppletElementSetVspaceMethodInfo , dOMHTMLAppletElementSetVspace , -- ** dOMHTMLAppletElementSetWidth + DOMHTMLAppletElementSetWidthMethodInfo , dOMHTMLAppletElementSetWidth , @@ -220,6 +243,193 @@ noDOMHTMLAppletElement :: Maybe DOMHTMLAppletElement noDOMHTMLAppletElement = Nothing +type family ResolveDOMHTMLAppletElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLAppletElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLAppletElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLAppletElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLAppletElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLAppletElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLAppletElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLAppletElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLAppletElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLAppletElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLAppletElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLAppletElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLAppletElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLAppletElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLAppletElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLAppletElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLAppletElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLAppletElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLAppletElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLAppletElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLAppletElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLAppletElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLAppletElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLAppletElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLAppletElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLAppletElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLAppletElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLAppletElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLAppletElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLAppletElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLAppletElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLAppletElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLAppletElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLAppletElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLAppletElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLAppletElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLAppletElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLAppletElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLAppletElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLAppletElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLAppletElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLAppletElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLAppletElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLAppletElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLAppletElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLAppletElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLAppletElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLAppletElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLAppletElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLAppletElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLAppletElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLAppletElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLAppletElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLAppletElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLAppletElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLAppletElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLAppletElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLAppletElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLAppletElementMethod "getAlign" o = DOMHTMLAppletElementGetAlignMethodInfo + ResolveDOMHTMLAppletElementMethod "getAlt" o = DOMHTMLAppletElementGetAltMethodInfo + ResolveDOMHTMLAppletElementMethod "getArchive" o = DOMHTMLAppletElementGetArchiveMethodInfo + ResolveDOMHTMLAppletElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLAppletElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLAppletElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLAppletElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLAppletElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLAppletElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLAppletElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLAppletElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLAppletElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLAppletElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLAppletElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLAppletElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLAppletElementMethod "getCode" o = DOMHTMLAppletElementGetCodeMethodInfo + ResolveDOMHTMLAppletElementMethod "getCodeBase" o = DOMHTMLAppletElementGetCodeBaseMethodInfo + ResolveDOMHTMLAppletElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLAppletElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLAppletElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLAppletElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLAppletElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLAppletElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLAppletElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLAppletElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLAppletElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLAppletElementMethod "getHeight" o = DOMHTMLAppletElementGetHeightMethodInfo + ResolveDOMHTMLAppletElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLAppletElementMethod "getHspace" o = DOMHTMLAppletElementGetHspaceMethodInfo + ResolveDOMHTMLAppletElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLAppletElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLAppletElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLAppletElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLAppletElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLAppletElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLAppletElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLAppletElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLAppletElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLAppletElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLAppletElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLAppletElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLAppletElementMethod "getName" o = DOMHTMLAppletElementGetNameMethodInfo + ResolveDOMHTMLAppletElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLAppletElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLAppletElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLAppletElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLAppletElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLAppletElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLAppletElementMethod "getObject" o = DOMHTMLAppletElementGetObjectMethodInfo + ResolveDOMHTMLAppletElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLAppletElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLAppletElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLAppletElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLAppletElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLAppletElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLAppletElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLAppletElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLAppletElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLAppletElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLAppletElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLAppletElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLAppletElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLAppletElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLAppletElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLAppletElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLAppletElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLAppletElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLAppletElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLAppletElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLAppletElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLAppletElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLAppletElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLAppletElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLAppletElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLAppletElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLAppletElementMethod "getVspace" o = DOMHTMLAppletElementGetVspaceMethodInfo + ResolveDOMHTMLAppletElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLAppletElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLAppletElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLAppletElementMethod "getWidth" o = DOMHTMLAppletElementGetWidthMethodInfo + ResolveDOMHTMLAppletElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLAppletElementMethod "setAlign" o = DOMHTMLAppletElementSetAlignMethodInfo + ResolveDOMHTMLAppletElementMethod "setAlt" o = DOMHTMLAppletElementSetAltMethodInfo + ResolveDOMHTMLAppletElementMethod "setArchive" o = DOMHTMLAppletElementSetArchiveMethodInfo + ResolveDOMHTMLAppletElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLAppletElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLAppletElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLAppletElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLAppletElementMethod "setCode" o = DOMHTMLAppletElementSetCodeMethodInfo + ResolveDOMHTMLAppletElementMethod "setCodeBase" o = DOMHTMLAppletElementSetCodeBaseMethodInfo + ResolveDOMHTMLAppletElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLAppletElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLAppletElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLAppletElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLAppletElementMethod "setHeight" o = DOMHTMLAppletElementSetHeightMethodInfo + ResolveDOMHTMLAppletElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLAppletElementMethod "setHspace" o = DOMHTMLAppletElementSetHspaceMethodInfo + ResolveDOMHTMLAppletElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLAppletElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLAppletElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLAppletElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLAppletElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLAppletElementMethod "setName" o = DOMHTMLAppletElementSetNameMethodInfo + ResolveDOMHTMLAppletElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLAppletElementMethod "setObject" o = DOMHTMLAppletElementSetObjectMethodInfo + ResolveDOMHTMLAppletElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLAppletElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLAppletElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLAppletElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLAppletElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLAppletElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLAppletElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLAppletElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLAppletElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLAppletElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLAppletElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLAppletElementMethod "setVspace" o = DOMHTMLAppletElementSetVspaceMethodInfo + ResolveDOMHTMLAppletElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLAppletElementMethod "setWidth" o = DOMHTMLAppletElementSetWidthMethodInfo + ResolveDOMHTMLAppletElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLAppletElementMethod t DOMHTMLAppletElement, MethodInfo info DOMHTMLAppletElement p) => IsLabelProxy t (DOMHTMLAppletElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLAppletElementMethod t DOMHTMLAppletElement, MethodInfo info DOMHTMLAppletElement p) => IsLabel t (DOMHTMLAppletElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -239,7 +449,7 @@ type AttrSetTypeConstraint DOMHTMLAppletElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAppletElementAlignPropertyInfo = DOMHTMLAppletElementK type AttrGetType DOMHTMLAppletElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLAppletElementAlignPropertyInfo = "DOMHTMLAppletElement::align" + type AttrLabel DOMHTMLAppletElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLAppletElementAlign attrSet _ = setDOMHTMLAppletElementAlign attrConstruct _ = constructDOMHTMLAppletElementAlign @@ -263,7 +473,7 @@ type AttrSetTypeConstraint DOMHTMLAppletElementAltPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAppletElementAltPropertyInfo = DOMHTMLAppletElementK type AttrGetType DOMHTMLAppletElementAltPropertyInfo = T.Text - type AttrLabel DOMHTMLAppletElementAltPropertyInfo = "DOMHTMLAppletElement::alt" + type AttrLabel DOMHTMLAppletElementAltPropertyInfo = "alt" attrGet _ = getDOMHTMLAppletElementAlt attrSet _ = setDOMHTMLAppletElementAlt attrConstruct _ = constructDOMHTMLAppletElementAlt @@ -287,7 +497,7 @@ type AttrSetTypeConstraint DOMHTMLAppletElementArchivePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAppletElementArchivePropertyInfo = DOMHTMLAppletElementK type AttrGetType DOMHTMLAppletElementArchivePropertyInfo = T.Text - type AttrLabel DOMHTMLAppletElementArchivePropertyInfo = "DOMHTMLAppletElement::archive" + type AttrLabel DOMHTMLAppletElementArchivePropertyInfo = "archive" attrGet _ = getDOMHTMLAppletElementArchive attrSet _ = setDOMHTMLAppletElementArchive attrConstruct _ = constructDOMHTMLAppletElementArchive @@ -311,7 +521,7 @@ type AttrSetTypeConstraint DOMHTMLAppletElementCodePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAppletElementCodePropertyInfo = DOMHTMLAppletElementK type AttrGetType DOMHTMLAppletElementCodePropertyInfo = T.Text - type AttrLabel DOMHTMLAppletElementCodePropertyInfo = "DOMHTMLAppletElement::code" + type AttrLabel DOMHTMLAppletElementCodePropertyInfo = "code" attrGet _ = getDOMHTMLAppletElementCode attrSet _ = setDOMHTMLAppletElementCode attrConstruct _ = constructDOMHTMLAppletElementCode @@ -335,7 +545,7 @@ type AttrSetTypeConstraint DOMHTMLAppletElementCodeBasePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAppletElementCodeBasePropertyInfo = DOMHTMLAppletElementK type AttrGetType DOMHTMLAppletElementCodeBasePropertyInfo = T.Text - type AttrLabel DOMHTMLAppletElementCodeBasePropertyInfo = "DOMHTMLAppletElement::code-base" + type AttrLabel DOMHTMLAppletElementCodeBasePropertyInfo = "code-base" attrGet _ = getDOMHTMLAppletElementCodeBase attrSet _ = setDOMHTMLAppletElementCodeBase attrConstruct _ = constructDOMHTMLAppletElementCodeBase @@ -359,7 +569,7 @@ type AttrSetTypeConstraint DOMHTMLAppletElementHeightPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAppletElementHeightPropertyInfo = DOMHTMLAppletElementK type AttrGetType DOMHTMLAppletElementHeightPropertyInfo = T.Text - type AttrLabel DOMHTMLAppletElementHeightPropertyInfo = "DOMHTMLAppletElement::height" + type AttrLabel DOMHTMLAppletElementHeightPropertyInfo = "height" attrGet _ = getDOMHTMLAppletElementHeight attrSet _ = setDOMHTMLAppletElementHeight attrConstruct _ = constructDOMHTMLAppletElementHeight @@ -383,7 +593,7 @@ type AttrSetTypeConstraint DOMHTMLAppletElementHspacePropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLAppletElementHspacePropertyInfo = DOMHTMLAppletElementK type AttrGetType DOMHTMLAppletElementHspacePropertyInfo = Int64 - type AttrLabel DOMHTMLAppletElementHspacePropertyInfo = "DOMHTMLAppletElement::hspace" + type AttrLabel DOMHTMLAppletElementHspacePropertyInfo = "hspace" attrGet _ = getDOMHTMLAppletElementHspace attrSet _ = setDOMHTMLAppletElementHspace attrConstruct _ = constructDOMHTMLAppletElementHspace @@ -407,7 +617,7 @@ type AttrSetTypeConstraint DOMHTMLAppletElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAppletElementNamePropertyInfo = DOMHTMLAppletElementK type AttrGetType DOMHTMLAppletElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLAppletElementNamePropertyInfo = "DOMHTMLAppletElement::name" + type AttrLabel DOMHTMLAppletElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLAppletElementName attrSet _ = setDOMHTMLAppletElementName attrConstruct _ = constructDOMHTMLAppletElementName @@ -431,7 +641,7 @@ type AttrSetTypeConstraint DOMHTMLAppletElementObjectPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAppletElementObjectPropertyInfo = DOMHTMLAppletElementK type AttrGetType DOMHTMLAppletElementObjectPropertyInfo = T.Text - type AttrLabel DOMHTMLAppletElementObjectPropertyInfo = "DOMHTMLAppletElement::object" + type AttrLabel DOMHTMLAppletElementObjectPropertyInfo = "object" attrGet _ = getDOMHTMLAppletElementObject attrSet _ = setDOMHTMLAppletElementObject attrConstruct _ = constructDOMHTMLAppletElementObject @@ -455,7 +665,7 @@ type AttrSetTypeConstraint DOMHTMLAppletElementVspacePropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLAppletElementVspacePropertyInfo = DOMHTMLAppletElementK type AttrGetType DOMHTMLAppletElementVspacePropertyInfo = Int64 - type AttrLabel DOMHTMLAppletElementVspacePropertyInfo = "DOMHTMLAppletElement::vspace" + type AttrLabel DOMHTMLAppletElementVspacePropertyInfo = "vspace" attrGet _ = getDOMHTMLAppletElementVspace attrSet _ = setDOMHTMLAppletElementVspace attrConstruct _ = constructDOMHTMLAppletElementVspace @@ -479,22 +689,21 @@ type AttrSetTypeConstraint DOMHTMLAppletElementWidthPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAppletElementWidthPropertyInfo = DOMHTMLAppletElementK type AttrGetType DOMHTMLAppletElementWidthPropertyInfo = T.Text - type AttrLabel DOMHTMLAppletElementWidthPropertyInfo = "DOMHTMLAppletElement::width" + type AttrLabel DOMHTMLAppletElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLAppletElementWidth attrSet _ = setDOMHTMLAppletElementWidth attrConstruct _ = constructDOMHTMLAppletElementWidth type instance AttributeList DOMHTMLAppletElement = DOMHTMLAppletElementAttributeList -type DOMHTMLAppletElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLAppletElementAlignPropertyInfo), '("alt", DOMHTMLAppletElementAltPropertyInfo), '("archive", DOMHTMLAppletElementArchivePropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("code", DOMHTMLAppletElementCodePropertyInfo), '("code-base", DOMHTMLAppletElementCodeBasePropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLAppletElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLAppletElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLAppletElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("object", DOMHTMLAppletElementObjectPropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("vspace", DOMHTMLAppletElementVspacePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLAppletElementWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLAppletElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLAppletElementAlignPropertyInfo), '("alt", DOMHTMLAppletElementAltPropertyInfo), '("archive", DOMHTMLAppletElementArchivePropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("code", DOMHTMLAppletElementCodePropertyInfo), '("codeBase", DOMHTMLAppletElementCodeBasePropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLAppletElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLAppletElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLAppletElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("object", DOMHTMLAppletElementObjectPropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("vspace", DOMHTMLAppletElementVspacePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLAppletElementWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLAppletElement = DOMHTMLAppletElementSignalList -type DOMHTMLAppletElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLAppletElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLAppletElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -506,8 +715,8 @@ dOMHTMLAppletElementGetAlign :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAppletElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_applet_element_get_align _obj' @@ -517,11 +726,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAppletElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementGetAlign + -- method DOMHTMLAppletElement::get_alt -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -533,8 +745,8 @@ dOMHTMLAppletElementGetAlt :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAppletElementGetAlt _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_applet_element_get_alt _obj' @@ -544,11 +756,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAppletElementGetAltMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementGetAltMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementGetAlt + -- method DOMHTMLAppletElement::get_archive -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -560,8 +775,8 @@ dOMHTMLAppletElementGetArchive :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAppletElementGetArchive _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_applet_element_get_archive _obj' @@ -571,11 +786,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAppletElementGetArchiveMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementGetArchiveMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementGetArchive + -- method DOMHTMLAppletElement::get_code -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -587,8 +805,8 @@ dOMHTMLAppletElementGetCode :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAppletElementGetCode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_applet_element_get_code _obj' @@ -598,11 +816,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAppletElementGetCodeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementGetCodeMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementGetCode + -- method DOMHTMLAppletElement::get_code_base -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -614,8 +835,8 @@ dOMHTMLAppletElementGetCodeBase :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAppletElementGetCodeBase _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_applet_element_get_code_base _obj' @@ -625,11 +846,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAppletElementGetCodeBaseMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementGetCodeBaseMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementGetCodeBase + -- method DOMHTMLAppletElement::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -641,8 +865,8 @@ dOMHTMLAppletElementGetHeight :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAppletElementGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_applet_element_get_height _obj' @@ -652,11 +876,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAppletElementGetHeightMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementGetHeight + -- method DOMHTMLAppletElement::get_hspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -668,19 +895,22 @@ dOMHTMLAppletElementGetHspace :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLAppletElementGetHspace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_applet_element_get_hspace _obj' touchManagedPtr _obj return result +data DOMHTMLAppletElementGetHspaceMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementGetHspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementGetHspace + -- method DOMHTMLAppletElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -692,8 +922,8 @@ dOMHTMLAppletElementGetName :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAppletElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_applet_element_get_name _obj' @@ -703,11 +933,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAppletElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementGetName + -- method DOMHTMLAppletElement::get_object -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -719,8 +952,8 @@ dOMHTMLAppletElementGetObject :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAppletElementGetObject _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_applet_element_get_object _obj' @@ -730,11 +963,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAppletElementGetObjectMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementGetObjectMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementGetObject + -- method DOMHTMLAppletElement::get_vspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -746,19 +982,22 @@ dOMHTMLAppletElementGetVspace :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLAppletElementGetVspace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_applet_element_get_vspace _obj' touchManagedPtr _obj return result +data DOMHTMLAppletElementGetVspaceMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementGetVspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementGetVspace + -- method DOMHTMLAppletElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -770,8 +1009,8 @@ dOMHTMLAppletElementGetWidth :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAppletElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_applet_element_get_width _obj' @@ -781,11 +1020,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAppletElementGetWidthMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementGetWidth + -- method DOMHTMLAppletElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -798,9 +1040,9 @@ dOMHTMLAppletElementSetAlign :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAppletElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -809,11 +1051,14 @@ freeMem value' return () +data DOMHTMLAppletElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementSetAlign + -- method DOMHTMLAppletElement::set_alt -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -826,9 +1071,9 @@ dOMHTMLAppletElementSetAlt :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAppletElementSetAlt _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -837,11 +1082,14 @@ freeMem value' return () +data DOMHTMLAppletElementSetAltMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementSetAltMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementSetAlt + -- method DOMHTMLAppletElement::set_archive -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -854,9 +1102,9 @@ dOMHTMLAppletElementSetArchive :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAppletElementSetArchive _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -865,11 +1113,14 @@ freeMem value' return () +data DOMHTMLAppletElementSetArchiveMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementSetArchiveMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementSetArchive + -- method DOMHTMLAppletElement::set_code -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -882,9 +1133,9 @@ dOMHTMLAppletElementSetCode :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAppletElementSetCode _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -893,11 +1144,14 @@ freeMem value' return () +data DOMHTMLAppletElementSetCodeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementSetCodeMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementSetCode + -- method DOMHTMLAppletElement::set_code_base -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -910,9 +1164,9 @@ dOMHTMLAppletElementSetCodeBase :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAppletElementSetCodeBase _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -921,11 +1175,14 @@ freeMem value' return () +data DOMHTMLAppletElementSetCodeBaseMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementSetCodeBaseMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementSetCodeBase + -- method DOMHTMLAppletElement::set_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -938,9 +1195,9 @@ dOMHTMLAppletElementSetHeight :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAppletElementSetHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -949,11 +1206,14 @@ freeMem value' return () +data DOMHTMLAppletElementSetHeightMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementSetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementSetHeight + -- method DOMHTMLAppletElement::set_hspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -966,20 +1226,23 @@ dOMHTMLAppletElementSetHspace :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLAppletElementSetHspace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_applet_element_set_hspace _obj' value touchManagedPtr _obj return () +data DOMHTMLAppletElementSetHspaceMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementSetHspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementSetHspace + -- method DOMHTMLAppletElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -992,9 +1255,9 @@ dOMHTMLAppletElementSetName :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAppletElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1003,11 +1266,14 @@ freeMem value' return () +data DOMHTMLAppletElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementSetName + -- method DOMHTMLAppletElement::set_object -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1020,9 +1286,9 @@ dOMHTMLAppletElementSetObject :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAppletElementSetObject _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1031,11 +1297,14 @@ freeMem value' return () +data DOMHTMLAppletElementSetObjectMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementSetObjectMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementSetObject + -- method DOMHTMLAppletElement::set_vspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1048,20 +1317,23 @@ dOMHTMLAppletElementSetVspace :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLAppletElementSetVspace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_applet_element_set_vspace _obj' value touchManagedPtr _obj return () +data DOMHTMLAppletElementSetVspaceMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementSetVspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementSetVspace + -- method DOMHTMLAppletElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAppletElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1074,9 +1346,9 @@ dOMHTMLAppletElementSetWidth :: (MonadIO m, DOMHTMLAppletElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAppletElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1084,5 +1356,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLAppletElementSetWidthMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAppletElementK a) => MethodInfo DOMHTMLAppletElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLAppletElementSetWidth diff --git a/GI/WebKit/Objects/DOMHTMLAppletElement.hs-boot b/GI/WebKit/Objects/DOMHTMLAppletElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLAppletElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLAppletElement.hs-boot @@ -22,3 +22,25 @@ data DOMHTMLAppletElementObjectPropertyInfo data DOMHTMLAppletElementVspacePropertyInfo data DOMHTMLAppletElementWidthPropertyInfo +data DOMHTMLAppletElementGetAlignMethodInfo +data DOMHTMLAppletElementGetAltMethodInfo +data DOMHTMLAppletElementGetArchiveMethodInfo +data DOMHTMLAppletElementGetCodeMethodInfo +data DOMHTMLAppletElementGetCodeBaseMethodInfo +data DOMHTMLAppletElementGetHeightMethodInfo +data DOMHTMLAppletElementGetHspaceMethodInfo +data DOMHTMLAppletElementGetNameMethodInfo +data DOMHTMLAppletElementGetObjectMethodInfo +data DOMHTMLAppletElementGetVspaceMethodInfo +data DOMHTMLAppletElementGetWidthMethodInfo +data DOMHTMLAppletElementSetAlignMethodInfo +data DOMHTMLAppletElementSetAltMethodInfo +data DOMHTMLAppletElementSetArchiveMethodInfo +data DOMHTMLAppletElementSetCodeMethodInfo +data DOMHTMLAppletElementSetCodeBaseMethodInfo +data DOMHTMLAppletElementSetHeightMethodInfo +data DOMHTMLAppletElementSetHspaceMethodInfo +data DOMHTMLAppletElementSetNameMethodInfo +data DOMHTMLAppletElementSetObjectMethodInfo +data DOMHTMLAppletElementSetVspaceMethodInfo +data DOMHTMLAppletElementSetWidthMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLAreaElement.hs b/GI/WebKit/Objects/DOMHTMLAreaElement.hs --- a/GI/WebKit/Objects/DOMHTMLAreaElement.hs +++ b/GI/WebKit/Objects/DOMHTMLAreaElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,86 +18,107 @@ -- * Methods -- ** dOMHTMLAreaElementGetAlt + DOMHTMLAreaElementGetAltMethodInfo , dOMHTMLAreaElementGetAlt , -- ** dOMHTMLAreaElementGetCoords + DOMHTMLAreaElementGetCoordsMethodInfo , dOMHTMLAreaElementGetCoords , -- ** dOMHTMLAreaElementGetHash + DOMHTMLAreaElementGetHashMethodInfo , dOMHTMLAreaElementGetHash , -- ** dOMHTMLAreaElementGetHost + DOMHTMLAreaElementGetHostMethodInfo , dOMHTMLAreaElementGetHost , -- ** dOMHTMLAreaElementGetHostname + DOMHTMLAreaElementGetHostnameMethodInfo , dOMHTMLAreaElementGetHostname , -- ** dOMHTMLAreaElementGetHref + DOMHTMLAreaElementGetHrefMethodInfo , dOMHTMLAreaElementGetHref , -- ** dOMHTMLAreaElementGetNoHref + DOMHTMLAreaElementGetNoHrefMethodInfo , dOMHTMLAreaElementGetNoHref , -- ** dOMHTMLAreaElementGetPathname + DOMHTMLAreaElementGetPathnameMethodInfo , dOMHTMLAreaElementGetPathname , -- ** dOMHTMLAreaElementGetPing + DOMHTMLAreaElementGetPingMethodInfo , dOMHTMLAreaElementGetPing , -- ** dOMHTMLAreaElementGetPort + DOMHTMLAreaElementGetPortMethodInfo , dOMHTMLAreaElementGetPort , -- ** dOMHTMLAreaElementGetProtocol + DOMHTMLAreaElementGetProtocolMethodInfo , dOMHTMLAreaElementGetProtocol , -- ** dOMHTMLAreaElementGetSearch + DOMHTMLAreaElementGetSearchMethodInfo , dOMHTMLAreaElementGetSearch , -- ** dOMHTMLAreaElementGetShape + DOMHTMLAreaElementGetShapeMethodInfo , dOMHTMLAreaElementGetShape , -- ** dOMHTMLAreaElementGetTarget + DOMHTMLAreaElementGetTargetMethodInfo , dOMHTMLAreaElementGetTarget , -- ** dOMHTMLAreaElementSetAlt + DOMHTMLAreaElementSetAltMethodInfo , dOMHTMLAreaElementSetAlt , -- ** dOMHTMLAreaElementSetCoords + DOMHTMLAreaElementSetCoordsMethodInfo , dOMHTMLAreaElementSetCoords , -- ** dOMHTMLAreaElementSetHref + DOMHTMLAreaElementSetHrefMethodInfo , dOMHTMLAreaElementSetHref , -- ** dOMHTMLAreaElementSetNoHref + DOMHTMLAreaElementSetNoHrefMethodInfo , dOMHTMLAreaElementSetNoHref , -- ** dOMHTMLAreaElementSetPing + DOMHTMLAreaElementSetPingMethodInfo , dOMHTMLAreaElementSetPing , -- ** dOMHTMLAreaElementSetShape + DOMHTMLAreaElementSetShapeMethodInfo , dOMHTMLAreaElementSetShape , -- ** dOMHTMLAreaElementSetTarget + DOMHTMLAreaElementSetTargetMethodInfo , dOMHTMLAreaElementSetTarget , @@ -223,6 +245,192 @@ noDOMHTMLAreaElement :: Maybe DOMHTMLAreaElement noDOMHTMLAreaElement = Nothing +type family ResolveDOMHTMLAreaElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLAreaElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLAreaElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLAreaElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLAreaElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLAreaElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLAreaElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLAreaElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLAreaElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLAreaElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLAreaElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLAreaElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLAreaElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLAreaElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLAreaElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLAreaElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLAreaElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLAreaElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLAreaElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLAreaElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLAreaElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLAreaElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLAreaElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLAreaElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLAreaElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLAreaElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLAreaElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLAreaElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLAreaElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLAreaElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLAreaElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLAreaElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLAreaElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLAreaElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLAreaElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLAreaElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLAreaElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLAreaElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLAreaElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLAreaElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLAreaElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLAreaElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLAreaElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLAreaElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLAreaElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLAreaElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLAreaElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLAreaElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLAreaElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLAreaElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLAreaElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLAreaElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLAreaElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLAreaElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLAreaElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLAreaElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLAreaElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLAreaElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLAreaElementMethod "getAlt" o = DOMHTMLAreaElementGetAltMethodInfo + ResolveDOMHTMLAreaElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLAreaElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLAreaElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLAreaElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLAreaElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLAreaElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLAreaElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLAreaElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLAreaElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLAreaElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLAreaElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLAreaElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLAreaElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLAreaElementMethod "getCoords" o = DOMHTMLAreaElementGetCoordsMethodInfo + ResolveDOMHTMLAreaElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLAreaElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLAreaElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLAreaElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLAreaElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLAreaElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLAreaElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLAreaElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLAreaElementMethod "getHash" o = DOMHTMLAreaElementGetHashMethodInfo + ResolveDOMHTMLAreaElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLAreaElementMethod "getHost" o = DOMHTMLAreaElementGetHostMethodInfo + ResolveDOMHTMLAreaElementMethod "getHostname" o = DOMHTMLAreaElementGetHostnameMethodInfo + ResolveDOMHTMLAreaElementMethod "getHref" o = DOMHTMLAreaElementGetHrefMethodInfo + ResolveDOMHTMLAreaElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLAreaElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLAreaElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLAreaElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLAreaElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLAreaElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLAreaElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLAreaElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLAreaElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLAreaElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLAreaElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLAreaElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLAreaElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLAreaElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLAreaElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLAreaElementMethod "getNoHref" o = DOMHTMLAreaElementGetNoHrefMethodInfo + ResolveDOMHTMLAreaElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLAreaElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLAreaElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLAreaElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLAreaElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLAreaElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLAreaElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLAreaElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLAreaElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLAreaElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLAreaElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLAreaElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLAreaElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLAreaElementMethod "getPathname" o = DOMHTMLAreaElementGetPathnameMethodInfo + ResolveDOMHTMLAreaElementMethod "getPing" o = DOMHTMLAreaElementGetPingMethodInfo + ResolveDOMHTMLAreaElementMethod "getPort" o = DOMHTMLAreaElementGetPortMethodInfo + ResolveDOMHTMLAreaElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLAreaElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLAreaElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLAreaElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLAreaElementMethod "getProtocol" o = DOMHTMLAreaElementGetProtocolMethodInfo + ResolveDOMHTMLAreaElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLAreaElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLAreaElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLAreaElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLAreaElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLAreaElementMethod "getSearch" o = DOMHTMLAreaElementGetSearchMethodInfo + ResolveDOMHTMLAreaElementMethod "getShape" o = DOMHTMLAreaElementGetShapeMethodInfo + ResolveDOMHTMLAreaElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLAreaElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLAreaElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLAreaElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLAreaElementMethod "getTarget" o = DOMHTMLAreaElementGetTargetMethodInfo + ResolveDOMHTMLAreaElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLAreaElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLAreaElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLAreaElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLAreaElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLAreaElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLAreaElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLAreaElementMethod "setAlt" o = DOMHTMLAreaElementSetAltMethodInfo + ResolveDOMHTMLAreaElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLAreaElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLAreaElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLAreaElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLAreaElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLAreaElementMethod "setCoords" o = DOMHTMLAreaElementSetCoordsMethodInfo + ResolveDOMHTMLAreaElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLAreaElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLAreaElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLAreaElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLAreaElementMethod "setHref" o = DOMHTMLAreaElementSetHrefMethodInfo + ResolveDOMHTMLAreaElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLAreaElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLAreaElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLAreaElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLAreaElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLAreaElementMethod "setNoHref" o = DOMHTMLAreaElementSetNoHrefMethodInfo + ResolveDOMHTMLAreaElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLAreaElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLAreaElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLAreaElementMethod "setPing" o = DOMHTMLAreaElementSetPingMethodInfo + ResolveDOMHTMLAreaElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLAreaElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLAreaElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLAreaElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLAreaElementMethod "setShape" o = DOMHTMLAreaElementSetShapeMethodInfo + ResolveDOMHTMLAreaElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLAreaElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLAreaElementMethod "setTarget" o = DOMHTMLAreaElementSetTargetMethodInfo + ResolveDOMHTMLAreaElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLAreaElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLAreaElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLAreaElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLAreaElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLAreaElementMethod t DOMHTMLAreaElement, MethodInfo info DOMHTMLAreaElement p) => IsLabelProxy t (DOMHTMLAreaElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLAreaElementMethod t DOMHTMLAreaElement, MethodInfo info DOMHTMLAreaElement p) => IsLabel t (DOMHTMLAreaElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "alt" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -242,7 +450,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementAltPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAreaElementAltPropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementAltPropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementAltPropertyInfo = "DOMHTMLAreaElement::alt" + type AttrLabel DOMHTMLAreaElementAltPropertyInfo = "alt" attrGet _ = getDOMHTMLAreaElementAlt attrSet _ = setDOMHTMLAreaElementAlt attrConstruct _ = constructDOMHTMLAreaElementAlt @@ -266,7 +474,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementCoordsPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAreaElementCoordsPropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementCoordsPropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementCoordsPropertyInfo = "DOMHTMLAreaElement::coords" + type AttrLabel DOMHTMLAreaElementCoordsPropertyInfo = "coords" attrGet _ = getDOMHTMLAreaElementCoords attrSet _ = setDOMHTMLAreaElementCoords attrConstruct _ = constructDOMHTMLAreaElementCoords @@ -284,7 +492,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementHashPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLAreaElementHashPropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementHashPropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementHashPropertyInfo = "DOMHTMLAreaElement::hash" + type AttrLabel DOMHTMLAreaElementHashPropertyInfo = "hash" attrGet _ = getDOMHTMLAreaElementHash attrSet _ = undefined attrConstruct _ = undefined @@ -302,7 +510,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementHostPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLAreaElementHostPropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementHostPropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementHostPropertyInfo = "DOMHTMLAreaElement::host" + type AttrLabel DOMHTMLAreaElementHostPropertyInfo = "host" attrGet _ = getDOMHTMLAreaElementHost attrSet _ = undefined attrConstruct _ = undefined @@ -320,7 +528,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementHostnamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLAreaElementHostnamePropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementHostnamePropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementHostnamePropertyInfo = "DOMHTMLAreaElement::hostname" + type AttrLabel DOMHTMLAreaElementHostnamePropertyInfo = "hostname" attrGet _ = getDOMHTMLAreaElementHostname attrSet _ = undefined attrConstruct _ = undefined @@ -344,7 +552,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementHrefPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAreaElementHrefPropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementHrefPropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementHrefPropertyInfo = "DOMHTMLAreaElement::href" + type AttrLabel DOMHTMLAreaElementHrefPropertyInfo = "href" attrGet _ = getDOMHTMLAreaElementHref attrSet _ = setDOMHTMLAreaElementHref attrConstruct _ = constructDOMHTMLAreaElementHref @@ -368,7 +576,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementNoHrefPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLAreaElementNoHrefPropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementNoHrefPropertyInfo = Bool - type AttrLabel DOMHTMLAreaElementNoHrefPropertyInfo = "DOMHTMLAreaElement::no-href" + type AttrLabel DOMHTMLAreaElementNoHrefPropertyInfo = "no-href" attrGet _ = getDOMHTMLAreaElementNoHref attrSet _ = setDOMHTMLAreaElementNoHref attrConstruct _ = constructDOMHTMLAreaElementNoHref @@ -386,7 +594,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementPathnamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLAreaElementPathnamePropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementPathnamePropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementPathnamePropertyInfo = "DOMHTMLAreaElement::pathname" + type AttrLabel DOMHTMLAreaElementPathnamePropertyInfo = "pathname" attrGet _ = getDOMHTMLAreaElementPathname attrSet _ = undefined attrConstruct _ = undefined @@ -410,7 +618,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementPingPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAreaElementPingPropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementPingPropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementPingPropertyInfo = "DOMHTMLAreaElement::ping" + type AttrLabel DOMHTMLAreaElementPingPropertyInfo = "ping" attrGet _ = getDOMHTMLAreaElementPing attrSet _ = setDOMHTMLAreaElementPing attrConstruct _ = constructDOMHTMLAreaElementPing @@ -428,7 +636,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementPortPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLAreaElementPortPropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementPortPropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementPortPropertyInfo = "DOMHTMLAreaElement::port" + type AttrLabel DOMHTMLAreaElementPortPropertyInfo = "port" attrGet _ = getDOMHTMLAreaElementPort attrSet _ = undefined attrConstruct _ = undefined @@ -446,7 +654,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementProtocolPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLAreaElementProtocolPropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementProtocolPropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementProtocolPropertyInfo = "DOMHTMLAreaElement::protocol" + type AttrLabel DOMHTMLAreaElementProtocolPropertyInfo = "protocol" attrGet _ = getDOMHTMLAreaElementProtocol attrSet _ = undefined attrConstruct _ = undefined @@ -464,7 +672,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementSearchPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLAreaElementSearchPropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementSearchPropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementSearchPropertyInfo = "DOMHTMLAreaElement::search" + type AttrLabel DOMHTMLAreaElementSearchPropertyInfo = "search" attrGet _ = getDOMHTMLAreaElementSearch attrSet _ = undefined attrConstruct _ = undefined @@ -488,7 +696,7 @@ type AttrSetTypeConstraint DOMHTMLAreaElementShapePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAreaElementShapePropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementShapePropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementShapePropertyInfo = "DOMHTMLAreaElement::shape" + type AttrLabel DOMHTMLAreaElementShapePropertyInfo = "shape" attrGet _ = getDOMHTMLAreaElementShape attrSet _ = setDOMHTMLAreaElementShape attrConstruct _ = constructDOMHTMLAreaElementShape @@ -512,22 +720,21 @@ type AttrSetTypeConstraint DOMHTMLAreaElementTargetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLAreaElementTargetPropertyInfo = DOMHTMLAreaElementK type AttrGetType DOMHTMLAreaElementTargetPropertyInfo = T.Text - type AttrLabel DOMHTMLAreaElementTargetPropertyInfo = "DOMHTMLAreaElement::target" + type AttrLabel DOMHTMLAreaElementTargetPropertyInfo = "target" attrGet _ = getDOMHTMLAreaElementTarget attrSet _ = setDOMHTMLAreaElementTarget attrConstruct _ = constructDOMHTMLAreaElementTarget type instance AttributeList DOMHTMLAreaElement = DOMHTMLAreaElementAttributeList -type DOMHTMLAreaElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("alt", DOMHTMLAreaElementAltPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("coords", DOMHTMLAreaElementCoordsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hash", DOMHTMLAreaElementHashPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("host", DOMHTMLAreaElementHostPropertyInfo), '("hostname", DOMHTMLAreaElementHostnamePropertyInfo), '("href", DOMHTMLAreaElementHrefPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("no-href", DOMHTMLAreaElementNoHrefPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("pathname", DOMHTMLAreaElementPathnamePropertyInfo), '("ping", DOMHTMLAreaElementPingPropertyInfo), '("port", DOMHTMLAreaElementPortPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("protocol", DOMHTMLAreaElementProtocolPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("search", DOMHTMLAreaElementSearchPropertyInfo), '("shape", DOMHTMLAreaElementShapePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("target", DOMHTMLAreaElementTargetPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLAreaElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("alt", DOMHTMLAreaElementAltPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coords", DOMHTMLAreaElementCoordsPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hash", DOMHTMLAreaElementHashPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("host", DOMHTMLAreaElementHostPropertyInfo), '("hostname", DOMHTMLAreaElementHostnamePropertyInfo), '("href", DOMHTMLAreaElementHrefPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("noHref", DOMHTMLAreaElementNoHrefPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("pathname", DOMHTMLAreaElementPathnamePropertyInfo), '("ping", DOMHTMLAreaElementPingPropertyInfo), '("port", DOMHTMLAreaElementPortPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("protocol", DOMHTMLAreaElementProtocolPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("search", DOMHTMLAreaElementSearchPropertyInfo), '("shape", DOMHTMLAreaElementShapePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("target", DOMHTMLAreaElementTargetPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLAreaElement = DOMHTMLAreaElementSignalList -type DOMHTMLAreaElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLAreaElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLAreaElement::get_alt -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -539,8 +746,8 @@ dOMHTMLAreaElementGetAlt :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetAlt _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_alt _obj' @@ -550,11 +757,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetAltMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetAltMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetAlt + -- method DOMHTMLAreaElement::get_coords -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -566,8 +776,8 @@ dOMHTMLAreaElementGetCoords :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetCoords _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_coords _obj' @@ -577,11 +787,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetCoordsMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetCoordsMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetCoords + -- method DOMHTMLAreaElement::get_hash -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -593,8 +806,8 @@ dOMHTMLAreaElementGetHash :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetHash _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_hash _obj' @@ -604,11 +817,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetHashMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetHashMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetHash + -- method DOMHTMLAreaElement::get_host -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -620,8 +836,8 @@ dOMHTMLAreaElementGetHost :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetHost _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_host _obj' @@ -631,11 +847,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetHostMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetHostMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetHost + -- method DOMHTMLAreaElement::get_hostname -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -647,8 +866,8 @@ dOMHTMLAreaElementGetHostname :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetHostname _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_hostname _obj' @@ -658,11 +877,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetHostnameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetHostnameMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetHostname + -- method DOMHTMLAreaElement::get_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -674,8 +896,8 @@ dOMHTMLAreaElementGetHref :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetHref _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_href _obj' @@ -685,11 +907,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetHrefMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetHrefMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetHref + -- method DOMHTMLAreaElement::get_no_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -701,8 +926,8 @@ dOMHTMLAreaElementGetNoHref :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLAreaElementGetNoHref _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_no_href _obj' @@ -710,11 +935,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetNoHrefMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetNoHrefMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetNoHref + -- method DOMHTMLAreaElement::get_pathname -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -726,8 +954,8 @@ dOMHTMLAreaElementGetPathname :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetPathname _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_pathname _obj' @@ -737,11 +965,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetPathnameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetPathnameMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetPathname + -- method DOMHTMLAreaElement::get_ping -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -753,8 +984,8 @@ dOMHTMLAreaElementGetPing :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetPing _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_ping _obj' @@ -764,11 +995,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetPingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetPingMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetPing + -- method DOMHTMLAreaElement::get_port -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -780,8 +1014,8 @@ dOMHTMLAreaElementGetPort :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetPort _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_port _obj' @@ -791,11 +1025,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetPortMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetPortMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetPort + -- method DOMHTMLAreaElement::get_protocol -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -807,8 +1044,8 @@ dOMHTMLAreaElementGetProtocol :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetProtocol _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_protocol _obj' @@ -818,11 +1055,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetProtocolMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetProtocolMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetProtocol + -- method DOMHTMLAreaElement::get_search -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -834,8 +1074,8 @@ dOMHTMLAreaElementGetSearch :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetSearch _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_search _obj' @@ -845,11 +1085,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetSearchMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetSearchMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetSearch + -- method DOMHTMLAreaElement::get_shape -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -861,8 +1104,8 @@ dOMHTMLAreaElementGetShape :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetShape _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_shape _obj' @@ -872,11 +1115,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetShapeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetShapeMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetShape + -- method DOMHTMLAreaElement::get_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -888,8 +1134,8 @@ dOMHTMLAreaElementGetTarget :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLAreaElementGetTarget _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_area_element_get_target _obj' @@ -899,11 +1145,14 @@ touchManagedPtr _obj return result' +data DOMHTMLAreaElementGetTargetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementGetTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementGetTarget + -- method DOMHTMLAreaElement::set_alt -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -916,9 +1165,9 @@ dOMHTMLAreaElementSetAlt :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAreaElementSetAlt _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -927,11 +1176,14 @@ freeMem value' return () +data DOMHTMLAreaElementSetAltMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementSetAltMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementSetAlt + -- method DOMHTMLAreaElement::set_coords -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -944,9 +1196,9 @@ dOMHTMLAreaElementSetCoords :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAreaElementSetCoords _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -955,11 +1207,14 @@ freeMem value' return () +data DOMHTMLAreaElementSetCoordsMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementSetCoordsMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementSetCoords + -- method DOMHTMLAreaElement::set_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -972,9 +1227,9 @@ dOMHTMLAreaElementSetHref :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAreaElementSetHref _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -983,11 +1238,14 @@ freeMem value' return () +data DOMHTMLAreaElementSetHrefMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementSetHrefMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementSetHref + -- method DOMHTMLAreaElement::set_no_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1000,9 +1258,9 @@ dOMHTMLAreaElementSetNoHref :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLAreaElementSetNoHref _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1010,11 +1268,14 @@ touchManagedPtr _obj return () +data DOMHTMLAreaElementSetNoHrefMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementSetNoHrefMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementSetNoHref + -- method DOMHTMLAreaElement::set_ping -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1027,9 +1288,9 @@ dOMHTMLAreaElementSetPing :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAreaElementSetPing _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1038,11 +1299,14 @@ freeMem value' return () +data DOMHTMLAreaElementSetPingMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementSetPingMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementSetPing + -- method DOMHTMLAreaElement::set_shape -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1055,9 +1319,9 @@ dOMHTMLAreaElementSetShape :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAreaElementSetShape _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1066,11 +1330,14 @@ freeMem value' return () +data DOMHTMLAreaElementSetShapeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementSetShapeMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementSetShape + -- method DOMHTMLAreaElement::set_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1083,9 +1350,9 @@ dOMHTMLAreaElementSetTarget :: (MonadIO m, DOMHTMLAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLAreaElementSetTarget _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1093,5 +1360,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLAreaElementSetTargetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLAreaElementK a) => MethodInfo DOMHTMLAreaElementSetTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLAreaElementSetTarget diff --git a/GI/WebKit/Objects/DOMHTMLAreaElement.hs-boot b/GI/WebKit/Objects/DOMHTMLAreaElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLAreaElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLAreaElement.hs-boot @@ -25,3 +25,24 @@ data DOMHTMLAreaElementSearchPropertyInfo data DOMHTMLAreaElementShapePropertyInfo data DOMHTMLAreaElementTargetPropertyInfo +data DOMHTMLAreaElementGetAltMethodInfo +data DOMHTMLAreaElementGetCoordsMethodInfo +data DOMHTMLAreaElementGetHashMethodInfo +data DOMHTMLAreaElementGetHostMethodInfo +data DOMHTMLAreaElementGetHostnameMethodInfo +data DOMHTMLAreaElementGetHrefMethodInfo +data DOMHTMLAreaElementGetNoHrefMethodInfo +data DOMHTMLAreaElementGetPathnameMethodInfo +data DOMHTMLAreaElementGetPingMethodInfo +data DOMHTMLAreaElementGetPortMethodInfo +data DOMHTMLAreaElementGetProtocolMethodInfo +data DOMHTMLAreaElementGetSearchMethodInfo +data DOMHTMLAreaElementGetShapeMethodInfo +data DOMHTMLAreaElementGetTargetMethodInfo +data DOMHTMLAreaElementSetAltMethodInfo +data DOMHTMLAreaElementSetCoordsMethodInfo +data DOMHTMLAreaElementSetHrefMethodInfo +data DOMHTMLAreaElementSetNoHrefMethodInfo +data DOMHTMLAreaElementSetPingMethodInfo +data DOMHTMLAreaElementSetShapeMethodInfo +data DOMHTMLAreaElementSetTargetMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLAudioElement.hs b/GI/WebKit/Objects/DOMHTMLAudioElement.hs --- a/GI/WebKit/Objects/DOMHTMLAudioElement.hs +++ b/GI/WebKit/Objects/DOMHTMLAudioElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -49,10 +50,231 @@ noDOMHTMLAudioElement :: Maybe DOMHTMLAudioElement noDOMHTMLAudioElement = Nothing +type family ResolveDOMHTMLAudioElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLAudioElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLAudioElementMethod "addTextTrack" o = DOMHTMLMediaElementAddTextTrackMethodInfo + ResolveDOMHTMLAudioElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLAudioElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLAudioElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLAudioElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLAudioElementMethod "canPlayType" o = DOMHTMLMediaElementCanPlayTypeMethodInfo + ResolveDOMHTMLAudioElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLAudioElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLAudioElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLAudioElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLAudioElementMethod "fastSeek" o = DOMHTMLMediaElementFastSeekMethodInfo + ResolveDOMHTMLAudioElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLAudioElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLAudioElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLAudioElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLAudioElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLAudioElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLAudioElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLAudioElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLAudioElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLAudioElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLAudioElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLAudioElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLAudioElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLAudioElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLAudioElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLAudioElementMethod "load" o = DOMHTMLMediaElementLoadMethodInfo + ResolveDOMHTMLAudioElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLAudioElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLAudioElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLAudioElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLAudioElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLAudioElementMethod "pause" o = DOMHTMLMediaElementPauseMethodInfo + ResolveDOMHTMLAudioElementMethod "play" o = DOMHTMLMediaElementPlayMethodInfo + ResolveDOMHTMLAudioElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLAudioElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLAudioElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLAudioElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLAudioElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLAudioElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLAudioElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLAudioElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLAudioElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLAudioElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLAudioElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLAudioElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLAudioElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLAudioElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLAudioElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLAudioElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLAudioElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLAudioElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLAudioElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLAudioElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLAudioElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLAudioElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLAudioElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLAudioElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLAudioElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLAudioElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLAudioElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLAudioElementMethod "webkitShowPlaybackTargetPicker" o = DOMHTMLMediaElementWebkitShowPlaybackTargetPickerMethodInfo + ResolveDOMHTMLAudioElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLAudioElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLAudioElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLAudioElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLAudioElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLAudioElementMethod "getAudioTracks" o = DOMHTMLMediaElementGetAudioTracksMethodInfo + ResolveDOMHTMLAudioElementMethod "getAutoplay" o = DOMHTMLMediaElementGetAutoplayMethodInfo + ResolveDOMHTMLAudioElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLAudioElementMethod "getBuffered" o = DOMHTMLMediaElementGetBufferedMethodInfo + ResolveDOMHTMLAudioElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLAudioElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLAudioElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLAudioElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLAudioElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLAudioElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLAudioElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLAudioElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLAudioElementMethod "getController" o = DOMHTMLMediaElementGetControllerMethodInfo + ResolveDOMHTMLAudioElementMethod "getControls" o = DOMHTMLMediaElementGetControlsMethodInfo + ResolveDOMHTMLAudioElementMethod "getCurrentSrc" o = DOMHTMLMediaElementGetCurrentSrcMethodInfo + ResolveDOMHTMLAudioElementMethod "getCurrentTime" o = DOMHTMLMediaElementGetCurrentTimeMethodInfo + ResolveDOMHTMLAudioElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLAudioElementMethod "getDefaultMuted" o = DOMHTMLMediaElementGetDefaultMutedMethodInfo + ResolveDOMHTMLAudioElementMethod "getDefaultPlaybackRate" o = DOMHTMLMediaElementGetDefaultPlaybackRateMethodInfo + ResolveDOMHTMLAudioElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLAudioElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLAudioElementMethod "getDuration" o = DOMHTMLMediaElementGetDurationMethodInfo + ResolveDOMHTMLAudioElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLAudioElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLAudioElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLAudioElementMethod "getEnded" o = DOMHTMLMediaElementGetEndedMethodInfo + ResolveDOMHTMLAudioElementMethod "getError" o = DOMHTMLMediaElementGetErrorMethodInfo + ResolveDOMHTMLAudioElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLAudioElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLAudioElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLAudioElementMethod "getInitialTime" o = DOMHTMLMediaElementGetInitialTimeMethodInfo + ResolveDOMHTMLAudioElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLAudioElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLAudioElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLAudioElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLAudioElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLAudioElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLAudioElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLAudioElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLAudioElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLAudioElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLAudioElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLAudioElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLAudioElementMethod "getLoop" o = DOMHTMLMediaElementGetLoopMethodInfo + ResolveDOMHTMLAudioElementMethod "getMediaGroup" o = DOMHTMLMediaElementGetMediaGroupMethodInfo + ResolveDOMHTMLAudioElementMethod "getMuted" o = DOMHTMLMediaElementGetMutedMethodInfo + ResolveDOMHTMLAudioElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLAudioElementMethod "getNetworkState" o = DOMHTMLMediaElementGetNetworkStateMethodInfo + ResolveDOMHTMLAudioElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLAudioElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLAudioElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLAudioElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLAudioElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLAudioElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLAudioElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLAudioElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLAudioElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLAudioElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLAudioElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLAudioElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLAudioElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLAudioElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLAudioElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLAudioElementMethod "getPaused" o = DOMHTMLMediaElementGetPausedMethodInfo + ResolveDOMHTMLAudioElementMethod "getPlaybackRate" o = DOMHTMLMediaElementGetPlaybackRateMethodInfo + ResolveDOMHTMLAudioElementMethod "getPlayed" o = DOMHTMLMediaElementGetPlayedMethodInfo + ResolveDOMHTMLAudioElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLAudioElementMethod "getPreload" o = DOMHTMLMediaElementGetPreloadMethodInfo + ResolveDOMHTMLAudioElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLAudioElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLAudioElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLAudioElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLAudioElementMethod "getReadyState" o = DOMHTMLMediaElementGetReadyStateMethodInfo + ResolveDOMHTMLAudioElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLAudioElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLAudioElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLAudioElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLAudioElementMethod "getSeekable" o = DOMHTMLMediaElementGetSeekableMethodInfo + ResolveDOMHTMLAudioElementMethod "getSeeking" o = DOMHTMLMediaElementGetSeekingMethodInfo + ResolveDOMHTMLAudioElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLAudioElementMethod "getSrc" o = DOMHTMLMediaElementGetSrcMethodInfo + ResolveDOMHTMLAudioElementMethod "getStartTime" o = DOMHTMLMediaElementGetStartTimeMethodInfo + ResolveDOMHTMLAudioElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLAudioElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLAudioElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLAudioElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLAudioElementMethod "getTextTracks" o = DOMHTMLMediaElementGetTextTracksMethodInfo + ResolveDOMHTMLAudioElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLAudioElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLAudioElementMethod "getVideoTracks" o = DOMHTMLMediaElementGetVideoTracksMethodInfo + ResolveDOMHTMLAudioElementMethod "getVolume" o = DOMHTMLMediaElementGetVolumeMethodInfo + ResolveDOMHTMLAudioElementMethod "getWebkitAudioDecodedByteCount" o = DOMHTMLMediaElementGetWebkitAudioDecodedByteCountMethodInfo + ResolveDOMHTMLAudioElementMethod "getWebkitClosedCaptionsVisible" o = DOMHTMLMediaElementGetWebkitClosedCaptionsVisibleMethodInfo + ResolveDOMHTMLAudioElementMethod "getWebkitCurrentPlaybackTargetIsWireless" o = DOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWirelessMethodInfo + ResolveDOMHTMLAudioElementMethod "getWebkitHasClosedCaptions" o = DOMHTMLMediaElementGetWebkitHasClosedCaptionsMethodInfo + ResolveDOMHTMLAudioElementMethod "getWebkitPreservesPitch" o = DOMHTMLMediaElementGetWebkitPreservesPitchMethodInfo + ResolveDOMHTMLAudioElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLAudioElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLAudioElementMethod "getWebkitVideoDecodedByteCount" o = DOMHTMLMediaElementGetWebkitVideoDecodedByteCountMethodInfo + ResolveDOMHTMLAudioElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLAudioElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLAudioElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLAudioElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLAudioElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLAudioElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLAudioElementMethod "setAutoplay" o = DOMHTMLMediaElementSetAutoplayMethodInfo + ResolveDOMHTMLAudioElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLAudioElementMethod "setControls" o = DOMHTMLMediaElementSetControlsMethodInfo + ResolveDOMHTMLAudioElementMethod "setCurrentTime" o = DOMHTMLMediaElementSetCurrentTimeMethodInfo + ResolveDOMHTMLAudioElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLAudioElementMethod "setDefaultMuted" o = DOMHTMLMediaElementSetDefaultMutedMethodInfo + ResolveDOMHTMLAudioElementMethod "setDefaultPlaybackRate" o = DOMHTMLMediaElementSetDefaultPlaybackRateMethodInfo + ResolveDOMHTMLAudioElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLAudioElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLAudioElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLAudioElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLAudioElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLAudioElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLAudioElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLAudioElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLAudioElementMethod "setLoop" o = DOMHTMLMediaElementSetLoopMethodInfo + ResolveDOMHTMLAudioElementMethod "setMediaGroup" o = DOMHTMLMediaElementSetMediaGroupMethodInfo + ResolveDOMHTMLAudioElementMethod "setMuted" o = DOMHTMLMediaElementSetMutedMethodInfo + ResolveDOMHTMLAudioElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLAudioElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLAudioElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLAudioElementMethod "setPlaybackRate" o = DOMHTMLMediaElementSetPlaybackRateMethodInfo + ResolveDOMHTMLAudioElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLAudioElementMethod "setPreload" o = DOMHTMLMediaElementSetPreloadMethodInfo + ResolveDOMHTMLAudioElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLAudioElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLAudioElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLAudioElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLAudioElementMethod "setSrc" o = DOMHTMLMediaElementSetSrcMethodInfo + ResolveDOMHTMLAudioElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLAudioElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLAudioElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLAudioElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLAudioElementMethod "setVolume" o = DOMHTMLMediaElementSetVolumeMethodInfo + ResolveDOMHTMLAudioElementMethod "setWebkitClosedCaptionsVisible" o = DOMHTMLMediaElementSetWebkitClosedCaptionsVisibleMethodInfo + ResolveDOMHTMLAudioElementMethod "setWebkitPreservesPitch" o = DOMHTMLMediaElementSetWebkitPreservesPitchMethodInfo + ResolveDOMHTMLAudioElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLAudioElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLAudioElementMethod t DOMHTMLAudioElement, MethodInfo info DOMHTMLAudioElement p) => IsLabelProxy t (DOMHTMLAudioElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLAudioElementMethod t DOMHTMLAudioElement, MethodInfo info DOMHTMLAudioElement p) => IsLabel t (DOMHTMLAudioElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMHTMLAudioElement = DOMHTMLAudioElementAttributeList -type DOMHTMLAudioElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("audio-tracks", DOMHTMLMediaElementAudioTracksPropertyInfo), '("autoplay", DOMHTMLMediaElementAutoplayPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("buffered", DOMHTMLMediaElementBufferedPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("controller", DOMHTMLMediaElementControllerPropertyInfo), '("controls", DOMHTMLMediaElementControlsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-src", DOMHTMLMediaElementCurrentSrcPropertyInfo), '("current-time", DOMHTMLMediaElementCurrentTimePropertyInfo), '("default-muted", DOMHTMLMediaElementDefaultMutedPropertyInfo), '("default-playback-rate", DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("duration", DOMHTMLMediaElementDurationPropertyInfo), '("ended", DOMHTMLMediaElementEndedPropertyInfo), '("error", DOMHTMLMediaElementErrorPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMediaElementLoopPropertyInfo), '("media-group", DOMHTMLMediaElementMediaGroupPropertyInfo), '("muted", DOMHTMLMediaElementMutedPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("network-state", DOMHTMLMediaElementNetworkStatePropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("paused", DOMHTMLMediaElementPausedPropertyInfo), '("playback-rate", DOMHTMLMediaElementPlaybackRatePropertyInfo), '("played", DOMHTMLMediaElementPlayedPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("preload", DOMHTMLMediaElementPreloadPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("ready-state", DOMHTMLMediaElementReadyStatePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("seekable", DOMHTMLMediaElementSeekablePropertyInfo), '("seeking", DOMHTMLMediaElementSeekingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLMediaElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("text-tracks", DOMHTMLMediaElementTextTracksPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("video-tracks", DOMHTMLMediaElementVideoTracksPropertyInfo), '("volume", DOMHTMLMediaElementVolumePropertyInfo), '("webkit-audio-decoded-byte-count", DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo), '("webkit-closed-captions-visible", DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo), '("webkit-current-playback-target-is-wireless", DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo), '("webkit-has-closed-captions", DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo), '("webkit-preserves-pitch", DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkit-video-decoded-byte-count", DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLAudioElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("audioTracks", DOMHTMLMediaElementAudioTracksPropertyInfo), '("autoplay", DOMHTMLMediaElementAutoplayPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("buffered", DOMHTMLMediaElementBufferedPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("controller", DOMHTMLMediaElementControllerPropertyInfo), '("controls", DOMHTMLMediaElementControlsPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentSrc", DOMHTMLMediaElementCurrentSrcPropertyInfo), '("currentTime", DOMHTMLMediaElementCurrentTimePropertyInfo), '("defaultMuted", DOMHTMLMediaElementDefaultMutedPropertyInfo), '("defaultPlaybackRate", DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("duration", DOMHTMLMediaElementDurationPropertyInfo), '("ended", DOMHTMLMediaElementEndedPropertyInfo), '("error", DOMHTMLMediaElementErrorPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMediaElementLoopPropertyInfo), '("mediaGroup", DOMHTMLMediaElementMediaGroupPropertyInfo), '("muted", DOMHTMLMediaElementMutedPropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("networkState", DOMHTMLMediaElementNetworkStatePropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("paused", DOMHTMLMediaElementPausedPropertyInfo), '("playbackRate", DOMHTMLMediaElementPlaybackRatePropertyInfo), '("played", DOMHTMLMediaElementPlayedPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("preload", DOMHTMLMediaElementPreloadPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("readyState", DOMHTMLMediaElementReadyStatePropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("seekable", DOMHTMLMediaElementSeekablePropertyInfo), '("seeking", DOMHTMLMediaElementSeekingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLMediaElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("textTracks", DOMHTMLMediaElementTextTracksPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("videoTracks", DOMHTMLMediaElementVideoTracksPropertyInfo), '("volume", DOMHTMLMediaElementVolumePropertyInfo), '("webkitAudioDecodedByteCount", DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo), '("webkitClosedCaptionsVisible", DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo), '("webkitCurrentPlaybackTargetIsWireless", DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo), '("webkitHasClosedCaptions", DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo), '("webkitPreservesPitch", DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitVideoDecodedByteCount", DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLAudioElement = DOMHTMLAudioElementSignalList -type DOMHTMLAudioElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLAudioElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/DOMHTMLBRElement.hs b/GI/WebKit/Objects/DOMHTMLBRElement.hs --- a/GI/WebKit/Objects/DOMHTMLBRElement.hs +++ b/GI/WebKit/Objects/DOMHTMLBRElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLBRElementGetClear + DOMHTMLBRElementGetClearMethodInfo , dOMHTMLBRElementGetClear , -- ** dOMHTMLBRElementSetClear + DOMHTMLBRElementSetClearMethodInfo , dOMHTMLBRElementSetClear , @@ -70,6 +73,173 @@ noDOMHTMLBRElement :: Maybe DOMHTMLBRElement noDOMHTMLBRElement = Nothing +type family ResolveDOMHTMLBRElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLBRElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLBRElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLBRElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLBRElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLBRElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLBRElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLBRElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLBRElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLBRElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLBRElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLBRElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLBRElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLBRElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLBRElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLBRElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLBRElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLBRElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLBRElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLBRElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLBRElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLBRElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLBRElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLBRElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLBRElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLBRElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLBRElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLBRElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLBRElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLBRElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLBRElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLBRElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLBRElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLBRElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLBRElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLBRElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLBRElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLBRElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLBRElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLBRElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLBRElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLBRElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLBRElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLBRElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLBRElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLBRElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLBRElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLBRElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLBRElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLBRElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLBRElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLBRElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLBRElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLBRElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLBRElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLBRElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLBRElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLBRElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLBRElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLBRElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLBRElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLBRElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLBRElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLBRElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLBRElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLBRElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLBRElementMethod "getClear" o = DOMHTMLBRElementGetClearMethodInfo + ResolveDOMHTMLBRElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLBRElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLBRElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLBRElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLBRElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLBRElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLBRElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLBRElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLBRElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLBRElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLBRElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLBRElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLBRElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLBRElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLBRElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLBRElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLBRElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLBRElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLBRElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLBRElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLBRElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLBRElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLBRElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLBRElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLBRElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLBRElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLBRElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLBRElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLBRElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLBRElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLBRElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLBRElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLBRElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLBRElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLBRElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLBRElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLBRElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLBRElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLBRElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLBRElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLBRElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLBRElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLBRElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLBRElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLBRElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLBRElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLBRElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLBRElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLBRElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLBRElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLBRElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLBRElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLBRElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLBRElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLBRElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLBRElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLBRElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLBRElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLBRElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLBRElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLBRElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLBRElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLBRElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLBRElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLBRElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLBRElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLBRElementMethod "setClear" o = DOMHTMLBRElementSetClearMethodInfo + ResolveDOMHTMLBRElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLBRElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLBRElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLBRElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLBRElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLBRElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLBRElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLBRElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLBRElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLBRElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLBRElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLBRElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLBRElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLBRElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLBRElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLBRElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLBRElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLBRElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLBRElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLBRElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLBRElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLBRElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLBRElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLBRElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLBRElementMethod t DOMHTMLBRElement, MethodInfo info DOMHTMLBRElement p) => IsLabelProxy t (DOMHTMLBRElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLBRElementMethod t DOMHTMLBRElement, MethodInfo info DOMHTMLBRElement p) => IsLabel t (DOMHTMLBRElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "clear" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLBRElementClearPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLBRElementClearPropertyInfo = DOMHTMLBRElementK type AttrGetType DOMHTMLBRElementClearPropertyInfo = T.Text - type AttrLabel DOMHTMLBRElementClearPropertyInfo = "DOMHTMLBRElement::clear" + type AttrLabel DOMHTMLBRElementClearPropertyInfo = "clear" attrGet _ = getDOMHTMLBRElementClear attrSet _ = setDOMHTMLBRElementClear attrConstruct _ = constructDOMHTMLBRElementClear type instance AttributeList DOMHTMLBRElement = DOMHTMLBRElementAttributeList -type DOMHTMLBRElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("clear", DOMHTMLBRElementClearPropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLBRElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clear", DOMHTMLBRElementClearPropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLBRElement = DOMHTMLBRElementSignalList -type DOMHTMLBRElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLBRElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLBRElement::get_clear -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLBRElementGetClear :: (MonadIO m, DOMHTMLBRElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLBRElementGetClear _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_htmlbr_element_get_clear _obj' @@ -127,11 +296,14 @@ touchManagedPtr _obj return result' +data DOMHTMLBRElementGetClearMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLBRElementK a) => MethodInfo DOMHTMLBRElementGetClearMethodInfo a signature where + overloadedMethod _ = dOMHTMLBRElementGetClear + -- method DOMHTMLBRElement::set_clear -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -144,9 +316,9 @@ dOMHTMLBRElementSetClear :: (MonadIO m, DOMHTMLBRElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLBRElementSetClear _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -154,5 +326,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLBRElementSetClearMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLBRElementK a) => MethodInfo DOMHTMLBRElementSetClearMethodInfo a signature where + overloadedMethod _ = dOMHTMLBRElementSetClear diff --git a/GI/WebKit/Objects/DOMHTMLBRElement.hs-boot b/GI/WebKit/Objects/DOMHTMLBRElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLBRElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLBRElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLBRElementK o instance (GObject o, IsDescendantOf DOMHTMLBRElement o) => DOMHTMLBRElementK o data DOMHTMLBRElementClearPropertyInfo +data DOMHTMLBRElementGetClearMethodInfo +data DOMHTMLBRElementSetClearMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLBaseElement.hs b/GI/WebKit/Objects/DOMHTMLBaseElement.hs --- a/GI/WebKit/Objects/DOMHTMLBaseElement.hs +++ b/GI/WebKit/Objects/DOMHTMLBaseElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMHTMLBaseElementGetHref + DOMHTMLBaseElementGetHrefMethodInfo , dOMHTMLBaseElementGetHref , -- ** dOMHTMLBaseElementGetTarget + DOMHTMLBaseElementGetTargetMethodInfo , dOMHTMLBaseElementGetTarget , -- ** dOMHTMLBaseElementSetHref + DOMHTMLBaseElementSetHrefMethodInfo , dOMHTMLBaseElementSetHref , -- ** dOMHTMLBaseElementSetTarget + DOMHTMLBaseElementSetTargetMethodInfo , dOMHTMLBaseElementSetTarget , @@ -85,6 +90,175 @@ noDOMHTMLBaseElement :: Maybe DOMHTMLBaseElement noDOMHTMLBaseElement = Nothing +type family ResolveDOMHTMLBaseElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLBaseElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLBaseElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLBaseElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLBaseElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLBaseElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLBaseElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLBaseElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLBaseElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLBaseElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLBaseElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLBaseElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLBaseElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLBaseElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLBaseElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLBaseElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLBaseElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLBaseElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLBaseElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLBaseElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLBaseElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLBaseElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLBaseElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLBaseElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLBaseElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLBaseElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLBaseElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLBaseElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLBaseElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLBaseElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLBaseElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLBaseElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLBaseElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLBaseElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLBaseElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLBaseElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLBaseElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLBaseElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLBaseElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLBaseElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLBaseElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLBaseElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLBaseElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLBaseElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLBaseElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLBaseElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLBaseElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLBaseElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLBaseElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLBaseElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLBaseElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLBaseElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLBaseElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLBaseElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLBaseElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLBaseElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLBaseElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLBaseElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLBaseElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLBaseElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLBaseElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLBaseElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLBaseElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLBaseElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLBaseElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLBaseElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLBaseElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLBaseElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLBaseElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLBaseElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLBaseElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLBaseElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLBaseElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLBaseElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLBaseElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLBaseElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLBaseElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLBaseElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLBaseElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLBaseElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLBaseElementMethod "getHref" o = DOMHTMLBaseElementGetHrefMethodInfo + ResolveDOMHTMLBaseElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLBaseElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLBaseElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLBaseElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLBaseElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLBaseElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLBaseElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLBaseElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLBaseElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLBaseElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLBaseElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLBaseElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLBaseElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLBaseElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLBaseElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLBaseElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLBaseElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLBaseElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLBaseElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLBaseElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLBaseElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLBaseElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLBaseElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLBaseElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLBaseElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLBaseElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLBaseElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLBaseElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLBaseElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLBaseElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLBaseElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLBaseElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLBaseElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLBaseElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLBaseElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLBaseElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLBaseElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLBaseElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLBaseElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLBaseElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLBaseElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLBaseElementMethod "getTarget" o = DOMHTMLBaseElementGetTargetMethodInfo + ResolveDOMHTMLBaseElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLBaseElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLBaseElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLBaseElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLBaseElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLBaseElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLBaseElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLBaseElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLBaseElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLBaseElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLBaseElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLBaseElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLBaseElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLBaseElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLBaseElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLBaseElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLBaseElementMethod "setHref" o = DOMHTMLBaseElementSetHrefMethodInfo + ResolveDOMHTMLBaseElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLBaseElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLBaseElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLBaseElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLBaseElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLBaseElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLBaseElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLBaseElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLBaseElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLBaseElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLBaseElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLBaseElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLBaseElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLBaseElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLBaseElementMethod "setTarget" o = DOMHTMLBaseElementSetTargetMethodInfo + ResolveDOMHTMLBaseElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLBaseElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLBaseElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLBaseElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLBaseElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLBaseElementMethod t DOMHTMLBaseElement, MethodInfo info DOMHTMLBaseElement p) => IsLabelProxy t (DOMHTMLBaseElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLBaseElementMethod t DOMHTMLBaseElement, MethodInfo info DOMHTMLBaseElement p) => IsLabel t (DOMHTMLBaseElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "href" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -104,7 +278,7 @@ type AttrSetTypeConstraint DOMHTMLBaseElementHrefPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLBaseElementHrefPropertyInfo = DOMHTMLBaseElementK type AttrGetType DOMHTMLBaseElementHrefPropertyInfo = T.Text - type AttrLabel DOMHTMLBaseElementHrefPropertyInfo = "DOMHTMLBaseElement::href" + type AttrLabel DOMHTMLBaseElementHrefPropertyInfo = "href" attrGet _ = getDOMHTMLBaseElementHref attrSet _ = setDOMHTMLBaseElementHref attrConstruct _ = constructDOMHTMLBaseElementHref @@ -128,22 +302,21 @@ type AttrSetTypeConstraint DOMHTMLBaseElementTargetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLBaseElementTargetPropertyInfo = DOMHTMLBaseElementK type AttrGetType DOMHTMLBaseElementTargetPropertyInfo = T.Text - type AttrLabel DOMHTMLBaseElementTargetPropertyInfo = "DOMHTMLBaseElement::target" + type AttrLabel DOMHTMLBaseElementTargetPropertyInfo = "target" attrGet _ = getDOMHTMLBaseElementTarget attrSet _ = setDOMHTMLBaseElementTarget attrConstruct _ = constructDOMHTMLBaseElementTarget type instance AttributeList DOMHTMLBaseElement = DOMHTMLBaseElementAttributeList -type DOMHTMLBaseElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("href", DOMHTMLBaseElementHrefPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("target", DOMHTMLBaseElementTargetPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLBaseElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("href", DOMHTMLBaseElementHrefPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("target", DOMHTMLBaseElementTargetPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLBaseElement = DOMHTMLBaseElementSignalList -type DOMHTMLBaseElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLBaseElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLBaseElement::get_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -155,8 +328,8 @@ dOMHTMLBaseElementGetHref :: (MonadIO m, DOMHTMLBaseElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLBaseElementGetHref _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_base_element_get_href _obj' @@ -166,11 +339,14 @@ touchManagedPtr _obj return result' +data DOMHTMLBaseElementGetHrefMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLBaseElementK a) => MethodInfo DOMHTMLBaseElementGetHrefMethodInfo a signature where + overloadedMethod _ = dOMHTMLBaseElementGetHref + -- method DOMHTMLBaseElement::get_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -182,8 +358,8 @@ dOMHTMLBaseElementGetTarget :: (MonadIO m, DOMHTMLBaseElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLBaseElementGetTarget _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_base_element_get_target _obj' @@ -193,11 +369,14 @@ touchManagedPtr _obj return result' +data DOMHTMLBaseElementGetTargetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLBaseElementK a) => MethodInfo DOMHTMLBaseElementGetTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLBaseElementGetTarget + -- method DOMHTMLBaseElement::set_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -210,9 +389,9 @@ dOMHTMLBaseElementSetHref :: (MonadIO m, DOMHTMLBaseElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLBaseElementSetHref _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -221,11 +400,14 @@ freeMem value' return () +data DOMHTMLBaseElementSetHrefMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLBaseElementK a) => MethodInfo DOMHTMLBaseElementSetHrefMethodInfo a signature where + overloadedMethod _ = dOMHTMLBaseElementSetHref + -- method DOMHTMLBaseElement::set_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -238,9 +420,9 @@ dOMHTMLBaseElementSetTarget :: (MonadIO m, DOMHTMLBaseElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLBaseElementSetTarget _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -248,5 +430,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLBaseElementSetTargetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLBaseElementK a) => MethodInfo DOMHTMLBaseElementSetTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLBaseElementSetTarget diff --git a/GI/WebKit/Objects/DOMHTMLBaseElement.hs-boot b/GI/WebKit/Objects/DOMHTMLBaseElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLBaseElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLBaseElement.hs-boot @@ -13,3 +13,7 @@ instance (GObject o, IsDescendantOf DOMHTMLBaseElement o) => DOMHTMLBaseElementK o data DOMHTMLBaseElementHrefPropertyInfo data DOMHTMLBaseElementTargetPropertyInfo +data DOMHTMLBaseElementGetHrefMethodInfo +data DOMHTMLBaseElementGetTargetMethodInfo +data DOMHTMLBaseElementSetHrefMethodInfo +data DOMHTMLBaseElementSetTargetMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLBaseFontElement.hs b/GI/WebKit/Objects/DOMHTMLBaseFontElement.hs --- a/GI/WebKit/Objects/DOMHTMLBaseFontElement.hs +++ b/GI/WebKit/Objects/DOMHTMLBaseFontElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** dOMHTMLBaseFontElementGetColor + DOMHTMLBaseFontElementGetColorMethodInfo, dOMHTMLBaseFontElementGetColor , -- ** dOMHTMLBaseFontElementGetFace + DOMHTMLBaseFontElementGetFaceMethodInfo , dOMHTMLBaseFontElementGetFace , -- ** dOMHTMLBaseFontElementGetSize + DOMHTMLBaseFontElementGetSizeMethodInfo , dOMHTMLBaseFontElementGetSize , -- ** dOMHTMLBaseFontElementSetColor + DOMHTMLBaseFontElementSetColorMethodInfo, dOMHTMLBaseFontElementSetColor , -- ** dOMHTMLBaseFontElementSetFace + DOMHTMLBaseFontElementSetFaceMethodInfo , dOMHTMLBaseFontElementSetFace , -- ** dOMHTMLBaseFontElementSetSize + DOMHTMLBaseFontElementSetSizeMethodInfo , dOMHTMLBaseFontElementSetSize , @@ -100,6 +107,177 @@ noDOMHTMLBaseFontElement :: Maybe DOMHTMLBaseFontElement noDOMHTMLBaseFontElement = Nothing +type family ResolveDOMHTMLBaseFontElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLBaseFontElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLBaseFontElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLBaseFontElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLBaseFontElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLBaseFontElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLBaseFontElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLBaseFontElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLBaseFontElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLBaseFontElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLBaseFontElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLBaseFontElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLBaseFontElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLBaseFontElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLBaseFontElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLBaseFontElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLBaseFontElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLBaseFontElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLBaseFontElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLBaseFontElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLBaseFontElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLBaseFontElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLBaseFontElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLBaseFontElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLBaseFontElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLBaseFontElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLBaseFontElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLBaseFontElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLBaseFontElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLBaseFontElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLBaseFontElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLBaseFontElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLBaseFontElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLBaseFontElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLBaseFontElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLBaseFontElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLBaseFontElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLBaseFontElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLBaseFontElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLBaseFontElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLBaseFontElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLBaseFontElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLBaseFontElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLBaseFontElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLBaseFontElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLBaseFontElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLBaseFontElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLBaseFontElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getColor" o = DOMHTMLBaseFontElementGetColorMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getFace" o = DOMHTMLBaseFontElementGetFaceMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getSize" o = DOMHTMLBaseFontElementGetSizeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLBaseFontElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setColor" o = DOMHTMLBaseFontElementSetColorMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setFace" o = DOMHTMLBaseFontElementSetFaceMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setSize" o = DOMHTMLBaseFontElementSetSizeMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLBaseFontElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLBaseFontElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLBaseFontElementMethod t DOMHTMLBaseFontElement, MethodInfo info DOMHTMLBaseFontElement p) => IsLabelProxy t (DOMHTMLBaseFontElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLBaseFontElementMethod t DOMHTMLBaseFontElement, MethodInfo info DOMHTMLBaseFontElement p) => IsLabel t (DOMHTMLBaseFontElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "color" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -119,7 +297,7 @@ type AttrSetTypeConstraint DOMHTMLBaseFontElementColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLBaseFontElementColorPropertyInfo = DOMHTMLBaseFontElementK type AttrGetType DOMHTMLBaseFontElementColorPropertyInfo = T.Text - type AttrLabel DOMHTMLBaseFontElementColorPropertyInfo = "DOMHTMLBaseFontElement::color" + type AttrLabel DOMHTMLBaseFontElementColorPropertyInfo = "color" attrGet _ = getDOMHTMLBaseFontElementColor attrSet _ = setDOMHTMLBaseFontElementColor attrConstruct _ = constructDOMHTMLBaseFontElementColor @@ -143,7 +321,7 @@ type AttrSetTypeConstraint DOMHTMLBaseFontElementFacePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLBaseFontElementFacePropertyInfo = DOMHTMLBaseFontElementK type AttrGetType DOMHTMLBaseFontElementFacePropertyInfo = T.Text - type AttrLabel DOMHTMLBaseFontElementFacePropertyInfo = "DOMHTMLBaseFontElement::face" + type AttrLabel DOMHTMLBaseFontElementFacePropertyInfo = "face" attrGet _ = getDOMHTMLBaseFontElementFace attrSet _ = setDOMHTMLBaseFontElementFace attrConstruct _ = constructDOMHTMLBaseFontElementFace @@ -167,22 +345,21 @@ type AttrSetTypeConstraint DOMHTMLBaseFontElementSizePropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLBaseFontElementSizePropertyInfo = DOMHTMLBaseFontElementK type AttrGetType DOMHTMLBaseFontElementSizePropertyInfo = Int64 - type AttrLabel DOMHTMLBaseFontElementSizePropertyInfo = "DOMHTMLBaseFontElement::size" + type AttrLabel DOMHTMLBaseFontElementSizePropertyInfo = "size" attrGet _ = getDOMHTMLBaseFontElementSize attrSet _ = setDOMHTMLBaseFontElementSize attrConstruct _ = constructDOMHTMLBaseFontElementSize type instance AttributeList DOMHTMLBaseFontElement = DOMHTMLBaseFontElementAttributeList -type DOMHTMLBaseFontElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("color", DOMHTMLBaseFontElementColorPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("face", DOMHTMLBaseFontElementFacePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLBaseFontElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLBaseFontElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("color", DOMHTMLBaseFontElementColorPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("face", DOMHTMLBaseFontElementFacePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLBaseFontElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLBaseFontElement = DOMHTMLBaseFontElementSignalList -type DOMHTMLBaseFontElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLBaseFontElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLBaseFontElement::get_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -194,8 +371,8 @@ dOMHTMLBaseFontElementGetColor :: (MonadIO m, DOMHTMLBaseFontElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLBaseFontElementGetColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_base_font_element_get_color _obj' @@ -205,11 +382,14 @@ touchManagedPtr _obj return result' +data DOMHTMLBaseFontElementGetColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLBaseFontElementK a) => MethodInfo DOMHTMLBaseFontElementGetColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLBaseFontElementGetColor + -- method DOMHTMLBaseFontElement::get_face -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -221,8 +401,8 @@ dOMHTMLBaseFontElementGetFace :: (MonadIO m, DOMHTMLBaseFontElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLBaseFontElementGetFace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_base_font_element_get_face _obj' @@ -232,11 +412,14 @@ touchManagedPtr _obj return result' +data DOMHTMLBaseFontElementGetFaceMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLBaseFontElementK a) => MethodInfo DOMHTMLBaseFontElementGetFaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLBaseFontElementGetFace + -- method DOMHTMLBaseFontElement::get_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -248,19 +431,22 @@ dOMHTMLBaseFontElementGetSize :: (MonadIO m, DOMHTMLBaseFontElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLBaseFontElementGetSize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_base_font_element_get_size _obj' touchManagedPtr _obj return result +data DOMHTMLBaseFontElementGetSizeMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLBaseFontElementK a) => MethodInfo DOMHTMLBaseFontElementGetSizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLBaseFontElementGetSize + -- method DOMHTMLBaseFontElement::set_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -273,9 +459,9 @@ dOMHTMLBaseFontElementSetColor :: (MonadIO m, DOMHTMLBaseFontElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLBaseFontElementSetColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -284,11 +470,14 @@ freeMem value' return () +data DOMHTMLBaseFontElementSetColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLBaseFontElementK a) => MethodInfo DOMHTMLBaseFontElementSetColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLBaseFontElementSetColor + -- method DOMHTMLBaseFontElement::set_face -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -301,9 +490,9 @@ dOMHTMLBaseFontElementSetFace :: (MonadIO m, DOMHTMLBaseFontElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLBaseFontElementSetFace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -312,11 +501,14 @@ freeMem value' return () +data DOMHTMLBaseFontElementSetFaceMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLBaseFontElementK a) => MethodInfo DOMHTMLBaseFontElementSetFaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLBaseFontElementSetFace + -- method DOMHTMLBaseFontElement::set_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBaseFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -329,13 +521,17 @@ dOMHTMLBaseFontElementSetSize :: (MonadIO m, DOMHTMLBaseFontElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLBaseFontElementSetSize _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_base_font_element_set_size _obj' value touchManagedPtr _obj return () + +data DOMHTMLBaseFontElementSetSizeMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLBaseFontElementK a) => MethodInfo DOMHTMLBaseFontElementSetSizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLBaseFontElementSetSize diff --git a/GI/WebKit/Objects/DOMHTMLBaseFontElement.hs-boot b/GI/WebKit/Objects/DOMHTMLBaseFontElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLBaseFontElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLBaseFontElement.hs-boot @@ -14,3 +14,9 @@ data DOMHTMLBaseFontElementColorPropertyInfo data DOMHTMLBaseFontElementFacePropertyInfo data DOMHTMLBaseFontElementSizePropertyInfo +data DOMHTMLBaseFontElementGetColorMethodInfo +data DOMHTMLBaseFontElementGetFaceMethodInfo +data DOMHTMLBaseFontElementGetSizeMethodInfo +data DOMHTMLBaseFontElementSetColorMethodInfo +data DOMHTMLBaseFontElementSetFaceMethodInfo +data DOMHTMLBaseFontElementSetSizeMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLBodyElement.hs b/GI/WebKit/Objects/DOMHTMLBodyElement.hs --- a/GI/WebKit/Objects/DOMHTMLBodyElement.hs +++ b/GI/WebKit/Objects/DOMHTMLBodyElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,50 +18,62 @@ -- * Methods -- ** dOMHTMLBodyElementGetALink + DOMHTMLBodyElementGetALinkMethodInfo , dOMHTMLBodyElementGetALink , -- ** dOMHTMLBodyElementGetBackground + DOMHTMLBodyElementGetBackgroundMethodInfo, dOMHTMLBodyElementGetBackground , -- ** dOMHTMLBodyElementGetBgColor + DOMHTMLBodyElementGetBgColorMethodInfo , dOMHTMLBodyElementGetBgColor , -- ** dOMHTMLBodyElementGetLink + DOMHTMLBodyElementGetLinkMethodInfo , dOMHTMLBodyElementGetLink , -- ** dOMHTMLBodyElementGetText + DOMHTMLBodyElementGetTextMethodInfo , dOMHTMLBodyElementGetText , -- ** dOMHTMLBodyElementGetVLink + DOMHTMLBodyElementGetVLinkMethodInfo , dOMHTMLBodyElementGetVLink , -- ** dOMHTMLBodyElementSetALink + DOMHTMLBodyElementSetALinkMethodInfo , dOMHTMLBodyElementSetALink , -- ** dOMHTMLBodyElementSetBackground + DOMHTMLBodyElementSetBackgroundMethodInfo, dOMHTMLBodyElementSetBackground , -- ** dOMHTMLBodyElementSetBgColor + DOMHTMLBodyElementSetBgColorMethodInfo , dOMHTMLBodyElementSetBgColor , -- ** dOMHTMLBodyElementSetLink + DOMHTMLBodyElementSetLinkMethodInfo , dOMHTMLBodyElementSetLink , -- ** dOMHTMLBodyElementSetText + DOMHTMLBodyElementSetTextMethodInfo , dOMHTMLBodyElementSetText , -- ** dOMHTMLBodyElementSetVLink + DOMHTMLBodyElementSetVLinkMethodInfo , dOMHTMLBodyElementSetVLink , @@ -145,6 +158,183 @@ noDOMHTMLBodyElement :: Maybe DOMHTMLBodyElement noDOMHTMLBodyElement = Nothing +type family ResolveDOMHTMLBodyElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLBodyElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLBodyElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLBodyElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLBodyElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLBodyElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLBodyElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLBodyElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLBodyElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLBodyElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLBodyElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLBodyElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLBodyElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLBodyElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLBodyElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLBodyElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLBodyElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLBodyElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLBodyElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLBodyElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLBodyElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLBodyElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLBodyElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLBodyElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLBodyElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLBodyElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLBodyElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLBodyElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLBodyElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLBodyElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLBodyElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLBodyElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLBodyElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLBodyElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLBodyElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLBodyElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLBodyElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLBodyElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLBodyElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLBodyElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLBodyElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLBodyElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLBodyElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLBodyElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLBodyElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLBodyElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLBodyElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLBodyElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLBodyElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLBodyElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLBodyElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLBodyElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLBodyElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLBodyElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLBodyElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLBodyElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLBodyElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLBodyElementMethod "getALink" o = DOMHTMLBodyElementGetALinkMethodInfo + ResolveDOMHTMLBodyElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLBodyElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLBodyElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLBodyElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLBodyElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLBodyElementMethod "getBackground" o = DOMHTMLBodyElementGetBackgroundMethodInfo + ResolveDOMHTMLBodyElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLBodyElementMethod "getBgColor" o = DOMHTMLBodyElementGetBgColorMethodInfo + ResolveDOMHTMLBodyElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLBodyElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLBodyElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLBodyElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLBodyElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLBodyElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLBodyElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLBodyElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLBodyElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLBodyElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLBodyElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLBodyElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLBodyElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLBodyElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLBodyElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLBodyElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLBodyElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLBodyElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLBodyElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLBodyElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLBodyElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLBodyElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLBodyElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLBodyElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLBodyElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLBodyElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLBodyElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLBodyElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLBodyElementMethod "getLink" o = DOMHTMLBodyElementGetLinkMethodInfo + ResolveDOMHTMLBodyElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLBodyElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLBodyElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLBodyElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLBodyElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLBodyElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLBodyElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLBodyElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLBodyElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLBodyElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLBodyElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLBodyElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLBodyElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLBodyElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLBodyElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLBodyElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLBodyElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLBodyElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLBodyElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLBodyElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLBodyElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLBodyElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLBodyElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLBodyElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLBodyElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLBodyElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLBodyElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLBodyElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLBodyElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLBodyElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLBodyElementMethod "getText" o = DOMHTMLBodyElementGetTextMethodInfo + ResolveDOMHTMLBodyElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLBodyElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLBodyElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLBodyElementMethod "getVLink" o = DOMHTMLBodyElementGetVLinkMethodInfo + ResolveDOMHTMLBodyElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLBodyElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLBodyElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLBodyElementMethod "setALink" o = DOMHTMLBodyElementSetALinkMethodInfo + ResolveDOMHTMLBodyElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLBodyElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLBodyElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLBodyElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLBodyElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLBodyElementMethod "setBackground" o = DOMHTMLBodyElementSetBackgroundMethodInfo + ResolveDOMHTMLBodyElementMethod "setBgColor" o = DOMHTMLBodyElementSetBgColorMethodInfo + ResolveDOMHTMLBodyElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLBodyElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLBodyElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLBodyElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLBodyElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLBodyElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLBodyElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLBodyElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLBodyElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLBodyElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLBodyElementMethod "setLink" o = DOMHTMLBodyElementSetLinkMethodInfo + ResolveDOMHTMLBodyElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLBodyElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLBodyElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLBodyElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLBodyElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLBodyElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLBodyElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLBodyElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLBodyElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLBodyElementMethod "setText" o = DOMHTMLBodyElementSetTextMethodInfo + ResolveDOMHTMLBodyElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLBodyElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLBodyElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLBodyElementMethod "setVLink" o = DOMHTMLBodyElementSetVLinkMethodInfo + ResolveDOMHTMLBodyElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLBodyElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLBodyElementMethod t DOMHTMLBodyElement, MethodInfo info DOMHTMLBodyElement p) => IsLabelProxy t (DOMHTMLBodyElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLBodyElementMethod t DOMHTMLBodyElement, MethodInfo info DOMHTMLBodyElement p) => IsLabel t (DOMHTMLBodyElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "a-link" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -164,7 +354,7 @@ type AttrSetTypeConstraint DOMHTMLBodyElementALinkPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLBodyElementALinkPropertyInfo = DOMHTMLBodyElementK type AttrGetType DOMHTMLBodyElementALinkPropertyInfo = T.Text - type AttrLabel DOMHTMLBodyElementALinkPropertyInfo = "DOMHTMLBodyElement::a-link" + type AttrLabel DOMHTMLBodyElementALinkPropertyInfo = "a-link" attrGet _ = getDOMHTMLBodyElementALink attrSet _ = setDOMHTMLBodyElementALink attrConstruct _ = constructDOMHTMLBodyElementALink @@ -188,7 +378,7 @@ type AttrSetTypeConstraint DOMHTMLBodyElementBackgroundPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLBodyElementBackgroundPropertyInfo = DOMHTMLBodyElementK type AttrGetType DOMHTMLBodyElementBackgroundPropertyInfo = T.Text - type AttrLabel DOMHTMLBodyElementBackgroundPropertyInfo = "DOMHTMLBodyElement::background" + type AttrLabel DOMHTMLBodyElementBackgroundPropertyInfo = "background" attrGet _ = getDOMHTMLBodyElementBackground attrSet _ = setDOMHTMLBodyElementBackground attrConstruct _ = constructDOMHTMLBodyElementBackground @@ -212,7 +402,7 @@ type AttrSetTypeConstraint DOMHTMLBodyElementBgColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLBodyElementBgColorPropertyInfo = DOMHTMLBodyElementK type AttrGetType DOMHTMLBodyElementBgColorPropertyInfo = T.Text - type AttrLabel DOMHTMLBodyElementBgColorPropertyInfo = "DOMHTMLBodyElement::bg-color" + type AttrLabel DOMHTMLBodyElementBgColorPropertyInfo = "bg-color" attrGet _ = getDOMHTMLBodyElementBgColor attrSet _ = setDOMHTMLBodyElementBgColor attrConstruct _ = constructDOMHTMLBodyElementBgColor @@ -236,7 +426,7 @@ type AttrSetTypeConstraint DOMHTMLBodyElementLinkPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLBodyElementLinkPropertyInfo = DOMHTMLBodyElementK type AttrGetType DOMHTMLBodyElementLinkPropertyInfo = T.Text - type AttrLabel DOMHTMLBodyElementLinkPropertyInfo = "DOMHTMLBodyElement::link" + type AttrLabel DOMHTMLBodyElementLinkPropertyInfo = "link" attrGet _ = getDOMHTMLBodyElementLink attrSet _ = setDOMHTMLBodyElementLink attrConstruct _ = constructDOMHTMLBodyElementLink @@ -260,7 +450,7 @@ type AttrSetTypeConstraint DOMHTMLBodyElementTextPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLBodyElementTextPropertyInfo = DOMHTMLBodyElementK type AttrGetType DOMHTMLBodyElementTextPropertyInfo = T.Text - type AttrLabel DOMHTMLBodyElementTextPropertyInfo = "DOMHTMLBodyElement::text" + type AttrLabel DOMHTMLBodyElementTextPropertyInfo = "text" attrGet _ = getDOMHTMLBodyElementText attrSet _ = setDOMHTMLBodyElementText attrConstruct _ = constructDOMHTMLBodyElementText @@ -284,22 +474,21 @@ type AttrSetTypeConstraint DOMHTMLBodyElementVLinkPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLBodyElementVLinkPropertyInfo = DOMHTMLBodyElementK type AttrGetType DOMHTMLBodyElementVLinkPropertyInfo = T.Text - type AttrLabel DOMHTMLBodyElementVLinkPropertyInfo = "DOMHTMLBodyElement::v-link" + type AttrLabel DOMHTMLBodyElementVLinkPropertyInfo = "v-link" attrGet _ = getDOMHTMLBodyElementVLink attrSet _ = setDOMHTMLBodyElementVLink attrConstruct _ = constructDOMHTMLBodyElementVLink type instance AttributeList DOMHTMLBodyElement = DOMHTMLBodyElementAttributeList -type DOMHTMLBodyElementAttributeList = ('[ '("a-link", DOMHTMLBodyElementALinkPropertyInfo), '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("background", DOMHTMLBodyElementBackgroundPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("bg-color", DOMHTMLBodyElementBgColorPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("link", DOMHTMLBodyElementLinkPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text", DOMHTMLBodyElementTextPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("v-link", DOMHTMLBodyElementVLinkPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLBodyElementAttributeList = ('[ '("aLink", DOMHTMLBodyElementALinkPropertyInfo), '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("background", DOMHTMLBodyElementBackgroundPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("bgColor", DOMHTMLBodyElementBgColorPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("link", DOMHTMLBodyElementLinkPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("text", DOMHTMLBodyElementTextPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("vLink", DOMHTMLBodyElementVLinkPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLBodyElement = DOMHTMLBodyElementSignalList -type DOMHTMLBodyElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLBodyElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLBodyElement::get_a_link -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -311,8 +500,8 @@ dOMHTMLBodyElementGetALink :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLBodyElementGetALink _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_body_element_get_a_link _obj' @@ -322,11 +511,14 @@ touchManagedPtr _obj return result' +data DOMHTMLBodyElementGetALinkMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementGetALinkMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementGetALink + -- method DOMHTMLBodyElement::get_background -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -338,8 +530,8 @@ dOMHTMLBodyElementGetBackground :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLBodyElementGetBackground _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_body_element_get_background _obj' @@ -349,11 +541,14 @@ touchManagedPtr _obj return result' +data DOMHTMLBodyElementGetBackgroundMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementGetBackgroundMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementGetBackground + -- method DOMHTMLBodyElement::get_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -365,8 +560,8 @@ dOMHTMLBodyElementGetBgColor :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLBodyElementGetBgColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_body_element_get_bg_color _obj' @@ -376,11 +571,14 @@ touchManagedPtr _obj return result' +data DOMHTMLBodyElementGetBgColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementGetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementGetBgColor + -- method DOMHTMLBodyElement::get_link -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -392,8 +590,8 @@ dOMHTMLBodyElementGetLink :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLBodyElementGetLink _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_body_element_get_link _obj' @@ -403,11 +601,14 @@ touchManagedPtr _obj return result' +data DOMHTMLBodyElementGetLinkMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementGetLinkMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementGetLink + -- method DOMHTMLBodyElement::get_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -419,8 +620,8 @@ dOMHTMLBodyElementGetText :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLBodyElementGetText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_body_element_get_text _obj' @@ -430,11 +631,14 @@ touchManagedPtr _obj return result' +data DOMHTMLBodyElementGetTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementGetTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementGetText + -- method DOMHTMLBodyElement::get_v_link -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -446,8 +650,8 @@ dOMHTMLBodyElementGetVLink :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLBodyElementGetVLink _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_body_element_get_v_link _obj' @@ -457,11 +661,14 @@ touchManagedPtr _obj return result' +data DOMHTMLBodyElementGetVLinkMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementGetVLinkMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementGetVLink + -- method DOMHTMLBodyElement::set_a_link -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -474,9 +681,9 @@ dOMHTMLBodyElementSetALink :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLBodyElementSetALink _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -485,11 +692,14 @@ freeMem value' return () +data DOMHTMLBodyElementSetALinkMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementSetALinkMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementSetALink + -- method DOMHTMLBodyElement::set_background -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -502,9 +712,9 @@ dOMHTMLBodyElementSetBackground :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLBodyElementSetBackground _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -513,11 +723,14 @@ freeMem value' return () +data DOMHTMLBodyElementSetBackgroundMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementSetBackgroundMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementSetBackground + -- method DOMHTMLBodyElement::set_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -530,9 +743,9 @@ dOMHTMLBodyElementSetBgColor :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLBodyElementSetBgColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -541,11 +754,14 @@ freeMem value' return () +data DOMHTMLBodyElementSetBgColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementSetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementSetBgColor + -- method DOMHTMLBodyElement::set_link -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -558,9 +774,9 @@ dOMHTMLBodyElementSetLink :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLBodyElementSetLink _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -569,11 +785,14 @@ freeMem value' return () +data DOMHTMLBodyElementSetLinkMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementSetLinkMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementSetLink + -- method DOMHTMLBodyElement::set_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -586,9 +805,9 @@ dOMHTMLBodyElementSetText :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLBodyElementSetText _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -597,11 +816,14 @@ freeMem value' return () +data DOMHTMLBodyElementSetTextMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementSetTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementSetText + -- method DOMHTMLBodyElement::set_v_link -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLBodyElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -614,9 +836,9 @@ dOMHTMLBodyElementSetVLink :: (MonadIO m, DOMHTMLBodyElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLBodyElementSetVLink _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -624,5 +846,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLBodyElementSetVLinkMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLBodyElementK a) => MethodInfo DOMHTMLBodyElementSetVLinkMethodInfo a signature where + overloadedMethod _ = dOMHTMLBodyElementSetVLink diff --git a/GI/WebKit/Objects/DOMHTMLBodyElement.hs-boot b/GI/WebKit/Objects/DOMHTMLBodyElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLBodyElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLBodyElement.hs-boot @@ -17,3 +17,15 @@ data DOMHTMLBodyElementLinkPropertyInfo data DOMHTMLBodyElementTextPropertyInfo data DOMHTMLBodyElementVLinkPropertyInfo +data DOMHTMLBodyElementGetALinkMethodInfo +data DOMHTMLBodyElementGetBackgroundMethodInfo +data DOMHTMLBodyElementGetBgColorMethodInfo +data DOMHTMLBodyElementGetLinkMethodInfo +data DOMHTMLBodyElementGetTextMethodInfo +data DOMHTMLBodyElementGetVLinkMethodInfo +data DOMHTMLBodyElementSetALinkMethodInfo +data DOMHTMLBodyElementSetBackgroundMethodInfo +data DOMHTMLBodyElementSetBgColorMethodInfo +data DOMHTMLBodyElementSetLinkMethodInfo +data DOMHTMLBodyElementSetTextMethodInfo +data DOMHTMLBodyElementSetVLinkMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLButtonElement.hs b/GI/WebKit/Objects/DOMHTMLButtonElement.hs --- a/GI/WebKit/Objects/DOMHTMLButtonElement.hs +++ b/GI/WebKit/Objects/DOMHTMLButtonElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,102 +18,127 @@ -- * Methods -- ** dOMHTMLButtonElementCheckValidity + DOMHTMLButtonElementCheckValidityMethodInfo, dOMHTMLButtonElementCheckValidity , -- ** dOMHTMLButtonElementGetAutofocus + DOMHTMLButtonElementGetAutofocusMethodInfo, dOMHTMLButtonElementGetAutofocus , -- ** dOMHTMLButtonElementGetDisabled + DOMHTMLButtonElementGetDisabledMethodInfo, dOMHTMLButtonElementGetDisabled , -- ** dOMHTMLButtonElementGetForm + DOMHTMLButtonElementGetFormMethodInfo , dOMHTMLButtonElementGetForm , -- ** dOMHTMLButtonElementGetFormAction + DOMHTMLButtonElementGetFormActionMethodInfo, dOMHTMLButtonElementGetFormAction , -- ** dOMHTMLButtonElementGetFormEnctype + DOMHTMLButtonElementGetFormEnctypeMethodInfo, dOMHTMLButtonElementGetFormEnctype , -- ** dOMHTMLButtonElementGetFormMethod + DOMHTMLButtonElementGetFormMethodMethodInfo, dOMHTMLButtonElementGetFormMethod , -- ** dOMHTMLButtonElementGetFormNoValidate + DOMHTMLButtonElementGetFormNoValidateMethodInfo, dOMHTMLButtonElementGetFormNoValidate , -- ** dOMHTMLButtonElementGetFormTarget + DOMHTMLButtonElementGetFormTargetMethodInfo, dOMHTMLButtonElementGetFormTarget , -- ** dOMHTMLButtonElementGetLabels + DOMHTMLButtonElementGetLabelsMethodInfo , dOMHTMLButtonElementGetLabels , -- ** dOMHTMLButtonElementGetName + DOMHTMLButtonElementGetNameMethodInfo , dOMHTMLButtonElementGetName , -- ** dOMHTMLButtonElementGetValidationMessage + DOMHTMLButtonElementGetValidationMessageMethodInfo, dOMHTMLButtonElementGetValidationMessage, -- ** dOMHTMLButtonElementGetValidity + DOMHTMLButtonElementGetValidityMethodInfo, dOMHTMLButtonElementGetValidity , -- ** dOMHTMLButtonElementGetValue + DOMHTMLButtonElementGetValueMethodInfo , dOMHTMLButtonElementGetValue , -- ** dOMHTMLButtonElementGetWillValidate + DOMHTMLButtonElementGetWillValidateMethodInfo, dOMHTMLButtonElementGetWillValidate , -- ** dOMHTMLButtonElementSetAutofocus + DOMHTMLButtonElementSetAutofocusMethodInfo, dOMHTMLButtonElementSetAutofocus , -- ** dOMHTMLButtonElementSetCustomValidity + DOMHTMLButtonElementSetCustomValidityMethodInfo, dOMHTMLButtonElementSetCustomValidity , -- ** dOMHTMLButtonElementSetDisabled + DOMHTMLButtonElementSetDisabledMethodInfo, dOMHTMLButtonElementSetDisabled , -- ** dOMHTMLButtonElementSetFormAction + DOMHTMLButtonElementSetFormActionMethodInfo, dOMHTMLButtonElementSetFormAction , -- ** dOMHTMLButtonElementSetFormEnctype + DOMHTMLButtonElementSetFormEnctypeMethodInfo, dOMHTMLButtonElementSetFormEnctype , -- ** dOMHTMLButtonElementSetFormMethod + DOMHTMLButtonElementSetFormMethodMethodInfo, dOMHTMLButtonElementSetFormMethod , -- ** dOMHTMLButtonElementSetFormNoValidate + DOMHTMLButtonElementSetFormNoValidateMethodInfo, dOMHTMLButtonElementSetFormNoValidate , -- ** dOMHTMLButtonElementSetFormTarget + DOMHTMLButtonElementSetFormTargetMethodInfo, dOMHTMLButtonElementSetFormTarget , -- ** dOMHTMLButtonElementSetName + DOMHTMLButtonElementSetNameMethodInfo , dOMHTMLButtonElementSetName , -- ** dOMHTMLButtonElementSetValue + DOMHTMLButtonElementSetValueMethodInfo , dOMHTMLButtonElementSetValue , @@ -250,6 +276,196 @@ noDOMHTMLButtonElement :: Maybe DOMHTMLButtonElement noDOMHTMLButtonElement = Nothing +type family ResolveDOMHTMLButtonElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLButtonElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLButtonElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLButtonElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLButtonElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLButtonElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLButtonElementMethod "checkValidity" o = DOMHTMLButtonElementCheckValidityMethodInfo + ResolveDOMHTMLButtonElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLButtonElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLButtonElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLButtonElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLButtonElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLButtonElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLButtonElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLButtonElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLButtonElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLButtonElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLButtonElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLButtonElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLButtonElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLButtonElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLButtonElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLButtonElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLButtonElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLButtonElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLButtonElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLButtonElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLButtonElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLButtonElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLButtonElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLButtonElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLButtonElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLButtonElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLButtonElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLButtonElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLButtonElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLButtonElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLButtonElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLButtonElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLButtonElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLButtonElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLButtonElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLButtonElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLButtonElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLButtonElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLButtonElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLButtonElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLButtonElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLButtonElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLButtonElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLButtonElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLButtonElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLButtonElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLButtonElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLButtonElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLButtonElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLButtonElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLButtonElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLButtonElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLButtonElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLButtonElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLButtonElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLButtonElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLButtonElementMethod "getAutofocus" o = DOMHTMLButtonElementGetAutofocusMethodInfo + ResolveDOMHTMLButtonElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLButtonElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLButtonElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLButtonElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLButtonElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLButtonElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLButtonElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLButtonElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLButtonElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLButtonElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLButtonElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLButtonElementMethod "getDisabled" o = DOMHTMLButtonElementGetDisabledMethodInfo + ResolveDOMHTMLButtonElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLButtonElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLButtonElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLButtonElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLButtonElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLButtonElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLButtonElementMethod "getForm" o = DOMHTMLButtonElementGetFormMethodInfo + ResolveDOMHTMLButtonElementMethod "getFormAction" o = DOMHTMLButtonElementGetFormActionMethodInfo + ResolveDOMHTMLButtonElementMethod "getFormEnctype" o = DOMHTMLButtonElementGetFormEnctypeMethodInfo + ResolveDOMHTMLButtonElementMethod "getFormMethod" o = DOMHTMLButtonElementGetFormMethodMethodInfo + ResolveDOMHTMLButtonElementMethod "getFormNoValidate" o = DOMHTMLButtonElementGetFormNoValidateMethodInfo + ResolveDOMHTMLButtonElementMethod "getFormTarget" o = DOMHTMLButtonElementGetFormTargetMethodInfo + ResolveDOMHTMLButtonElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLButtonElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLButtonElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLButtonElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLButtonElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLButtonElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLButtonElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLButtonElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLButtonElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLButtonElementMethod "getLabels" o = DOMHTMLButtonElementGetLabelsMethodInfo + ResolveDOMHTMLButtonElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLButtonElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLButtonElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLButtonElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLButtonElementMethod "getName" o = DOMHTMLButtonElementGetNameMethodInfo + ResolveDOMHTMLButtonElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLButtonElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLButtonElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLButtonElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLButtonElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLButtonElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLButtonElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLButtonElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLButtonElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLButtonElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLButtonElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLButtonElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLButtonElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLButtonElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLButtonElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLButtonElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLButtonElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLButtonElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLButtonElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLButtonElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLButtonElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLButtonElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLButtonElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLButtonElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLButtonElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLButtonElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLButtonElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLButtonElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLButtonElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLButtonElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLButtonElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLButtonElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLButtonElementMethod "getValidationMessage" o = DOMHTMLButtonElementGetValidationMessageMethodInfo + ResolveDOMHTMLButtonElementMethod "getValidity" o = DOMHTMLButtonElementGetValidityMethodInfo + ResolveDOMHTMLButtonElementMethod "getValue" o = DOMHTMLButtonElementGetValueMethodInfo + ResolveDOMHTMLButtonElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLButtonElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLButtonElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLButtonElementMethod "getWillValidate" o = DOMHTMLButtonElementGetWillValidateMethodInfo + ResolveDOMHTMLButtonElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLButtonElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLButtonElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLButtonElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLButtonElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLButtonElementMethod "setAutofocus" o = DOMHTMLButtonElementSetAutofocusMethodInfo + ResolveDOMHTMLButtonElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLButtonElementMethod "setCustomValidity" o = DOMHTMLButtonElementSetCustomValidityMethodInfo + ResolveDOMHTMLButtonElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLButtonElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLButtonElementMethod "setDisabled" o = DOMHTMLButtonElementSetDisabledMethodInfo + ResolveDOMHTMLButtonElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLButtonElementMethod "setFormAction" o = DOMHTMLButtonElementSetFormActionMethodInfo + ResolveDOMHTMLButtonElementMethod "setFormEnctype" o = DOMHTMLButtonElementSetFormEnctypeMethodInfo + ResolveDOMHTMLButtonElementMethod "setFormMethod" o = DOMHTMLButtonElementSetFormMethodMethodInfo + ResolveDOMHTMLButtonElementMethod "setFormNoValidate" o = DOMHTMLButtonElementSetFormNoValidateMethodInfo + ResolveDOMHTMLButtonElementMethod "setFormTarget" o = DOMHTMLButtonElementSetFormTargetMethodInfo + ResolveDOMHTMLButtonElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLButtonElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLButtonElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLButtonElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLButtonElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLButtonElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLButtonElementMethod "setName" o = DOMHTMLButtonElementSetNameMethodInfo + ResolveDOMHTMLButtonElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLButtonElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLButtonElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLButtonElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLButtonElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLButtonElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLButtonElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLButtonElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLButtonElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLButtonElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLButtonElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLButtonElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLButtonElementMethod "setValue" o = DOMHTMLButtonElementSetValueMethodInfo + ResolveDOMHTMLButtonElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLButtonElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLButtonElementMethod t DOMHTMLButtonElement, MethodInfo info DOMHTMLButtonElement p) => IsLabelProxy t (DOMHTMLButtonElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLButtonElementMethod t DOMHTMLButtonElement, MethodInfo info DOMHTMLButtonElement p) => IsLabel t (DOMHTMLButtonElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "autofocus" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -269,7 +485,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementAutofocusPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLButtonElementAutofocusPropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementAutofocusPropertyInfo = Bool - type AttrLabel DOMHTMLButtonElementAutofocusPropertyInfo = "DOMHTMLButtonElement::autofocus" + type AttrLabel DOMHTMLButtonElementAutofocusPropertyInfo = "autofocus" attrGet _ = getDOMHTMLButtonElementAutofocus attrSet _ = setDOMHTMLButtonElementAutofocus attrConstruct _ = constructDOMHTMLButtonElementAutofocus @@ -293,7 +509,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementDisabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLButtonElementDisabledPropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementDisabledPropertyInfo = Bool - type AttrLabel DOMHTMLButtonElementDisabledPropertyInfo = "DOMHTMLButtonElement::disabled" + type AttrLabel DOMHTMLButtonElementDisabledPropertyInfo = "disabled" attrGet _ = getDOMHTMLButtonElementDisabled attrSet _ = setDOMHTMLButtonElementDisabled attrConstruct _ = constructDOMHTMLButtonElementDisabled @@ -311,7 +527,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementFormPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLButtonElementFormPropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementFormPropertyInfo = DOMHTMLFormElement - type AttrLabel DOMHTMLButtonElementFormPropertyInfo = "DOMHTMLButtonElement::form" + type AttrLabel DOMHTMLButtonElementFormPropertyInfo = "form" attrGet _ = getDOMHTMLButtonElementForm attrSet _ = undefined attrConstruct _ = undefined @@ -335,7 +551,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementFormActionPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLButtonElementFormActionPropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementFormActionPropertyInfo = T.Text - type AttrLabel DOMHTMLButtonElementFormActionPropertyInfo = "DOMHTMLButtonElement::form-action" + type AttrLabel DOMHTMLButtonElementFormActionPropertyInfo = "form-action" attrGet _ = getDOMHTMLButtonElementFormAction attrSet _ = setDOMHTMLButtonElementFormAction attrConstruct _ = constructDOMHTMLButtonElementFormAction @@ -359,7 +575,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementFormEnctypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLButtonElementFormEnctypePropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementFormEnctypePropertyInfo = T.Text - type AttrLabel DOMHTMLButtonElementFormEnctypePropertyInfo = "DOMHTMLButtonElement::form-enctype" + type AttrLabel DOMHTMLButtonElementFormEnctypePropertyInfo = "form-enctype" attrGet _ = getDOMHTMLButtonElementFormEnctype attrSet _ = setDOMHTMLButtonElementFormEnctype attrConstruct _ = constructDOMHTMLButtonElementFormEnctype @@ -383,7 +599,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementFormMethodPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLButtonElementFormMethodPropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementFormMethodPropertyInfo = T.Text - type AttrLabel DOMHTMLButtonElementFormMethodPropertyInfo = "DOMHTMLButtonElement::form-method" + type AttrLabel DOMHTMLButtonElementFormMethodPropertyInfo = "form-method" attrGet _ = getDOMHTMLButtonElementFormMethod attrSet _ = setDOMHTMLButtonElementFormMethod attrConstruct _ = constructDOMHTMLButtonElementFormMethod @@ -407,7 +623,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementFormNoValidatePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLButtonElementFormNoValidatePropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementFormNoValidatePropertyInfo = Bool - type AttrLabel DOMHTMLButtonElementFormNoValidatePropertyInfo = "DOMHTMLButtonElement::form-no-validate" + type AttrLabel DOMHTMLButtonElementFormNoValidatePropertyInfo = "form-no-validate" attrGet _ = getDOMHTMLButtonElementFormNoValidate attrSet _ = setDOMHTMLButtonElementFormNoValidate attrConstruct _ = constructDOMHTMLButtonElementFormNoValidate @@ -431,7 +647,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementFormTargetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLButtonElementFormTargetPropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementFormTargetPropertyInfo = T.Text - type AttrLabel DOMHTMLButtonElementFormTargetPropertyInfo = "DOMHTMLButtonElement::form-target" + type AttrLabel DOMHTMLButtonElementFormTargetPropertyInfo = "form-target" attrGet _ = getDOMHTMLButtonElementFormTarget attrSet _ = setDOMHTMLButtonElementFormTarget attrConstruct _ = constructDOMHTMLButtonElementFormTarget @@ -449,7 +665,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementLabelsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLButtonElementLabelsPropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementLabelsPropertyInfo = DOMNodeList - type AttrLabel DOMHTMLButtonElementLabelsPropertyInfo = "DOMHTMLButtonElement::labels" + type AttrLabel DOMHTMLButtonElementLabelsPropertyInfo = "labels" attrGet _ = getDOMHTMLButtonElementLabels attrSet _ = undefined attrConstruct _ = undefined @@ -473,7 +689,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLButtonElementNamePropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLButtonElementNamePropertyInfo = "DOMHTMLButtonElement::name" + type AttrLabel DOMHTMLButtonElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLButtonElementName attrSet _ = setDOMHTMLButtonElementName attrConstruct _ = constructDOMHTMLButtonElementName @@ -497,7 +713,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLButtonElementTypePropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLButtonElementTypePropertyInfo = "DOMHTMLButtonElement::type" + type AttrLabel DOMHTMLButtonElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLButtonElementType attrSet _ = setDOMHTMLButtonElementType attrConstruct _ = constructDOMHTMLButtonElementType @@ -515,7 +731,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementValidationMessagePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLButtonElementValidationMessagePropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementValidationMessagePropertyInfo = T.Text - type AttrLabel DOMHTMLButtonElementValidationMessagePropertyInfo = "DOMHTMLButtonElement::validation-message" + type AttrLabel DOMHTMLButtonElementValidationMessagePropertyInfo = "validation-message" attrGet _ = getDOMHTMLButtonElementValidationMessage attrSet _ = undefined attrConstruct _ = undefined @@ -533,7 +749,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementValidityPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLButtonElementValidityPropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementValidityPropertyInfo = DOMValidityState - type AttrLabel DOMHTMLButtonElementValidityPropertyInfo = "DOMHTMLButtonElement::validity" + type AttrLabel DOMHTMLButtonElementValidityPropertyInfo = "validity" attrGet _ = getDOMHTMLButtonElementValidity attrSet _ = undefined attrConstruct _ = undefined @@ -557,7 +773,7 @@ type AttrSetTypeConstraint DOMHTMLButtonElementValuePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLButtonElementValuePropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementValuePropertyInfo = T.Text - type AttrLabel DOMHTMLButtonElementValuePropertyInfo = "DOMHTMLButtonElement::value" + type AttrLabel DOMHTMLButtonElementValuePropertyInfo = "value" attrGet _ = getDOMHTMLButtonElementValue attrSet _ = setDOMHTMLButtonElementValue attrConstruct _ = constructDOMHTMLButtonElementValue @@ -575,22 +791,21 @@ type AttrSetTypeConstraint DOMHTMLButtonElementWillValidatePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLButtonElementWillValidatePropertyInfo = DOMHTMLButtonElementK type AttrGetType DOMHTMLButtonElementWillValidatePropertyInfo = Bool - type AttrLabel DOMHTMLButtonElementWillValidatePropertyInfo = "DOMHTMLButtonElement::will-validate" + type AttrLabel DOMHTMLButtonElementWillValidatePropertyInfo = "will-validate" attrGet _ = getDOMHTMLButtonElementWillValidate attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHTMLButtonElement = DOMHTMLButtonElementAttributeList -type DOMHTMLButtonElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autofocus", DOMHTMLButtonElementAutofocusPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLButtonElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLButtonElementFormPropertyInfo), '("form-action", DOMHTMLButtonElementFormActionPropertyInfo), '("form-enctype", DOMHTMLButtonElementFormEnctypePropertyInfo), '("form-method", DOMHTMLButtonElementFormMethodPropertyInfo), '("form-no-validate", DOMHTMLButtonElementFormNoValidatePropertyInfo), '("form-target", DOMHTMLButtonElementFormTargetPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLButtonElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLButtonElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLButtonElementTypePropertyInfo), '("validation-message", DOMHTMLButtonElementValidationMessagePropertyInfo), '("validity", DOMHTMLButtonElementValidityPropertyInfo), '("value", DOMHTMLButtonElementValuePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("will-validate", DOMHTMLButtonElementWillValidatePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLButtonElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autofocus", DOMHTMLButtonElementAutofocusPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLButtonElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLButtonElementFormPropertyInfo), '("formAction", DOMHTMLButtonElementFormActionPropertyInfo), '("formEnctype", DOMHTMLButtonElementFormEnctypePropertyInfo), '("formMethod", DOMHTMLButtonElementFormMethodPropertyInfo), '("formNoValidate", DOMHTMLButtonElementFormNoValidatePropertyInfo), '("formTarget", DOMHTMLButtonElementFormTargetPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLButtonElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLButtonElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLButtonElementTypePropertyInfo), '("validationMessage", DOMHTMLButtonElementValidationMessagePropertyInfo), '("validity", DOMHTMLButtonElementValidityPropertyInfo), '("value", DOMHTMLButtonElementValuePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("willValidate", DOMHTMLButtonElementWillValidatePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLButtonElement = DOMHTMLButtonElementSignalList -type DOMHTMLButtonElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLButtonElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLButtonElement::check_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -602,8 +817,8 @@ dOMHTMLButtonElementCheckValidity :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLButtonElementCheckValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_check_validity _obj' @@ -611,11 +826,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementCheckValidityMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementCheckValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementCheckValidity + -- method DOMHTMLButtonElement::get_autofocus -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -627,8 +845,8 @@ dOMHTMLButtonElementGetAutofocus :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLButtonElementGetAutofocus _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_autofocus _obj' @@ -636,11 +854,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetAutofocusMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetAutofocusMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetAutofocus + -- method DOMHTMLButtonElement::get_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -652,8 +873,8 @@ dOMHTMLButtonElementGetDisabled :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLButtonElementGetDisabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_disabled _obj' @@ -661,11 +882,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetDisabled + -- method DOMHTMLButtonElement::get_form -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLFormElement" -- throws : False -- Skip return : False @@ -677,8 +901,8 @@ dOMHTMLButtonElementGetForm :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m DOMHTMLFormElement + a -- _obj + -> m DOMHTMLFormElement -- result dOMHTMLButtonElementGetForm _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_form _obj' @@ -687,11 +911,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetFormMethodInfo +instance (signature ~ (m DOMHTMLFormElement), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetFormMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetForm + -- method DOMHTMLButtonElement::get_form_action -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -703,8 +930,8 @@ dOMHTMLButtonElementGetFormAction :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLButtonElementGetFormAction _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_form_action _obj' @@ -714,11 +941,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetFormActionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetFormActionMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetFormAction + -- method DOMHTMLButtonElement::get_form_enctype -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -730,8 +960,8 @@ dOMHTMLButtonElementGetFormEnctype :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLButtonElementGetFormEnctype _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_form_enctype _obj' @@ -741,11 +971,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetFormEnctypeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetFormEnctypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetFormEnctype + -- method DOMHTMLButtonElement::get_form_method -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -757,8 +990,8 @@ dOMHTMLButtonElementGetFormMethod :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLButtonElementGetFormMethod _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_form_method _obj' @@ -768,11 +1001,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetFormMethodMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetFormMethodMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetFormMethod + -- method DOMHTMLButtonElement::get_form_no_validate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -784,8 +1020,8 @@ dOMHTMLButtonElementGetFormNoValidate :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLButtonElementGetFormNoValidate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_form_no_validate _obj' @@ -793,11 +1029,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetFormNoValidateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetFormNoValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetFormNoValidate + -- method DOMHTMLButtonElement::get_form_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -809,8 +1048,8 @@ dOMHTMLButtonElementGetFormTarget :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLButtonElementGetFormTarget _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_form_target _obj' @@ -820,11 +1059,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetFormTargetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetFormTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetFormTarget + -- method DOMHTMLButtonElement::get_labels -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -836,8 +1078,8 @@ dOMHTMLButtonElementGetLabels :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m DOMNodeList + a -- _obj + -> m DOMNodeList -- result dOMHTMLButtonElementGetLabels _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_labels _obj' @@ -846,11 +1088,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetLabelsMethodInfo +instance (signature ~ (m DOMNodeList), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetLabelsMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetLabels + -- method DOMHTMLButtonElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -862,8 +1107,8 @@ dOMHTMLButtonElementGetName :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLButtonElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_name _obj' @@ -873,11 +1118,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetName + -- method DOMHTMLButtonElement::get_validation_message -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -889,8 +1137,8 @@ dOMHTMLButtonElementGetValidationMessage :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLButtonElementGetValidationMessage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_validation_message _obj' @@ -900,11 +1148,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetValidationMessageMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetValidationMessageMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetValidationMessage + -- method DOMHTMLButtonElement::get_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMValidityState" -- throws : False -- Skip return : False @@ -916,8 +1167,8 @@ dOMHTMLButtonElementGetValidity :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m DOMValidityState + a -- _obj + -> m DOMValidityState -- result dOMHTMLButtonElementGetValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_validity _obj' @@ -926,11 +1177,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetValidityMethodInfo +instance (signature ~ (m DOMValidityState), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetValidity + -- method DOMHTMLButtonElement::get_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -942,8 +1196,8 @@ dOMHTMLButtonElementGetValue :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLButtonElementGetValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_value _obj' @@ -953,11 +1207,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetValue + -- method DOMHTMLButtonElement::get_will_validate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -969,8 +1226,8 @@ dOMHTMLButtonElementGetWillValidate :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLButtonElementGetWillValidate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_button_element_get_will_validate _obj' @@ -978,11 +1235,14 @@ touchManagedPtr _obj return result' +data DOMHTMLButtonElementGetWillValidateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementGetWillValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementGetWillValidate + -- method DOMHTMLButtonElement::set_autofocus -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -995,9 +1255,9 @@ dOMHTMLButtonElementSetAutofocus :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLButtonElementSetAutofocus _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1005,11 +1265,14 @@ touchManagedPtr _obj return () +data DOMHTMLButtonElementSetAutofocusMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementSetAutofocusMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementSetAutofocus + -- method DOMHTMLButtonElement::set_custom_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1022,9 +1285,9 @@ dOMHTMLButtonElementSetCustomValidity :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - T.Text -> -- error - m () + a -- _obj + -> T.Text -- error_ + -> m () -- result dOMHTMLButtonElementSetCustomValidity _obj error_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj error_' <- textToCString error_ @@ -1033,11 +1296,14 @@ freeMem error_' return () +data DOMHTMLButtonElementSetCustomValidityMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementSetCustomValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementSetCustomValidity + -- method DOMHTMLButtonElement::set_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1050,9 +1316,9 @@ dOMHTMLButtonElementSetDisabled :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLButtonElementSetDisabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1060,11 +1326,14 @@ touchManagedPtr _obj return () +data DOMHTMLButtonElementSetDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementSetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementSetDisabled + -- method DOMHTMLButtonElement::set_form_action -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1077,9 +1346,9 @@ dOMHTMLButtonElementSetFormAction :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLButtonElementSetFormAction _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1088,11 +1357,14 @@ freeMem value' return () +data DOMHTMLButtonElementSetFormActionMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementSetFormActionMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementSetFormAction + -- method DOMHTMLButtonElement::set_form_enctype -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1105,9 +1377,9 @@ dOMHTMLButtonElementSetFormEnctype :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLButtonElementSetFormEnctype _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1116,11 +1388,14 @@ freeMem value' return () +data DOMHTMLButtonElementSetFormEnctypeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementSetFormEnctypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementSetFormEnctype + -- method DOMHTMLButtonElement::set_form_method -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1133,9 +1408,9 @@ dOMHTMLButtonElementSetFormMethod :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLButtonElementSetFormMethod _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1144,11 +1419,14 @@ freeMem value' return () +data DOMHTMLButtonElementSetFormMethodMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementSetFormMethodMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementSetFormMethod + -- method DOMHTMLButtonElement::set_form_no_validate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1161,9 +1439,9 @@ dOMHTMLButtonElementSetFormNoValidate :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLButtonElementSetFormNoValidate _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1171,11 +1449,14 @@ touchManagedPtr _obj return () +data DOMHTMLButtonElementSetFormNoValidateMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementSetFormNoValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementSetFormNoValidate + -- method DOMHTMLButtonElement::set_form_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1188,9 +1469,9 @@ dOMHTMLButtonElementSetFormTarget :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLButtonElementSetFormTarget _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1199,11 +1480,14 @@ freeMem value' return () +data DOMHTMLButtonElementSetFormTargetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementSetFormTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementSetFormTarget + -- method DOMHTMLButtonElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1216,9 +1500,9 @@ dOMHTMLButtonElementSetName :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLButtonElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1227,11 +1511,14 @@ freeMem value' return () +data DOMHTMLButtonElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementSetName + -- method DOMHTMLButtonElement::set_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLButtonElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1244,9 +1531,9 @@ dOMHTMLButtonElementSetValue :: (MonadIO m, DOMHTMLButtonElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLButtonElementSetValue _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1254,5 +1541,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLButtonElementSetValueMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLButtonElementK a) => MethodInfo DOMHTMLButtonElementSetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLButtonElementSetValue diff --git a/GI/WebKit/Objects/DOMHTMLButtonElement.hs-boot b/GI/WebKit/Objects/DOMHTMLButtonElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLButtonElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLButtonElement.hs-boot @@ -26,3 +26,28 @@ data DOMHTMLButtonElementValidityPropertyInfo data DOMHTMLButtonElementValuePropertyInfo data DOMHTMLButtonElementWillValidatePropertyInfo +data DOMHTMLButtonElementCheckValidityMethodInfo +data DOMHTMLButtonElementGetAutofocusMethodInfo +data DOMHTMLButtonElementGetDisabledMethodInfo +data DOMHTMLButtonElementGetFormMethodInfo +data DOMHTMLButtonElementGetFormActionMethodInfo +data DOMHTMLButtonElementGetFormEnctypeMethodInfo +data DOMHTMLButtonElementGetFormMethodMethodInfo +data DOMHTMLButtonElementGetFormNoValidateMethodInfo +data DOMHTMLButtonElementGetFormTargetMethodInfo +data DOMHTMLButtonElementGetLabelsMethodInfo +data DOMHTMLButtonElementGetNameMethodInfo +data DOMHTMLButtonElementGetValidationMessageMethodInfo +data DOMHTMLButtonElementGetValidityMethodInfo +data DOMHTMLButtonElementGetValueMethodInfo +data DOMHTMLButtonElementGetWillValidateMethodInfo +data DOMHTMLButtonElementSetAutofocusMethodInfo +data DOMHTMLButtonElementSetCustomValidityMethodInfo +data DOMHTMLButtonElementSetDisabledMethodInfo +data DOMHTMLButtonElementSetFormActionMethodInfo +data DOMHTMLButtonElementSetFormEnctypeMethodInfo +data DOMHTMLButtonElementSetFormMethodMethodInfo +data DOMHTMLButtonElementSetFormNoValidateMethodInfo +data DOMHTMLButtonElementSetFormTargetMethodInfo +data DOMHTMLButtonElementSetNameMethodInfo +data DOMHTMLButtonElementSetValueMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLCanvasElement.hs b/GI/WebKit/Objects/DOMHTMLCanvasElement.hs --- a/GI/WebKit/Objects/DOMHTMLCanvasElement.hs +++ b/GI/WebKit/Objects/DOMHTMLCanvasElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMHTMLCanvasElementGetHeight + DOMHTMLCanvasElementGetHeightMethodInfo , dOMHTMLCanvasElementGetHeight , -- ** dOMHTMLCanvasElementGetWidth + DOMHTMLCanvasElementGetWidthMethodInfo , dOMHTMLCanvasElementGetWidth , -- ** dOMHTMLCanvasElementSetHeight + DOMHTMLCanvasElementSetHeightMethodInfo , dOMHTMLCanvasElementSetHeight , -- ** dOMHTMLCanvasElementSetWidth + DOMHTMLCanvasElementSetWidthMethodInfo , dOMHTMLCanvasElementSetWidth , @@ -85,6 +90,175 @@ noDOMHTMLCanvasElement :: Maybe DOMHTMLCanvasElement noDOMHTMLCanvasElement = Nothing +type family ResolveDOMHTMLCanvasElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLCanvasElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLCanvasElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLCanvasElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLCanvasElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLCanvasElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLCanvasElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLCanvasElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLCanvasElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLCanvasElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLCanvasElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLCanvasElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLCanvasElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLCanvasElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLCanvasElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLCanvasElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLCanvasElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLCanvasElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLCanvasElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLCanvasElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLCanvasElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLCanvasElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLCanvasElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLCanvasElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLCanvasElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLCanvasElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLCanvasElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLCanvasElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLCanvasElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLCanvasElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLCanvasElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLCanvasElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLCanvasElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLCanvasElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLCanvasElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLCanvasElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLCanvasElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLCanvasElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLCanvasElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLCanvasElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLCanvasElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLCanvasElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLCanvasElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLCanvasElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLCanvasElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLCanvasElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLCanvasElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLCanvasElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLCanvasElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLCanvasElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLCanvasElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLCanvasElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLCanvasElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLCanvasElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLCanvasElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLCanvasElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLCanvasElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLCanvasElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLCanvasElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLCanvasElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLCanvasElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLCanvasElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLCanvasElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLCanvasElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLCanvasElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLCanvasElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLCanvasElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLCanvasElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLCanvasElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLCanvasElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLCanvasElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLCanvasElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLCanvasElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLCanvasElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLCanvasElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLCanvasElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLCanvasElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLCanvasElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLCanvasElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLCanvasElementMethod "getHeight" o = DOMHTMLCanvasElementGetHeightMethodInfo + ResolveDOMHTMLCanvasElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLCanvasElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLCanvasElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLCanvasElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLCanvasElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLCanvasElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLCanvasElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLCanvasElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLCanvasElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLCanvasElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLCanvasElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLCanvasElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLCanvasElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLCanvasElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLCanvasElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLCanvasElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLCanvasElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLCanvasElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLCanvasElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLCanvasElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLCanvasElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLCanvasElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLCanvasElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLCanvasElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLCanvasElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLCanvasElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLCanvasElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLCanvasElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLCanvasElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLCanvasElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLCanvasElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLCanvasElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLCanvasElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLCanvasElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLCanvasElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLCanvasElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLCanvasElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLCanvasElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLCanvasElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLCanvasElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLCanvasElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLCanvasElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLCanvasElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLCanvasElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLCanvasElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLCanvasElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLCanvasElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLCanvasElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLCanvasElementMethod "getWidth" o = DOMHTMLCanvasElementGetWidthMethodInfo + ResolveDOMHTMLCanvasElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLCanvasElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLCanvasElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLCanvasElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLCanvasElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLCanvasElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLCanvasElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLCanvasElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLCanvasElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLCanvasElementMethod "setHeight" o = DOMHTMLCanvasElementSetHeightMethodInfo + ResolveDOMHTMLCanvasElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLCanvasElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLCanvasElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLCanvasElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLCanvasElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLCanvasElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLCanvasElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLCanvasElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLCanvasElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLCanvasElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLCanvasElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLCanvasElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLCanvasElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLCanvasElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLCanvasElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLCanvasElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLCanvasElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLCanvasElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLCanvasElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLCanvasElementMethod "setWidth" o = DOMHTMLCanvasElementSetWidthMethodInfo + ResolveDOMHTMLCanvasElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLCanvasElementMethod t DOMHTMLCanvasElement, MethodInfo info DOMHTMLCanvasElement p) => IsLabelProxy t (DOMHTMLCanvasElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLCanvasElementMethod t DOMHTMLCanvasElement, MethodInfo info DOMHTMLCanvasElement p) => IsLabel t (DOMHTMLCanvasElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "height" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable,PropertyWritable] @@ -104,7 +278,7 @@ type AttrSetTypeConstraint DOMHTMLCanvasElementHeightPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLCanvasElementHeightPropertyInfo = DOMHTMLCanvasElementK type AttrGetType DOMHTMLCanvasElementHeightPropertyInfo = Int64 - type AttrLabel DOMHTMLCanvasElementHeightPropertyInfo = "DOMHTMLCanvasElement::height" + type AttrLabel DOMHTMLCanvasElementHeightPropertyInfo = "height" attrGet _ = getDOMHTMLCanvasElementHeight attrSet _ = setDOMHTMLCanvasElementHeight attrConstruct _ = constructDOMHTMLCanvasElementHeight @@ -128,22 +302,21 @@ type AttrSetTypeConstraint DOMHTMLCanvasElementWidthPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLCanvasElementWidthPropertyInfo = DOMHTMLCanvasElementK type AttrGetType DOMHTMLCanvasElementWidthPropertyInfo = Int64 - type AttrLabel DOMHTMLCanvasElementWidthPropertyInfo = "DOMHTMLCanvasElement::width" + type AttrLabel DOMHTMLCanvasElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLCanvasElementWidth attrSet _ = setDOMHTMLCanvasElementWidth attrConstruct _ = constructDOMHTMLCanvasElementWidth type instance AttributeList DOMHTMLCanvasElement = DOMHTMLCanvasElementAttributeList -type DOMHTMLCanvasElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLCanvasElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLCanvasElementWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLCanvasElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLCanvasElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLCanvasElementWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLCanvasElement = DOMHTMLCanvasElementSignalList -type DOMHTMLCanvasElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLCanvasElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLCanvasElement::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -155,19 +328,22 @@ dOMHTMLCanvasElementGetHeight :: (MonadIO m, DOMHTMLCanvasElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLCanvasElementGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_canvas_element_get_height _obj' touchManagedPtr _obj return result +data DOMHTMLCanvasElementGetHeightMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLCanvasElementK a) => MethodInfo DOMHTMLCanvasElementGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLCanvasElementGetHeight + -- method DOMHTMLCanvasElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -179,19 +355,22 @@ dOMHTMLCanvasElementGetWidth :: (MonadIO m, DOMHTMLCanvasElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLCanvasElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_canvas_element_get_width _obj' touchManagedPtr _obj return result +data DOMHTMLCanvasElementGetWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLCanvasElementK a) => MethodInfo DOMHTMLCanvasElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLCanvasElementGetWidth + -- method DOMHTMLCanvasElement::set_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -204,20 +383,23 @@ dOMHTMLCanvasElementSetHeight :: (MonadIO m, DOMHTMLCanvasElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLCanvasElementSetHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_canvas_element_set_height _obj' value touchManagedPtr _obj return () +data DOMHTMLCanvasElementSetHeightMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLCanvasElementK a) => MethodInfo DOMHTMLCanvasElementSetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLCanvasElementSetHeight + -- method DOMHTMLCanvasElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCanvasElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -230,13 +412,17 @@ dOMHTMLCanvasElementSetWidth :: (MonadIO m, DOMHTMLCanvasElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLCanvasElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_canvas_element_set_width _obj' value touchManagedPtr _obj return () + +data DOMHTMLCanvasElementSetWidthMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLCanvasElementK a) => MethodInfo DOMHTMLCanvasElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLCanvasElementSetWidth diff --git a/GI/WebKit/Objects/DOMHTMLCanvasElement.hs-boot b/GI/WebKit/Objects/DOMHTMLCanvasElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLCanvasElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLCanvasElement.hs-boot @@ -13,3 +13,7 @@ instance (GObject o, IsDescendantOf DOMHTMLCanvasElement o) => DOMHTMLCanvasElementK o data DOMHTMLCanvasElementHeightPropertyInfo data DOMHTMLCanvasElementWidthPropertyInfo +data DOMHTMLCanvasElementGetHeightMethodInfo +data DOMHTMLCanvasElementGetWidthMethodInfo +data DOMHTMLCanvasElementSetHeightMethodInfo +data DOMHTMLCanvasElementSetWidthMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLCollection.hs b/GI/WebKit/Objects/DOMHTMLCollection.hs --- a/GI/WebKit/Objects/DOMHTMLCollection.hs +++ b/GI/WebKit/Objects/DOMHTMLCollection.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMHTMLCollectionGetLength + DOMHTMLCollectionGetLengthMethodInfo , dOMHTMLCollectionGetLength , -- ** dOMHTMLCollectionItem + DOMHTMLCollectionItemMethodInfo , dOMHTMLCollectionItem , -- ** dOMHTMLCollectionNamedItem + DOMHTMLCollectionNamedItemMethodInfo , dOMHTMLCollectionNamedItem , @@ -72,6 +76,42 @@ noDOMHTMLCollection :: Maybe DOMHTMLCollection noDOMHTMLCollection = Nothing +type family ResolveDOMHTMLCollectionMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLCollectionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLCollectionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLCollectionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLCollectionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLCollectionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLCollectionMethod "item" o = DOMHTMLCollectionItemMethodInfo + ResolveDOMHTMLCollectionMethod "namedItem" o = DOMHTMLCollectionNamedItemMethodInfo + ResolveDOMHTMLCollectionMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLCollectionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLCollectionMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLCollectionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLCollectionMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLCollectionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLCollectionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLCollectionMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLCollectionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLCollectionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLCollectionMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLCollectionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLCollectionMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLCollectionMethod "getLength" o = DOMHTMLCollectionGetLengthMethodInfo + ResolveDOMHTMLCollectionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLCollectionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLCollectionMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLCollectionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLCollectionMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLCollectionMethod t DOMHTMLCollection, MethodInfo info DOMHTMLCollection p) => IsLabelProxy t (DOMHTMLCollection -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLCollectionMethod t DOMHTMLCollection, MethodInfo info DOMHTMLCollection p) => IsLabel t (DOMHTMLCollection -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -85,22 +125,21 @@ type AttrSetTypeConstraint DOMHTMLCollectionLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLCollectionLengthPropertyInfo = DOMHTMLCollectionK type AttrGetType DOMHTMLCollectionLengthPropertyInfo = Word64 - type AttrLabel DOMHTMLCollectionLengthPropertyInfo = "DOMHTMLCollection::length" + type AttrLabel DOMHTMLCollectionLengthPropertyInfo = "length" attrGet _ = getDOMHTMLCollectionLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHTMLCollection = DOMHTMLCollectionAttributeList -type DOMHTMLCollectionAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMHTMLCollectionLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLCollectionAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMHTMLCollectionLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLCollection = DOMHTMLCollectionSignalList -type DOMHTMLCollectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLCollectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLCollection::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -112,19 +151,22 @@ dOMHTMLCollectionGetLength :: (MonadIO m, DOMHTMLCollectionK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLCollectionGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_collection_get_length _obj' touchManagedPtr _obj return result +data DOMHTMLCollectionGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLCollectionK a) => MethodInfo DOMHTMLCollectionGetLengthMethodInfo a signature where + overloadedMethod _ = dOMHTMLCollectionGetLength + -- method DOMHTMLCollection::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -137,9 +179,9 @@ dOMHTMLCollectionItem :: (MonadIO m, DOMHTMLCollectionK a) => - a -> -- _obj - Word64 -> -- index - m DOMNode + a -- _obj + -> Word64 -- index + -> m DOMNode -- result dOMHTMLCollectionItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_collection_item _obj' index @@ -148,11 +190,14 @@ touchManagedPtr _obj return result' +data DOMHTMLCollectionItemMethodInfo +instance (signature ~ (Word64 -> m DOMNode), MonadIO m, DOMHTMLCollectionK a) => MethodInfo DOMHTMLCollectionItemMethodInfo a signature where + overloadedMethod _ = dOMHTMLCollectionItem + -- method DOMHTMLCollection::named_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -165,9 +210,9 @@ dOMHTMLCollectionNamedItem :: (MonadIO m, DOMHTMLCollectionK a) => - a -> -- _obj - T.Text -> -- name - m DOMNode + a -- _obj + -> T.Text -- name + -> m DOMNode -- result dOMHTMLCollectionNamedItem _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -177,5 +222,9 @@ touchManagedPtr _obj freeMem name' return result' + +data DOMHTMLCollectionNamedItemMethodInfo +instance (signature ~ (T.Text -> m DOMNode), MonadIO m, DOMHTMLCollectionK a) => MethodInfo DOMHTMLCollectionNamedItemMethodInfo a signature where + overloadedMethod _ = dOMHTMLCollectionNamedItem diff --git a/GI/WebKit/Objects/DOMHTMLCollection.hs-boot b/GI/WebKit/Objects/DOMHTMLCollection.hs-boot --- a/GI/WebKit/Objects/DOMHTMLCollection.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLCollection.hs-boot @@ -12,3 +12,6 @@ class GObject o => DOMHTMLCollectionK o instance (GObject o, IsDescendantOf DOMHTMLCollection o) => DOMHTMLCollectionK o data DOMHTMLCollectionLengthPropertyInfo +data DOMHTMLCollectionGetLengthMethodInfo +data DOMHTMLCollectionItemMethodInfo +data DOMHTMLCollectionNamedItemMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLDListElement.hs b/GI/WebKit/Objects/DOMHTMLDListElement.hs --- a/GI/WebKit/Objects/DOMHTMLDListElement.hs +++ b/GI/WebKit/Objects/DOMHTMLDListElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLDListElementGetCompact + DOMHTMLDListElementGetCompactMethodInfo , dOMHTMLDListElementGetCompact , -- ** dOMHTMLDListElementSetCompact + DOMHTMLDListElementSetCompactMethodInfo , dOMHTMLDListElementSetCompact , @@ -70,6 +73,173 @@ noDOMHTMLDListElement :: Maybe DOMHTMLDListElement noDOMHTMLDListElement = Nothing +type family ResolveDOMHTMLDListElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLDListElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLDListElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLDListElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLDListElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLDListElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLDListElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLDListElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLDListElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLDListElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLDListElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLDListElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLDListElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLDListElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLDListElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLDListElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLDListElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLDListElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLDListElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLDListElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLDListElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLDListElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLDListElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLDListElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLDListElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLDListElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLDListElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLDListElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLDListElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLDListElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLDListElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLDListElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLDListElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLDListElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLDListElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLDListElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLDListElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLDListElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLDListElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLDListElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLDListElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLDListElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLDListElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLDListElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLDListElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLDListElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLDListElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLDListElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLDListElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLDListElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLDListElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLDListElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLDListElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLDListElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLDListElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLDListElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLDListElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLDListElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLDListElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLDListElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLDListElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLDListElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLDListElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLDListElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLDListElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLDListElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLDListElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLDListElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLDListElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLDListElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLDListElementMethod "getCompact" o = DOMHTMLDListElementGetCompactMethodInfo + ResolveDOMHTMLDListElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLDListElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLDListElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLDListElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLDListElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLDListElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLDListElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLDListElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLDListElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLDListElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLDListElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLDListElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLDListElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLDListElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLDListElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLDListElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLDListElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLDListElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLDListElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLDListElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLDListElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLDListElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLDListElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLDListElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLDListElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLDListElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLDListElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLDListElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLDListElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLDListElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLDListElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLDListElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLDListElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLDListElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLDListElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLDListElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLDListElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLDListElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLDListElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLDListElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLDListElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLDListElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLDListElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLDListElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLDListElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLDListElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLDListElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLDListElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLDListElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLDListElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLDListElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLDListElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLDListElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLDListElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLDListElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLDListElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLDListElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLDListElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLDListElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLDListElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLDListElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLDListElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLDListElementMethod "setCompact" o = DOMHTMLDListElementSetCompactMethodInfo + ResolveDOMHTMLDListElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLDListElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLDListElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLDListElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLDListElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLDListElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLDListElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLDListElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLDListElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLDListElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLDListElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLDListElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLDListElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLDListElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLDListElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLDListElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLDListElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLDListElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLDListElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLDListElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLDListElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLDListElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLDListElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLDListElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLDListElementMethod t DOMHTMLDListElement, MethodInfo info DOMHTMLDListElement p) => IsLabelProxy t (DOMHTMLDListElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLDListElementMethod t DOMHTMLDListElement, MethodInfo info DOMHTMLDListElement p) => IsLabel t (DOMHTMLDListElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "compact" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLDListElementCompactPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLDListElementCompactPropertyInfo = DOMHTMLDListElementK type AttrGetType DOMHTMLDListElementCompactPropertyInfo = Bool - type AttrLabel DOMHTMLDListElementCompactPropertyInfo = "DOMHTMLDListElement::compact" + type AttrLabel DOMHTMLDListElementCompactPropertyInfo = "compact" attrGet _ = getDOMHTMLDListElementCompact attrSet _ = setDOMHTMLDListElementCompact attrConstruct _ = constructDOMHTMLDListElementCompact type instance AttributeList DOMHTMLDListElement = DOMHTMLDListElementAttributeList -type DOMHTMLDListElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLDListElementCompactPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLDListElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLDListElementCompactPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLDListElement = DOMHTMLDListElementSignalList -type DOMHTMLDListElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLDListElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLDListElement::get_compact -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLDListElementGetCompact :: (MonadIO m, DOMHTMLDListElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLDListElementGetCompact _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_htmld_list_element_get_compact _obj' @@ -125,11 +294,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDListElementGetCompactMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLDListElementK a) => MethodInfo DOMHTMLDListElementGetCompactMethodInfo a signature where + overloadedMethod _ = dOMHTMLDListElementGetCompact + -- method DOMHTMLDListElement::set_compact -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -142,14 +314,18 @@ dOMHTMLDListElementSetCompact :: (MonadIO m, DOMHTMLDListElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLDListElementSetCompact _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_htmld_list_element_set_compact _obj' value' touchManagedPtr _obj return () + +data DOMHTMLDListElementSetCompactMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLDListElementK a) => MethodInfo DOMHTMLDListElementSetCompactMethodInfo a signature where + overloadedMethod _ = dOMHTMLDListElementSetCompact diff --git a/GI/WebKit/Objects/DOMHTMLDListElement.hs-boot b/GI/WebKit/Objects/DOMHTMLDListElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLDListElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLDListElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLDListElementK o instance (GObject o, IsDescendantOf DOMHTMLDListElement o) => DOMHTMLDListElementK o data DOMHTMLDListElementCompactPropertyInfo +data DOMHTMLDListElementGetCompactMethodInfo +data DOMHTMLDListElementSetCompactMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLDetailsElement.hs b/GI/WebKit/Objects/DOMHTMLDetailsElement.hs --- a/GI/WebKit/Objects/DOMHTMLDetailsElement.hs +++ b/GI/WebKit/Objects/DOMHTMLDetailsElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLDetailsElementGetOpen + DOMHTMLDetailsElementGetOpenMethodInfo , dOMHTMLDetailsElementGetOpen , -- ** dOMHTMLDetailsElementSetOpen + DOMHTMLDetailsElementSetOpenMethodInfo , dOMHTMLDetailsElementSetOpen , @@ -70,6 +73,173 @@ noDOMHTMLDetailsElement :: Maybe DOMHTMLDetailsElement noDOMHTMLDetailsElement = Nothing +type family ResolveDOMHTMLDetailsElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLDetailsElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLDetailsElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLDetailsElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLDetailsElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLDetailsElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLDetailsElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLDetailsElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLDetailsElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLDetailsElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLDetailsElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLDetailsElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLDetailsElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLDetailsElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLDetailsElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLDetailsElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLDetailsElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLDetailsElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLDetailsElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLDetailsElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLDetailsElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLDetailsElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLDetailsElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLDetailsElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLDetailsElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLDetailsElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLDetailsElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLDetailsElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLDetailsElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLDetailsElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLDetailsElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLDetailsElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLDetailsElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLDetailsElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLDetailsElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLDetailsElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLDetailsElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLDetailsElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLDetailsElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLDetailsElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLDetailsElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLDetailsElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLDetailsElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLDetailsElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLDetailsElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLDetailsElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLDetailsElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLDetailsElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLDetailsElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLDetailsElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLDetailsElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLDetailsElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLDetailsElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLDetailsElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLDetailsElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLDetailsElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLDetailsElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLDetailsElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLDetailsElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLDetailsElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLDetailsElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLDetailsElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLDetailsElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLDetailsElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLDetailsElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLDetailsElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLDetailsElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLDetailsElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLDetailsElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLDetailsElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLDetailsElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLDetailsElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLDetailsElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLDetailsElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLDetailsElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLDetailsElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLDetailsElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLDetailsElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLDetailsElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLDetailsElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLDetailsElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLDetailsElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLDetailsElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLDetailsElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLDetailsElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLDetailsElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLDetailsElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLDetailsElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLDetailsElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLDetailsElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLDetailsElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLDetailsElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLDetailsElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLDetailsElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLDetailsElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLDetailsElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLDetailsElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLDetailsElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLDetailsElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLDetailsElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLDetailsElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLDetailsElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLDetailsElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLDetailsElementMethod "getOpen" o = DOMHTMLDetailsElementGetOpenMethodInfo + ResolveDOMHTMLDetailsElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLDetailsElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLDetailsElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLDetailsElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLDetailsElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLDetailsElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLDetailsElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLDetailsElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLDetailsElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLDetailsElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLDetailsElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLDetailsElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLDetailsElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLDetailsElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLDetailsElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLDetailsElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLDetailsElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLDetailsElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLDetailsElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLDetailsElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLDetailsElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLDetailsElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLDetailsElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLDetailsElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLDetailsElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLDetailsElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLDetailsElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLDetailsElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLDetailsElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLDetailsElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLDetailsElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLDetailsElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLDetailsElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLDetailsElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLDetailsElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLDetailsElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLDetailsElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLDetailsElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLDetailsElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLDetailsElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLDetailsElementMethod "setOpen" o = DOMHTMLDetailsElementSetOpenMethodInfo + ResolveDOMHTMLDetailsElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLDetailsElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLDetailsElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLDetailsElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLDetailsElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLDetailsElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLDetailsElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLDetailsElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLDetailsElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLDetailsElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLDetailsElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLDetailsElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLDetailsElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLDetailsElementMethod t DOMHTMLDetailsElement, MethodInfo info DOMHTMLDetailsElement p) => IsLabelProxy t (DOMHTMLDetailsElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLDetailsElementMethod t DOMHTMLDetailsElement, MethodInfo info DOMHTMLDetailsElement p) => IsLabel t (DOMHTMLDetailsElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "open" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLDetailsElementOpenPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLDetailsElementOpenPropertyInfo = DOMHTMLDetailsElementK type AttrGetType DOMHTMLDetailsElementOpenPropertyInfo = Bool - type AttrLabel DOMHTMLDetailsElementOpenPropertyInfo = "DOMHTMLDetailsElement::open" + type AttrLabel DOMHTMLDetailsElementOpenPropertyInfo = "open" attrGet _ = getDOMHTMLDetailsElementOpen attrSet _ = setDOMHTMLDetailsElementOpen attrConstruct _ = constructDOMHTMLDetailsElementOpen type instance AttributeList DOMHTMLDetailsElement = DOMHTMLDetailsElementAttributeList -type DOMHTMLDetailsElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("open", DOMHTMLDetailsElementOpenPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLDetailsElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("open", DOMHTMLDetailsElementOpenPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLDetailsElement = DOMHTMLDetailsElementSignalList -type DOMHTMLDetailsElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLDetailsElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLDetailsElement::get_open -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDetailsElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDetailsElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDetailsElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLDetailsElementGetOpen :: (MonadIO m, DOMHTMLDetailsElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLDetailsElementGetOpen _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_details_element_get_open _obj' @@ -125,11 +294,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDetailsElementGetOpenMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLDetailsElementK a) => MethodInfo DOMHTMLDetailsElementGetOpenMethodInfo a signature where + overloadedMethod _ = dOMHTMLDetailsElementGetOpen + -- method DOMHTMLDetailsElement::set_open -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDetailsElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDetailsElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDetailsElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -142,14 +314,18 @@ dOMHTMLDetailsElementSetOpen :: (MonadIO m, DOMHTMLDetailsElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLDetailsElementSetOpen _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_html_details_element_set_open _obj' value' touchManagedPtr _obj return () + +data DOMHTMLDetailsElementSetOpenMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLDetailsElementK a) => MethodInfo DOMHTMLDetailsElementSetOpenMethodInfo a signature where + overloadedMethod _ = dOMHTMLDetailsElementSetOpen diff --git a/GI/WebKit/Objects/DOMHTMLDetailsElement.hs-boot b/GI/WebKit/Objects/DOMHTMLDetailsElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLDetailsElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLDetailsElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLDetailsElementK o instance (GObject o, IsDescendantOf DOMHTMLDetailsElement o) => DOMHTMLDetailsElementK o data DOMHTMLDetailsElementOpenPropertyInfo +data DOMHTMLDetailsElementGetOpenMethodInfo +data DOMHTMLDetailsElementSetOpenMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLDirectoryElement.hs b/GI/WebKit/Objects/DOMHTMLDirectoryElement.hs --- a/GI/WebKit/Objects/DOMHTMLDirectoryElement.hs +++ b/GI/WebKit/Objects/DOMHTMLDirectoryElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLDirectoryElementGetCompact + DOMHTMLDirectoryElementGetCompactMethodInfo, dOMHTMLDirectoryElementGetCompact , -- ** dOMHTMLDirectoryElementSetCompact + DOMHTMLDirectoryElementSetCompactMethodInfo, dOMHTMLDirectoryElementSetCompact , @@ -70,6 +73,173 @@ noDOMHTMLDirectoryElement :: Maybe DOMHTMLDirectoryElement noDOMHTMLDirectoryElement = Nothing +type family ResolveDOMHTMLDirectoryElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLDirectoryElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLDirectoryElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLDirectoryElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLDirectoryElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLDirectoryElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLDirectoryElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLDirectoryElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLDirectoryElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLDirectoryElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLDirectoryElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLDirectoryElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLDirectoryElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLDirectoryElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLDirectoryElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLDirectoryElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLDirectoryElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLDirectoryElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLDirectoryElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLDirectoryElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLDirectoryElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLDirectoryElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLDirectoryElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLDirectoryElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLDirectoryElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLDirectoryElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLDirectoryElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLDirectoryElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLDirectoryElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLDirectoryElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLDirectoryElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLDirectoryElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLDirectoryElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLDirectoryElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLDirectoryElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLDirectoryElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLDirectoryElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLDirectoryElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLDirectoryElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLDirectoryElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLDirectoryElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLDirectoryElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLDirectoryElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLDirectoryElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLDirectoryElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLDirectoryElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLDirectoryElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLDirectoryElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getCompact" o = DOMHTMLDirectoryElementGetCompactMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLDirectoryElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setCompact" o = DOMHTMLDirectoryElementSetCompactMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLDirectoryElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLDirectoryElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLDirectoryElementMethod t DOMHTMLDirectoryElement, MethodInfo info DOMHTMLDirectoryElement p) => IsLabelProxy t (DOMHTMLDirectoryElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLDirectoryElementMethod t DOMHTMLDirectoryElement, MethodInfo info DOMHTMLDirectoryElement p) => IsLabel t (DOMHTMLDirectoryElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "compact" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLDirectoryElementCompactPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLDirectoryElementCompactPropertyInfo = DOMHTMLDirectoryElementK type AttrGetType DOMHTMLDirectoryElementCompactPropertyInfo = Bool - type AttrLabel DOMHTMLDirectoryElementCompactPropertyInfo = "DOMHTMLDirectoryElement::compact" + type AttrLabel DOMHTMLDirectoryElementCompactPropertyInfo = "compact" attrGet _ = getDOMHTMLDirectoryElementCompact attrSet _ = setDOMHTMLDirectoryElementCompact attrConstruct _ = constructDOMHTMLDirectoryElementCompact type instance AttributeList DOMHTMLDirectoryElement = DOMHTMLDirectoryElementAttributeList -type DOMHTMLDirectoryElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLDirectoryElementCompactPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLDirectoryElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLDirectoryElementCompactPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLDirectoryElement = DOMHTMLDirectoryElementSignalList -type DOMHTMLDirectoryElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLDirectoryElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLDirectoryElement::get_compact -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDirectoryElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDirectoryElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDirectoryElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLDirectoryElementGetCompact :: (MonadIO m, DOMHTMLDirectoryElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLDirectoryElementGetCompact _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_directory_element_get_compact _obj' @@ -125,11 +294,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDirectoryElementGetCompactMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLDirectoryElementK a) => MethodInfo DOMHTMLDirectoryElementGetCompactMethodInfo a signature where + overloadedMethod _ = dOMHTMLDirectoryElementGetCompact + -- method DOMHTMLDirectoryElement::set_compact -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDirectoryElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDirectoryElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDirectoryElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -142,14 +314,18 @@ dOMHTMLDirectoryElementSetCompact :: (MonadIO m, DOMHTMLDirectoryElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLDirectoryElementSetCompact _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_html_directory_element_set_compact _obj' value' touchManagedPtr _obj return () + +data DOMHTMLDirectoryElementSetCompactMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLDirectoryElementK a) => MethodInfo DOMHTMLDirectoryElementSetCompactMethodInfo a signature where + overloadedMethod _ = dOMHTMLDirectoryElementSetCompact diff --git a/GI/WebKit/Objects/DOMHTMLDirectoryElement.hs-boot b/GI/WebKit/Objects/DOMHTMLDirectoryElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLDirectoryElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLDirectoryElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLDirectoryElementK o instance (GObject o, IsDescendantOf DOMHTMLDirectoryElement o) => DOMHTMLDirectoryElementK o data DOMHTMLDirectoryElementCompactPropertyInfo +data DOMHTMLDirectoryElementGetCompactMethodInfo +data DOMHTMLDirectoryElementSetCompactMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLDivElement.hs b/GI/WebKit/Objects/DOMHTMLDivElement.hs --- a/GI/WebKit/Objects/DOMHTMLDivElement.hs +++ b/GI/WebKit/Objects/DOMHTMLDivElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLDivElementGetAlign + DOMHTMLDivElementGetAlignMethodInfo , dOMHTMLDivElementGetAlign , -- ** dOMHTMLDivElementSetAlign + DOMHTMLDivElementSetAlignMethodInfo , dOMHTMLDivElementSetAlign , @@ -70,6 +73,173 @@ noDOMHTMLDivElement :: Maybe DOMHTMLDivElement noDOMHTMLDivElement = Nothing +type family ResolveDOMHTMLDivElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLDivElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLDivElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLDivElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLDivElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLDivElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLDivElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLDivElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLDivElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLDivElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLDivElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLDivElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLDivElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLDivElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLDivElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLDivElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLDivElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLDivElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLDivElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLDivElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLDivElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLDivElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLDivElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLDivElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLDivElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLDivElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLDivElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLDivElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLDivElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLDivElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLDivElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLDivElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLDivElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLDivElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLDivElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLDivElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLDivElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLDivElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLDivElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLDivElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLDivElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLDivElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLDivElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLDivElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLDivElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLDivElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLDivElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLDivElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLDivElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLDivElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLDivElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLDivElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLDivElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLDivElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLDivElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLDivElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLDivElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLDivElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLDivElementMethod "getAlign" o = DOMHTMLDivElementGetAlignMethodInfo + ResolveDOMHTMLDivElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLDivElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLDivElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLDivElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLDivElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLDivElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLDivElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLDivElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLDivElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLDivElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLDivElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLDivElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLDivElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLDivElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLDivElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLDivElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLDivElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLDivElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLDivElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLDivElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLDivElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLDivElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLDivElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLDivElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLDivElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLDivElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLDivElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLDivElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLDivElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLDivElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLDivElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLDivElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLDivElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLDivElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLDivElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLDivElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLDivElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLDivElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLDivElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLDivElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLDivElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLDivElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLDivElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLDivElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLDivElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLDivElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLDivElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLDivElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLDivElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLDivElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLDivElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLDivElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLDivElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLDivElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLDivElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLDivElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLDivElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLDivElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLDivElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLDivElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLDivElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLDivElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLDivElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLDivElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLDivElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLDivElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLDivElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLDivElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLDivElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLDivElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLDivElementMethod "setAlign" o = DOMHTMLDivElementSetAlignMethodInfo + ResolveDOMHTMLDivElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLDivElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLDivElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLDivElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLDivElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLDivElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLDivElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLDivElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLDivElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLDivElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLDivElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLDivElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLDivElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLDivElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLDivElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLDivElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLDivElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLDivElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLDivElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLDivElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLDivElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLDivElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLDivElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLDivElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLDivElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLDivElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLDivElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLDivElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLDivElementMethod t DOMHTMLDivElement, MethodInfo info DOMHTMLDivElement p) => IsLabelProxy t (DOMHTMLDivElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLDivElementMethod t DOMHTMLDivElement, MethodInfo info DOMHTMLDivElement p) => IsLabel t (DOMHTMLDivElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLDivElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLDivElementAlignPropertyInfo = DOMHTMLDivElementK type AttrGetType DOMHTMLDivElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLDivElementAlignPropertyInfo = "DOMHTMLDivElement::align" + type AttrLabel DOMHTMLDivElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLDivElementAlign attrSet _ = setDOMHTMLDivElementAlign attrConstruct _ = constructDOMHTMLDivElementAlign type instance AttributeList DOMHTMLDivElement = DOMHTMLDivElementAttributeList -type DOMHTMLDivElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLDivElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLDivElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLDivElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLDivElement = DOMHTMLDivElementSignalList -type DOMHTMLDivElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLDivElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLDivElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDivElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDivElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDivElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLDivElementGetAlign :: (MonadIO m, DOMHTMLDivElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLDivElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_div_element_get_align _obj' @@ -127,11 +296,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDivElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLDivElementK a) => MethodInfo DOMHTMLDivElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLDivElementGetAlign + -- method DOMHTMLDivElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDivElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDivElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDivElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -144,9 +316,9 @@ dOMHTMLDivElementSetAlign :: (MonadIO m, DOMHTMLDivElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLDivElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -154,5 +326,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLDivElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLDivElementK a) => MethodInfo DOMHTMLDivElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLDivElementSetAlign diff --git a/GI/WebKit/Objects/DOMHTMLDivElement.hs-boot b/GI/WebKit/Objects/DOMHTMLDivElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLDivElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLDivElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLDivElementK o instance (GObject o, IsDescendantOf DOMHTMLDivElement o) => DOMHTMLDivElementK o data DOMHTMLDivElementAlignPropertyInfo +data DOMHTMLDivElementGetAlignMethodInfo +data DOMHTMLDivElementSetAlignMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLDocument.hs b/GI/WebKit/Objects/DOMHTMLDocument.hs --- a/GI/WebKit/Objects/DOMHTMLDocument.hs +++ b/GI/WebKit/Objects/DOMHTMLDocument.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,110 +18,137 @@ -- * Methods -- ** dOMHTMLDocumentCaptureEvents + DOMHTMLDocumentCaptureEventsMethodInfo , dOMHTMLDocumentCaptureEvents , -- ** dOMHTMLDocumentClear + DOMHTMLDocumentClearMethodInfo , dOMHTMLDocumentClear , -- ** dOMHTMLDocumentClose + DOMHTMLDocumentCloseMethodInfo , dOMHTMLDocumentClose , -- ** dOMHTMLDocumentGetActiveElement + DOMHTMLDocumentGetActiveElementMethodInfo, dOMHTMLDocumentGetActiveElement , -- ** dOMHTMLDocumentGetAlinkColor + DOMHTMLDocumentGetAlinkColorMethodInfo , dOMHTMLDocumentGetAlinkColor , -- ** dOMHTMLDocumentGetBgColor + DOMHTMLDocumentGetBgColorMethodInfo , dOMHTMLDocumentGetBgColor , -- ** dOMHTMLDocumentGetCompatMode + DOMHTMLDocumentGetCompatModeMethodInfo , dOMHTMLDocumentGetCompatMode , -- ** dOMHTMLDocumentGetDesignMode + DOMHTMLDocumentGetDesignModeMethodInfo , dOMHTMLDocumentGetDesignMode , -- ** dOMHTMLDocumentGetDir + DOMHTMLDocumentGetDirMethodInfo , dOMHTMLDocumentGetDir , -- ** dOMHTMLDocumentGetEmbeds + DOMHTMLDocumentGetEmbedsMethodInfo , dOMHTMLDocumentGetEmbeds , -- ** dOMHTMLDocumentGetFgColor + DOMHTMLDocumentGetFgColorMethodInfo , dOMHTMLDocumentGetFgColor , -- ** dOMHTMLDocumentGetHeight + DOMHTMLDocumentGetHeightMethodInfo , dOMHTMLDocumentGetHeight , -- ** dOMHTMLDocumentGetLinkColor + DOMHTMLDocumentGetLinkColorMethodInfo , dOMHTMLDocumentGetLinkColor , -- ** dOMHTMLDocumentGetPlugins + DOMHTMLDocumentGetPluginsMethodInfo , dOMHTMLDocumentGetPlugins , -- ** dOMHTMLDocumentGetScripts + DOMHTMLDocumentGetScriptsMethodInfo , dOMHTMLDocumentGetScripts , -- ** dOMHTMLDocumentGetVlinkColor + DOMHTMLDocumentGetVlinkColorMethodInfo , dOMHTMLDocumentGetVlinkColor , -- ** dOMHTMLDocumentGetWidth + DOMHTMLDocumentGetWidthMethodInfo , dOMHTMLDocumentGetWidth , -- ** dOMHTMLDocumentHasFocus + DOMHTMLDocumentHasFocusMethodInfo , dOMHTMLDocumentHasFocus , -- ** dOMHTMLDocumentOpen + DOMHTMLDocumentOpenMethodInfo , dOMHTMLDocumentOpen , -- ** dOMHTMLDocumentReleaseEvents + DOMHTMLDocumentReleaseEventsMethodInfo , dOMHTMLDocumentReleaseEvents , -- ** dOMHTMLDocumentSetAlinkColor + DOMHTMLDocumentSetAlinkColorMethodInfo , dOMHTMLDocumentSetAlinkColor , -- ** dOMHTMLDocumentSetBgColor + DOMHTMLDocumentSetBgColorMethodInfo , dOMHTMLDocumentSetBgColor , -- ** dOMHTMLDocumentSetDesignMode + DOMHTMLDocumentSetDesignModeMethodInfo , dOMHTMLDocumentSetDesignMode , -- ** dOMHTMLDocumentSetDir + DOMHTMLDocumentSetDirMethodInfo , dOMHTMLDocumentSetDir , -- ** dOMHTMLDocumentSetFgColor + DOMHTMLDocumentSetFgColorMethodInfo , dOMHTMLDocumentSetFgColor , -- ** dOMHTMLDocumentSetLinkColor + DOMHTMLDocumentSetLinkColorMethodInfo , dOMHTMLDocumentSetLinkColor , -- ** dOMHTMLDocumentSetVlinkColor + DOMHTMLDocumentSetVlinkColorMethodInfo , dOMHTMLDocumentSetVlinkColor , @@ -247,6 +275,193 @@ noDOMHTMLDocument :: Maybe DOMHTMLDocument noDOMHTMLDocument = Nothing +type family ResolveDOMHTMLDocumentMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLDocumentMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLDocumentMethod "adoptNode" o = DOMDocumentAdoptNodeMethodInfo + ResolveDOMHTMLDocumentMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLDocumentMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLDocumentMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLDocumentMethod "captureEvents" o = DOMHTMLDocumentCaptureEventsMethodInfo + ResolveDOMHTMLDocumentMethod "caretRangeFromPoint" o = DOMDocumentCaretRangeFromPointMethodInfo + ResolveDOMHTMLDocumentMethod "clear" o = DOMHTMLDocumentClearMethodInfo + ResolveDOMHTMLDocumentMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLDocumentMethod "close" o = DOMHTMLDocumentCloseMethodInfo + ResolveDOMHTMLDocumentMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLDocumentMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLDocumentMethod "createAttribute" o = DOMDocumentCreateAttributeMethodInfo + ResolveDOMHTMLDocumentMethod "createAttributeNs" o = DOMDocumentCreateAttributeNsMethodInfo + ResolveDOMHTMLDocumentMethod "createCdataSection" o = DOMDocumentCreateCdataSectionMethodInfo + ResolveDOMHTMLDocumentMethod "createComment" o = DOMDocumentCreateCommentMethodInfo + ResolveDOMHTMLDocumentMethod "createCssStyleDeclaration" o = DOMDocumentCreateCssStyleDeclarationMethodInfo + ResolveDOMHTMLDocumentMethod "createDocumentFragment" o = DOMDocumentCreateDocumentFragmentMethodInfo + ResolveDOMHTMLDocumentMethod "createElement" o = DOMDocumentCreateElementMethodInfo + ResolveDOMHTMLDocumentMethod "createElementNs" o = DOMDocumentCreateElementNsMethodInfo + ResolveDOMHTMLDocumentMethod "createEntityReference" o = DOMDocumentCreateEntityReferenceMethodInfo + ResolveDOMHTMLDocumentMethod "createEvent" o = DOMDocumentCreateEventMethodInfo + ResolveDOMHTMLDocumentMethod "createExpression" o = DOMDocumentCreateExpressionMethodInfo + ResolveDOMHTMLDocumentMethod "createNodeIterator" o = DOMDocumentCreateNodeIteratorMethodInfo + ResolveDOMHTMLDocumentMethod "createNsResolver" o = DOMDocumentCreateNsResolverMethodInfo + ResolveDOMHTMLDocumentMethod "createProcessingInstruction" o = DOMDocumentCreateProcessingInstructionMethodInfo + ResolveDOMHTMLDocumentMethod "createRange" o = DOMDocumentCreateRangeMethodInfo + ResolveDOMHTMLDocumentMethod "createTextNode" o = DOMDocumentCreateTextNodeMethodInfo + ResolveDOMHTMLDocumentMethod "createTouch" o = DOMDocumentCreateTouchMethodInfo + ResolveDOMHTMLDocumentMethod "createTreeWalker" o = DOMDocumentCreateTreeWalkerMethodInfo + ResolveDOMHTMLDocumentMethod "elementFromPoint" o = DOMDocumentElementFromPointMethodInfo + ResolveDOMHTMLDocumentMethod "evaluate" o = DOMDocumentEvaluateMethodInfo + ResolveDOMHTMLDocumentMethod "execCommand" o = DOMDocumentExecCommandMethodInfo + ResolveDOMHTMLDocumentMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLDocumentMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLDocumentMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMHTMLDocumentMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLDocumentMethod "hasFocus" o = DOMHTMLDocumentHasFocusMethodInfo + ResolveDOMHTMLDocumentMethod "importNode" o = DOMDocumentImportNodeMethodInfo + ResolveDOMHTMLDocumentMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLDocumentMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLDocumentMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLDocumentMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLDocumentMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLDocumentMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLDocumentMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLDocumentMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLDocumentMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLDocumentMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLDocumentMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLDocumentMethod "open" o = DOMHTMLDocumentOpenMethodInfo + ResolveDOMHTMLDocumentMethod "queryCommandEnabled" o = DOMDocumentQueryCommandEnabledMethodInfo + ResolveDOMHTMLDocumentMethod "queryCommandIndeterm" o = DOMDocumentQueryCommandIndetermMethodInfo + ResolveDOMHTMLDocumentMethod "queryCommandState" o = DOMDocumentQueryCommandStateMethodInfo + ResolveDOMHTMLDocumentMethod "queryCommandSupported" o = DOMDocumentQueryCommandSupportedMethodInfo + ResolveDOMHTMLDocumentMethod "queryCommandValue" o = DOMDocumentQueryCommandValueMethodInfo + ResolveDOMHTMLDocumentMethod "querySelector" o = DOMDocumentQuerySelectorMethodInfo + ResolveDOMHTMLDocumentMethod "querySelectorAll" o = DOMDocumentQuerySelectorAllMethodInfo + ResolveDOMHTMLDocumentMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLDocumentMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLDocumentMethod "releaseEvents" o = DOMHTMLDocumentReleaseEventsMethodInfo + ResolveDOMHTMLDocumentMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLDocumentMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLDocumentMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLDocumentMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLDocumentMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLDocumentMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLDocumentMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLDocumentMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLDocumentMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLDocumentMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLDocumentMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLDocumentMethod "webkitCancelFullScreen" o = DOMDocumentWebkitCancelFullScreenMethodInfo + ResolveDOMHTMLDocumentMethod "webkitExitFullscreen" o = DOMDocumentWebkitExitFullscreenMethodInfo + ResolveDOMHTMLDocumentMethod "webkitExitPointerLock" o = DOMDocumentWebkitExitPointerLockMethodInfo + ResolveDOMHTMLDocumentMethod "webkitGetNamedFlows" o = DOMDocumentWebkitGetNamedFlowsMethodInfo + ResolveDOMHTMLDocumentMethod "getActiveElement" o = DOMHTMLDocumentGetActiveElementMethodInfo + ResolveDOMHTMLDocumentMethod "getAlinkColor" o = DOMHTMLDocumentGetAlinkColorMethodInfo + ResolveDOMHTMLDocumentMethod "getAnchors" o = DOMDocumentGetAnchorsMethodInfo + ResolveDOMHTMLDocumentMethod "getApplets" o = DOMDocumentGetAppletsMethodInfo + ResolveDOMHTMLDocumentMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMHTMLDocumentMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLDocumentMethod "getBgColor" o = DOMHTMLDocumentGetBgColorMethodInfo + ResolveDOMHTMLDocumentMethod "getBody" o = DOMDocumentGetBodyMethodInfo + ResolveDOMHTMLDocumentMethod "getCharacterSet" o = DOMDocumentGetCharacterSetMethodInfo + ResolveDOMHTMLDocumentMethod "getCharset" o = DOMDocumentGetCharsetMethodInfo + ResolveDOMHTMLDocumentMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLDocumentMethod "getCookie" o = DOMDocumentGetCookieMethodInfo + ResolveDOMHTMLDocumentMethod "getCurrentScript" o = DOMDocumentGetCurrentScriptMethodInfo + ResolveDOMHTMLDocumentMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLDocumentMethod "getDefaultCharset" o = DOMDocumentGetDefaultCharsetMethodInfo + ResolveDOMHTMLDocumentMethod "getDefaultView" o = DOMDocumentGetDefaultViewMethodInfo + ResolveDOMHTMLDocumentMethod "getDesignMode" o = DOMHTMLDocumentGetDesignModeMethodInfo + ResolveDOMHTMLDocumentMethod "getDir" o = DOMHTMLDocumentGetDirMethodInfo + ResolveDOMHTMLDocumentMethod "getDoctype" o = DOMDocumentGetDoctypeMethodInfo + ResolveDOMHTMLDocumentMethod "getDocumentElement" o = DOMDocumentGetDocumentElementMethodInfo + ResolveDOMHTMLDocumentMethod "getDocumentUri" o = DOMDocumentGetDocumentUriMethodInfo + ResolveDOMHTMLDocumentMethod "getDomain" o = DOMDocumentGetDomainMethodInfo + ResolveDOMHTMLDocumentMethod "getElementById" o = DOMDocumentGetElementByIdMethodInfo + ResolveDOMHTMLDocumentMethod "getElementsByClassName" o = DOMDocumentGetElementsByClassNameMethodInfo + ResolveDOMHTMLDocumentMethod "getElementsByName" o = DOMDocumentGetElementsByNameMethodInfo + ResolveDOMHTMLDocumentMethod "getElementsByTagName" o = DOMDocumentGetElementsByTagNameMethodInfo + ResolveDOMHTMLDocumentMethod "getElementsByTagNameNs" o = DOMDocumentGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLDocumentMethod "getEmbeds" o = DOMHTMLDocumentGetEmbedsMethodInfo + ResolveDOMHTMLDocumentMethod "getFgColor" o = DOMHTMLDocumentGetFgColorMethodInfo + ResolveDOMHTMLDocumentMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLDocumentMethod "getForms" o = DOMDocumentGetFormsMethodInfo + ResolveDOMHTMLDocumentMethod "getHead" o = DOMDocumentGetHeadMethodInfo + ResolveDOMHTMLDocumentMethod "getHeight" o = DOMHTMLDocumentGetHeightMethodInfo + ResolveDOMHTMLDocumentMethod "getHidden" o = DOMDocumentGetHiddenMethodInfo + ResolveDOMHTMLDocumentMethod "getImages" o = DOMDocumentGetImagesMethodInfo + ResolveDOMHTMLDocumentMethod "getImplementation" o = DOMDocumentGetImplementationMethodInfo + ResolveDOMHTMLDocumentMethod "getInputEncoding" o = DOMDocumentGetInputEncodingMethodInfo + ResolveDOMHTMLDocumentMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLDocumentMethod "getLastModified" o = DOMDocumentGetLastModifiedMethodInfo + ResolveDOMHTMLDocumentMethod "getLinkColor" o = DOMHTMLDocumentGetLinkColorMethodInfo + ResolveDOMHTMLDocumentMethod "getLinks" o = DOMDocumentGetLinksMethodInfo + ResolveDOMHTMLDocumentMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLDocumentMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLDocumentMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLDocumentMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLDocumentMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLDocumentMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLDocumentMethod "getOverrideStyle" o = DOMDocumentGetOverrideStyleMethodInfo + ResolveDOMHTMLDocumentMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLDocumentMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLDocumentMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLDocumentMethod "getPlugins" o = DOMHTMLDocumentGetPluginsMethodInfo + ResolveDOMHTMLDocumentMethod "getPreferredStylesheetSet" o = DOMDocumentGetPreferredStylesheetSetMethodInfo + ResolveDOMHTMLDocumentMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLDocumentMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLDocumentMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLDocumentMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLDocumentMethod "getReadyState" o = DOMDocumentGetReadyStateMethodInfo + ResolveDOMHTMLDocumentMethod "getReferrer" o = DOMDocumentGetReferrerMethodInfo + ResolveDOMHTMLDocumentMethod "getScripts" o = DOMHTMLDocumentGetScriptsMethodInfo + ResolveDOMHTMLDocumentMethod "getSecurityPolicy" o = DOMDocumentGetSecurityPolicyMethodInfo + ResolveDOMHTMLDocumentMethod "getSelectedStylesheetSet" o = DOMDocumentGetSelectedStylesheetSetMethodInfo + ResolveDOMHTMLDocumentMethod "getStyleSheets" o = DOMDocumentGetStyleSheetsMethodInfo + ResolveDOMHTMLDocumentMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLDocumentMethod "getTitle" o = DOMDocumentGetTitleMethodInfo + ResolveDOMHTMLDocumentMethod "getUrl" o = DOMDocumentGetUrlMethodInfo + ResolveDOMHTMLDocumentMethod "getVisibilityState" o = DOMDocumentGetVisibilityStateMethodInfo + ResolveDOMHTMLDocumentMethod "getVlinkColor" o = DOMHTMLDocumentGetVlinkColorMethodInfo + ResolveDOMHTMLDocumentMethod "getWebkitCurrentFullScreenElement" o = DOMDocumentGetWebkitCurrentFullScreenElementMethodInfo + ResolveDOMHTMLDocumentMethod "getWebkitFullScreenKeyboardInputAllowed" o = DOMDocumentGetWebkitFullScreenKeyboardInputAllowedMethodInfo + ResolveDOMHTMLDocumentMethod "getWebkitFullscreenElement" o = DOMDocumentGetWebkitFullscreenElementMethodInfo + ResolveDOMHTMLDocumentMethod "getWebkitFullscreenEnabled" o = DOMDocumentGetWebkitFullscreenEnabledMethodInfo + ResolveDOMHTMLDocumentMethod "getWebkitHidden" o = DOMDocumentGetWebkitHiddenMethodInfo + ResolveDOMHTMLDocumentMethod "getWebkitIsFullScreen" o = DOMDocumentGetWebkitIsFullScreenMethodInfo + ResolveDOMHTMLDocumentMethod "getWebkitPointerLockElement" o = DOMDocumentGetWebkitPointerLockElementMethodInfo + ResolveDOMHTMLDocumentMethod "getWebkitVisibilityState" o = DOMDocumentGetWebkitVisibilityStateMethodInfo + ResolveDOMHTMLDocumentMethod "getWidth" o = DOMHTMLDocumentGetWidthMethodInfo + ResolveDOMHTMLDocumentMethod "getXmlEncoding" o = DOMDocumentGetXmlEncodingMethodInfo + ResolveDOMHTMLDocumentMethod "getXmlStandalone" o = DOMDocumentGetXmlStandaloneMethodInfo + ResolveDOMHTMLDocumentMethod "getXmlVersion" o = DOMDocumentGetXmlVersionMethodInfo + ResolveDOMHTMLDocumentMethod "setAlinkColor" o = DOMHTMLDocumentSetAlinkColorMethodInfo + ResolveDOMHTMLDocumentMethod "setBgColor" o = DOMHTMLDocumentSetBgColorMethodInfo + ResolveDOMHTMLDocumentMethod "setBody" o = DOMDocumentSetBodyMethodInfo + ResolveDOMHTMLDocumentMethod "setCharset" o = DOMDocumentSetCharsetMethodInfo + ResolveDOMHTMLDocumentMethod "setCookie" o = DOMDocumentSetCookieMethodInfo + ResolveDOMHTMLDocumentMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLDocumentMethod "setDesignMode" o = DOMHTMLDocumentSetDesignModeMethodInfo + ResolveDOMHTMLDocumentMethod "setDir" o = DOMHTMLDocumentSetDirMethodInfo + ResolveDOMHTMLDocumentMethod "setDocumentUri" o = DOMDocumentSetDocumentUriMethodInfo + ResolveDOMHTMLDocumentMethod "setFgColor" o = DOMHTMLDocumentSetFgColorMethodInfo + ResolveDOMHTMLDocumentMethod "setLinkColor" o = DOMHTMLDocumentSetLinkColorMethodInfo + ResolveDOMHTMLDocumentMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLDocumentMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLDocumentMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLDocumentMethod "setSelectedStylesheetSet" o = DOMDocumentSetSelectedStylesheetSetMethodInfo + ResolveDOMHTMLDocumentMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLDocumentMethod "setTitle" o = DOMDocumentSetTitleMethodInfo + ResolveDOMHTMLDocumentMethod "setVlinkColor" o = DOMHTMLDocumentSetVlinkColorMethodInfo + ResolveDOMHTMLDocumentMethod "setXmlStandalone" o = DOMDocumentSetXmlStandaloneMethodInfo + ResolveDOMHTMLDocumentMethod "setXmlVersion" o = DOMDocumentSetXmlVersionMethodInfo + ResolveDOMHTMLDocumentMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLDocumentMethod t DOMHTMLDocument, MethodInfo info DOMHTMLDocument p) => IsLabelProxy t (DOMHTMLDocument -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLDocumentMethod t DOMHTMLDocument, MethodInfo info DOMHTMLDocument p) => IsLabel t (DOMHTMLDocument -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "active-element" -- Type: TInterface "WebKit" "DOMElement" -- Flags: [PropertyReadable] @@ -260,7 +475,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentActiveElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLDocumentActiveElementPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentActiveElementPropertyInfo = DOMElement - type AttrLabel DOMHTMLDocumentActiveElementPropertyInfo = "DOMHTMLDocument::active-element" + type AttrLabel DOMHTMLDocumentActiveElementPropertyInfo = "active-element" attrGet _ = getDOMHTMLDocumentActiveElement attrSet _ = undefined attrConstruct _ = undefined @@ -284,7 +499,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentAlinkColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLDocumentAlinkColorPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentAlinkColorPropertyInfo = T.Text - type AttrLabel DOMHTMLDocumentAlinkColorPropertyInfo = "DOMHTMLDocument::alink-color" + type AttrLabel DOMHTMLDocumentAlinkColorPropertyInfo = "alink-color" attrGet _ = getDOMHTMLDocumentAlinkColor attrSet _ = setDOMHTMLDocumentAlinkColor attrConstruct _ = constructDOMHTMLDocumentAlinkColor @@ -308,7 +523,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentBgColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLDocumentBgColorPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentBgColorPropertyInfo = T.Text - type AttrLabel DOMHTMLDocumentBgColorPropertyInfo = "DOMHTMLDocument::bg-color" + type AttrLabel DOMHTMLDocumentBgColorPropertyInfo = "bg-color" attrGet _ = getDOMHTMLDocumentBgColor attrSet _ = setDOMHTMLDocumentBgColor attrConstruct _ = constructDOMHTMLDocumentBgColor @@ -326,7 +541,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentCompatModePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLDocumentCompatModePropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentCompatModePropertyInfo = T.Text - type AttrLabel DOMHTMLDocumentCompatModePropertyInfo = "DOMHTMLDocument::compat-mode" + type AttrLabel DOMHTMLDocumentCompatModePropertyInfo = "compat-mode" attrGet _ = getDOMHTMLDocumentCompatMode attrSet _ = undefined attrConstruct _ = undefined @@ -350,7 +565,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentDesignModePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLDocumentDesignModePropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentDesignModePropertyInfo = T.Text - type AttrLabel DOMHTMLDocumentDesignModePropertyInfo = "DOMHTMLDocument::design-mode" + type AttrLabel DOMHTMLDocumentDesignModePropertyInfo = "design-mode" attrGet _ = getDOMHTMLDocumentDesignMode attrSet _ = setDOMHTMLDocumentDesignMode attrConstruct _ = constructDOMHTMLDocumentDesignMode @@ -374,7 +589,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentDirPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLDocumentDirPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentDirPropertyInfo = T.Text - type AttrLabel DOMHTMLDocumentDirPropertyInfo = "DOMHTMLDocument::dir" + type AttrLabel DOMHTMLDocumentDirPropertyInfo = "dir" attrGet _ = getDOMHTMLDocumentDir attrSet _ = setDOMHTMLDocumentDir attrConstruct _ = constructDOMHTMLDocumentDir @@ -392,7 +607,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentEmbedsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLDocumentEmbedsPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentEmbedsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLDocumentEmbedsPropertyInfo = "DOMHTMLDocument::embeds" + type AttrLabel DOMHTMLDocumentEmbedsPropertyInfo = "embeds" attrGet _ = getDOMHTMLDocumentEmbeds attrSet _ = undefined attrConstruct _ = undefined @@ -416,7 +631,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentFgColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLDocumentFgColorPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentFgColorPropertyInfo = T.Text - type AttrLabel DOMHTMLDocumentFgColorPropertyInfo = "DOMHTMLDocument::fg-color" + type AttrLabel DOMHTMLDocumentFgColorPropertyInfo = "fg-color" attrGet _ = getDOMHTMLDocumentFgColor attrSet _ = setDOMHTMLDocumentFgColor attrConstruct _ = constructDOMHTMLDocumentFgColor @@ -434,7 +649,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLDocumentHeightPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentHeightPropertyInfo = Int64 - type AttrLabel DOMHTMLDocumentHeightPropertyInfo = "DOMHTMLDocument::height" + type AttrLabel DOMHTMLDocumentHeightPropertyInfo = "height" attrGet _ = getDOMHTMLDocumentHeight attrSet _ = undefined attrConstruct _ = undefined @@ -458,7 +673,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentLinkColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLDocumentLinkColorPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentLinkColorPropertyInfo = T.Text - type AttrLabel DOMHTMLDocumentLinkColorPropertyInfo = "DOMHTMLDocument::link-color" + type AttrLabel DOMHTMLDocumentLinkColorPropertyInfo = "link-color" attrGet _ = getDOMHTMLDocumentLinkColor attrSet _ = setDOMHTMLDocumentLinkColor attrConstruct _ = constructDOMHTMLDocumentLinkColor @@ -476,7 +691,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentPluginsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLDocumentPluginsPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentPluginsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLDocumentPluginsPropertyInfo = "DOMHTMLDocument::plugins" + type AttrLabel DOMHTMLDocumentPluginsPropertyInfo = "plugins" attrGet _ = getDOMHTMLDocumentPlugins attrSet _ = undefined attrConstruct _ = undefined @@ -494,7 +709,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentScriptsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLDocumentScriptsPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentScriptsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLDocumentScriptsPropertyInfo = "DOMHTMLDocument::scripts" + type AttrLabel DOMHTMLDocumentScriptsPropertyInfo = "scripts" attrGet _ = getDOMHTMLDocumentScripts attrSet _ = undefined attrConstruct _ = undefined @@ -518,7 +733,7 @@ type AttrSetTypeConstraint DOMHTMLDocumentVlinkColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLDocumentVlinkColorPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentVlinkColorPropertyInfo = T.Text - type AttrLabel DOMHTMLDocumentVlinkColorPropertyInfo = "DOMHTMLDocument::vlink-color" + type AttrLabel DOMHTMLDocumentVlinkColorPropertyInfo = "vlink-color" attrGet _ = getDOMHTMLDocumentVlinkColor attrSet _ = setDOMHTMLDocumentVlinkColor attrConstruct _ = constructDOMHTMLDocumentVlinkColor @@ -536,22 +751,21 @@ type AttrSetTypeConstraint DOMHTMLDocumentWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLDocumentWidthPropertyInfo = DOMHTMLDocumentK type AttrGetType DOMHTMLDocumentWidthPropertyInfo = Int64 - type AttrLabel DOMHTMLDocumentWidthPropertyInfo = "DOMHTMLDocument::width" + type AttrLabel DOMHTMLDocumentWidthPropertyInfo = "width" attrGet _ = getDOMHTMLDocumentWidth attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHTMLDocument = DOMHTMLDocumentAttributeList -type DOMHTMLDocumentAttributeList = ('[ '("active-element", DOMHTMLDocumentActiveElementPropertyInfo), '("alink-color", DOMHTMLDocumentAlinkColorPropertyInfo), '("anchors", DOMDocumentAnchorsPropertyInfo), '("applets", DOMDocumentAppletsPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("bg-color", DOMHTMLDocumentBgColorPropertyInfo), '("body", DOMDocumentBodyPropertyInfo), '("character-set", DOMDocumentCharacterSetPropertyInfo), '("charset", DOMDocumentCharsetPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("compat-mode", DOMHTMLDocumentCompatModePropertyInfo), '("cookie", DOMDocumentCookiePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-script", DOMDocumentCurrentScriptPropertyInfo), '("default-charset", DOMDocumentDefaultCharsetPropertyInfo), '("default-view", DOMDocumentDefaultViewPropertyInfo), '("design-mode", DOMHTMLDocumentDesignModePropertyInfo), '("dir", DOMHTMLDocumentDirPropertyInfo), '("doctype", DOMDocumentDoctypePropertyInfo), '("document-element", DOMDocumentDocumentElementPropertyInfo), '("document-uri", DOMDocumentDocumentUriPropertyInfo), '("domain", DOMDocumentDomainPropertyInfo), '("embeds", DOMHTMLDocumentEmbedsPropertyInfo), '("fg-color", DOMHTMLDocumentFgColorPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("forms", DOMDocumentFormsPropertyInfo), '("head", DOMDocumentHeadPropertyInfo), '("height", DOMHTMLDocumentHeightPropertyInfo), '("hidden", DOMDocumentHiddenPropertyInfo), '("images", DOMDocumentImagesPropertyInfo), '("implementation", DOMDocumentImplementationPropertyInfo), '("input-encoding", DOMDocumentInputEncodingPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-modified", DOMDocumentLastModifiedPropertyInfo), '("link-color", DOMHTMLDocumentLinkColorPropertyInfo), '("links", DOMDocumentLinksPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("plugins", DOMHTMLDocumentPluginsPropertyInfo), '("preferred-stylesheet-set", DOMDocumentPreferredStylesheetSetPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("ready-state", DOMDocumentReadyStatePropertyInfo), '("referrer", DOMDocumentReferrerPropertyInfo), '("scripts", DOMHTMLDocumentScriptsPropertyInfo), '("security-policy", DOMDocumentSecurityPolicyPropertyInfo), '("selected-stylesheet-set", DOMDocumentSelectedStylesheetSetPropertyInfo), '("style-sheets", DOMDocumentStyleSheetsPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMDocumentTitlePropertyInfo), '("url", DOMDocumentUrlPropertyInfo), '("visibility-state", DOMDocumentVisibilityStatePropertyInfo), '("vlink-color", DOMHTMLDocumentVlinkColorPropertyInfo), '("webkit-current-full-screen-element", DOMDocumentWebkitCurrentFullScreenElementPropertyInfo), '("webkit-full-screen-keyboard-input-allowed", DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo), '("webkit-fullscreen-element", DOMDocumentWebkitFullscreenElementPropertyInfo), '("webkit-fullscreen-enabled", DOMDocumentWebkitFullscreenEnabledPropertyInfo), '("webkit-is-full-screen", DOMDocumentWebkitIsFullScreenPropertyInfo), '("webkit-pointer-lock-element", DOMDocumentWebkitPointerLockElementPropertyInfo), '("width", DOMHTMLDocumentWidthPropertyInfo), '("xml-encoding", DOMDocumentXmlEncodingPropertyInfo), '("xml-standalone", DOMDocumentXmlStandalonePropertyInfo), '("xml-version", DOMDocumentXmlVersionPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLDocumentAttributeList = ('[ '("activeElement", DOMHTMLDocumentActiveElementPropertyInfo), '("alinkColor", DOMHTMLDocumentAlinkColorPropertyInfo), '("anchors", DOMDocumentAnchorsPropertyInfo), '("applets", DOMDocumentAppletsPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("bgColor", DOMHTMLDocumentBgColorPropertyInfo), '("body", DOMDocumentBodyPropertyInfo), '("characterSet", DOMDocumentCharacterSetPropertyInfo), '("charset", DOMDocumentCharsetPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("compatMode", DOMHTMLDocumentCompatModePropertyInfo), '("cookie", DOMDocumentCookiePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentScript", DOMDocumentCurrentScriptPropertyInfo), '("defaultCharset", DOMDocumentDefaultCharsetPropertyInfo), '("defaultView", DOMDocumentDefaultViewPropertyInfo), '("designMode", DOMHTMLDocumentDesignModePropertyInfo), '("dir", DOMHTMLDocumentDirPropertyInfo), '("doctype", DOMDocumentDoctypePropertyInfo), '("documentElement", DOMDocumentDocumentElementPropertyInfo), '("documentUri", DOMDocumentDocumentUriPropertyInfo), '("domain", DOMDocumentDomainPropertyInfo), '("embeds", DOMHTMLDocumentEmbedsPropertyInfo), '("fgColor", DOMHTMLDocumentFgColorPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("forms", DOMDocumentFormsPropertyInfo), '("head", DOMDocumentHeadPropertyInfo), '("height", DOMHTMLDocumentHeightPropertyInfo), '("hidden", DOMDocumentHiddenPropertyInfo), '("images", DOMDocumentImagesPropertyInfo), '("implementation", DOMDocumentImplementationPropertyInfo), '("inputEncoding", DOMDocumentInputEncodingPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastModified", DOMDocumentLastModifiedPropertyInfo), '("linkColor", DOMHTMLDocumentLinkColorPropertyInfo), '("links", DOMDocumentLinksPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("plugins", DOMHTMLDocumentPluginsPropertyInfo), '("preferredStylesheetSet", DOMDocumentPreferredStylesheetSetPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("readyState", DOMDocumentReadyStatePropertyInfo), '("referrer", DOMDocumentReferrerPropertyInfo), '("scripts", DOMHTMLDocumentScriptsPropertyInfo), '("securityPolicy", DOMDocumentSecurityPolicyPropertyInfo), '("selectedStylesheetSet", DOMDocumentSelectedStylesheetSetPropertyInfo), '("styleSheets", DOMDocumentStyleSheetsPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMDocumentTitlePropertyInfo), '("url", DOMDocumentUrlPropertyInfo), '("visibilityState", DOMDocumentVisibilityStatePropertyInfo), '("vlinkColor", DOMHTMLDocumentVlinkColorPropertyInfo), '("webkitCurrentFullScreenElement", DOMDocumentWebkitCurrentFullScreenElementPropertyInfo), '("webkitFullScreenKeyboardInputAllowed", DOMDocumentWebkitFullScreenKeyboardInputAllowedPropertyInfo), '("webkitFullscreenElement", DOMDocumentWebkitFullscreenElementPropertyInfo), '("webkitFullscreenEnabled", DOMDocumentWebkitFullscreenEnabledPropertyInfo), '("webkitIsFullScreen", DOMDocumentWebkitIsFullScreenPropertyInfo), '("webkitPointerLockElement", DOMDocumentWebkitPointerLockElementPropertyInfo), '("width", DOMHTMLDocumentWidthPropertyInfo), '("xmlEncoding", DOMDocumentXmlEncodingPropertyInfo), '("xmlStandalone", DOMDocumentXmlStandalonePropertyInfo), '("xmlVersion", DOMDocumentXmlVersionPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLDocument = DOMHTMLDocumentSignalList -type DOMHTMLDocumentSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLDocumentSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLDocument::capture_events -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -563,19 +777,22 @@ dOMHTMLDocumentCaptureEvents :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLDocumentCaptureEvents _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_document_capture_events _obj' touchManagedPtr _obj return () +data DOMHTMLDocumentCaptureEventsMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentCaptureEventsMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentCaptureEvents + -- method DOMHTMLDocument::clear -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -587,19 +804,22 @@ dOMHTMLDocumentClear :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLDocumentClear _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_document_clear _obj' touchManagedPtr _obj return () +data DOMHTMLDocumentClearMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentClearMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentClear + -- method DOMHTMLDocument::close -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -611,19 +831,22 @@ dOMHTMLDocumentClose :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLDocumentClose _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_document_close _obj' touchManagedPtr _obj return () +data DOMHTMLDocumentCloseMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentCloseMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentClose + -- method DOMHTMLDocument::get_active_element -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : False -- Skip return : False @@ -635,8 +858,8 @@ dOMHTMLDocumentGetActiveElement :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m DOMElement + a -- _obj + -> m DOMElement -- result dOMHTMLDocumentGetActiveElement _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_active_element _obj' @@ -645,11 +868,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetActiveElementMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetActiveElementMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetActiveElement + -- method DOMHTMLDocument::get_alink_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -661,8 +887,8 @@ dOMHTMLDocumentGetAlinkColor :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLDocumentGetAlinkColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_alink_color _obj' @@ -672,11 +898,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetAlinkColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetAlinkColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetAlinkColor + -- method DOMHTMLDocument::get_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -688,8 +917,8 @@ dOMHTMLDocumentGetBgColor :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLDocumentGetBgColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_bg_color _obj' @@ -699,11 +928,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetBgColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetBgColor + -- method DOMHTMLDocument::get_compat_mode -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -715,8 +947,8 @@ dOMHTMLDocumentGetCompatMode :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLDocumentGetCompatMode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_compat_mode _obj' @@ -726,11 +958,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetCompatModeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetCompatModeMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetCompatMode + -- method DOMHTMLDocument::get_design_mode -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -742,8 +977,8 @@ dOMHTMLDocumentGetDesignMode :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLDocumentGetDesignMode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_design_mode _obj' @@ -753,11 +988,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetDesignModeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetDesignModeMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetDesignMode + -- method DOMHTMLDocument::get_dir -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -769,8 +1007,8 @@ dOMHTMLDocumentGetDir :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLDocumentGetDir _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_dir _obj' @@ -780,11 +1018,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetDirMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetDirMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetDir + -- method DOMHTMLDocument::get_embeds -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -796,8 +1037,8 @@ dOMHTMLDocumentGetEmbeds :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLDocumentGetEmbeds _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_embeds _obj' @@ -806,11 +1047,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetEmbedsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetEmbedsMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetEmbeds + -- method DOMHTMLDocument::get_fg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -822,8 +1066,8 @@ dOMHTMLDocumentGetFgColor :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLDocumentGetFgColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_fg_color _obj' @@ -833,11 +1077,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetFgColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetFgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetFgColor + -- method DOMHTMLDocument::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -849,19 +1096,22 @@ dOMHTMLDocumentGetHeight :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLDocumentGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_height _obj' touchManagedPtr _obj return result +data DOMHTMLDocumentGetHeightMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetHeight + -- method DOMHTMLDocument::get_link_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -873,8 +1123,8 @@ dOMHTMLDocumentGetLinkColor :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLDocumentGetLinkColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_link_color _obj' @@ -884,11 +1134,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetLinkColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetLinkColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetLinkColor + -- method DOMHTMLDocument::get_plugins -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -900,8 +1153,8 @@ dOMHTMLDocumentGetPlugins :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLDocumentGetPlugins _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_plugins _obj' @@ -910,11 +1163,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetPluginsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetPluginsMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetPlugins + -- method DOMHTMLDocument::get_scripts -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -926,8 +1182,8 @@ dOMHTMLDocumentGetScripts :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLDocumentGetScripts _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_scripts _obj' @@ -936,11 +1192,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetScriptsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetScriptsMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetScripts + -- method DOMHTMLDocument::get_vlink_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -952,8 +1211,8 @@ dOMHTMLDocumentGetVlinkColor :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLDocumentGetVlinkColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_vlink_color _obj' @@ -963,11 +1222,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentGetVlinkColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetVlinkColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetVlinkColor + -- method DOMHTMLDocument::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -979,19 +1241,22 @@ dOMHTMLDocumentGetWidth :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLDocumentGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_get_width _obj' touchManagedPtr _obj return result +data DOMHTMLDocumentGetWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentGetWidth + -- method DOMHTMLDocument::has_focus -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1003,8 +1268,8 @@ dOMHTMLDocumentHasFocus :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLDocumentHasFocus _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_document_has_focus _obj' @@ -1012,11 +1277,14 @@ touchManagedPtr _obj return result' +data DOMHTMLDocumentHasFocusMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentHasFocusMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentHasFocus + -- method DOMHTMLDocument::open -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1028,19 +1296,22 @@ {-# DEPRECATED dOMHTMLDocumentOpen ["(Since version 2.2)"]#-} dOMHTMLDocumentOpen :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLDocumentOpen _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_document_open _obj' touchManagedPtr _obj return () +data DOMHTMLDocumentOpenMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentOpenMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentOpen + -- method DOMHTMLDocument::release_events -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1052,19 +1323,22 @@ dOMHTMLDocumentReleaseEvents :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLDocumentReleaseEvents _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_document_release_events _obj' touchManagedPtr _obj return () +data DOMHTMLDocumentReleaseEventsMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentReleaseEventsMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentReleaseEvents + -- method DOMHTMLDocument::set_alink_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1077,9 +1351,9 @@ dOMHTMLDocumentSetAlinkColor :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLDocumentSetAlinkColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1088,11 +1362,14 @@ freeMem value' return () +data DOMHTMLDocumentSetAlinkColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentSetAlinkColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentSetAlinkColor + -- method DOMHTMLDocument::set_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1105,9 +1382,9 @@ dOMHTMLDocumentSetBgColor :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLDocumentSetBgColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1116,11 +1393,14 @@ freeMem value' return () +data DOMHTMLDocumentSetBgColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentSetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentSetBgColor + -- method DOMHTMLDocument::set_design_mode -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1133,9 +1413,9 @@ dOMHTMLDocumentSetDesignMode :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLDocumentSetDesignMode _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1144,11 +1424,14 @@ freeMem value' return () +data DOMHTMLDocumentSetDesignModeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentSetDesignModeMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentSetDesignMode + -- method DOMHTMLDocument::set_dir -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1161,9 +1444,9 @@ dOMHTMLDocumentSetDir :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLDocumentSetDir _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1172,11 +1455,14 @@ freeMem value' return () +data DOMHTMLDocumentSetDirMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentSetDirMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentSetDir + -- method DOMHTMLDocument::set_fg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1189,9 +1475,9 @@ dOMHTMLDocumentSetFgColor :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLDocumentSetFgColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1200,11 +1486,14 @@ freeMem value' return () +data DOMHTMLDocumentSetFgColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentSetFgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentSetFgColor + -- method DOMHTMLDocument::set_link_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1217,9 +1506,9 @@ dOMHTMLDocumentSetLinkColor :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLDocumentSetLinkColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1228,11 +1517,14 @@ freeMem value' return () +data DOMHTMLDocumentSetLinkColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentSetLinkColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentSetLinkColor + -- method DOMHTMLDocument::set_vlink_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLDocument", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1245,9 +1537,9 @@ dOMHTMLDocumentSetVlinkColor :: (MonadIO m, DOMHTMLDocumentK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLDocumentSetVlinkColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1255,5 +1547,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLDocumentSetVlinkColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLDocumentK a) => MethodInfo DOMHTMLDocumentSetVlinkColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLDocumentSetVlinkColor diff --git a/GI/WebKit/Objects/DOMHTMLDocument.hs-boot b/GI/WebKit/Objects/DOMHTMLDocument.hs-boot --- a/GI/WebKit/Objects/DOMHTMLDocument.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLDocument.hs-boot @@ -25,3 +25,30 @@ data DOMHTMLDocumentScriptsPropertyInfo data DOMHTMLDocumentVlinkColorPropertyInfo data DOMHTMLDocumentWidthPropertyInfo +data DOMHTMLDocumentCaptureEventsMethodInfo +data DOMHTMLDocumentClearMethodInfo +data DOMHTMLDocumentCloseMethodInfo +data DOMHTMLDocumentGetActiveElementMethodInfo +data DOMHTMLDocumentGetAlinkColorMethodInfo +data DOMHTMLDocumentGetBgColorMethodInfo +data DOMHTMLDocumentGetCompatModeMethodInfo +data DOMHTMLDocumentGetDesignModeMethodInfo +data DOMHTMLDocumentGetDirMethodInfo +data DOMHTMLDocumentGetEmbedsMethodInfo +data DOMHTMLDocumentGetFgColorMethodInfo +data DOMHTMLDocumentGetHeightMethodInfo +data DOMHTMLDocumentGetLinkColorMethodInfo +data DOMHTMLDocumentGetPluginsMethodInfo +data DOMHTMLDocumentGetScriptsMethodInfo +data DOMHTMLDocumentGetVlinkColorMethodInfo +data DOMHTMLDocumentGetWidthMethodInfo +data DOMHTMLDocumentHasFocusMethodInfo +data DOMHTMLDocumentOpenMethodInfo +data DOMHTMLDocumentReleaseEventsMethodInfo +data DOMHTMLDocumentSetAlinkColorMethodInfo +data DOMHTMLDocumentSetBgColorMethodInfo +data DOMHTMLDocumentSetDesignModeMethodInfo +data DOMHTMLDocumentSetDirMethodInfo +data DOMHTMLDocumentSetFgColorMethodInfo +data DOMHTMLDocumentSetLinkColorMethodInfo +data DOMHTMLDocumentSetVlinkColorMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLElement.hs b/GI/WebKit/Objects/DOMHTMLElement.hs --- a/GI/WebKit/Objects/DOMHTMLElement.hs +++ b/GI/WebKit/Objects/DOMHTMLElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,194 +18,242 @@ -- * Methods -- ** dOMHTMLElementClick + DOMHTMLElementClickMethodInfo , dOMHTMLElementClick , -- ** dOMHTMLElementGetAccessKey + DOMHTMLElementGetAccessKeyMethodInfo , dOMHTMLElementGetAccessKey , -- ** dOMHTMLElementGetChildren + DOMHTMLElementGetChildrenMethodInfo , dOMHTMLElementGetChildren , -- ** dOMHTMLElementGetClassList + DOMHTMLElementGetClassListMethodInfo , dOMHTMLElementGetClassList , -- ** dOMHTMLElementGetClassName + DOMHTMLElementGetClassNameMethodInfo , dOMHTMLElementGetClassName , -- ** dOMHTMLElementGetContentEditable + DOMHTMLElementGetContentEditableMethodInfo, dOMHTMLElementGetContentEditable , -- ** dOMHTMLElementGetDir + DOMHTMLElementGetDirMethodInfo , dOMHTMLElementGetDir , -- ** dOMHTMLElementGetDraggable + DOMHTMLElementGetDraggableMethodInfo , dOMHTMLElementGetDraggable , -- ** dOMHTMLElementGetHidden + DOMHTMLElementGetHiddenMethodInfo , dOMHTMLElementGetHidden , -- ** dOMHTMLElementGetId + DOMHTMLElementGetIdMethodInfo , dOMHTMLElementGetId , -- ** dOMHTMLElementGetInnerHtml + DOMHTMLElementGetInnerHtmlMethodInfo , dOMHTMLElementGetInnerHtml , -- ** dOMHTMLElementGetInnerText + DOMHTMLElementGetInnerTextMethodInfo , dOMHTMLElementGetInnerText , -- ** dOMHTMLElementGetIsContentEditable + DOMHTMLElementGetIsContentEditableMethodInfo, dOMHTMLElementGetIsContentEditable , -- ** dOMHTMLElementGetItemId + DOMHTMLElementGetItemIdMethodInfo , dOMHTMLElementGetItemId , -- ** dOMHTMLElementGetItemProp + DOMHTMLElementGetItemPropMethodInfo , dOMHTMLElementGetItemProp , -- ** dOMHTMLElementGetItemRef + DOMHTMLElementGetItemRefMethodInfo , dOMHTMLElementGetItemRef , -- ** dOMHTMLElementGetItemScope + DOMHTMLElementGetItemScopeMethodInfo , dOMHTMLElementGetItemScope , -- ** dOMHTMLElementGetItemType + DOMHTMLElementGetItemTypeMethodInfo , dOMHTMLElementGetItemType , -- ** dOMHTMLElementGetLang + DOMHTMLElementGetLangMethodInfo , dOMHTMLElementGetLang , -- ** dOMHTMLElementGetOuterHtml + DOMHTMLElementGetOuterHtmlMethodInfo , dOMHTMLElementGetOuterHtml , -- ** dOMHTMLElementGetOuterText + DOMHTMLElementGetOuterTextMethodInfo , dOMHTMLElementGetOuterText , -- ** dOMHTMLElementGetSpellcheck + DOMHTMLElementGetSpellcheckMethodInfo , dOMHTMLElementGetSpellcheck , -- ** dOMHTMLElementGetTabIndex + DOMHTMLElementGetTabIndexMethodInfo , dOMHTMLElementGetTabIndex , -- ** dOMHTMLElementGetTitle + DOMHTMLElementGetTitleMethodInfo , dOMHTMLElementGetTitle , -- ** dOMHTMLElementGetTranslate + DOMHTMLElementGetTranslateMethodInfo , dOMHTMLElementGetTranslate , -- ** dOMHTMLElementGetWebkitdropzone + DOMHTMLElementGetWebkitdropzoneMethodInfo, dOMHTMLElementGetWebkitdropzone , -- ** dOMHTMLElementInsertAdjacentElement + DOMHTMLElementInsertAdjacentElementMethodInfo, dOMHTMLElementInsertAdjacentElement , -- ** dOMHTMLElementInsertAdjacentHtml + DOMHTMLElementInsertAdjacentHtmlMethodInfo, dOMHTMLElementInsertAdjacentHtml , -- ** dOMHTMLElementInsertAdjacentText + DOMHTMLElementInsertAdjacentTextMethodInfo, dOMHTMLElementInsertAdjacentText , -- ** dOMHTMLElementSetAccessKey + DOMHTMLElementSetAccessKeyMethodInfo , dOMHTMLElementSetAccessKey , -- ** dOMHTMLElementSetClassName + DOMHTMLElementSetClassNameMethodInfo , dOMHTMLElementSetClassName , -- ** dOMHTMLElementSetContentEditable + DOMHTMLElementSetContentEditableMethodInfo, dOMHTMLElementSetContentEditable , -- ** dOMHTMLElementSetDir + DOMHTMLElementSetDirMethodInfo , dOMHTMLElementSetDir , -- ** dOMHTMLElementSetDraggable + DOMHTMLElementSetDraggableMethodInfo , dOMHTMLElementSetDraggable , -- ** dOMHTMLElementSetHidden + DOMHTMLElementSetHiddenMethodInfo , dOMHTMLElementSetHidden , -- ** dOMHTMLElementSetId + DOMHTMLElementSetIdMethodInfo , dOMHTMLElementSetId , -- ** dOMHTMLElementSetInnerHtml + DOMHTMLElementSetInnerHtmlMethodInfo , dOMHTMLElementSetInnerHtml , -- ** dOMHTMLElementSetInnerText + DOMHTMLElementSetInnerTextMethodInfo , dOMHTMLElementSetInnerText , -- ** dOMHTMLElementSetItemId + DOMHTMLElementSetItemIdMethodInfo , dOMHTMLElementSetItemId , -- ** dOMHTMLElementSetItemScope + DOMHTMLElementSetItemScopeMethodInfo , dOMHTMLElementSetItemScope , -- ** dOMHTMLElementSetLang + DOMHTMLElementSetLangMethodInfo , dOMHTMLElementSetLang , -- ** dOMHTMLElementSetOuterHtml + DOMHTMLElementSetOuterHtmlMethodInfo , dOMHTMLElementSetOuterHtml , -- ** dOMHTMLElementSetOuterText + DOMHTMLElementSetOuterTextMethodInfo , dOMHTMLElementSetOuterText , -- ** dOMHTMLElementSetSpellcheck + DOMHTMLElementSetSpellcheckMethodInfo , dOMHTMLElementSetSpellcheck , -- ** dOMHTMLElementSetTabIndex + DOMHTMLElementSetTabIndexMethodInfo , dOMHTMLElementSetTabIndex , -- ** dOMHTMLElementSetTitle + DOMHTMLElementSetTitleMethodInfo , dOMHTMLElementSetTitle , -- ** dOMHTMLElementSetTranslate + DOMHTMLElementSetTranslateMethodInfo , dOMHTMLElementSetTranslate , -- ** dOMHTMLElementSetWebkitdropzone + DOMHTMLElementSetWebkitdropzoneMethodInfo, dOMHTMLElementSetWebkitdropzone , @@ -362,6 +411,171 @@ noDOMHTMLElement :: Maybe DOMHTMLElement noDOMHTMLElement = Nothing +type family ResolveDOMHTMLElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLElementMethod t DOMHTMLElement, MethodInfo info DOMHTMLElement p) => IsLabelProxy t (DOMHTMLElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLElementMethod t DOMHTMLElement, MethodInfo info DOMHTMLElement p) => IsLabel t (DOMHTMLElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "access-key" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -381,7 +595,7 @@ type AttrSetTypeConstraint DOMHTMLElementAccessKeyPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLElementAccessKeyPropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementAccessKeyPropertyInfo = T.Text - type AttrLabel DOMHTMLElementAccessKeyPropertyInfo = "DOMHTMLElement::access-key" + type AttrLabel DOMHTMLElementAccessKeyPropertyInfo = "access-key" attrGet _ = getDOMHTMLElementAccessKey attrSet _ = setDOMHTMLElementAccessKey attrConstruct _ = constructDOMHTMLElementAccessKey @@ -399,7 +613,7 @@ type AttrSetTypeConstraint DOMHTMLElementChildrenPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLElementChildrenPropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementChildrenPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLElementChildrenPropertyInfo = "DOMHTMLElement::children" + type AttrLabel DOMHTMLElementChildrenPropertyInfo = "children" attrGet _ = getDOMHTMLElementChildren attrSet _ = undefined attrConstruct _ = undefined @@ -423,7 +637,7 @@ type AttrSetTypeConstraint DOMHTMLElementContentEditablePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLElementContentEditablePropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementContentEditablePropertyInfo = T.Text - type AttrLabel DOMHTMLElementContentEditablePropertyInfo = "DOMHTMLElement::content-editable" + type AttrLabel DOMHTMLElementContentEditablePropertyInfo = "content-editable" attrGet _ = getDOMHTMLElementContentEditable attrSet _ = setDOMHTMLElementContentEditable attrConstruct _ = constructDOMHTMLElementContentEditable @@ -447,7 +661,7 @@ type AttrSetTypeConstraint DOMHTMLElementDirPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLElementDirPropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementDirPropertyInfo = T.Text - type AttrLabel DOMHTMLElementDirPropertyInfo = "DOMHTMLElement::dir" + type AttrLabel DOMHTMLElementDirPropertyInfo = "dir" attrGet _ = getDOMHTMLElementDir attrSet _ = setDOMHTMLElementDir attrConstruct _ = constructDOMHTMLElementDir @@ -471,7 +685,7 @@ type AttrSetTypeConstraint DOMHTMLElementDraggablePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLElementDraggablePropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementDraggablePropertyInfo = Bool - type AttrLabel DOMHTMLElementDraggablePropertyInfo = "DOMHTMLElement::draggable" + type AttrLabel DOMHTMLElementDraggablePropertyInfo = "draggable" attrGet _ = getDOMHTMLElementDraggable attrSet _ = setDOMHTMLElementDraggable attrConstruct _ = constructDOMHTMLElementDraggable @@ -495,7 +709,7 @@ type AttrSetTypeConstraint DOMHTMLElementHiddenPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLElementHiddenPropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementHiddenPropertyInfo = Bool - type AttrLabel DOMHTMLElementHiddenPropertyInfo = "DOMHTMLElement::hidden" + type AttrLabel DOMHTMLElementHiddenPropertyInfo = "hidden" attrGet _ = getDOMHTMLElementHidden attrSet _ = setDOMHTMLElementHidden attrConstruct _ = constructDOMHTMLElementHidden @@ -519,7 +733,7 @@ type AttrSetTypeConstraint DOMHTMLElementInnerHtmlPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLElementInnerHtmlPropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementInnerHtmlPropertyInfo = T.Text - type AttrLabel DOMHTMLElementInnerHtmlPropertyInfo = "DOMHTMLElement::inner-html" + type AttrLabel DOMHTMLElementInnerHtmlPropertyInfo = "inner-html" attrGet _ = getDOMHTMLElementInnerHtml attrSet _ = setDOMHTMLElementInnerHtml attrConstruct _ = constructDOMHTMLElementInnerHtml @@ -543,7 +757,7 @@ type AttrSetTypeConstraint DOMHTMLElementInnerTextPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLElementInnerTextPropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementInnerTextPropertyInfo = T.Text - type AttrLabel DOMHTMLElementInnerTextPropertyInfo = "DOMHTMLElement::inner-text" + type AttrLabel DOMHTMLElementInnerTextPropertyInfo = "inner-text" attrGet _ = getDOMHTMLElementInnerText attrSet _ = setDOMHTMLElementInnerText attrConstruct _ = constructDOMHTMLElementInnerText @@ -561,7 +775,7 @@ type AttrSetTypeConstraint DOMHTMLElementIsContentEditablePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLElementIsContentEditablePropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementIsContentEditablePropertyInfo = Bool - type AttrLabel DOMHTMLElementIsContentEditablePropertyInfo = "DOMHTMLElement::is-content-editable" + type AttrLabel DOMHTMLElementIsContentEditablePropertyInfo = "is-content-editable" attrGet _ = getDOMHTMLElementIsContentEditable attrSet _ = undefined attrConstruct _ = undefined @@ -585,7 +799,7 @@ type AttrSetTypeConstraint DOMHTMLElementLangPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLElementLangPropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementLangPropertyInfo = T.Text - type AttrLabel DOMHTMLElementLangPropertyInfo = "DOMHTMLElement::lang" + type AttrLabel DOMHTMLElementLangPropertyInfo = "lang" attrGet _ = getDOMHTMLElementLang attrSet _ = setDOMHTMLElementLang attrConstruct _ = constructDOMHTMLElementLang @@ -609,7 +823,7 @@ type AttrSetTypeConstraint DOMHTMLElementOuterHtmlPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLElementOuterHtmlPropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementOuterHtmlPropertyInfo = T.Text - type AttrLabel DOMHTMLElementOuterHtmlPropertyInfo = "DOMHTMLElement::outer-html" + type AttrLabel DOMHTMLElementOuterHtmlPropertyInfo = "outer-html" attrGet _ = getDOMHTMLElementOuterHtml attrSet _ = setDOMHTMLElementOuterHtml attrConstruct _ = constructDOMHTMLElementOuterHtml @@ -633,7 +847,7 @@ type AttrSetTypeConstraint DOMHTMLElementOuterTextPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLElementOuterTextPropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementOuterTextPropertyInfo = T.Text - type AttrLabel DOMHTMLElementOuterTextPropertyInfo = "DOMHTMLElement::outer-text" + type AttrLabel DOMHTMLElementOuterTextPropertyInfo = "outer-text" attrGet _ = getDOMHTMLElementOuterText attrSet _ = setDOMHTMLElementOuterText attrConstruct _ = constructDOMHTMLElementOuterText @@ -657,7 +871,7 @@ type AttrSetTypeConstraint DOMHTMLElementSpellcheckPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLElementSpellcheckPropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementSpellcheckPropertyInfo = Bool - type AttrLabel DOMHTMLElementSpellcheckPropertyInfo = "DOMHTMLElement::spellcheck" + type AttrLabel DOMHTMLElementSpellcheckPropertyInfo = "spellcheck" attrGet _ = getDOMHTMLElementSpellcheck attrSet _ = setDOMHTMLElementSpellcheck attrConstruct _ = constructDOMHTMLElementSpellcheck @@ -681,7 +895,7 @@ type AttrSetTypeConstraint DOMHTMLElementTabIndexPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLElementTabIndexPropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementTabIndexPropertyInfo = Int64 - type AttrLabel DOMHTMLElementTabIndexPropertyInfo = "DOMHTMLElement::tab-index" + type AttrLabel DOMHTMLElementTabIndexPropertyInfo = "tab-index" attrGet _ = getDOMHTMLElementTabIndex attrSet _ = setDOMHTMLElementTabIndex attrConstruct _ = constructDOMHTMLElementTabIndex @@ -705,7 +919,7 @@ type AttrSetTypeConstraint DOMHTMLElementTitlePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLElementTitlePropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementTitlePropertyInfo = T.Text - type AttrLabel DOMHTMLElementTitlePropertyInfo = "DOMHTMLElement::title" + type AttrLabel DOMHTMLElementTitlePropertyInfo = "title" attrGet _ = getDOMHTMLElementTitle attrSet _ = setDOMHTMLElementTitle attrConstruct _ = constructDOMHTMLElementTitle @@ -729,7 +943,7 @@ type AttrSetTypeConstraint DOMHTMLElementTranslatePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLElementTranslatePropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementTranslatePropertyInfo = Bool - type AttrLabel DOMHTMLElementTranslatePropertyInfo = "DOMHTMLElement::translate" + type AttrLabel DOMHTMLElementTranslatePropertyInfo = "translate" attrGet _ = getDOMHTMLElementTranslate attrSet _ = setDOMHTMLElementTranslate attrConstruct _ = constructDOMHTMLElementTranslate @@ -753,22 +967,21 @@ type AttrSetTypeConstraint DOMHTMLElementWebkitdropzonePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLElementWebkitdropzonePropertyInfo = DOMHTMLElementK type AttrGetType DOMHTMLElementWebkitdropzonePropertyInfo = T.Text - type AttrLabel DOMHTMLElementWebkitdropzonePropertyInfo = "DOMHTMLElement::webkitdropzone" + type AttrLabel DOMHTMLElementWebkitdropzonePropertyInfo = "webkitdropzone" attrGet _ = getDOMHTMLElementWebkitdropzone attrSet _ = setDOMHTMLElementWebkitdropzone attrConstruct _ = constructDOMHTMLElementWebkitdropzone type instance AttributeList DOMHTMLElement = DOMHTMLElementAttributeList -type DOMHTMLElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLElement = DOMHTMLElementSignalList -type DOMHTMLElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLElement::click -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -780,19 +993,22 @@ dOMHTMLElementClick :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLElementClick _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_element_click _obj' touchManagedPtr _obj return () +data DOMHTMLElementClickMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementClickMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementClick + -- method DOMHTMLElement::get_access_key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -804,8 +1020,8 @@ dOMHTMLElementGetAccessKey :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetAccessKey _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_access_key _obj' @@ -815,11 +1031,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetAccessKeyMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetAccessKeyMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetAccessKey + -- method DOMHTMLElement::get_children -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -831,8 +1050,8 @@ dOMHTMLElementGetChildren :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLElementGetChildren _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_children _obj' @@ -841,11 +1060,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetChildrenMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetChildrenMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetChildren + -- method DOMHTMLElement::get_class_list -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMTokenList" -- throws : False -- Skip return : False @@ -857,8 +1079,8 @@ {-# DEPRECATED dOMHTMLElementGetClassList ["(Since version 1.10)","Use webkit_dom_element_get_class_list() instead."]#-} dOMHTMLElementGetClassList :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m DOMDOMTokenList + a -- _obj + -> m DOMDOMTokenList -- result dOMHTMLElementGetClassList _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_class_list _obj' @@ -867,11 +1089,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetClassListMethodInfo +instance (signature ~ (m DOMDOMTokenList), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetClassListMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetClassList + -- method DOMHTMLElement::get_class_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -883,8 +1108,8 @@ {-# DEPRECATED dOMHTMLElementGetClassName ["(Since version 1.10)","Use webkit_dom_element_get_class_name() instead."]#-} dOMHTMLElementGetClassName :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetClassName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_class_name _obj' @@ -894,11 +1119,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetClassNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetClassNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetClassName + -- method DOMHTMLElement::get_content_editable -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -910,8 +1138,8 @@ dOMHTMLElementGetContentEditable :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetContentEditable _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_content_editable _obj' @@ -921,11 +1149,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetContentEditableMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetContentEditableMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetContentEditable + -- method DOMHTMLElement::get_dir -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -937,8 +1168,8 @@ dOMHTMLElementGetDir :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetDir _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_dir _obj' @@ -948,11 +1179,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetDirMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetDirMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetDir + -- method DOMHTMLElement::get_draggable -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -964,8 +1198,8 @@ dOMHTMLElementGetDraggable :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLElementGetDraggable _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_draggable _obj' @@ -973,11 +1207,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetDraggableMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetDraggableMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetDraggable + -- method DOMHTMLElement::get_hidden -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -989,8 +1226,8 @@ dOMHTMLElementGetHidden :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLElementGetHidden _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_hidden _obj' @@ -998,11 +1235,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetHiddenMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetHiddenMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetHidden + -- method DOMHTMLElement::get_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1014,8 +1254,8 @@ {-# DEPRECATED dOMHTMLElementGetId ["(Since version 2.2)","Use webkit_dom_element_get_id() instead."]#-} dOMHTMLElementGetId :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_id _obj' @@ -1025,11 +1265,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetIdMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetIdMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetId + -- method DOMHTMLElement::get_inner_html -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1041,8 +1284,8 @@ dOMHTMLElementGetInnerHtml :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetInnerHtml _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_inner_html _obj' @@ -1052,11 +1295,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetInnerHtmlMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetInnerHtmlMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetInnerHtml + -- method DOMHTMLElement::get_inner_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1068,8 +1314,8 @@ dOMHTMLElementGetInnerText :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetInnerText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_inner_text _obj' @@ -1079,11 +1325,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetInnerTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetInnerTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetInnerText + -- method DOMHTMLElement::get_is_content_editable -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1095,8 +1344,8 @@ dOMHTMLElementGetIsContentEditable :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLElementGetIsContentEditable _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_is_content_editable _obj' @@ -1104,11 +1353,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetIsContentEditableMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetIsContentEditableMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetIsContentEditable + -- method DOMHTMLElement::get_item_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1120,8 +1372,8 @@ {-# DEPRECATED dOMHTMLElementGetItemId ["(Since version 2.2)"]#-} dOMHTMLElementGetItemId :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetItemId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_item_id _obj' @@ -1131,11 +1383,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetItemIdMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetItemIdMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetItemId + -- method DOMHTMLElement::get_item_prop -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMSettableTokenList" -- throws : False -- Skip return : False @@ -1147,8 +1402,8 @@ {-# DEPRECATED dOMHTMLElementGetItemProp ["(Since version 2.2)"]#-} dOMHTMLElementGetItemProp :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m DOMDOMSettableTokenList + a -- _obj + -> m DOMDOMSettableTokenList -- result dOMHTMLElementGetItemProp _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_item_prop _obj' @@ -1157,11 +1412,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetItemPropMethodInfo +instance (signature ~ (m DOMDOMSettableTokenList), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetItemPropMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetItemProp + -- method DOMHTMLElement::get_item_ref -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMSettableTokenList" -- throws : False -- Skip return : False @@ -1173,8 +1431,8 @@ {-# DEPRECATED dOMHTMLElementGetItemRef ["(Since version 2.2)"]#-} dOMHTMLElementGetItemRef :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m DOMDOMSettableTokenList + a -- _obj + -> m DOMDOMSettableTokenList -- result dOMHTMLElementGetItemRef _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_item_ref _obj' @@ -1183,11 +1441,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetItemRefMethodInfo +instance (signature ~ (m DOMDOMSettableTokenList), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetItemRefMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetItemRef + -- method DOMHTMLElement::get_item_scope -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1199,8 +1460,8 @@ {-# DEPRECATED dOMHTMLElementGetItemScope ["(Since version 2.2)"]#-} dOMHTMLElementGetItemScope :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLElementGetItemScope _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_item_scope _obj' @@ -1208,11 +1469,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetItemScopeMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetItemScopeMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetItemScope + -- method DOMHTMLElement::get_item_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1224,19 +1488,22 @@ {-# DEPRECATED dOMHTMLElementGetItemType ["(Since version 2.2)"]#-} dOMHTMLElementGetItemType :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLElementGetItemType _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_element_get_item_type _obj' touchManagedPtr _obj return () +data DOMHTMLElementGetItemTypeMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetItemTypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetItemType + -- method DOMHTMLElement::get_lang -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1248,8 +1515,8 @@ dOMHTMLElementGetLang :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetLang _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_lang _obj' @@ -1259,11 +1526,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetLangMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetLangMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetLang + -- method DOMHTMLElement::get_outer_html -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1275,8 +1545,8 @@ dOMHTMLElementGetOuterHtml :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetOuterHtml _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_outer_html _obj' @@ -1286,11 +1556,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetOuterHtmlMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetOuterHtmlMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetOuterHtml + -- method DOMHTMLElement::get_outer_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1302,8 +1575,8 @@ dOMHTMLElementGetOuterText :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetOuterText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_outer_text _obj' @@ -1313,11 +1586,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetOuterTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetOuterTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetOuterText + -- method DOMHTMLElement::get_spellcheck -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1329,8 +1605,8 @@ dOMHTMLElementGetSpellcheck :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLElementGetSpellcheck _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_spellcheck _obj' @@ -1338,11 +1614,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetSpellcheckMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetSpellcheckMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetSpellcheck + -- method DOMHTMLElement::get_tab_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1354,19 +1633,22 @@ dOMHTMLElementGetTabIndex :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLElementGetTabIndex _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_tab_index _obj' touchManagedPtr _obj return result +data DOMHTMLElementGetTabIndexMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetTabIndexMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetTabIndex + -- method DOMHTMLElement::get_title -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1378,8 +1660,8 @@ dOMHTMLElementGetTitle :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetTitle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_title _obj' @@ -1389,11 +1671,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetTitleMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetTitleMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetTitle + -- method DOMHTMLElement::get_translate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1405,8 +1690,8 @@ dOMHTMLElementGetTranslate :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLElementGetTranslate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_translate _obj' @@ -1414,11 +1699,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetTranslateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetTranslateMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetTranslate + -- method DOMHTMLElement::get_webkitdropzone -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1430,8 +1718,8 @@ dOMHTMLElementGetWebkitdropzone :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLElementGetWebkitdropzone _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_element_get_webkitdropzone _obj' @@ -1441,11 +1729,14 @@ touchManagedPtr _obj return result' +data DOMHTMLElementGetWebkitdropzoneMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementGetWebkitdropzoneMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementGetWebkitdropzone + -- method DOMHTMLElement::insert_adjacent_element -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "where", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "element", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "where", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "element", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "where", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "element", argType = TInterface "WebKit" "DOMElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : True -- Skip return : False @@ -1460,10 +1751,10 @@ dOMHTMLElementInsertAdjacentElement :: (MonadIO m, DOMHTMLElementK a, DOMElementK b) => - a -> -- _obj - T.Text -> -- where - b -> -- element - m DOMElement + a -- _obj + -> T.Text -- where_ + -> b -- element + -> m DOMElement -- result dOMHTMLElementInsertAdjacentElement _obj where_ element = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj where_' <- textToCString where_ @@ -1480,11 +1771,14 @@ freeMem where_' ) +data DOMHTMLElementInsertAdjacentElementMethodInfo +instance (signature ~ (T.Text -> b -> m DOMElement), MonadIO m, DOMHTMLElementK a, DOMElementK b) => MethodInfo DOMHTMLElementInsertAdjacentElementMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementInsertAdjacentElement + -- method DOMHTMLElement::insert_adjacent_html -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "where", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "html", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "where", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "html", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "where", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "html", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1499,10 +1793,10 @@ dOMHTMLElementInsertAdjacentHtml :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- where - T.Text -> -- html - m () + a -- _obj + -> T.Text -- where_ + -> T.Text -- html + -> m () -- result dOMHTMLElementInsertAdjacentHtml _obj where_ html = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj where_' <- textToCString where_ @@ -1518,11 +1812,14 @@ freeMem html' ) +data DOMHTMLElementInsertAdjacentHtmlMethodInfo +instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementInsertAdjacentHtmlMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementInsertAdjacentHtml + -- method DOMHTMLElement::insert_adjacent_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "where", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "where", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "where", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1537,10 +1834,10 @@ dOMHTMLElementInsertAdjacentText :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- where - T.Text -> -- text - m () + a -- _obj + -> T.Text -- where_ + -> T.Text -- text + -> m () -- result dOMHTMLElementInsertAdjacentText _obj where_ text = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj where_' <- textToCString where_ @@ -1556,11 +1853,14 @@ freeMem text' ) +data DOMHTMLElementInsertAdjacentTextMethodInfo +instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementInsertAdjacentTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementInsertAdjacentText + -- method DOMHTMLElement::set_access_key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1573,9 +1873,9 @@ dOMHTMLElementSetAccessKey :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetAccessKey _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1584,11 +1884,14 @@ freeMem value' return () +data DOMHTMLElementSetAccessKeyMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetAccessKeyMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetAccessKey + -- method DOMHTMLElement::set_class_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1601,9 +1904,9 @@ {-# DEPRECATED dOMHTMLElementSetClassName ["(Since version 1.10)","Use webkit_dom_element_set_class_name() instead."]#-} dOMHTMLElementSetClassName :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetClassName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1612,11 +1915,14 @@ freeMem value' return () +data DOMHTMLElementSetClassNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetClassNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetClassName + -- method DOMHTMLElement::set_content_editable -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1630,9 +1936,9 @@ dOMHTMLElementSetContentEditable :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetContentEditable _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1645,11 +1951,14 @@ freeMem value' ) +data DOMHTMLElementSetContentEditableMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetContentEditableMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetContentEditable + -- method DOMHTMLElement::set_dir -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1662,9 +1971,9 @@ dOMHTMLElementSetDir :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetDir _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1673,11 +1982,14 @@ freeMem value' return () +data DOMHTMLElementSetDirMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetDirMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetDir + -- method DOMHTMLElement::set_draggable -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1690,9 +2002,9 @@ dOMHTMLElementSetDraggable :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLElementSetDraggable _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1700,11 +2012,14 @@ touchManagedPtr _obj return () +data DOMHTMLElementSetDraggableMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetDraggableMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetDraggable + -- method DOMHTMLElement::set_hidden -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1717,9 +2032,9 @@ dOMHTMLElementSetHidden :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLElementSetHidden _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1727,11 +2042,14 @@ touchManagedPtr _obj return () +data DOMHTMLElementSetHiddenMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetHiddenMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetHidden + -- method DOMHTMLElement::set_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1744,9 +2062,9 @@ {-# DEPRECATED dOMHTMLElementSetId ["(Since version 2.2)","Use webkit_dom_element_set_id() instead."]#-} dOMHTMLElementSetId :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetId _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1755,11 +2073,14 @@ freeMem value' return () +data DOMHTMLElementSetIdMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetIdMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetId + -- method DOMHTMLElement::set_inner_html -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1773,9 +2094,9 @@ dOMHTMLElementSetInnerHtml :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetInnerHtml _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1788,11 +2109,14 @@ freeMem value' ) +data DOMHTMLElementSetInnerHtmlMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetInnerHtmlMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetInnerHtml + -- method DOMHTMLElement::set_inner_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1806,9 +2130,9 @@ dOMHTMLElementSetInnerText :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetInnerText _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1821,11 +2145,14 @@ freeMem value' ) +data DOMHTMLElementSetInnerTextMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetInnerTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetInnerText + -- method DOMHTMLElement::set_item_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1838,9 +2165,9 @@ {-# DEPRECATED dOMHTMLElementSetItemId ["(Since version 2.2)"]#-} dOMHTMLElementSetItemId :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetItemId _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1849,11 +2176,14 @@ freeMem value' return () +data DOMHTMLElementSetItemIdMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetItemIdMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetItemId + -- method DOMHTMLElement::set_item_scope -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1866,9 +2196,9 @@ {-# DEPRECATED dOMHTMLElementSetItemScope ["(Since version 2.2)"]#-} dOMHTMLElementSetItemScope :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLElementSetItemScope _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1876,11 +2206,14 @@ touchManagedPtr _obj return () +data DOMHTMLElementSetItemScopeMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetItemScopeMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetItemScope + -- method DOMHTMLElement::set_lang -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1893,9 +2226,9 @@ dOMHTMLElementSetLang :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetLang _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1904,11 +2237,14 @@ freeMem value' return () +data DOMHTMLElementSetLangMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetLangMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetLang + -- method DOMHTMLElement::set_outer_html -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1922,9 +2258,9 @@ dOMHTMLElementSetOuterHtml :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetOuterHtml _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1937,11 +2273,14 @@ freeMem value' ) +data DOMHTMLElementSetOuterHtmlMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetOuterHtmlMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetOuterHtml + -- method DOMHTMLElement::set_outer_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1955,9 +2294,9 @@ dOMHTMLElementSetOuterText :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetOuterText _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1970,11 +2309,14 @@ freeMem value' ) +data DOMHTMLElementSetOuterTextMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetOuterTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetOuterText + -- method DOMHTMLElement::set_spellcheck -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1987,9 +2329,9 @@ dOMHTMLElementSetSpellcheck :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLElementSetSpellcheck _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1997,11 +2339,14 @@ touchManagedPtr _obj return () +data DOMHTMLElementSetSpellcheckMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetSpellcheckMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetSpellcheck + -- method DOMHTMLElement::set_tab_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2014,20 +2359,23 @@ dOMHTMLElementSetTabIndex :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLElementSetTabIndex _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_element_set_tab_index _obj' value touchManagedPtr _obj return () +data DOMHTMLElementSetTabIndexMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetTabIndexMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetTabIndex + -- method DOMHTMLElement::set_title -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2040,9 +2388,9 @@ dOMHTMLElementSetTitle :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetTitle _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -2051,11 +2399,14 @@ freeMem value' return () +data DOMHTMLElementSetTitleMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetTitleMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetTitle + -- method DOMHTMLElement::set_translate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2068,9 +2419,9 @@ dOMHTMLElementSetTranslate :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLElementSetTranslate _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -2078,11 +2429,14 @@ touchManagedPtr _obj return () +data DOMHTMLElementSetTranslateMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetTranslateMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetTranslate + -- method DOMHTMLElement::set_webkitdropzone -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2095,9 +2449,9 @@ dOMHTMLElementSetWebkitdropzone :: (MonadIO m, DOMHTMLElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLElementSetWebkitdropzone _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -2105,5 +2459,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLElementSetWebkitdropzoneMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLElementK a) => MethodInfo DOMHTMLElementSetWebkitdropzoneMethodInfo a signature where + overloadedMethod _ = dOMHTMLElementSetWebkitdropzone diff --git a/GI/WebKit/Objects/DOMHTMLElement.hs-boot b/GI/WebKit/Objects/DOMHTMLElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLElement.hs-boot @@ -28,3 +28,51 @@ data DOMHTMLElementTitlePropertyInfo data DOMHTMLElementTranslatePropertyInfo data DOMHTMLElementWebkitdropzonePropertyInfo +data DOMHTMLElementClickMethodInfo +data DOMHTMLElementGetAccessKeyMethodInfo +data DOMHTMLElementGetChildrenMethodInfo +data DOMHTMLElementGetClassListMethodInfo +data DOMHTMLElementGetClassNameMethodInfo +data DOMHTMLElementGetContentEditableMethodInfo +data DOMHTMLElementGetDirMethodInfo +data DOMHTMLElementGetDraggableMethodInfo +data DOMHTMLElementGetHiddenMethodInfo +data DOMHTMLElementGetIdMethodInfo +data DOMHTMLElementGetInnerHtmlMethodInfo +data DOMHTMLElementGetInnerTextMethodInfo +data DOMHTMLElementGetIsContentEditableMethodInfo +data DOMHTMLElementGetItemIdMethodInfo +data DOMHTMLElementGetItemPropMethodInfo +data DOMHTMLElementGetItemRefMethodInfo +data DOMHTMLElementGetItemScopeMethodInfo +data DOMHTMLElementGetItemTypeMethodInfo +data DOMHTMLElementGetLangMethodInfo +data DOMHTMLElementGetOuterHtmlMethodInfo +data DOMHTMLElementGetOuterTextMethodInfo +data DOMHTMLElementGetSpellcheckMethodInfo +data DOMHTMLElementGetTabIndexMethodInfo +data DOMHTMLElementGetTitleMethodInfo +data DOMHTMLElementGetTranslateMethodInfo +data DOMHTMLElementGetWebkitdropzoneMethodInfo +data DOMHTMLElementInsertAdjacentElementMethodInfo +data DOMHTMLElementInsertAdjacentHtmlMethodInfo +data DOMHTMLElementInsertAdjacentTextMethodInfo +data DOMHTMLElementSetAccessKeyMethodInfo +data DOMHTMLElementSetClassNameMethodInfo +data DOMHTMLElementSetContentEditableMethodInfo +data DOMHTMLElementSetDirMethodInfo +data DOMHTMLElementSetDraggableMethodInfo +data DOMHTMLElementSetHiddenMethodInfo +data DOMHTMLElementSetIdMethodInfo +data DOMHTMLElementSetInnerHtmlMethodInfo +data DOMHTMLElementSetInnerTextMethodInfo +data DOMHTMLElementSetItemIdMethodInfo +data DOMHTMLElementSetItemScopeMethodInfo +data DOMHTMLElementSetLangMethodInfo +data DOMHTMLElementSetOuterHtmlMethodInfo +data DOMHTMLElementSetOuterTextMethodInfo +data DOMHTMLElementSetSpellcheckMethodInfo +data DOMHTMLElementSetTabIndexMethodInfo +data DOMHTMLElementSetTitleMethodInfo +data DOMHTMLElementSetTranslateMethodInfo +data DOMHTMLElementSetWebkitdropzoneMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLEmbedElement.hs b/GI/WebKit/Objects/DOMHTMLEmbedElement.hs --- a/GI/WebKit/Objects/DOMHTMLEmbedElement.hs +++ b/GI/WebKit/Objects/DOMHTMLEmbedElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,42 +18,52 @@ -- * Methods -- ** dOMHTMLEmbedElementGetAlign + DOMHTMLEmbedElementGetAlignMethodInfo , dOMHTMLEmbedElementGetAlign , -- ** dOMHTMLEmbedElementGetHeight + DOMHTMLEmbedElementGetHeightMethodInfo , dOMHTMLEmbedElementGetHeight , -- ** dOMHTMLEmbedElementGetName + DOMHTMLEmbedElementGetNameMethodInfo , dOMHTMLEmbedElementGetName , -- ** dOMHTMLEmbedElementGetSrc + DOMHTMLEmbedElementGetSrcMethodInfo , dOMHTMLEmbedElementGetSrc , -- ** dOMHTMLEmbedElementGetWidth + DOMHTMLEmbedElementGetWidthMethodInfo , dOMHTMLEmbedElementGetWidth , -- ** dOMHTMLEmbedElementSetAlign + DOMHTMLEmbedElementSetAlignMethodInfo , dOMHTMLEmbedElementSetAlign , -- ** dOMHTMLEmbedElementSetHeight + DOMHTMLEmbedElementSetHeightMethodInfo , dOMHTMLEmbedElementSetHeight , -- ** dOMHTMLEmbedElementSetName + DOMHTMLEmbedElementSetNameMethodInfo , dOMHTMLEmbedElementSetName , -- ** dOMHTMLEmbedElementSetSrc + DOMHTMLEmbedElementSetSrcMethodInfo , dOMHTMLEmbedElementSetSrc , -- ** dOMHTMLEmbedElementSetWidth + DOMHTMLEmbedElementSetWidthMethodInfo , dOMHTMLEmbedElementSetWidth , @@ -137,6 +148,181 @@ noDOMHTMLEmbedElement :: Maybe DOMHTMLEmbedElement noDOMHTMLEmbedElement = Nothing +type family ResolveDOMHTMLEmbedElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLEmbedElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLEmbedElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLEmbedElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLEmbedElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLEmbedElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLEmbedElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLEmbedElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLEmbedElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLEmbedElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLEmbedElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLEmbedElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLEmbedElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLEmbedElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLEmbedElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLEmbedElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLEmbedElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLEmbedElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLEmbedElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLEmbedElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLEmbedElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLEmbedElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLEmbedElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLEmbedElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLEmbedElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLEmbedElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLEmbedElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLEmbedElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLEmbedElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLEmbedElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLEmbedElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLEmbedElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLEmbedElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLEmbedElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLEmbedElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLEmbedElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLEmbedElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLEmbedElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLEmbedElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLEmbedElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLEmbedElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLEmbedElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLEmbedElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLEmbedElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLEmbedElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLEmbedElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLEmbedElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLEmbedElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLEmbedElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLEmbedElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLEmbedElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLEmbedElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLEmbedElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLEmbedElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLEmbedElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLEmbedElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLEmbedElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLEmbedElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLEmbedElementMethod "getAlign" o = DOMHTMLEmbedElementGetAlignMethodInfo + ResolveDOMHTMLEmbedElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLEmbedElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLEmbedElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLEmbedElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLEmbedElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLEmbedElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLEmbedElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLEmbedElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLEmbedElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLEmbedElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLEmbedElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLEmbedElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLEmbedElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLEmbedElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLEmbedElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLEmbedElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLEmbedElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLEmbedElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLEmbedElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLEmbedElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLEmbedElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLEmbedElementMethod "getHeight" o = DOMHTMLEmbedElementGetHeightMethodInfo + ResolveDOMHTMLEmbedElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLEmbedElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLEmbedElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLEmbedElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLEmbedElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLEmbedElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLEmbedElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLEmbedElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLEmbedElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLEmbedElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLEmbedElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLEmbedElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLEmbedElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLEmbedElementMethod "getName" o = DOMHTMLEmbedElementGetNameMethodInfo + ResolveDOMHTMLEmbedElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLEmbedElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLEmbedElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLEmbedElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLEmbedElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLEmbedElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLEmbedElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLEmbedElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLEmbedElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLEmbedElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLEmbedElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLEmbedElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLEmbedElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLEmbedElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLEmbedElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLEmbedElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLEmbedElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLEmbedElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLEmbedElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLEmbedElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLEmbedElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLEmbedElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLEmbedElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLEmbedElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLEmbedElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLEmbedElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLEmbedElementMethod "getSrc" o = DOMHTMLEmbedElementGetSrcMethodInfo + ResolveDOMHTMLEmbedElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLEmbedElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLEmbedElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLEmbedElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLEmbedElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLEmbedElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLEmbedElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLEmbedElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLEmbedElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLEmbedElementMethod "getWidth" o = DOMHTMLEmbedElementGetWidthMethodInfo + ResolveDOMHTMLEmbedElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLEmbedElementMethod "setAlign" o = DOMHTMLEmbedElementSetAlignMethodInfo + ResolveDOMHTMLEmbedElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLEmbedElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLEmbedElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLEmbedElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLEmbedElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLEmbedElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLEmbedElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLEmbedElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLEmbedElementMethod "setHeight" o = DOMHTMLEmbedElementSetHeightMethodInfo + ResolveDOMHTMLEmbedElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLEmbedElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLEmbedElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLEmbedElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLEmbedElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLEmbedElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLEmbedElementMethod "setName" o = DOMHTMLEmbedElementSetNameMethodInfo + ResolveDOMHTMLEmbedElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLEmbedElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLEmbedElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLEmbedElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLEmbedElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLEmbedElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLEmbedElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLEmbedElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLEmbedElementMethod "setSrc" o = DOMHTMLEmbedElementSetSrcMethodInfo + ResolveDOMHTMLEmbedElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLEmbedElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLEmbedElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLEmbedElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLEmbedElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLEmbedElementMethod "setWidth" o = DOMHTMLEmbedElementSetWidthMethodInfo + ResolveDOMHTMLEmbedElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLEmbedElementMethod t DOMHTMLEmbedElement, MethodInfo info DOMHTMLEmbedElement p) => IsLabelProxy t (DOMHTMLEmbedElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLEmbedElementMethod t DOMHTMLEmbedElement, MethodInfo info DOMHTMLEmbedElement p) => IsLabel t (DOMHTMLEmbedElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -156,7 +342,7 @@ type AttrSetTypeConstraint DOMHTMLEmbedElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLEmbedElementAlignPropertyInfo = DOMHTMLEmbedElementK type AttrGetType DOMHTMLEmbedElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLEmbedElementAlignPropertyInfo = "DOMHTMLEmbedElement::align" + type AttrLabel DOMHTMLEmbedElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLEmbedElementAlign attrSet _ = setDOMHTMLEmbedElementAlign attrConstruct _ = constructDOMHTMLEmbedElementAlign @@ -180,7 +366,7 @@ type AttrSetTypeConstraint DOMHTMLEmbedElementHeightPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLEmbedElementHeightPropertyInfo = DOMHTMLEmbedElementK type AttrGetType DOMHTMLEmbedElementHeightPropertyInfo = Int64 - type AttrLabel DOMHTMLEmbedElementHeightPropertyInfo = "DOMHTMLEmbedElement::height" + type AttrLabel DOMHTMLEmbedElementHeightPropertyInfo = "height" attrGet _ = getDOMHTMLEmbedElementHeight attrSet _ = setDOMHTMLEmbedElementHeight attrConstruct _ = constructDOMHTMLEmbedElementHeight @@ -204,7 +390,7 @@ type AttrSetTypeConstraint DOMHTMLEmbedElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLEmbedElementNamePropertyInfo = DOMHTMLEmbedElementK type AttrGetType DOMHTMLEmbedElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLEmbedElementNamePropertyInfo = "DOMHTMLEmbedElement::name" + type AttrLabel DOMHTMLEmbedElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLEmbedElementName attrSet _ = setDOMHTMLEmbedElementName attrConstruct _ = constructDOMHTMLEmbedElementName @@ -228,7 +414,7 @@ type AttrSetTypeConstraint DOMHTMLEmbedElementSrcPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLEmbedElementSrcPropertyInfo = DOMHTMLEmbedElementK type AttrGetType DOMHTMLEmbedElementSrcPropertyInfo = T.Text - type AttrLabel DOMHTMLEmbedElementSrcPropertyInfo = "DOMHTMLEmbedElement::src" + type AttrLabel DOMHTMLEmbedElementSrcPropertyInfo = "src" attrGet _ = getDOMHTMLEmbedElementSrc attrSet _ = setDOMHTMLEmbedElementSrc attrConstruct _ = constructDOMHTMLEmbedElementSrc @@ -252,7 +438,7 @@ type AttrSetTypeConstraint DOMHTMLEmbedElementTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLEmbedElementTypePropertyInfo = DOMHTMLEmbedElementK type AttrGetType DOMHTMLEmbedElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLEmbedElementTypePropertyInfo = "DOMHTMLEmbedElement::type" + type AttrLabel DOMHTMLEmbedElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLEmbedElementType attrSet _ = setDOMHTMLEmbedElementType attrConstruct _ = constructDOMHTMLEmbedElementType @@ -276,22 +462,21 @@ type AttrSetTypeConstraint DOMHTMLEmbedElementWidthPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLEmbedElementWidthPropertyInfo = DOMHTMLEmbedElementK type AttrGetType DOMHTMLEmbedElementWidthPropertyInfo = Int64 - type AttrLabel DOMHTMLEmbedElementWidthPropertyInfo = "DOMHTMLEmbedElement::width" + type AttrLabel DOMHTMLEmbedElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLEmbedElementWidth attrSet _ = setDOMHTMLEmbedElementWidth attrConstruct _ = constructDOMHTMLEmbedElementWidth type instance AttributeList DOMHTMLEmbedElement = DOMHTMLEmbedElementAttributeList -type DOMHTMLEmbedElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLEmbedElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLEmbedElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLEmbedElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLEmbedElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLEmbedElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLEmbedElementWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLEmbedElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLEmbedElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLEmbedElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLEmbedElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLEmbedElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLEmbedElementTypePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLEmbedElementWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLEmbedElement = DOMHTMLEmbedElementSignalList -type DOMHTMLEmbedElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLEmbedElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLEmbedElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -303,8 +488,8 @@ dOMHTMLEmbedElementGetAlign :: (MonadIO m, DOMHTMLEmbedElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLEmbedElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_embed_element_get_align _obj' @@ -314,11 +499,14 @@ touchManagedPtr _obj return result' +data DOMHTMLEmbedElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLEmbedElementK a) => MethodInfo DOMHTMLEmbedElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLEmbedElementGetAlign + -- method DOMHTMLEmbedElement::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -330,19 +518,22 @@ dOMHTMLEmbedElementGetHeight :: (MonadIO m, DOMHTMLEmbedElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLEmbedElementGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_embed_element_get_height _obj' touchManagedPtr _obj return result +data DOMHTMLEmbedElementGetHeightMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLEmbedElementK a) => MethodInfo DOMHTMLEmbedElementGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLEmbedElementGetHeight + -- method DOMHTMLEmbedElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -354,8 +545,8 @@ dOMHTMLEmbedElementGetName :: (MonadIO m, DOMHTMLEmbedElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLEmbedElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_embed_element_get_name _obj' @@ -365,11 +556,14 @@ touchManagedPtr _obj return result' +data DOMHTMLEmbedElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLEmbedElementK a) => MethodInfo DOMHTMLEmbedElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLEmbedElementGetName + -- method DOMHTMLEmbedElement::get_src -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -381,8 +575,8 @@ dOMHTMLEmbedElementGetSrc :: (MonadIO m, DOMHTMLEmbedElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLEmbedElementGetSrc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_embed_element_get_src _obj' @@ -392,11 +586,14 @@ touchManagedPtr _obj return result' +data DOMHTMLEmbedElementGetSrcMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLEmbedElementK a) => MethodInfo DOMHTMLEmbedElementGetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLEmbedElementGetSrc + -- method DOMHTMLEmbedElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -408,19 +605,22 @@ dOMHTMLEmbedElementGetWidth :: (MonadIO m, DOMHTMLEmbedElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLEmbedElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_embed_element_get_width _obj' touchManagedPtr _obj return result +data DOMHTMLEmbedElementGetWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLEmbedElementK a) => MethodInfo DOMHTMLEmbedElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLEmbedElementGetWidth + -- method DOMHTMLEmbedElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -433,9 +633,9 @@ dOMHTMLEmbedElementSetAlign :: (MonadIO m, DOMHTMLEmbedElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLEmbedElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -444,11 +644,14 @@ freeMem value' return () +data DOMHTMLEmbedElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLEmbedElementK a) => MethodInfo DOMHTMLEmbedElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLEmbedElementSetAlign + -- method DOMHTMLEmbedElement::set_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -461,20 +664,23 @@ dOMHTMLEmbedElementSetHeight :: (MonadIO m, DOMHTMLEmbedElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLEmbedElementSetHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_embed_element_set_height _obj' value touchManagedPtr _obj return () +data DOMHTMLEmbedElementSetHeightMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLEmbedElementK a) => MethodInfo DOMHTMLEmbedElementSetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLEmbedElementSetHeight + -- method DOMHTMLEmbedElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -487,9 +693,9 @@ dOMHTMLEmbedElementSetName :: (MonadIO m, DOMHTMLEmbedElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLEmbedElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -498,11 +704,14 @@ freeMem value' return () +data DOMHTMLEmbedElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLEmbedElementK a) => MethodInfo DOMHTMLEmbedElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLEmbedElementSetName + -- method DOMHTMLEmbedElement::set_src -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -515,9 +724,9 @@ dOMHTMLEmbedElementSetSrc :: (MonadIO m, DOMHTMLEmbedElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLEmbedElementSetSrc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -526,11 +735,14 @@ freeMem value' return () +data DOMHTMLEmbedElementSetSrcMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLEmbedElementK a) => MethodInfo DOMHTMLEmbedElementSetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLEmbedElementSetSrc + -- method DOMHTMLEmbedElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLEmbedElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -543,13 +755,17 @@ dOMHTMLEmbedElementSetWidth :: (MonadIO m, DOMHTMLEmbedElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLEmbedElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_embed_element_set_width _obj' value touchManagedPtr _obj return () + +data DOMHTMLEmbedElementSetWidthMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLEmbedElementK a) => MethodInfo DOMHTMLEmbedElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLEmbedElementSetWidth diff --git a/GI/WebKit/Objects/DOMHTMLEmbedElement.hs-boot b/GI/WebKit/Objects/DOMHTMLEmbedElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLEmbedElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLEmbedElement.hs-boot @@ -17,3 +17,13 @@ data DOMHTMLEmbedElementSrcPropertyInfo data DOMHTMLEmbedElementTypePropertyInfo data DOMHTMLEmbedElementWidthPropertyInfo +data DOMHTMLEmbedElementGetAlignMethodInfo +data DOMHTMLEmbedElementGetHeightMethodInfo +data DOMHTMLEmbedElementGetNameMethodInfo +data DOMHTMLEmbedElementGetSrcMethodInfo +data DOMHTMLEmbedElementGetWidthMethodInfo +data DOMHTMLEmbedElementSetAlignMethodInfo +data DOMHTMLEmbedElementSetHeightMethodInfo +data DOMHTMLEmbedElementSetNameMethodInfo +data DOMHTMLEmbedElementSetSrcMethodInfo +data DOMHTMLEmbedElementSetWidthMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLFieldSetElement.hs b/GI/WebKit/Objects/DOMHTMLFieldSetElement.hs --- a/GI/WebKit/Objects/DOMHTMLFieldSetElement.hs +++ b/GI/WebKit/Objects/DOMHTMLFieldSetElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,46 +18,57 @@ -- * Methods -- ** dOMHTMLFieldSetElementCheckValidity + DOMHTMLFieldSetElementCheckValidityMethodInfo, dOMHTMLFieldSetElementCheckValidity , -- ** dOMHTMLFieldSetElementGetDisabled + DOMHTMLFieldSetElementGetDisabledMethodInfo, dOMHTMLFieldSetElementGetDisabled , -- ** dOMHTMLFieldSetElementGetElements + DOMHTMLFieldSetElementGetElementsMethodInfo, dOMHTMLFieldSetElementGetElements , -- ** dOMHTMLFieldSetElementGetForm + DOMHTMLFieldSetElementGetFormMethodInfo , dOMHTMLFieldSetElementGetForm , -- ** dOMHTMLFieldSetElementGetName + DOMHTMLFieldSetElementGetNameMethodInfo , dOMHTMLFieldSetElementGetName , -- ** dOMHTMLFieldSetElementGetValidationMessage + DOMHTMLFieldSetElementGetValidationMessageMethodInfo, dOMHTMLFieldSetElementGetValidationMessage, -- ** dOMHTMLFieldSetElementGetValidity + DOMHTMLFieldSetElementGetValidityMethodInfo, dOMHTMLFieldSetElementGetValidity , -- ** dOMHTMLFieldSetElementGetWillValidate + DOMHTMLFieldSetElementGetWillValidateMethodInfo, dOMHTMLFieldSetElementGetWillValidate , -- ** dOMHTMLFieldSetElementSetCustomValidity + DOMHTMLFieldSetElementSetCustomValidityMethodInfo, dOMHTMLFieldSetElementSetCustomValidity , -- ** dOMHTMLFieldSetElementSetDisabled + DOMHTMLFieldSetElementSetDisabledMethodInfo, dOMHTMLFieldSetElementSetDisabled , -- ** dOMHTMLFieldSetElementSetName + DOMHTMLFieldSetElementSetNameMethodInfo , dOMHTMLFieldSetElementSetName , @@ -143,6 +155,182 @@ noDOMHTMLFieldSetElement :: Maybe DOMHTMLFieldSetElement noDOMHTMLFieldSetElement = Nothing +type family ResolveDOMHTMLFieldSetElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLFieldSetElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLFieldSetElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLFieldSetElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLFieldSetElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLFieldSetElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLFieldSetElementMethod "checkValidity" o = DOMHTMLFieldSetElementCheckValidityMethodInfo + ResolveDOMHTMLFieldSetElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLFieldSetElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLFieldSetElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLFieldSetElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLFieldSetElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLFieldSetElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLFieldSetElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLFieldSetElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLFieldSetElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLFieldSetElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLFieldSetElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLFieldSetElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLFieldSetElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLFieldSetElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLFieldSetElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLFieldSetElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLFieldSetElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLFieldSetElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLFieldSetElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLFieldSetElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLFieldSetElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLFieldSetElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLFieldSetElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLFieldSetElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLFieldSetElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLFieldSetElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLFieldSetElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLFieldSetElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLFieldSetElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLFieldSetElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLFieldSetElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLFieldSetElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLFieldSetElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLFieldSetElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLFieldSetElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLFieldSetElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLFieldSetElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLFieldSetElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLFieldSetElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLFieldSetElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLFieldSetElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLFieldSetElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getDisabled" o = DOMHTMLFieldSetElementGetDisabledMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getElements" o = DOMHTMLFieldSetElementGetElementsMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getForm" o = DOMHTMLFieldSetElementGetFormMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getName" o = DOMHTMLFieldSetElementGetNameMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getValidationMessage" o = DOMHTMLFieldSetElementGetValidationMessageMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getValidity" o = DOMHTMLFieldSetElementGetValidityMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLFieldSetElementMethod "getWillValidate" o = DOMHTMLFieldSetElementGetWillValidateMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setCustomValidity" o = DOMHTMLFieldSetElementSetCustomValidityMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setDisabled" o = DOMHTMLFieldSetElementSetDisabledMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setName" o = DOMHTMLFieldSetElementSetNameMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLFieldSetElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLFieldSetElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLFieldSetElementMethod t DOMHTMLFieldSetElement, MethodInfo info DOMHTMLFieldSetElement p) => IsLabelProxy t (DOMHTMLFieldSetElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLFieldSetElementMethod t DOMHTMLFieldSetElement, MethodInfo info DOMHTMLFieldSetElement p) => IsLabel t (DOMHTMLFieldSetElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "disabled" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -162,7 +350,7 @@ type AttrSetTypeConstraint DOMHTMLFieldSetElementDisabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLFieldSetElementDisabledPropertyInfo = DOMHTMLFieldSetElementK type AttrGetType DOMHTMLFieldSetElementDisabledPropertyInfo = Bool - type AttrLabel DOMHTMLFieldSetElementDisabledPropertyInfo = "DOMHTMLFieldSetElement::disabled" + type AttrLabel DOMHTMLFieldSetElementDisabledPropertyInfo = "disabled" attrGet _ = getDOMHTMLFieldSetElementDisabled attrSet _ = setDOMHTMLFieldSetElementDisabled attrConstruct _ = constructDOMHTMLFieldSetElementDisabled @@ -180,7 +368,7 @@ type AttrSetTypeConstraint DOMHTMLFieldSetElementElementsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFieldSetElementElementsPropertyInfo = DOMHTMLFieldSetElementK type AttrGetType DOMHTMLFieldSetElementElementsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLFieldSetElementElementsPropertyInfo = "DOMHTMLFieldSetElement::elements" + type AttrLabel DOMHTMLFieldSetElementElementsPropertyInfo = "elements" attrGet _ = getDOMHTMLFieldSetElementElements attrSet _ = undefined attrConstruct _ = undefined @@ -198,7 +386,7 @@ type AttrSetTypeConstraint DOMHTMLFieldSetElementFormPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFieldSetElementFormPropertyInfo = DOMHTMLFieldSetElementK type AttrGetType DOMHTMLFieldSetElementFormPropertyInfo = DOMHTMLFormElement - type AttrLabel DOMHTMLFieldSetElementFormPropertyInfo = "DOMHTMLFieldSetElement::form" + type AttrLabel DOMHTMLFieldSetElementFormPropertyInfo = "form" attrGet _ = getDOMHTMLFieldSetElementForm attrSet _ = undefined attrConstruct _ = undefined @@ -222,7 +410,7 @@ type AttrSetTypeConstraint DOMHTMLFieldSetElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFieldSetElementNamePropertyInfo = DOMHTMLFieldSetElementK type AttrGetType DOMHTMLFieldSetElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLFieldSetElementNamePropertyInfo = "DOMHTMLFieldSetElement::name" + type AttrLabel DOMHTMLFieldSetElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLFieldSetElementName attrSet _ = setDOMHTMLFieldSetElementName attrConstruct _ = constructDOMHTMLFieldSetElementName @@ -240,7 +428,7 @@ type AttrSetTypeConstraint DOMHTMLFieldSetElementTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFieldSetElementTypePropertyInfo = DOMHTMLFieldSetElementK type AttrGetType DOMHTMLFieldSetElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLFieldSetElementTypePropertyInfo = "DOMHTMLFieldSetElement::type" + type AttrLabel DOMHTMLFieldSetElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLFieldSetElementType attrSet _ = undefined attrConstruct _ = undefined @@ -258,7 +446,7 @@ type AttrSetTypeConstraint DOMHTMLFieldSetElementValidationMessagePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFieldSetElementValidationMessagePropertyInfo = DOMHTMLFieldSetElementK type AttrGetType DOMHTMLFieldSetElementValidationMessagePropertyInfo = T.Text - type AttrLabel DOMHTMLFieldSetElementValidationMessagePropertyInfo = "DOMHTMLFieldSetElement::validation-message" + type AttrLabel DOMHTMLFieldSetElementValidationMessagePropertyInfo = "validation-message" attrGet _ = getDOMHTMLFieldSetElementValidationMessage attrSet _ = undefined attrConstruct _ = undefined @@ -276,7 +464,7 @@ type AttrSetTypeConstraint DOMHTMLFieldSetElementValidityPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFieldSetElementValidityPropertyInfo = DOMHTMLFieldSetElementK type AttrGetType DOMHTMLFieldSetElementValidityPropertyInfo = DOMValidityState - type AttrLabel DOMHTMLFieldSetElementValidityPropertyInfo = "DOMHTMLFieldSetElement::validity" + type AttrLabel DOMHTMLFieldSetElementValidityPropertyInfo = "validity" attrGet _ = getDOMHTMLFieldSetElementValidity attrSet _ = undefined attrConstruct _ = undefined @@ -294,22 +482,21 @@ type AttrSetTypeConstraint DOMHTMLFieldSetElementWillValidatePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFieldSetElementWillValidatePropertyInfo = DOMHTMLFieldSetElementK type AttrGetType DOMHTMLFieldSetElementWillValidatePropertyInfo = Bool - type AttrLabel DOMHTMLFieldSetElementWillValidatePropertyInfo = "DOMHTMLFieldSetElement::will-validate" + type AttrLabel DOMHTMLFieldSetElementWillValidatePropertyInfo = "will-validate" attrGet _ = getDOMHTMLFieldSetElementWillValidate attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHTMLFieldSetElement = DOMHTMLFieldSetElementAttributeList -type DOMHTMLFieldSetElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLFieldSetElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("elements", DOMHTMLFieldSetElementElementsPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLFieldSetElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLFieldSetElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLFieldSetElementTypePropertyInfo), '("validation-message", DOMHTMLFieldSetElementValidationMessagePropertyInfo), '("validity", DOMHTMLFieldSetElementValidityPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("will-validate", DOMHTMLFieldSetElementWillValidatePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLFieldSetElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLFieldSetElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("elements", DOMHTMLFieldSetElementElementsPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLFieldSetElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLFieldSetElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLFieldSetElementTypePropertyInfo), '("validationMessage", DOMHTMLFieldSetElementValidationMessagePropertyInfo), '("validity", DOMHTMLFieldSetElementValidityPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("willValidate", DOMHTMLFieldSetElementWillValidatePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLFieldSetElement = DOMHTMLFieldSetElementSignalList -type DOMHTMLFieldSetElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLFieldSetElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLFieldSetElement::check_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -321,8 +508,8 @@ dOMHTMLFieldSetElementCheckValidity :: (MonadIO m, DOMHTMLFieldSetElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLFieldSetElementCheckValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_field_set_element_check_validity _obj' @@ -330,11 +517,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFieldSetElementCheckValidityMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLFieldSetElementK a) => MethodInfo DOMHTMLFieldSetElementCheckValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLFieldSetElementCheckValidity + -- method DOMHTMLFieldSetElement::get_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -346,8 +536,8 @@ dOMHTMLFieldSetElementGetDisabled :: (MonadIO m, DOMHTMLFieldSetElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLFieldSetElementGetDisabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_field_set_element_get_disabled _obj' @@ -355,11 +545,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFieldSetElementGetDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLFieldSetElementK a) => MethodInfo DOMHTMLFieldSetElementGetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLFieldSetElementGetDisabled + -- method DOMHTMLFieldSetElement::get_elements -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -371,8 +564,8 @@ dOMHTMLFieldSetElementGetElements :: (MonadIO m, DOMHTMLFieldSetElementK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLFieldSetElementGetElements _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_field_set_element_get_elements _obj' @@ -381,11 +574,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFieldSetElementGetElementsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLFieldSetElementK a) => MethodInfo DOMHTMLFieldSetElementGetElementsMethodInfo a signature where + overloadedMethod _ = dOMHTMLFieldSetElementGetElements + -- method DOMHTMLFieldSetElement::get_form -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLFormElement" -- throws : False -- Skip return : False @@ -397,8 +593,8 @@ dOMHTMLFieldSetElementGetForm :: (MonadIO m, DOMHTMLFieldSetElementK a) => - a -> -- _obj - m DOMHTMLFormElement + a -- _obj + -> m DOMHTMLFormElement -- result dOMHTMLFieldSetElementGetForm _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_field_set_element_get_form _obj' @@ -407,11 +603,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFieldSetElementGetFormMethodInfo +instance (signature ~ (m DOMHTMLFormElement), MonadIO m, DOMHTMLFieldSetElementK a) => MethodInfo DOMHTMLFieldSetElementGetFormMethodInfo a signature where + overloadedMethod _ = dOMHTMLFieldSetElementGetForm + -- method DOMHTMLFieldSetElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -423,8 +622,8 @@ dOMHTMLFieldSetElementGetName :: (MonadIO m, DOMHTMLFieldSetElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFieldSetElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_field_set_element_get_name _obj' @@ -434,11 +633,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFieldSetElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFieldSetElementK a) => MethodInfo DOMHTMLFieldSetElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLFieldSetElementGetName + -- method DOMHTMLFieldSetElement::get_validation_message -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -450,8 +652,8 @@ dOMHTMLFieldSetElementGetValidationMessage :: (MonadIO m, DOMHTMLFieldSetElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFieldSetElementGetValidationMessage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_field_set_element_get_validation_message _obj' @@ -461,11 +663,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFieldSetElementGetValidationMessageMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFieldSetElementK a) => MethodInfo DOMHTMLFieldSetElementGetValidationMessageMethodInfo a signature where + overloadedMethod _ = dOMHTMLFieldSetElementGetValidationMessage + -- method DOMHTMLFieldSetElement::get_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMValidityState" -- throws : False -- Skip return : False @@ -477,8 +682,8 @@ dOMHTMLFieldSetElementGetValidity :: (MonadIO m, DOMHTMLFieldSetElementK a) => - a -> -- _obj - m DOMValidityState + a -- _obj + -> m DOMValidityState -- result dOMHTMLFieldSetElementGetValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_field_set_element_get_validity _obj' @@ -487,11 +692,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFieldSetElementGetValidityMethodInfo +instance (signature ~ (m DOMValidityState), MonadIO m, DOMHTMLFieldSetElementK a) => MethodInfo DOMHTMLFieldSetElementGetValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLFieldSetElementGetValidity + -- method DOMHTMLFieldSetElement::get_will_validate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -503,8 +711,8 @@ dOMHTMLFieldSetElementGetWillValidate :: (MonadIO m, DOMHTMLFieldSetElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLFieldSetElementGetWillValidate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_field_set_element_get_will_validate _obj' @@ -512,11 +720,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFieldSetElementGetWillValidateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLFieldSetElementK a) => MethodInfo DOMHTMLFieldSetElementGetWillValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLFieldSetElementGetWillValidate + -- method DOMHTMLFieldSetElement::set_custom_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -529,9 +740,9 @@ dOMHTMLFieldSetElementSetCustomValidity :: (MonadIO m, DOMHTMLFieldSetElementK a) => - a -> -- _obj - T.Text -> -- error - m () + a -- _obj + -> T.Text -- error_ + -> m () -- result dOMHTMLFieldSetElementSetCustomValidity _obj error_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj error_' <- textToCString error_ @@ -540,11 +751,14 @@ freeMem error_' return () +data DOMHTMLFieldSetElementSetCustomValidityMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFieldSetElementK a) => MethodInfo DOMHTMLFieldSetElementSetCustomValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLFieldSetElementSetCustomValidity + -- method DOMHTMLFieldSetElement::set_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -557,9 +771,9 @@ dOMHTMLFieldSetElementSetDisabled :: (MonadIO m, DOMHTMLFieldSetElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLFieldSetElementSetDisabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -567,11 +781,14 @@ touchManagedPtr _obj return () +data DOMHTMLFieldSetElementSetDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLFieldSetElementK a) => MethodInfo DOMHTMLFieldSetElementSetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLFieldSetElementSetDisabled + -- method DOMHTMLFieldSetElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFieldSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -584,9 +801,9 @@ dOMHTMLFieldSetElementSetName :: (MonadIO m, DOMHTMLFieldSetElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFieldSetElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -594,5 +811,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLFieldSetElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFieldSetElementK a) => MethodInfo DOMHTMLFieldSetElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLFieldSetElementSetName diff --git a/GI/WebKit/Objects/DOMHTMLFieldSetElement.hs-boot b/GI/WebKit/Objects/DOMHTMLFieldSetElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLFieldSetElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLFieldSetElement.hs-boot @@ -19,3 +19,14 @@ data DOMHTMLFieldSetElementValidationMessagePropertyInfo data DOMHTMLFieldSetElementValidityPropertyInfo data DOMHTMLFieldSetElementWillValidatePropertyInfo +data DOMHTMLFieldSetElementCheckValidityMethodInfo +data DOMHTMLFieldSetElementGetDisabledMethodInfo +data DOMHTMLFieldSetElementGetElementsMethodInfo +data DOMHTMLFieldSetElementGetFormMethodInfo +data DOMHTMLFieldSetElementGetNameMethodInfo +data DOMHTMLFieldSetElementGetValidationMessageMethodInfo +data DOMHTMLFieldSetElementGetValidityMethodInfo +data DOMHTMLFieldSetElementGetWillValidateMethodInfo +data DOMHTMLFieldSetElementSetCustomValidityMethodInfo +data DOMHTMLFieldSetElementSetDisabledMethodInfo +data DOMHTMLFieldSetElementSetNameMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLFontElement.hs b/GI/WebKit/Objects/DOMHTMLFontElement.hs --- a/GI/WebKit/Objects/DOMHTMLFontElement.hs +++ b/GI/WebKit/Objects/DOMHTMLFontElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** dOMHTMLFontElementGetColor + DOMHTMLFontElementGetColorMethodInfo , dOMHTMLFontElementGetColor , -- ** dOMHTMLFontElementGetFace + DOMHTMLFontElementGetFaceMethodInfo , dOMHTMLFontElementGetFace , -- ** dOMHTMLFontElementGetSize + DOMHTMLFontElementGetSizeMethodInfo , dOMHTMLFontElementGetSize , -- ** dOMHTMLFontElementSetColor + DOMHTMLFontElementSetColorMethodInfo , dOMHTMLFontElementSetColor , -- ** dOMHTMLFontElementSetFace + DOMHTMLFontElementSetFaceMethodInfo , dOMHTMLFontElementSetFace , -- ** dOMHTMLFontElementSetSize + DOMHTMLFontElementSetSizeMethodInfo , dOMHTMLFontElementSetSize , @@ -100,6 +107,177 @@ noDOMHTMLFontElement :: Maybe DOMHTMLFontElement noDOMHTMLFontElement = Nothing +type family ResolveDOMHTMLFontElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLFontElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLFontElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLFontElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLFontElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLFontElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLFontElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLFontElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLFontElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLFontElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLFontElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLFontElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLFontElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLFontElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLFontElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLFontElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLFontElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLFontElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLFontElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLFontElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLFontElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLFontElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLFontElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLFontElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLFontElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLFontElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLFontElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLFontElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLFontElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLFontElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLFontElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLFontElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLFontElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLFontElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLFontElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLFontElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLFontElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLFontElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLFontElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLFontElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLFontElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLFontElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLFontElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLFontElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLFontElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLFontElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLFontElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLFontElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLFontElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLFontElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLFontElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLFontElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLFontElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLFontElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLFontElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLFontElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLFontElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLFontElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLFontElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLFontElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLFontElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLFontElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLFontElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLFontElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLFontElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLFontElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLFontElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLFontElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLFontElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLFontElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLFontElementMethod "getColor" o = DOMHTMLFontElementGetColorMethodInfo + ResolveDOMHTMLFontElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLFontElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLFontElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLFontElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLFontElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLFontElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLFontElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLFontElementMethod "getFace" o = DOMHTMLFontElementGetFaceMethodInfo + ResolveDOMHTMLFontElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLFontElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLFontElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLFontElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLFontElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLFontElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLFontElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLFontElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLFontElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLFontElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLFontElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLFontElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLFontElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLFontElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLFontElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLFontElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLFontElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLFontElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLFontElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLFontElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLFontElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLFontElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLFontElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLFontElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLFontElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLFontElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLFontElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLFontElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLFontElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLFontElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLFontElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLFontElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLFontElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLFontElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLFontElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLFontElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLFontElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLFontElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLFontElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLFontElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLFontElementMethod "getSize" o = DOMHTMLFontElementGetSizeMethodInfo + ResolveDOMHTMLFontElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLFontElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLFontElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLFontElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLFontElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLFontElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLFontElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLFontElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLFontElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLFontElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLFontElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLFontElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLFontElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLFontElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLFontElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLFontElementMethod "setColor" o = DOMHTMLFontElementSetColorMethodInfo + ResolveDOMHTMLFontElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLFontElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLFontElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLFontElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLFontElementMethod "setFace" o = DOMHTMLFontElementSetFaceMethodInfo + ResolveDOMHTMLFontElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLFontElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLFontElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLFontElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLFontElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLFontElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLFontElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLFontElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLFontElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLFontElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLFontElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLFontElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLFontElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLFontElementMethod "setSize" o = DOMHTMLFontElementSetSizeMethodInfo + ResolveDOMHTMLFontElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLFontElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLFontElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLFontElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLFontElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLFontElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLFontElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLFontElementMethod t DOMHTMLFontElement, MethodInfo info DOMHTMLFontElement p) => IsLabelProxy t (DOMHTMLFontElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLFontElementMethod t DOMHTMLFontElement, MethodInfo info DOMHTMLFontElement p) => IsLabel t (DOMHTMLFontElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "color" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -119,7 +297,7 @@ type AttrSetTypeConstraint DOMHTMLFontElementColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFontElementColorPropertyInfo = DOMHTMLFontElementK type AttrGetType DOMHTMLFontElementColorPropertyInfo = T.Text - type AttrLabel DOMHTMLFontElementColorPropertyInfo = "DOMHTMLFontElement::color" + type AttrLabel DOMHTMLFontElementColorPropertyInfo = "color" attrGet _ = getDOMHTMLFontElementColor attrSet _ = setDOMHTMLFontElementColor attrConstruct _ = constructDOMHTMLFontElementColor @@ -143,7 +321,7 @@ type AttrSetTypeConstraint DOMHTMLFontElementFacePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFontElementFacePropertyInfo = DOMHTMLFontElementK type AttrGetType DOMHTMLFontElementFacePropertyInfo = T.Text - type AttrLabel DOMHTMLFontElementFacePropertyInfo = "DOMHTMLFontElement::face" + type AttrLabel DOMHTMLFontElementFacePropertyInfo = "face" attrGet _ = getDOMHTMLFontElementFace attrSet _ = setDOMHTMLFontElementFace attrConstruct _ = constructDOMHTMLFontElementFace @@ -167,22 +345,21 @@ type AttrSetTypeConstraint DOMHTMLFontElementSizePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFontElementSizePropertyInfo = DOMHTMLFontElementK type AttrGetType DOMHTMLFontElementSizePropertyInfo = T.Text - type AttrLabel DOMHTMLFontElementSizePropertyInfo = "DOMHTMLFontElement::size" + type AttrLabel DOMHTMLFontElementSizePropertyInfo = "size" attrGet _ = getDOMHTMLFontElementSize attrSet _ = setDOMHTMLFontElementSize attrConstruct _ = constructDOMHTMLFontElementSize type instance AttributeList DOMHTMLFontElement = DOMHTMLFontElementAttributeList -type DOMHTMLFontElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("color", DOMHTMLFontElementColorPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("face", DOMHTMLFontElementFacePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLFontElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLFontElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("color", DOMHTMLFontElementColorPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("face", DOMHTMLFontElementFacePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLFontElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLFontElement = DOMHTMLFontElementSignalList -type DOMHTMLFontElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLFontElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLFontElement::get_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -194,8 +371,8 @@ dOMHTMLFontElementGetColor :: (MonadIO m, DOMHTMLFontElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFontElementGetColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_font_element_get_color _obj' @@ -205,11 +382,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFontElementGetColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFontElementK a) => MethodInfo DOMHTMLFontElementGetColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLFontElementGetColor + -- method DOMHTMLFontElement::get_face -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -221,8 +401,8 @@ dOMHTMLFontElementGetFace :: (MonadIO m, DOMHTMLFontElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFontElementGetFace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_font_element_get_face _obj' @@ -232,11 +412,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFontElementGetFaceMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFontElementK a) => MethodInfo DOMHTMLFontElementGetFaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLFontElementGetFace + -- method DOMHTMLFontElement::get_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -248,8 +431,8 @@ dOMHTMLFontElementGetSize :: (MonadIO m, DOMHTMLFontElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFontElementGetSize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_font_element_get_size _obj' @@ -259,11 +442,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFontElementGetSizeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFontElementK a) => MethodInfo DOMHTMLFontElementGetSizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLFontElementGetSize + -- method DOMHTMLFontElement::set_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -276,9 +462,9 @@ dOMHTMLFontElementSetColor :: (MonadIO m, DOMHTMLFontElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFontElementSetColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -287,11 +473,14 @@ freeMem value' return () +data DOMHTMLFontElementSetColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFontElementK a) => MethodInfo DOMHTMLFontElementSetColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLFontElementSetColor + -- method DOMHTMLFontElement::set_face -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -304,9 +493,9 @@ dOMHTMLFontElementSetFace :: (MonadIO m, DOMHTMLFontElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFontElementSetFace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -315,11 +504,14 @@ freeMem value' return () +data DOMHTMLFontElementSetFaceMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFontElementK a) => MethodInfo DOMHTMLFontElementSetFaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLFontElementSetFace + -- method DOMHTMLFontElement::set_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFontElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -332,9 +524,9 @@ dOMHTMLFontElementSetSize :: (MonadIO m, DOMHTMLFontElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFontElementSetSize _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -342,5 +534,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLFontElementSetSizeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFontElementK a) => MethodInfo DOMHTMLFontElementSetSizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLFontElementSetSize diff --git a/GI/WebKit/Objects/DOMHTMLFontElement.hs-boot b/GI/WebKit/Objects/DOMHTMLFontElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLFontElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLFontElement.hs-boot @@ -14,3 +14,9 @@ data DOMHTMLFontElementColorPropertyInfo data DOMHTMLFontElementFacePropertyInfo data DOMHTMLFontElementSizePropertyInfo +data DOMHTMLFontElementGetColorMethodInfo +data DOMHTMLFontElementGetFaceMethodInfo +data DOMHTMLFontElementGetSizeMethodInfo +data DOMHTMLFontElementSetColorMethodInfo +data DOMHTMLFontElementSetFaceMethodInfo +data DOMHTMLFontElementSetSizeMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLFormElement.hs b/GI/WebKit/Objects/DOMHTMLFormElement.hs --- a/GI/WebKit/Objects/DOMHTMLFormElement.hs +++ b/GI/WebKit/Objects/DOMHTMLFormElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,118 +18,147 @@ -- * Methods -- ** dOMHTMLFormElementCheckValidity + DOMHTMLFormElementCheckValidityMethodInfo, dOMHTMLFormElementCheckValidity , -- ** dOMHTMLFormElementDispatchFormChange + DOMHTMLFormElementDispatchFormChangeMethodInfo, dOMHTMLFormElementDispatchFormChange , -- ** dOMHTMLFormElementDispatchFormInput + DOMHTMLFormElementDispatchFormInputMethodInfo, dOMHTMLFormElementDispatchFormInput , -- ** dOMHTMLFormElementGetAcceptCharset + DOMHTMLFormElementGetAcceptCharsetMethodInfo, dOMHTMLFormElementGetAcceptCharset , -- ** dOMHTMLFormElementGetAction + DOMHTMLFormElementGetActionMethodInfo , dOMHTMLFormElementGetAction , -- ** dOMHTMLFormElementGetAutocapitalize + DOMHTMLFormElementGetAutocapitalizeMethodInfo, dOMHTMLFormElementGetAutocapitalize , -- ** dOMHTMLFormElementGetAutocomplete + DOMHTMLFormElementGetAutocompleteMethodInfo, dOMHTMLFormElementGetAutocomplete , -- ** dOMHTMLFormElementGetAutocorrect + DOMHTMLFormElementGetAutocorrectMethodInfo, dOMHTMLFormElementGetAutocorrect , -- ** dOMHTMLFormElementGetElements + DOMHTMLFormElementGetElementsMethodInfo , dOMHTMLFormElementGetElements , -- ** dOMHTMLFormElementGetEncoding + DOMHTMLFormElementGetEncodingMethodInfo , dOMHTMLFormElementGetEncoding , -- ** dOMHTMLFormElementGetEnctype + DOMHTMLFormElementGetEnctypeMethodInfo , dOMHTMLFormElementGetEnctype , -- ** dOMHTMLFormElementGetLength + DOMHTMLFormElementGetLengthMethodInfo , dOMHTMLFormElementGetLength , -- ** dOMHTMLFormElementGetMethod + DOMHTMLFormElementGetMethodMethodInfo , dOMHTMLFormElementGetMethod , -- ** dOMHTMLFormElementGetName + DOMHTMLFormElementGetNameMethodInfo , dOMHTMLFormElementGetName , -- ** dOMHTMLFormElementGetNoValidate + DOMHTMLFormElementGetNoValidateMethodInfo, dOMHTMLFormElementGetNoValidate , -- ** dOMHTMLFormElementGetTarget + DOMHTMLFormElementGetTargetMethodInfo , dOMHTMLFormElementGetTarget , -- ** dOMHTMLFormElementReset + DOMHTMLFormElementResetMethodInfo , dOMHTMLFormElementReset , -- ** dOMHTMLFormElementSetAcceptCharset + DOMHTMLFormElementSetAcceptCharsetMethodInfo, dOMHTMLFormElementSetAcceptCharset , -- ** dOMHTMLFormElementSetAction + DOMHTMLFormElementSetActionMethodInfo , dOMHTMLFormElementSetAction , -- ** dOMHTMLFormElementSetAutocapitalize + DOMHTMLFormElementSetAutocapitalizeMethodInfo, dOMHTMLFormElementSetAutocapitalize , -- ** dOMHTMLFormElementSetAutocomplete + DOMHTMLFormElementSetAutocompleteMethodInfo, dOMHTMLFormElementSetAutocomplete , -- ** dOMHTMLFormElementSetAutocorrect + DOMHTMLFormElementSetAutocorrectMethodInfo, dOMHTMLFormElementSetAutocorrect , -- ** dOMHTMLFormElementSetEncoding + DOMHTMLFormElementSetEncodingMethodInfo , dOMHTMLFormElementSetEncoding , -- ** dOMHTMLFormElementSetEnctype + DOMHTMLFormElementSetEnctypeMethodInfo , dOMHTMLFormElementSetEnctype , -- ** dOMHTMLFormElementSetMethod + DOMHTMLFormElementSetMethodMethodInfo , dOMHTMLFormElementSetMethod , -- ** dOMHTMLFormElementSetName + DOMHTMLFormElementSetNameMethodInfo , dOMHTMLFormElementSetName , -- ** dOMHTMLFormElementSetNoValidate + DOMHTMLFormElementSetNoValidateMethodInfo, dOMHTMLFormElementSetNoValidate , -- ** dOMHTMLFormElementSetTarget + DOMHTMLFormElementSetTargetMethodInfo , dOMHTMLFormElementSetTarget , -- ** dOMHTMLFormElementSubmit + DOMHTMLFormElementSubmitMethodInfo , dOMHTMLFormElementSubmit , @@ -258,6 +288,200 @@ noDOMHTMLFormElement :: Maybe DOMHTMLFormElement noDOMHTMLFormElement = Nothing +type family ResolveDOMHTMLFormElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLFormElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLFormElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLFormElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLFormElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLFormElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLFormElementMethod "checkValidity" o = DOMHTMLFormElementCheckValidityMethodInfo + ResolveDOMHTMLFormElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLFormElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLFormElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLFormElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLFormElementMethod "dispatchFormChange" o = DOMHTMLFormElementDispatchFormChangeMethodInfo + ResolveDOMHTMLFormElementMethod "dispatchFormInput" o = DOMHTMLFormElementDispatchFormInputMethodInfo + ResolveDOMHTMLFormElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLFormElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLFormElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLFormElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLFormElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLFormElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLFormElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLFormElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLFormElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLFormElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLFormElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLFormElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLFormElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLFormElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLFormElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLFormElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLFormElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLFormElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLFormElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLFormElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLFormElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLFormElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLFormElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLFormElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLFormElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLFormElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLFormElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLFormElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLFormElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLFormElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLFormElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLFormElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLFormElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLFormElementMethod "reset" o = DOMHTMLFormElementResetMethodInfo + ResolveDOMHTMLFormElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLFormElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLFormElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLFormElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLFormElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLFormElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLFormElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLFormElementMethod "submit" o = DOMHTMLFormElementSubmitMethodInfo + ResolveDOMHTMLFormElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLFormElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLFormElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLFormElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLFormElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLFormElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLFormElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLFormElementMethod "getAcceptCharset" o = DOMHTMLFormElementGetAcceptCharsetMethodInfo + ResolveDOMHTMLFormElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLFormElementMethod "getAction" o = DOMHTMLFormElementGetActionMethodInfo + ResolveDOMHTMLFormElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLFormElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLFormElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLFormElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLFormElementMethod "getAutocapitalize" o = DOMHTMLFormElementGetAutocapitalizeMethodInfo + ResolveDOMHTMLFormElementMethod "getAutocomplete" o = DOMHTMLFormElementGetAutocompleteMethodInfo + ResolveDOMHTMLFormElementMethod "getAutocorrect" o = DOMHTMLFormElementGetAutocorrectMethodInfo + ResolveDOMHTMLFormElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLFormElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLFormElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLFormElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLFormElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLFormElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLFormElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLFormElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLFormElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLFormElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLFormElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLFormElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLFormElementMethod "getElements" o = DOMHTMLFormElementGetElementsMethodInfo + ResolveDOMHTMLFormElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLFormElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLFormElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLFormElementMethod "getEncoding" o = DOMHTMLFormElementGetEncodingMethodInfo + ResolveDOMHTMLFormElementMethod "getEnctype" o = DOMHTMLFormElementGetEnctypeMethodInfo + ResolveDOMHTMLFormElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLFormElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLFormElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLFormElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLFormElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLFormElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLFormElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLFormElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLFormElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLFormElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLFormElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLFormElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLFormElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLFormElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLFormElementMethod "getLength" o = DOMHTMLFormElementGetLengthMethodInfo + ResolveDOMHTMLFormElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLFormElementMethod "getMethod" o = DOMHTMLFormElementGetMethodMethodInfo + ResolveDOMHTMLFormElementMethod "getName" o = DOMHTMLFormElementGetNameMethodInfo + ResolveDOMHTMLFormElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLFormElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLFormElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLFormElementMethod "getNoValidate" o = DOMHTMLFormElementGetNoValidateMethodInfo + ResolveDOMHTMLFormElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLFormElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLFormElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLFormElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLFormElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLFormElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLFormElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLFormElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLFormElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLFormElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLFormElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLFormElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLFormElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLFormElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLFormElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLFormElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLFormElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLFormElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLFormElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLFormElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLFormElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLFormElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLFormElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLFormElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLFormElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLFormElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLFormElementMethod "getTarget" o = DOMHTMLFormElementGetTargetMethodInfo + ResolveDOMHTMLFormElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLFormElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLFormElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLFormElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLFormElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLFormElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLFormElementMethod "setAcceptCharset" o = DOMHTMLFormElementSetAcceptCharsetMethodInfo + ResolveDOMHTMLFormElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLFormElementMethod "setAction" o = DOMHTMLFormElementSetActionMethodInfo + ResolveDOMHTMLFormElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLFormElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLFormElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLFormElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLFormElementMethod "setAutocapitalize" o = DOMHTMLFormElementSetAutocapitalizeMethodInfo + ResolveDOMHTMLFormElementMethod "setAutocomplete" o = DOMHTMLFormElementSetAutocompleteMethodInfo + ResolveDOMHTMLFormElementMethod "setAutocorrect" o = DOMHTMLFormElementSetAutocorrectMethodInfo + ResolveDOMHTMLFormElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLFormElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLFormElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLFormElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLFormElementMethod "setEncoding" o = DOMHTMLFormElementSetEncodingMethodInfo + ResolveDOMHTMLFormElementMethod "setEnctype" o = DOMHTMLFormElementSetEnctypeMethodInfo + ResolveDOMHTMLFormElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLFormElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLFormElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLFormElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLFormElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLFormElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLFormElementMethod "setMethod" o = DOMHTMLFormElementSetMethodMethodInfo + ResolveDOMHTMLFormElementMethod "setName" o = DOMHTMLFormElementSetNameMethodInfo + ResolveDOMHTMLFormElementMethod "setNoValidate" o = DOMHTMLFormElementSetNoValidateMethodInfo + ResolveDOMHTMLFormElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLFormElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLFormElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLFormElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLFormElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLFormElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLFormElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLFormElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLFormElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLFormElementMethod "setTarget" o = DOMHTMLFormElementSetTargetMethodInfo + ResolveDOMHTMLFormElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLFormElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLFormElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLFormElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLFormElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLFormElementMethod t DOMHTMLFormElement, MethodInfo info DOMHTMLFormElement p) => IsLabelProxy t (DOMHTMLFormElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLFormElementMethod t DOMHTMLFormElement, MethodInfo info DOMHTMLFormElement p) => IsLabel t (DOMHTMLFormElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "accept-charset" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -277,7 +501,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementAcceptCharsetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFormElementAcceptCharsetPropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementAcceptCharsetPropertyInfo = T.Text - type AttrLabel DOMHTMLFormElementAcceptCharsetPropertyInfo = "DOMHTMLFormElement::accept-charset" + type AttrLabel DOMHTMLFormElementAcceptCharsetPropertyInfo = "accept-charset" attrGet _ = getDOMHTMLFormElementAcceptCharset attrSet _ = setDOMHTMLFormElementAcceptCharset attrConstruct _ = constructDOMHTMLFormElementAcceptCharset @@ -301,7 +525,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementActionPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFormElementActionPropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementActionPropertyInfo = T.Text - type AttrLabel DOMHTMLFormElementActionPropertyInfo = "DOMHTMLFormElement::action" + type AttrLabel DOMHTMLFormElementActionPropertyInfo = "action" attrGet _ = getDOMHTMLFormElementAction attrSet _ = setDOMHTMLFormElementAction attrConstruct _ = constructDOMHTMLFormElementAction @@ -325,7 +549,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementAutocapitalizePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFormElementAutocapitalizePropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementAutocapitalizePropertyInfo = T.Text - type AttrLabel DOMHTMLFormElementAutocapitalizePropertyInfo = "DOMHTMLFormElement::autocapitalize" + type AttrLabel DOMHTMLFormElementAutocapitalizePropertyInfo = "autocapitalize" attrGet _ = getDOMHTMLFormElementAutocapitalize attrSet _ = setDOMHTMLFormElementAutocapitalize attrConstruct _ = constructDOMHTMLFormElementAutocapitalize @@ -349,7 +573,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementAutocompletePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFormElementAutocompletePropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementAutocompletePropertyInfo = T.Text - type AttrLabel DOMHTMLFormElementAutocompletePropertyInfo = "DOMHTMLFormElement::autocomplete" + type AttrLabel DOMHTMLFormElementAutocompletePropertyInfo = "autocomplete" attrGet _ = getDOMHTMLFormElementAutocomplete attrSet _ = setDOMHTMLFormElementAutocomplete attrConstruct _ = constructDOMHTMLFormElementAutocomplete @@ -373,7 +597,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementAutocorrectPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLFormElementAutocorrectPropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementAutocorrectPropertyInfo = Bool - type AttrLabel DOMHTMLFormElementAutocorrectPropertyInfo = "DOMHTMLFormElement::autocorrect" + type AttrLabel DOMHTMLFormElementAutocorrectPropertyInfo = "autocorrect" attrGet _ = getDOMHTMLFormElementAutocorrect attrSet _ = setDOMHTMLFormElementAutocorrect attrConstruct _ = constructDOMHTMLFormElementAutocorrect @@ -391,7 +615,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementElementsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFormElementElementsPropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementElementsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLFormElementElementsPropertyInfo = "DOMHTMLFormElement::elements" + type AttrLabel DOMHTMLFormElementElementsPropertyInfo = "elements" attrGet _ = getDOMHTMLFormElementElements attrSet _ = undefined attrConstruct _ = undefined @@ -415,7 +639,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementEncodingPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFormElementEncodingPropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementEncodingPropertyInfo = T.Text - type AttrLabel DOMHTMLFormElementEncodingPropertyInfo = "DOMHTMLFormElement::encoding" + type AttrLabel DOMHTMLFormElementEncodingPropertyInfo = "encoding" attrGet _ = getDOMHTMLFormElementEncoding attrSet _ = setDOMHTMLFormElementEncoding attrConstruct _ = constructDOMHTMLFormElementEncoding @@ -439,7 +663,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementEnctypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFormElementEnctypePropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementEnctypePropertyInfo = T.Text - type AttrLabel DOMHTMLFormElementEnctypePropertyInfo = "DOMHTMLFormElement::enctype" + type AttrLabel DOMHTMLFormElementEnctypePropertyInfo = "enctype" attrGet _ = getDOMHTMLFormElementEnctype attrSet _ = setDOMHTMLFormElementEnctype attrConstruct _ = constructDOMHTMLFormElementEnctype @@ -457,7 +681,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFormElementLengthPropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementLengthPropertyInfo = Int64 - type AttrLabel DOMHTMLFormElementLengthPropertyInfo = "DOMHTMLFormElement::length" + type AttrLabel DOMHTMLFormElementLengthPropertyInfo = "length" attrGet _ = getDOMHTMLFormElementLength attrSet _ = undefined attrConstruct _ = undefined @@ -481,7 +705,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementMethodPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFormElementMethodPropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementMethodPropertyInfo = T.Text - type AttrLabel DOMHTMLFormElementMethodPropertyInfo = "DOMHTMLFormElement::method" + type AttrLabel DOMHTMLFormElementMethodPropertyInfo = "method" attrGet _ = getDOMHTMLFormElementMethod attrSet _ = setDOMHTMLFormElementMethod attrConstruct _ = constructDOMHTMLFormElementMethod @@ -505,7 +729,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFormElementNamePropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLFormElementNamePropertyInfo = "DOMHTMLFormElement::name" + type AttrLabel DOMHTMLFormElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLFormElementName attrSet _ = setDOMHTMLFormElementName attrConstruct _ = constructDOMHTMLFormElementName @@ -529,7 +753,7 @@ type AttrSetTypeConstraint DOMHTMLFormElementNoValidatePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLFormElementNoValidatePropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementNoValidatePropertyInfo = Bool - type AttrLabel DOMHTMLFormElementNoValidatePropertyInfo = "DOMHTMLFormElement::no-validate" + type AttrLabel DOMHTMLFormElementNoValidatePropertyInfo = "no-validate" attrGet _ = getDOMHTMLFormElementNoValidate attrSet _ = setDOMHTMLFormElementNoValidate attrConstruct _ = constructDOMHTMLFormElementNoValidate @@ -553,22 +777,21 @@ type AttrSetTypeConstraint DOMHTMLFormElementTargetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFormElementTargetPropertyInfo = DOMHTMLFormElementK type AttrGetType DOMHTMLFormElementTargetPropertyInfo = T.Text - type AttrLabel DOMHTMLFormElementTargetPropertyInfo = "DOMHTMLFormElement::target" + type AttrLabel DOMHTMLFormElementTargetPropertyInfo = "target" attrGet _ = getDOMHTMLFormElementTarget attrSet _ = setDOMHTMLFormElementTarget attrConstruct _ = constructDOMHTMLFormElementTarget type instance AttributeList DOMHTMLFormElement = DOMHTMLFormElementAttributeList -type DOMHTMLFormElementAttributeList = ('[ '("accept-charset", DOMHTMLFormElementAcceptCharsetPropertyInfo), '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("action", DOMHTMLFormElementActionPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autocapitalize", DOMHTMLFormElementAutocapitalizePropertyInfo), '("autocomplete", DOMHTMLFormElementAutocompletePropertyInfo), '("autocorrect", DOMHTMLFormElementAutocorrectPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("elements", DOMHTMLFormElementElementsPropertyInfo), '("encoding", DOMHTMLFormElementEncodingPropertyInfo), '("enctype", DOMHTMLFormElementEnctypePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("length", DOMHTMLFormElementLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("method", DOMHTMLFormElementMethodPropertyInfo), '("name", DOMHTMLFormElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("no-validate", DOMHTMLFormElementNoValidatePropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("target", DOMHTMLFormElementTargetPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLFormElementAttributeList = ('[ '("acceptCharset", DOMHTMLFormElementAcceptCharsetPropertyInfo), '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("action", DOMHTMLFormElementActionPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autocapitalize", DOMHTMLFormElementAutocapitalizePropertyInfo), '("autocomplete", DOMHTMLFormElementAutocompletePropertyInfo), '("autocorrect", DOMHTMLFormElementAutocorrectPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("elements", DOMHTMLFormElementElementsPropertyInfo), '("encoding", DOMHTMLFormElementEncodingPropertyInfo), '("enctype", DOMHTMLFormElementEnctypePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("length", DOMHTMLFormElementLengthPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("method", DOMHTMLFormElementMethodPropertyInfo), '("name", DOMHTMLFormElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("noValidate", DOMHTMLFormElementNoValidatePropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("target", DOMHTMLFormElementTargetPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLFormElement = DOMHTMLFormElementSignalList -type DOMHTMLFormElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLFormElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLFormElement::check_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -580,8 +803,8 @@ dOMHTMLFormElementCheckValidity :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLFormElementCheckValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_check_validity _obj' @@ -589,11 +812,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementCheckValidityMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementCheckValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementCheckValidity + -- method DOMHTMLFormElement::dispatch_form_change -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -605,19 +831,22 @@ {-# DEPRECATED dOMHTMLFormElementDispatchFormChange ["(Since version 1.6)"]#-} dOMHTMLFormElementDispatchFormChange :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLFormElementDispatchFormChange _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_form_element_dispatch_form_change _obj' touchManagedPtr _obj return () +data DOMHTMLFormElementDispatchFormChangeMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementDispatchFormChangeMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementDispatchFormChange + -- method DOMHTMLFormElement::dispatch_form_input -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -629,19 +858,22 @@ {-# DEPRECATED dOMHTMLFormElementDispatchFormInput ["(Since version 1.6)"]#-} dOMHTMLFormElementDispatchFormInput :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLFormElementDispatchFormInput _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_form_element_dispatch_form_input _obj' touchManagedPtr _obj return () +data DOMHTMLFormElementDispatchFormInputMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementDispatchFormInputMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementDispatchFormInput + -- method DOMHTMLFormElement::get_accept_charset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -653,8 +885,8 @@ dOMHTMLFormElementGetAcceptCharset :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFormElementGetAcceptCharset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_accept_charset _obj' @@ -664,11 +896,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetAcceptCharsetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetAcceptCharsetMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetAcceptCharset + -- method DOMHTMLFormElement::get_action -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -680,8 +915,8 @@ dOMHTMLFormElementGetAction :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFormElementGetAction _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_action _obj' @@ -691,11 +926,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetActionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetActionMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetAction + -- method DOMHTMLFormElement::get_autocapitalize -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -707,8 +945,8 @@ dOMHTMLFormElementGetAutocapitalize :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFormElementGetAutocapitalize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_autocapitalize _obj' @@ -718,11 +956,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetAutocapitalizeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetAutocapitalizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetAutocapitalize + -- method DOMHTMLFormElement::get_autocomplete -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -734,8 +975,8 @@ dOMHTMLFormElementGetAutocomplete :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFormElementGetAutocomplete _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_autocomplete _obj' @@ -745,11 +986,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetAutocompleteMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetAutocompleteMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetAutocomplete + -- method DOMHTMLFormElement::get_autocorrect -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -761,8 +1005,8 @@ dOMHTMLFormElementGetAutocorrect :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLFormElementGetAutocorrect _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_autocorrect _obj' @@ -770,11 +1014,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetAutocorrectMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetAutocorrectMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetAutocorrect + -- method DOMHTMLFormElement::get_elements -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -786,8 +1033,8 @@ dOMHTMLFormElementGetElements :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLFormElementGetElements _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_elements _obj' @@ -796,11 +1043,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetElementsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetElementsMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetElements + -- method DOMHTMLFormElement::get_encoding -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -812,8 +1062,8 @@ dOMHTMLFormElementGetEncoding :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFormElementGetEncoding _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_encoding _obj' @@ -823,11 +1073,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetEncodingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetEncodingMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetEncoding + -- method DOMHTMLFormElement::get_enctype -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -839,8 +1092,8 @@ dOMHTMLFormElementGetEnctype :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFormElementGetEnctype _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_enctype _obj' @@ -850,11 +1103,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetEnctypeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetEnctypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetEnctype + -- method DOMHTMLFormElement::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -866,19 +1122,22 @@ dOMHTMLFormElementGetLength :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLFormElementGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_length _obj' touchManagedPtr _obj return result +data DOMHTMLFormElementGetLengthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetLengthMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetLength + -- method DOMHTMLFormElement::get_method -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -890,8 +1149,8 @@ dOMHTMLFormElementGetMethod :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFormElementGetMethod _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_method _obj' @@ -901,11 +1160,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetMethodMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetMethodMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetMethod + -- method DOMHTMLFormElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -917,8 +1179,8 @@ dOMHTMLFormElementGetName :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFormElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_name _obj' @@ -928,11 +1190,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetName + -- method DOMHTMLFormElement::get_no_validate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -944,8 +1209,8 @@ dOMHTMLFormElementGetNoValidate :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLFormElementGetNoValidate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_no_validate _obj' @@ -953,11 +1218,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetNoValidateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetNoValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetNoValidate + -- method DOMHTMLFormElement::get_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -969,8 +1237,8 @@ dOMHTMLFormElementGetTarget :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFormElementGetTarget _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_form_element_get_target _obj' @@ -980,11 +1248,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFormElementGetTargetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementGetTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementGetTarget + -- method DOMHTMLFormElement::reset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -996,19 +1267,22 @@ dOMHTMLFormElementReset :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLFormElementReset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_form_element_reset _obj' touchManagedPtr _obj return () +data DOMHTMLFormElementResetMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementResetMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementReset + -- method DOMHTMLFormElement::set_accept_charset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1021,9 +1295,9 @@ dOMHTMLFormElementSetAcceptCharset :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFormElementSetAcceptCharset _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1032,11 +1306,14 @@ freeMem value' return () +data DOMHTMLFormElementSetAcceptCharsetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSetAcceptCharsetMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSetAcceptCharset + -- method DOMHTMLFormElement::set_action -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1049,9 +1326,9 @@ dOMHTMLFormElementSetAction :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFormElementSetAction _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1060,11 +1337,14 @@ freeMem value' return () +data DOMHTMLFormElementSetActionMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSetActionMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSetAction + -- method DOMHTMLFormElement::set_autocapitalize -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1077,9 +1357,9 @@ dOMHTMLFormElementSetAutocapitalize :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFormElementSetAutocapitalize _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1088,11 +1368,14 @@ freeMem value' return () +data DOMHTMLFormElementSetAutocapitalizeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSetAutocapitalizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSetAutocapitalize + -- method DOMHTMLFormElement::set_autocomplete -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1105,9 +1388,9 @@ dOMHTMLFormElementSetAutocomplete :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFormElementSetAutocomplete _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1116,11 +1399,14 @@ freeMem value' return () +data DOMHTMLFormElementSetAutocompleteMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSetAutocompleteMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSetAutocomplete + -- method DOMHTMLFormElement::set_autocorrect -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1133,9 +1419,9 @@ dOMHTMLFormElementSetAutocorrect :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLFormElementSetAutocorrect _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1143,11 +1429,14 @@ touchManagedPtr _obj return () +data DOMHTMLFormElementSetAutocorrectMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSetAutocorrectMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSetAutocorrect + -- method DOMHTMLFormElement::set_encoding -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1160,9 +1449,9 @@ dOMHTMLFormElementSetEncoding :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFormElementSetEncoding _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1171,11 +1460,14 @@ freeMem value' return () +data DOMHTMLFormElementSetEncodingMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSetEncodingMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSetEncoding + -- method DOMHTMLFormElement::set_enctype -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1188,9 +1480,9 @@ dOMHTMLFormElementSetEnctype :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFormElementSetEnctype _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1199,11 +1491,14 @@ freeMem value' return () +data DOMHTMLFormElementSetEnctypeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSetEnctypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSetEnctype + -- method DOMHTMLFormElement::set_method -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1216,9 +1511,9 @@ dOMHTMLFormElementSetMethod :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFormElementSetMethod _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1227,11 +1522,14 @@ freeMem value' return () +data DOMHTMLFormElementSetMethodMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSetMethodMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSetMethod + -- method DOMHTMLFormElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1244,9 +1542,9 @@ dOMHTMLFormElementSetName :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFormElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1255,11 +1553,14 @@ freeMem value' return () +data DOMHTMLFormElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSetName + -- method DOMHTMLFormElement::set_no_validate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1272,9 +1573,9 @@ dOMHTMLFormElementSetNoValidate :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLFormElementSetNoValidate _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1282,11 +1583,14 @@ touchManagedPtr _obj return () +data DOMHTMLFormElementSetNoValidateMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSetNoValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSetNoValidate + -- method DOMHTMLFormElement::set_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1299,9 +1603,9 @@ dOMHTMLFormElementSetTarget :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFormElementSetTarget _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1310,11 +1614,14 @@ freeMem value' return () +data DOMHTMLFormElementSetTargetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSetTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSetTarget + -- method DOMHTMLFormElement::submit -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFormElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1326,12 +1633,16 @@ dOMHTMLFormElementSubmit :: (MonadIO m, DOMHTMLFormElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLFormElementSubmit _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_form_element_submit _obj' touchManagedPtr _obj return () + +data DOMHTMLFormElementSubmitMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLFormElementK a) => MethodInfo DOMHTMLFormElementSubmitMethodInfo a signature where + overloadedMethod _ = dOMHTMLFormElementSubmit diff --git a/GI/WebKit/Objects/DOMHTMLFormElement.hs-boot b/GI/WebKit/Objects/DOMHTMLFormElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLFormElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLFormElement.hs-boot @@ -24,3 +24,32 @@ data DOMHTMLFormElementNamePropertyInfo data DOMHTMLFormElementNoValidatePropertyInfo data DOMHTMLFormElementTargetPropertyInfo +data DOMHTMLFormElementCheckValidityMethodInfo +data DOMHTMLFormElementDispatchFormChangeMethodInfo +data DOMHTMLFormElementDispatchFormInputMethodInfo +data DOMHTMLFormElementGetAcceptCharsetMethodInfo +data DOMHTMLFormElementGetActionMethodInfo +data DOMHTMLFormElementGetAutocapitalizeMethodInfo +data DOMHTMLFormElementGetAutocompleteMethodInfo +data DOMHTMLFormElementGetAutocorrectMethodInfo +data DOMHTMLFormElementGetElementsMethodInfo +data DOMHTMLFormElementGetEncodingMethodInfo +data DOMHTMLFormElementGetEnctypeMethodInfo +data DOMHTMLFormElementGetLengthMethodInfo +data DOMHTMLFormElementGetMethodMethodInfo +data DOMHTMLFormElementGetNameMethodInfo +data DOMHTMLFormElementGetNoValidateMethodInfo +data DOMHTMLFormElementGetTargetMethodInfo +data DOMHTMLFormElementResetMethodInfo +data DOMHTMLFormElementSetAcceptCharsetMethodInfo +data DOMHTMLFormElementSetActionMethodInfo +data DOMHTMLFormElementSetAutocapitalizeMethodInfo +data DOMHTMLFormElementSetAutocompleteMethodInfo +data DOMHTMLFormElementSetAutocorrectMethodInfo +data DOMHTMLFormElementSetEncodingMethodInfo +data DOMHTMLFormElementSetEnctypeMethodInfo +data DOMHTMLFormElementSetMethodMethodInfo +data DOMHTMLFormElementSetNameMethodInfo +data DOMHTMLFormElementSetNoValidateMethodInfo +data DOMHTMLFormElementSetTargetMethodInfo +data DOMHTMLFormElementSubmitMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLFrameElement.hs b/GI/WebKit/Objects/DOMHTMLFrameElement.hs --- a/GI/WebKit/Objects/DOMHTMLFrameElement.hs +++ b/GI/WebKit/Objects/DOMHTMLFrameElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,82 +18,102 @@ -- * Methods -- ** dOMHTMLFrameElementGetContentDocument + DOMHTMLFrameElementGetContentDocumentMethodInfo, dOMHTMLFrameElementGetContentDocument , -- ** dOMHTMLFrameElementGetContentWindow + DOMHTMLFrameElementGetContentWindowMethodInfo, dOMHTMLFrameElementGetContentWindow , -- ** dOMHTMLFrameElementGetFrameBorder + DOMHTMLFrameElementGetFrameBorderMethodInfo, dOMHTMLFrameElementGetFrameBorder , -- ** dOMHTMLFrameElementGetHeight + DOMHTMLFrameElementGetHeightMethodInfo , dOMHTMLFrameElementGetHeight , -- ** dOMHTMLFrameElementGetLongDesc + DOMHTMLFrameElementGetLongDescMethodInfo, dOMHTMLFrameElementGetLongDesc , -- ** dOMHTMLFrameElementGetMarginHeight + DOMHTMLFrameElementGetMarginHeightMethodInfo, dOMHTMLFrameElementGetMarginHeight , -- ** dOMHTMLFrameElementGetMarginWidth + DOMHTMLFrameElementGetMarginWidthMethodInfo, dOMHTMLFrameElementGetMarginWidth , -- ** dOMHTMLFrameElementGetName + DOMHTMLFrameElementGetNameMethodInfo , dOMHTMLFrameElementGetName , -- ** dOMHTMLFrameElementGetNoResize + DOMHTMLFrameElementGetNoResizeMethodInfo, dOMHTMLFrameElementGetNoResize , -- ** dOMHTMLFrameElementGetScrolling + DOMHTMLFrameElementGetScrollingMethodInfo, dOMHTMLFrameElementGetScrolling , -- ** dOMHTMLFrameElementGetSrc + DOMHTMLFrameElementGetSrcMethodInfo , dOMHTMLFrameElementGetSrc , -- ** dOMHTMLFrameElementGetWidth + DOMHTMLFrameElementGetWidthMethodInfo , dOMHTMLFrameElementGetWidth , -- ** dOMHTMLFrameElementSetFrameBorder + DOMHTMLFrameElementSetFrameBorderMethodInfo, dOMHTMLFrameElementSetFrameBorder , -- ** dOMHTMLFrameElementSetLongDesc + DOMHTMLFrameElementSetLongDescMethodInfo, dOMHTMLFrameElementSetLongDesc , -- ** dOMHTMLFrameElementSetMarginHeight + DOMHTMLFrameElementSetMarginHeightMethodInfo, dOMHTMLFrameElementSetMarginHeight , -- ** dOMHTMLFrameElementSetMarginWidth + DOMHTMLFrameElementSetMarginWidthMethodInfo, dOMHTMLFrameElementSetMarginWidth , -- ** dOMHTMLFrameElementSetName + DOMHTMLFrameElementSetNameMethodInfo , dOMHTMLFrameElementSetName , -- ** dOMHTMLFrameElementSetNoResize + DOMHTMLFrameElementSetNoResizeMethodInfo, dOMHTMLFrameElementSetNoResize , -- ** dOMHTMLFrameElementSetScrolling + DOMHTMLFrameElementSetScrollingMethodInfo, dOMHTMLFrameElementSetScrolling , -- ** dOMHTMLFrameElementSetSrc + DOMHTMLFrameElementSetSrcMethodInfo , dOMHTMLFrameElementSetSrc , @@ -211,6 +232,191 @@ noDOMHTMLFrameElement :: Maybe DOMHTMLFrameElement noDOMHTMLFrameElement = Nothing +type family ResolveDOMHTMLFrameElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLFrameElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLFrameElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLFrameElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLFrameElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLFrameElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLFrameElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLFrameElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLFrameElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLFrameElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLFrameElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLFrameElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLFrameElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLFrameElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLFrameElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLFrameElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLFrameElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLFrameElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLFrameElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLFrameElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLFrameElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLFrameElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLFrameElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLFrameElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLFrameElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLFrameElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLFrameElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLFrameElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLFrameElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLFrameElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLFrameElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLFrameElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLFrameElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLFrameElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLFrameElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLFrameElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLFrameElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLFrameElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLFrameElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLFrameElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLFrameElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLFrameElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLFrameElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLFrameElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLFrameElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLFrameElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLFrameElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLFrameElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLFrameElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLFrameElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLFrameElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLFrameElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLFrameElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLFrameElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLFrameElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLFrameElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLFrameElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLFrameElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLFrameElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLFrameElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLFrameElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLFrameElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLFrameElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLFrameElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLFrameElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLFrameElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLFrameElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLFrameElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLFrameElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLFrameElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLFrameElementMethod "getContentDocument" o = DOMHTMLFrameElementGetContentDocumentMethodInfo + ResolveDOMHTMLFrameElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLFrameElementMethod "getContentWindow" o = DOMHTMLFrameElementGetContentWindowMethodInfo + ResolveDOMHTMLFrameElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLFrameElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLFrameElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLFrameElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLFrameElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLFrameElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLFrameElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLFrameElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLFrameElementMethod "getFrameBorder" o = DOMHTMLFrameElementGetFrameBorderMethodInfo + ResolveDOMHTMLFrameElementMethod "getHeight" o = DOMHTMLFrameElementGetHeightMethodInfo + ResolveDOMHTMLFrameElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLFrameElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLFrameElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLFrameElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLFrameElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLFrameElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLFrameElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLFrameElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLFrameElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLFrameElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLFrameElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLFrameElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLFrameElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLFrameElementMethod "getLongDesc" o = DOMHTMLFrameElementGetLongDescMethodInfo + ResolveDOMHTMLFrameElementMethod "getMarginHeight" o = DOMHTMLFrameElementGetMarginHeightMethodInfo + ResolveDOMHTMLFrameElementMethod "getMarginWidth" o = DOMHTMLFrameElementGetMarginWidthMethodInfo + ResolveDOMHTMLFrameElementMethod "getName" o = DOMHTMLFrameElementGetNameMethodInfo + ResolveDOMHTMLFrameElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLFrameElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLFrameElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLFrameElementMethod "getNoResize" o = DOMHTMLFrameElementGetNoResizeMethodInfo + ResolveDOMHTMLFrameElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLFrameElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLFrameElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLFrameElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLFrameElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLFrameElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLFrameElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLFrameElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLFrameElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLFrameElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLFrameElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLFrameElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLFrameElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLFrameElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLFrameElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLFrameElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLFrameElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLFrameElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLFrameElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLFrameElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLFrameElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLFrameElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLFrameElementMethod "getScrolling" o = DOMHTMLFrameElementGetScrollingMethodInfo + ResolveDOMHTMLFrameElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLFrameElementMethod "getSrc" o = DOMHTMLFrameElementGetSrcMethodInfo + ResolveDOMHTMLFrameElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLFrameElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLFrameElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLFrameElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLFrameElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLFrameElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLFrameElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLFrameElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLFrameElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLFrameElementMethod "getWidth" o = DOMHTMLFrameElementGetWidthMethodInfo + ResolveDOMHTMLFrameElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLFrameElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLFrameElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLFrameElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLFrameElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLFrameElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLFrameElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLFrameElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLFrameElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLFrameElementMethod "setFrameBorder" o = DOMHTMLFrameElementSetFrameBorderMethodInfo + ResolveDOMHTMLFrameElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLFrameElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLFrameElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLFrameElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLFrameElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLFrameElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLFrameElementMethod "setLongDesc" o = DOMHTMLFrameElementSetLongDescMethodInfo + ResolveDOMHTMLFrameElementMethod "setMarginHeight" o = DOMHTMLFrameElementSetMarginHeightMethodInfo + ResolveDOMHTMLFrameElementMethod "setMarginWidth" o = DOMHTMLFrameElementSetMarginWidthMethodInfo + ResolveDOMHTMLFrameElementMethod "setName" o = DOMHTMLFrameElementSetNameMethodInfo + ResolveDOMHTMLFrameElementMethod "setNoResize" o = DOMHTMLFrameElementSetNoResizeMethodInfo + ResolveDOMHTMLFrameElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLFrameElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLFrameElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLFrameElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLFrameElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLFrameElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLFrameElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLFrameElementMethod "setScrolling" o = DOMHTMLFrameElementSetScrollingMethodInfo + ResolveDOMHTMLFrameElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLFrameElementMethod "setSrc" o = DOMHTMLFrameElementSetSrcMethodInfo + ResolveDOMHTMLFrameElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLFrameElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLFrameElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLFrameElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLFrameElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLFrameElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLFrameElementMethod t DOMHTMLFrameElement, MethodInfo info DOMHTMLFrameElement p) => IsLabelProxy t (DOMHTMLFrameElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLFrameElementMethod t DOMHTMLFrameElement, MethodInfo info DOMHTMLFrameElement p) => IsLabel t (DOMHTMLFrameElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "content-document" -- Type: TInterface "WebKit" "DOMDocument" -- Flags: [PropertyReadable] @@ -224,7 +430,7 @@ type AttrSetTypeConstraint DOMHTMLFrameElementContentDocumentPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFrameElementContentDocumentPropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementContentDocumentPropertyInfo = DOMDocument - type AttrLabel DOMHTMLFrameElementContentDocumentPropertyInfo = "DOMHTMLFrameElement::content-document" + type AttrLabel DOMHTMLFrameElementContentDocumentPropertyInfo = "content-document" attrGet _ = getDOMHTMLFrameElementContentDocument attrSet _ = undefined attrConstruct _ = undefined @@ -242,7 +448,7 @@ type AttrSetTypeConstraint DOMHTMLFrameElementContentWindowPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFrameElementContentWindowPropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementContentWindowPropertyInfo = DOMDOMWindow - type AttrLabel DOMHTMLFrameElementContentWindowPropertyInfo = "DOMHTMLFrameElement::content-window" + type AttrLabel DOMHTMLFrameElementContentWindowPropertyInfo = "content-window" attrGet _ = getDOMHTMLFrameElementContentWindow attrSet _ = undefined attrConstruct _ = undefined @@ -266,7 +472,7 @@ type AttrSetTypeConstraint DOMHTMLFrameElementFrameBorderPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFrameElementFrameBorderPropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementFrameBorderPropertyInfo = T.Text - type AttrLabel DOMHTMLFrameElementFrameBorderPropertyInfo = "DOMHTMLFrameElement::frame-border" + type AttrLabel DOMHTMLFrameElementFrameBorderPropertyInfo = "frame-border" attrGet _ = getDOMHTMLFrameElementFrameBorder attrSet _ = setDOMHTMLFrameElementFrameBorder attrConstruct _ = constructDOMHTMLFrameElementFrameBorder @@ -284,7 +490,7 @@ type AttrSetTypeConstraint DOMHTMLFrameElementHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFrameElementHeightPropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementHeightPropertyInfo = Int64 - type AttrLabel DOMHTMLFrameElementHeightPropertyInfo = "DOMHTMLFrameElement::height" + type AttrLabel DOMHTMLFrameElementHeightPropertyInfo = "height" attrGet _ = getDOMHTMLFrameElementHeight attrSet _ = undefined attrConstruct _ = undefined @@ -308,7 +514,7 @@ type AttrSetTypeConstraint DOMHTMLFrameElementLongDescPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFrameElementLongDescPropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementLongDescPropertyInfo = T.Text - type AttrLabel DOMHTMLFrameElementLongDescPropertyInfo = "DOMHTMLFrameElement::long-desc" + type AttrLabel DOMHTMLFrameElementLongDescPropertyInfo = "long-desc" attrGet _ = getDOMHTMLFrameElementLongDesc attrSet _ = setDOMHTMLFrameElementLongDesc attrConstruct _ = constructDOMHTMLFrameElementLongDesc @@ -332,7 +538,7 @@ type AttrSetTypeConstraint DOMHTMLFrameElementMarginHeightPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFrameElementMarginHeightPropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementMarginHeightPropertyInfo = T.Text - type AttrLabel DOMHTMLFrameElementMarginHeightPropertyInfo = "DOMHTMLFrameElement::margin-height" + type AttrLabel DOMHTMLFrameElementMarginHeightPropertyInfo = "margin-height" attrGet _ = getDOMHTMLFrameElementMarginHeight attrSet _ = setDOMHTMLFrameElementMarginHeight attrConstruct _ = constructDOMHTMLFrameElementMarginHeight @@ -356,7 +562,7 @@ type AttrSetTypeConstraint DOMHTMLFrameElementMarginWidthPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFrameElementMarginWidthPropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementMarginWidthPropertyInfo = T.Text - type AttrLabel DOMHTMLFrameElementMarginWidthPropertyInfo = "DOMHTMLFrameElement::margin-width" + type AttrLabel DOMHTMLFrameElementMarginWidthPropertyInfo = "margin-width" attrGet _ = getDOMHTMLFrameElementMarginWidth attrSet _ = setDOMHTMLFrameElementMarginWidth attrConstruct _ = constructDOMHTMLFrameElementMarginWidth @@ -380,7 +586,7 @@ type AttrSetTypeConstraint DOMHTMLFrameElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFrameElementNamePropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLFrameElementNamePropertyInfo = "DOMHTMLFrameElement::name" + type AttrLabel DOMHTMLFrameElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLFrameElementName attrSet _ = setDOMHTMLFrameElementName attrConstruct _ = constructDOMHTMLFrameElementName @@ -404,7 +610,7 @@ type AttrSetTypeConstraint DOMHTMLFrameElementNoResizePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLFrameElementNoResizePropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementNoResizePropertyInfo = Bool - type AttrLabel DOMHTMLFrameElementNoResizePropertyInfo = "DOMHTMLFrameElement::no-resize" + type AttrLabel DOMHTMLFrameElementNoResizePropertyInfo = "no-resize" attrGet _ = getDOMHTMLFrameElementNoResize attrSet _ = setDOMHTMLFrameElementNoResize attrConstruct _ = constructDOMHTMLFrameElementNoResize @@ -428,7 +634,7 @@ type AttrSetTypeConstraint DOMHTMLFrameElementScrollingPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFrameElementScrollingPropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementScrollingPropertyInfo = T.Text - type AttrLabel DOMHTMLFrameElementScrollingPropertyInfo = "DOMHTMLFrameElement::scrolling" + type AttrLabel DOMHTMLFrameElementScrollingPropertyInfo = "scrolling" attrGet _ = getDOMHTMLFrameElementScrolling attrSet _ = setDOMHTMLFrameElementScrolling attrConstruct _ = constructDOMHTMLFrameElementScrolling @@ -452,7 +658,7 @@ type AttrSetTypeConstraint DOMHTMLFrameElementSrcPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFrameElementSrcPropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementSrcPropertyInfo = T.Text - type AttrLabel DOMHTMLFrameElementSrcPropertyInfo = "DOMHTMLFrameElement::src" + type AttrLabel DOMHTMLFrameElementSrcPropertyInfo = "src" attrGet _ = getDOMHTMLFrameElementSrc attrSet _ = setDOMHTMLFrameElementSrc attrConstruct _ = constructDOMHTMLFrameElementSrc @@ -470,22 +676,21 @@ type AttrSetTypeConstraint DOMHTMLFrameElementWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLFrameElementWidthPropertyInfo = DOMHTMLFrameElementK type AttrGetType DOMHTMLFrameElementWidthPropertyInfo = Int64 - type AttrLabel DOMHTMLFrameElementWidthPropertyInfo = "DOMHTMLFrameElement::width" + type AttrLabel DOMHTMLFrameElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLFrameElementWidth attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHTMLFrameElement = DOMHTMLFrameElementAttributeList -type DOMHTMLFrameElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-document", DOMHTMLFrameElementContentDocumentPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("content-window", DOMHTMLFrameElementContentWindowPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("frame-border", DOMHTMLFrameElementFrameBorderPropertyInfo), '("height", DOMHTMLFrameElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("long-desc", DOMHTMLFrameElementLongDescPropertyInfo), '("margin-height", DOMHTMLFrameElementMarginHeightPropertyInfo), '("margin-width", DOMHTMLFrameElementMarginWidthPropertyInfo), '("name", DOMHTMLFrameElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("no-resize", DOMHTMLFrameElementNoResizePropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("scrolling", DOMHTMLFrameElementScrollingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLFrameElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLFrameElementWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLFrameElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentDocument", DOMHTMLFrameElementContentDocumentPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("contentWindow", DOMHTMLFrameElementContentWindowPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("frameBorder", DOMHTMLFrameElementFrameBorderPropertyInfo), '("height", DOMHTMLFrameElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("longDesc", DOMHTMLFrameElementLongDescPropertyInfo), '("marginHeight", DOMHTMLFrameElementMarginHeightPropertyInfo), '("marginWidth", DOMHTMLFrameElementMarginWidthPropertyInfo), '("name", DOMHTMLFrameElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("noResize", DOMHTMLFrameElementNoResizePropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("scrolling", DOMHTMLFrameElementScrollingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLFrameElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLFrameElementWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLFrameElement = DOMHTMLFrameElementSignalList -type DOMHTMLFrameElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLFrameElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLFrameElement::get_content_document -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDocument" -- throws : False -- Skip return : False @@ -497,8 +702,8 @@ dOMHTMLFrameElementGetContentDocument :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m DOMDocument + a -- _obj + -> m DOMDocument -- result dOMHTMLFrameElementGetContentDocument _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_content_document _obj' @@ -507,11 +712,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameElementGetContentDocumentMethodInfo +instance (signature ~ (m DOMDocument), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetContentDocumentMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetContentDocument + -- method DOMHTMLFrameElement::get_content_window -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMWindow" -- throws : False -- Skip return : False @@ -523,8 +731,8 @@ dOMHTMLFrameElementGetContentWindow :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m DOMDOMWindow + a -- _obj + -> m DOMDOMWindow -- result dOMHTMLFrameElementGetContentWindow _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_content_window _obj' @@ -533,11 +741,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameElementGetContentWindowMethodInfo +instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetContentWindowMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetContentWindow + -- method DOMHTMLFrameElement::get_frame_border -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -549,8 +760,8 @@ dOMHTMLFrameElementGetFrameBorder :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFrameElementGetFrameBorder _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_frame_border _obj' @@ -560,11 +771,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameElementGetFrameBorderMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetFrameBorderMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetFrameBorder + -- method DOMHTMLFrameElement::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -576,19 +790,22 @@ dOMHTMLFrameElementGetHeight :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLFrameElementGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_height _obj' touchManagedPtr _obj return result +data DOMHTMLFrameElementGetHeightMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetHeight + -- method DOMHTMLFrameElement::get_long_desc -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -600,8 +817,8 @@ dOMHTMLFrameElementGetLongDesc :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFrameElementGetLongDesc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_long_desc _obj' @@ -611,11 +828,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameElementGetLongDescMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetLongDescMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetLongDesc + -- method DOMHTMLFrameElement::get_margin_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -627,8 +847,8 @@ dOMHTMLFrameElementGetMarginHeight :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFrameElementGetMarginHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_margin_height _obj' @@ -638,11 +858,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameElementGetMarginHeightMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetMarginHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetMarginHeight + -- method DOMHTMLFrameElement::get_margin_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -654,8 +877,8 @@ dOMHTMLFrameElementGetMarginWidth :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFrameElementGetMarginWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_margin_width _obj' @@ -665,11 +888,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameElementGetMarginWidthMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetMarginWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetMarginWidth + -- method DOMHTMLFrameElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -681,8 +907,8 @@ dOMHTMLFrameElementGetName :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFrameElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_name _obj' @@ -692,11 +918,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetName + -- method DOMHTMLFrameElement::get_no_resize -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -708,8 +937,8 @@ dOMHTMLFrameElementGetNoResize :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLFrameElementGetNoResize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_no_resize _obj' @@ -717,11 +946,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameElementGetNoResizeMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetNoResizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetNoResize + -- method DOMHTMLFrameElement::get_scrolling -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -733,8 +965,8 @@ dOMHTMLFrameElementGetScrolling :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFrameElementGetScrolling _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_scrolling _obj' @@ -744,11 +976,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameElementGetScrollingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetScrollingMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetScrolling + -- method DOMHTMLFrameElement::get_src -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -760,8 +995,8 @@ dOMHTMLFrameElementGetSrc :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFrameElementGetSrc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_src _obj' @@ -771,11 +1006,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameElementGetSrcMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetSrc + -- method DOMHTMLFrameElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -787,19 +1025,22 @@ dOMHTMLFrameElementGetWidth :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLFrameElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_element_get_width _obj' touchManagedPtr _obj return result +data DOMHTMLFrameElementGetWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementGetWidth + -- method DOMHTMLFrameElement::set_frame_border -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -812,9 +1053,9 @@ dOMHTMLFrameElementSetFrameBorder :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFrameElementSetFrameBorder _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -823,11 +1064,14 @@ freeMem value' return () +data DOMHTMLFrameElementSetFrameBorderMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementSetFrameBorderMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementSetFrameBorder + -- method DOMHTMLFrameElement::set_long_desc -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -840,9 +1084,9 @@ dOMHTMLFrameElementSetLongDesc :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFrameElementSetLongDesc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -851,11 +1095,14 @@ freeMem value' return () +data DOMHTMLFrameElementSetLongDescMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementSetLongDescMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementSetLongDesc + -- method DOMHTMLFrameElement::set_margin_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -868,9 +1115,9 @@ dOMHTMLFrameElementSetMarginHeight :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFrameElementSetMarginHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -879,11 +1126,14 @@ freeMem value' return () +data DOMHTMLFrameElementSetMarginHeightMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementSetMarginHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementSetMarginHeight + -- method DOMHTMLFrameElement::set_margin_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -896,9 +1146,9 @@ dOMHTMLFrameElementSetMarginWidth :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFrameElementSetMarginWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -907,11 +1157,14 @@ freeMem value' return () +data DOMHTMLFrameElementSetMarginWidthMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementSetMarginWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementSetMarginWidth + -- method DOMHTMLFrameElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -924,9 +1177,9 @@ dOMHTMLFrameElementSetName :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFrameElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -935,11 +1188,14 @@ freeMem value' return () +data DOMHTMLFrameElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementSetName + -- method DOMHTMLFrameElement::set_no_resize -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -952,9 +1208,9 @@ dOMHTMLFrameElementSetNoResize :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLFrameElementSetNoResize _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -962,11 +1218,14 @@ touchManagedPtr _obj return () +data DOMHTMLFrameElementSetNoResizeMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementSetNoResizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementSetNoResize + -- method DOMHTMLFrameElement::set_scrolling -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -979,9 +1238,9 @@ dOMHTMLFrameElementSetScrolling :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFrameElementSetScrolling _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -990,11 +1249,14 @@ freeMem value' return () +data DOMHTMLFrameElementSetScrollingMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementSetScrollingMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementSetScrolling + -- method DOMHTMLFrameElement::set_src -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1007,9 +1269,9 @@ dOMHTMLFrameElementSetSrc :: (MonadIO m, DOMHTMLFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFrameElementSetSrc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1017,5 +1279,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLFrameElementSetSrcMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFrameElementK a) => MethodInfo DOMHTMLFrameElementSetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameElementSetSrc diff --git a/GI/WebKit/Objects/DOMHTMLFrameElement.hs-boot b/GI/WebKit/Objects/DOMHTMLFrameElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLFrameElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLFrameElement.hs-boot @@ -23,3 +23,23 @@ data DOMHTMLFrameElementScrollingPropertyInfo data DOMHTMLFrameElementSrcPropertyInfo data DOMHTMLFrameElementWidthPropertyInfo +data DOMHTMLFrameElementGetContentDocumentMethodInfo +data DOMHTMLFrameElementGetContentWindowMethodInfo +data DOMHTMLFrameElementGetFrameBorderMethodInfo +data DOMHTMLFrameElementGetHeightMethodInfo +data DOMHTMLFrameElementGetLongDescMethodInfo +data DOMHTMLFrameElementGetMarginHeightMethodInfo +data DOMHTMLFrameElementGetMarginWidthMethodInfo +data DOMHTMLFrameElementGetNameMethodInfo +data DOMHTMLFrameElementGetNoResizeMethodInfo +data DOMHTMLFrameElementGetScrollingMethodInfo +data DOMHTMLFrameElementGetSrcMethodInfo +data DOMHTMLFrameElementGetWidthMethodInfo +data DOMHTMLFrameElementSetFrameBorderMethodInfo +data DOMHTMLFrameElementSetLongDescMethodInfo +data DOMHTMLFrameElementSetMarginHeightMethodInfo +data DOMHTMLFrameElementSetMarginWidthMethodInfo +data DOMHTMLFrameElementSetNameMethodInfo +data DOMHTMLFrameElementSetNoResizeMethodInfo +data DOMHTMLFrameElementSetScrollingMethodInfo +data DOMHTMLFrameElementSetSrcMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLFrameSetElement.hs b/GI/WebKit/Objects/DOMHTMLFrameSetElement.hs --- a/GI/WebKit/Objects/DOMHTMLFrameSetElement.hs +++ b/GI/WebKit/Objects/DOMHTMLFrameSetElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMHTMLFrameSetElementGetCols + DOMHTMLFrameSetElementGetColsMethodInfo , dOMHTMLFrameSetElementGetCols , -- ** dOMHTMLFrameSetElementGetRows + DOMHTMLFrameSetElementGetRowsMethodInfo , dOMHTMLFrameSetElementGetRows , -- ** dOMHTMLFrameSetElementSetCols + DOMHTMLFrameSetElementSetColsMethodInfo , dOMHTMLFrameSetElementSetCols , -- ** dOMHTMLFrameSetElementSetRows + DOMHTMLFrameSetElementSetRowsMethodInfo , dOMHTMLFrameSetElementSetRows , @@ -85,6 +90,175 @@ noDOMHTMLFrameSetElement :: Maybe DOMHTMLFrameSetElement noDOMHTMLFrameSetElement = Nothing +type family ResolveDOMHTMLFrameSetElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLFrameSetElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLFrameSetElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLFrameSetElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLFrameSetElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLFrameSetElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLFrameSetElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLFrameSetElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLFrameSetElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLFrameSetElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLFrameSetElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLFrameSetElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLFrameSetElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLFrameSetElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLFrameSetElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLFrameSetElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLFrameSetElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLFrameSetElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLFrameSetElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLFrameSetElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLFrameSetElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLFrameSetElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLFrameSetElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLFrameSetElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLFrameSetElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLFrameSetElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLFrameSetElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLFrameSetElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLFrameSetElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLFrameSetElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLFrameSetElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLFrameSetElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLFrameSetElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLFrameSetElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLFrameSetElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLFrameSetElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLFrameSetElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLFrameSetElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLFrameSetElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLFrameSetElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLFrameSetElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLFrameSetElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLFrameSetElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLFrameSetElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLFrameSetElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getCols" o = DOMHTMLFrameSetElementGetColsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getRows" o = DOMHTMLFrameSetElementGetRowsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLFrameSetElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setCols" o = DOMHTMLFrameSetElementSetColsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setRows" o = DOMHTMLFrameSetElementSetRowsMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLFrameSetElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLFrameSetElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLFrameSetElementMethod t DOMHTMLFrameSetElement, MethodInfo info DOMHTMLFrameSetElement p) => IsLabelProxy t (DOMHTMLFrameSetElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLFrameSetElementMethod t DOMHTMLFrameSetElement, MethodInfo info DOMHTMLFrameSetElement p) => IsLabel t (DOMHTMLFrameSetElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "cols" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -104,7 +278,7 @@ type AttrSetTypeConstraint DOMHTMLFrameSetElementColsPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFrameSetElementColsPropertyInfo = DOMHTMLFrameSetElementK type AttrGetType DOMHTMLFrameSetElementColsPropertyInfo = T.Text - type AttrLabel DOMHTMLFrameSetElementColsPropertyInfo = "DOMHTMLFrameSetElement::cols" + type AttrLabel DOMHTMLFrameSetElementColsPropertyInfo = "cols" attrGet _ = getDOMHTMLFrameSetElementCols attrSet _ = setDOMHTMLFrameSetElementCols attrConstruct _ = constructDOMHTMLFrameSetElementCols @@ -128,22 +302,21 @@ type AttrSetTypeConstraint DOMHTMLFrameSetElementRowsPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLFrameSetElementRowsPropertyInfo = DOMHTMLFrameSetElementK type AttrGetType DOMHTMLFrameSetElementRowsPropertyInfo = T.Text - type AttrLabel DOMHTMLFrameSetElementRowsPropertyInfo = "DOMHTMLFrameSetElement::rows" + type AttrLabel DOMHTMLFrameSetElementRowsPropertyInfo = "rows" attrGet _ = getDOMHTMLFrameSetElementRows attrSet _ = setDOMHTMLFrameSetElementRows attrConstruct _ = constructDOMHTMLFrameSetElementRows type instance AttributeList DOMHTMLFrameSetElement = DOMHTMLFrameSetElementAttributeList -type DOMHTMLFrameSetElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("cols", DOMHTMLFrameSetElementColsPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("rows", DOMHTMLFrameSetElementRowsPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLFrameSetElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("cols", DOMHTMLFrameSetElementColsPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("rows", DOMHTMLFrameSetElementRowsPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLFrameSetElement = DOMHTMLFrameSetElementSignalList -type DOMHTMLFrameSetElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLFrameSetElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLFrameSetElement::get_cols -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -155,8 +328,8 @@ dOMHTMLFrameSetElementGetCols :: (MonadIO m, DOMHTMLFrameSetElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFrameSetElementGetCols _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_set_element_get_cols _obj' @@ -166,11 +339,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameSetElementGetColsMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFrameSetElementK a) => MethodInfo DOMHTMLFrameSetElementGetColsMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameSetElementGetCols + -- method DOMHTMLFrameSetElement::get_rows -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -182,8 +358,8 @@ dOMHTMLFrameSetElementGetRows :: (MonadIO m, DOMHTMLFrameSetElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLFrameSetElementGetRows _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_frame_set_element_get_rows _obj' @@ -193,11 +369,14 @@ touchManagedPtr _obj return result' +data DOMHTMLFrameSetElementGetRowsMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLFrameSetElementK a) => MethodInfo DOMHTMLFrameSetElementGetRowsMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameSetElementGetRows + -- method DOMHTMLFrameSetElement::set_cols -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -210,9 +389,9 @@ dOMHTMLFrameSetElementSetCols :: (MonadIO m, DOMHTMLFrameSetElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFrameSetElementSetCols _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -221,11 +400,14 @@ freeMem value' return () +data DOMHTMLFrameSetElementSetColsMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFrameSetElementK a) => MethodInfo DOMHTMLFrameSetElementSetColsMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameSetElementSetCols + -- method DOMHTMLFrameSetElement::set_rows -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLFrameSetElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -238,9 +420,9 @@ dOMHTMLFrameSetElementSetRows :: (MonadIO m, DOMHTMLFrameSetElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLFrameSetElementSetRows _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -248,5 +430,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLFrameSetElementSetRowsMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLFrameSetElementK a) => MethodInfo DOMHTMLFrameSetElementSetRowsMethodInfo a signature where + overloadedMethod _ = dOMHTMLFrameSetElementSetRows diff --git a/GI/WebKit/Objects/DOMHTMLFrameSetElement.hs-boot b/GI/WebKit/Objects/DOMHTMLFrameSetElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLFrameSetElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLFrameSetElement.hs-boot @@ -13,3 +13,7 @@ instance (GObject o, IsDescendantOf DOMHTMLFrameSetElement o) => DOMHTMLFrameSetElementK o data DOMHTMLFrameSetElementColsPropertyInfo data DOMHTMLFrameSetElementRowsPropertyInfo +data DOMHTMLFrameSetElementGetColsMethodInfo +data DOMHTMLFrameSetElementGetRowsMethodInfo +data DOMHTMLFrameSetElementSetColsMethodInfo +data DOMHTMLFrameSetElementSetRowsMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLHRElement.hs b/GI/WebKit/Objects/DOMHTMLHRElement.hs --- a/GI/WebKit/Objects/DOMHTMLHRElement.hs +++ b/GI/WebKit/Objects/DOMHTMLHRElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,34 +18,42 @@ -- * Methods -- ** dOMHTMLHRElementGetAlign + DOMHTMLHRElementGetAlignMethodInfo , dOMHTMLHRElementGetAlign , -- ** dOMHTMLHRElementGetNoShade + DOMHTMLHRElementGetNoShadeMethodInfo , dOMHTMLHRElementGetNoShade , -- ** dOMHTMLHRElementGetSize + DOMHTMLHRElementGetSizeMethodInfo , dOMHTMLHRElementGetSize , -- ** dOMHTMLHRElementGetWidth + DOMHTMLHRElementGetWidthMethodInfo , dOMHTMLHRElementGetWidth , -- ** dOMHTMLHRElementSetAlign + DOMHTMLHRElementSetAlignMethodInfo , dOMHTMLHRElementSetAlign , -- ** dOMHTMLHRElementSetNoShade + DOMHTMLHRElementSetNoShadeMethodInfo , dOMHTMLHRElementSetNoShade , -- ** dOMHTMLHRElementSetSize + DOMHTMLHRElementSetSizeMethodInfo , dOMHTMLHRElementSetSize , -- ** dOMHTMLHRElementSetWidth + DOMHTMLHRElementSetWidthMethodInfo , dOMHTMLHRElementSetWidth , @@ -115,6 +124,179 @@ noDOMHTMLHRElement :: Maybe DOMHTMLHRElement noDOMHTMLHRElement = Nothing +type family ResolveDOMHTMLHRElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLHRElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLHRElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLHRElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLHRElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLHRElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLHRElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLHRElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLHRElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLHRElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLHRElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLHRElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLHRElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLHRElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLHRElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLHRElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLHRElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLHRElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLHRElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLHRElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLHRElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLHRElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLHRElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLHRElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLHRElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLHRElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLHRElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLHRElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLHRElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLHRElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLHRElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLHRElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLHRElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLHRElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLHRElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLHRElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLHRElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLHRElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLHRElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLHRElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLHRElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLHRElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLHRElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLHRElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLHRElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLHRElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLHRElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLHRElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLHRElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLHRElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLHRElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLHRElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLHRElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLHRElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLHRElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLHRElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLHRElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLHRElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLHRElementMethod "getAlign" o = DOMHTMLHRElementGetAlignMethodInfo + ResolveDOMHTMLHRElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLHRElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLHRElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLHRElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLHRElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLHRElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLHRElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLHRElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLHRElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLHRElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLHRElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLHRElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLHRElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLHRElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLHRElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLHRElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLHRElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLHRElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLHRElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLHRElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLHRElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLHRElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLHRElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLHRElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLHRElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLHRElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLHRElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLHRElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLHRElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLHRElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLHRElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLHRElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLHRElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLHRElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLHRElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLHRElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLHRElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLHRElementMethod "getNoShade" o = DOMHTMLHRElementGetNoShadeMethodInfo + ResolveDOMHTMLHRElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLHRElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLHRElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLHRElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLHRElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLHRElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLHRElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLHRElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLHRElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLHRElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLHRElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLHRElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLHRElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLHRElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLHRElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLHRElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLHRElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLHRElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLHRElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLHRElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLHRElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLHRElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLHRElementMethod "getSize" o = DOMHTMLHRElementGetSizeMethodInfo + ResolveDOMHTMLHRElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLHRElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLHRElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLHRElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLHRElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLHRElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLHRElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLHRElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLHRElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLHRElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLHRElementMethod "getWidth" o = DOMHTMLHRElementGetWidthMethodInfo + ResolveDOMHTMLHRElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLHRElementMethod "setAlign" o = DOMHTMLHRElementSetAlignMethodInfo + ResolveDOMHTMLHRElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLHRElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLHRElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLHRElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLHRElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLHRElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLHRElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLHRElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLHRElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLHRElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLHRElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLHRElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLHRElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLHRElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLHRElementMethod "setNoShade" o = DOMHTMLHRElementSetNoShadeMethodInfo + ResolveDOMHTMLHRElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLHRElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLHRElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLHRElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLHRElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLHRElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLHRElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLHRElementMethod "setSize" o = DOMHTMLHRElementSetSizeMethodInfo + ResolveDOMHTMLHRElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLHRElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLHRElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLHRElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLHRElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLHRElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLHRElementMethod "setWidth" o = DOMHTMLHRElementSetWidthMethodInfo + ResolveDOMHTMLHRElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLHRElementMethod t DOMHTMLHRElement, MethodInfo info DOMHTMLHRElement p) => IsLabelProxy t (DOMHTMLHRElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLHRElementMethod t DOMHTMLHRElement, MethodInfo info DOMHTMLHRElement p) => IsLabel t (DOMHTMLHRElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -134,7 +316,7 @@ type AttrSetTypeConstraint DOMHTMLHRElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLHRElementAlignPropertyInfo = DOMHTMLHRElementK type AttrGetType DOMHTMLHRElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLHRElementAlignPropertyInfo = "DOMHTMLHRElement::align" + type AttrLabel DOMHTMLHRElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLHRElementAlign attrSet _ = setDOMHTMLHRElementAlign attrConstruct _ = constructDOMHTMLHRElementAlign @@ -158,7 +340,7 @@ type AttrSetTypeConstraint DOMHTMLHRElementNoShadePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLHRElementNoShadePropertyInfo = DOMHTMLHRElementK type AttrGetType DOMHTMLHRElementNoShadePropertyInfo = Bool - type AttrLabel DOMHTMLHRElementNoShadePropertyInfo = "DOMHTMLHRElement::no-shade" + type AttrLabel DOMHTMLHRElementNoShadePropertyInfo = "no-shade" attrGet _ = getDOMHTMLHRElementNoShade attrSet _ = setDOMHTMLHRElementNoShade attrConstruct _ = constructDOMHTMLHRElementNoShade @@ -182,7 +364,7 @@ type AttrSetTypeConstraint DOMHTMLHRElementSizePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLHRElementSizePropertyInfo = DOMHTMLHRElementK type AttrGetType DOMHTMLHRElementSizePropertyInfo = T.Text - type AttrLabel DOMHTMLHRElementSizePropertyInfo = "DOMHTMLHRElement::size" + type AttrLabel DOMHTMLHRElementSizePropertyInfo = "size" attrGet _ = getDOMHTMLHRElementSize attrSet _ = setDOMHTMLHRElementSize attrConstruct _ = constructDOMHTMLHRElementSize @@ -206,22 +388,21 @@ type AttrSetTypeConstraint DOMHTMLHRElementWidthPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLHRElementWidthPropertyInfo = DOMHTMLHRElementK type AttrGetType DOMHTMLHRElementWidthPropertyInfo = T.Text - type AttrLabel DOMHTMLHRElementWidthPropertyInfo = "DOMHTMLHRElement::width" + type AttrLabel DOMHTMLHRElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLHRElementWidth attrSet _ = setDOMHTMLHRElementWidth attrConstruct _ = constructDOMHTMLHRElementWidth type instance AttributeList DOMHTMLHRElement = DOMHTMLHRElementAttributeList -type DOMHTMLHRElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLHRElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("no-shade", DOMHTMLHRElementNoShadePropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLHRElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLHRElementWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLHRElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLHRElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("noShade", DOMHTMLHRElementNoShadePropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLHRElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLHRElementWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLHRElement = DOMHTMLHRElementSignalList -type DOMHTMLHRElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLHRElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLHRElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -233,8 +414,8 @@ dOMHTMLHRElementGetAlign :: (MonadIO m, DOMHTMLHRElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLHRElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_htmlhr_element_get_align _obj' @@ -244,11 +425,14 @@ touchManagedPtr _obj return result' +data DOMHTMLHRElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLHRElementK a) => MethodInfo DOMHTMLHRElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLHRElementGetAlign + -- method DOMHTMLHRElement::get_no_shade -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -260,8 +444,8 @@ dOMHTMLHRElementGetNoShade :: (MonadIO m, DOMHTMLHRElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLHRElementGetNoShade _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_htmlhr_element_get_no_shade _obj' @@ -269,11 +453,14 @@ touchManagedPtr _obj return result' +data DOMHTMLHRElementGetNoShadeMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLHRElementK a) => MethodInfo DOMHTMLHRElementGetNoShadeMethodInfo a signature where + overloadedMethod _ = dOMHTMLHRElementGetNoShade + -- method DOMHTMLHRElement::get_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -285,8 +472,8 @@ dOMHTMLHRElementGetSize :: (MonadIO m, DOMHTMLHRElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLHRElementGetSize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_htmlhr_element_get_size _obj' @@ -296,11 +483,14 @@ touchManagedPtr _obj return result' +data DOMHTMLHRElementGetSizeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLHRElementK a) => MethodInfo DOMHTMLHRElementGetSizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLHRElementGetSize + -- method DOMHTMLHRElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -312,8 +502,8 @@ dOMHTMLHRElementGetWidth :: (MonadIO m, DOMHTMLHRElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLHRElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_htmlhr_element_get_width _obj' @@ -323,11 +513,14 @@ touchManagedPtr _obj return result' +data DOMHTMLHRElementGetWidthMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLHRElementK a) => MethodInfo DOMHTMLHRElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLHRElementGetWidth + -- method DOMHTMLHRElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -340,9 +533,9 @@ dOMHTMLHRElementSetAlign :: (MonadIO m, DOMHTMLHRElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLHRElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -351,11 +544,14 @@ freeMem value' return () +data DOMHTMLHRElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLHRElementK a) => MethodInfo DOMHTMLHRElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLHRElementSetAlign + -- method DOMHTMLHRElement::set_no_shade -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -368,9 +564,9 @@ dOMHTMLHRElementSetNoShade :: (MonadIO m, DOMHTMLHRElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLHRElementSetNoShade _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -378,11 +574,14 @@ touchManagedPtr _obj return () +data DOMHTMLHRElementSetNoShadeMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLHRElementK a) => MethodInfo DOMHTMLHRElementSetNoShadeMethodInfo a signature where + overloadedMethod _ = dOMHTMLHRElementSetNoShade + -- method DOMHTMLHRElement::set_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -395,9 +594,9 @@ dOMHTMLHRElementSetSize :: (MonadIO m, DOMHTMLHRElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLHRElementSetSize _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -406,11 +605,14 @@ freeMem value' return () +data DOMHTMLHRElementSetSizeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLHRElementK a) => MethodInfo DOMHTMLHRElementSetSizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLHRElementSetSize + -- method DOMHTMLHRElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHRElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -423,9 +625,9 @@ dOMHTMLHRElementSetWidth :: (MonadIO m, DOMHTMLHRElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLHRElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -433,5 +635,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLHRElementSetWidthMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLHRElementK a) => MethodInfo DOMHTMLHRElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLHRElementSetWidth diff --git a/GI/WebKit/Objects/DOMHTMLHRElement.hs-boot b/GI/WebKit/Objects/DOMHTMLHRElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLHRElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLHRElement.hs-boot @@ -15,3 +15,11 @@ data DOMHTMLHRElementNoShadePropertyInfo data DOMHTMLHRElementSizePropertyInfo data DOMHTMLHRElementWidthPropertyInfo +data DOMHTMLHRElementGetAlignMethodInfo +data DOMHTMLHRElementGetNoShadeMethodInfo +data DOMHTMLHRElementGetSizeMethodInfo +data DOMHTMLHRElementGetWidthMethodInfo +data DOMHTMLHRElementSetAlignMethodInfo +data DOMHTMLHRElementSetNoShadeMethodInfo +data DOMHTMLHRElementSetSizeMethodInfo +data DOMHTMLHRElementSetWidthMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLHeadElement.hs b/GI/WebKit/Objects/DOMHTMLHeadElement.hs --- a/GI/WebKit/Objects/DOMHTMLHeadElement.hs +++ b/GI/WebKit/Objects/DOMHTMLHeadElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLHeadElementGetProfile + DOMHTMLHeadElementGetProfileMethodInfo , dOMHTMLHeadElementGetProfile , -- ** dOMHTMLHeadElementSetProfile + DOMHTMLHeadElementSetProfileMethodInfo , dOMHTMLHeadElementSetProfile , @@ -70,6 +73,173 @@ noDOMHTMLHeadElement :: Maybe DOMHTMLHeadElement noDOMHTMLHeadElement = Nothing +type family ResolveDOMHTMLHeadElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLHeadElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLHeadElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLHeadElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLHeadElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLHeadElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLHeadElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLHeadElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLHeadElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLHeadElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLHeadElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLHeadElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLHeadElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLHeadElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLHeadElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLHeadElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLHeadElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLHeadElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLHeadElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLHeadElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLHeadElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLHeadElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLHeadElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLHeadElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLHeadElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLHeadElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLHeadElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLHeadElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLHeadElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLHeadElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLHeadElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLHeadElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLHeadElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLHeadElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLHeadElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLHeadElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLHeadElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLHeadElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLHeadElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLHeadElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLHeadElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLHeadElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLHeadElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLHeadElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLHeadElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLHeadElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLHeadElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLHeadElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLHeadElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLHeadElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLHeadElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLHeadElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLHeadElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLHeadElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLHeadElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLHeadElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLHeadElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLHeadElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLHeadElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLHeadElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLHeadElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLHeadElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLHeadElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLHeadElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLHeadElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLHeadElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLHeadElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLHeadElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLHeadElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLHeadElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLHeadElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLHeadElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLHeadElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLHeadElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLHeadElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLHeadElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLHeadElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLHeadElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLHeadElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLHeadElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLHeadElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLHeadElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLHeadElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLHeadElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLHeadElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLHeadElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLHeadElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLHeadElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLHeadElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLHeadElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLHeadElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLHeadElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLHeadElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLHeadElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLHeadElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLHeadElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLHeadElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLHeadElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLHeadElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLHeadElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLHeadElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLHeadElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLHeadElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLHeadElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLHeadElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLHeadElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLHeadElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLHeadElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLHeadElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLHeadElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLHeadElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLHeadElementMethod "getProfile" o = DOMHTMLHeadElementGetProfileMethodInfo + ResolveDOMHTMLHeadElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLHeadElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLHeadElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLHeadElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLHeadElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLHeadElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLHeadElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLHeadElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLHeadElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLHeadElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLHeadElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLHeadElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLHeadElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLHeadElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLHeadElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLHeadElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLHeadElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLHeadElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLHeadElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLHeadElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLHeadElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLHeadElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLHeadElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLHeadElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLHeadElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLHeadElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLHeadElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLHeadElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLHeadElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLHeadElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLHeadElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLHeadElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLHeadElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLHeadElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLHeadElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLHeadElementMethod "setProfile" o = DOMHTMLHeadElementSetProfileMethodInfo + ResolveDOMHTMLHeadElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLHeadElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLHeadElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLHeadElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLHeadElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLHeadElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLHeadElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLHeadElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLHeadElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLHeadElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLHeadElementMethod t DOMHTMLHeadElement, MethodInfo info DOMHTMLHeadElement p) => IsLabelProxy t (DOMHTMLHeadElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLHeadElementMethod t DOMHTMLHeadElement, MethodInfo info DOMHTMLHeadElement p) => IsLabel t (DOMHTMLHeadElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "profile" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLHeadElementProfilePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLHeadElementProfilePropertyInfo = DOMHTMLHeadElementK type AttrGetType DOMHTMLHeadElementProfilePropertyInfo = T.Text - type AttrLabel DOMHTMLHeadElementProfilePropertyInfo = "DOMHTMLHeadElement::profile" + type AttrLabel DOMHTMLHeadElementProfilePropertyInfo = "profile" attrGet _ = getDOMHTMLHeadElementProfile attrSet _ = setDOMHTMLHeadElementProfile attrConstruct _ = constructDOMHTMLHeadElementProfile type instance AttributeList DOMHTMLHeadElement = DOMHTMLHeadElementAttributeList -type DOMHTMLHeadElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("profile", DOMHTMLHeadElementProfilePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLHeadElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("profile", DOMHTMLHeadElementProfilePropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLHeadElement = DOMHTMLHeadElementSignalList -type DOMHTMLHeadElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLHeadElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLHeadElement::get_profile -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLHeadElementGetProfile :: (MonadIO m, DOMHTMLHeadElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLHeadElementGetProfile _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_head_element_get_profile _obj' @@ -127,11 +296,14 @@ touchManagedPtr _obj return result' +data DOMHTMLHeadElementGetProfileMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLHeadElementK a) => MethodInfo DOMHTMLHeadElementGetProfileMethodInfo a signature where + overloadedMethod _ = dOMHTMLHeadElementGetProfile + -- method DOMHTMLHeadElement::set_profile -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -144,9 +316,9 @@ dOMHTMLHeadElementSetProfile :: (MonadIO m, DOMHTMLHeadElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLHeadElementSetProfile _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -154,5 +326,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLHeadElementSetProfileMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLHeadElementK a) => MethodInfo DOMHTMLHeadElementSetProfileMethodInfo a signature where + overloadedMethod _ = dOMHTMLHeadElementSetProfile diff --git a/GI/WebKit/Objects/DOMHTMLHeadElement.hs-boot b/GI/WebKit/Objects/DOMHTMLHeadElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLHeadElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLHeadElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLHeadElementK o instance (GObject o, IsDescendantOf DOMHTMLHeadElement o) => DOMHTMLHeadElementK o data DOMHTMLHeadElementProfilePropertyInfo +data DOMHTMLHeadElementGetProfileMethodInfo +data DOMHTMLHeadElementSetProfileMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLHeadingElement.hs b/GI/WebKit/Objects/DOMHTMLHeadingElement.hs --- a/GI/WebKit/Objects/DOMHTMLHeadingElement.hs +++ b/GI/WebKit/Objects/DOMHTMLHeadingElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLHeadingElementGetAlign + DOMHTMLHeadingElementGetAlignMethodInfo , dOMHTMLHeadingElementGetAlign , -- ** dOMHTMLHeadingElementSetAlign + DOMHTMLHeadingElementSetAlignMethodInfo , dOMHTMLHeadingElementSetAlign , @@ -70,6 +73,173 @@ noDOMHTMLHeadingElement :: Maybe DOMHTMLHeadingElement noDOMHTMLHeadingElement = Nothing +type family ResolveDOMHTMLHeadingElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLHeadingElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLHeadingElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLHeadingElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLHeadingElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLHeadingElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLHeadingElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLHeadingElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLHeadingElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLHeadingElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLHeadingElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLHeadingElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLHeadingElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLHeadingElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLHeadingElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLHeadingElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLHeadingElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLHeadingElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLHeadingElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLHeadingElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLHeadingElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLHeadingElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLHeadingElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLHeadingElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLHeadingElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLHeadingElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLHeadingElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLHeadingElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLHeadingElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLHeadingElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLHeadingElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLHeadingElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLHeadingElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLHeadingElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLHeadingElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLHeadingElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLHeadingElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLHeadingElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLHeadingElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLHeadingElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLHeadingElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLHeadingElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLHeadingElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLHeadingElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLHeadingElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLHeadingElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLHeadingElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLHeadingElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLHeadingElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLHeadingElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLHeadingElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLHeadingElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLHeadingElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLHeadingElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLHeadingElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLHeadingElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLHeadingElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLHeadingElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLHeadingElementMethod "getAlign" o = DOMHTMLHeadingElementGetAlignMethodInfo + ResolveDOMHTMLHeadingElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLHeadingElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLHeadingElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLHeadingElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLHeadingElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLHeadingElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLHeadingElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLHeadingElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLHeadingElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLHeadingElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLHeadingElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLHeadingElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLHeadingElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLHeadingElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLHeadingElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLHeadingElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLHeadingElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLHeadingElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLHeadingElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLHeadingElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLHeadingElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLHeadingElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLHeadingElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLHeadingElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLHeadingElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLHeadingElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLHeadingElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLHeadingElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLHeadingElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLHeadingElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLHeadingElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLHeadingElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLHeadingElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLHeadingElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLHeadingElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLHeadingElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLHeadingElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLHeadingElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLHeadingElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLHeadingElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLHeadingElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLHeadingElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLHeadingElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLHeadingElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLHeadingElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLHeadingElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLHeadingElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLHeadingElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLHeadingElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLHeadingElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLHeadingElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLHeadingElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLHeadingElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLHeadingElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLHeadingElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLHeadingElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLHeadingElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLHeadingElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLHeadingElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLHeadingElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLHeadingElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLHeadingElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLHeadingElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLHeadingElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLHeadingElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLHeadingElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLHeadingElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLHeadingElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLHeadingElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLHeadingElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLHeadingElementMethod "setAlign" o = DOMHTMLHeadingElementSetAlignMethodInfo + ResolveDOMHTMLHeadingElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLHeadingElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLHeadingElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLHeadingElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLHeadingElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLHeadingElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLHeadingElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLHeadingElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLHeadingElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLHeadingElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLHeadingElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLHeadingElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLHeadingElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLHeadingElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLHeadingElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLHeadingElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLHeadingElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLHeadingElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLHeadingElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLHeadingElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLHeadingElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLHeadingElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLHeadingElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLHeadingElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLHeadingElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLHeadingElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLHeadingElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLHeadingElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLHeadingElementMethod t DOMHTMLHeadingElement, MethodInfo info DOMHTMLHeadingElement p) => IsLabelProxy t (DOMHTMLHeadingElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLHeadingElementMethod t DOMHTMLHeadingElement, MethodInfo info DOMHTMLHeadingElement p) => IsLabel t (DOMHTMLHeadingElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLHeadingElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLHeadingElementAlignPropertyInfo = DOMHTMLHeadingElementK type AttrGetType DOMHTMLHeadingElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLHeadingElementAlignPropertyInfo = "DOMHTMLHeadingElement::align" + type AttrLabel DOMHTMLHeadingElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLHeadingElementAlign attrSet _ = setDOMHTMLHeadingElementAlign attrConstruct _ = constructDOMHTMLHeadingElementAlign type instance AttributeList DOMHTMLHeadingElement = DOMHTMLHeadingElementAttributeList -type DOMHTMLHeadingElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLHeadingElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLHeadingElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLHeadingElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLHeadingElement = DOMHTMLHeadingElementSignalList -type DOMHTMLHeadingElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLHeadingElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLHeadingElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadingElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadingElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadingElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLHeadingElementGetAlign :: (MonadIO m, DOMHTMLHeadingElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLHeadingElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_heading_element_get_align _obj' @@ -127,11 +296,14 @@ touchManagedPtr _obj return result' +data DOMHTMLHeadingElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLHeadingElementK a) => MethodInfo DOMHTMLHeadingElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLHeadingElementGetAlign + -- method DOMHTMLHeadingElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadingElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadingElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHeadingElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -144,9 +316,9 @@ dOMHTMLHeadingElementSetAlign :: (MonadIO m, DOMHTMLHeadingElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLHeadingElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -154,5 +326,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLHeadingElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLHeadingElementK a) => MethodInfo DOMHTMLHeadingElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLHeadingElementSetAlign diff --git a/GI/WebKit/Objects/DOMHTMLHeadingElement.hs-boot b/GI/WebKit/Objects/DOMHTMLHeadingElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLHeadingElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLHeadingElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLHeadingElementK o instance (GObject o, IsDescendantOf DOMHTMLHeadingElement o) => DOMHTMLHeadingElementK o data DOMHTMLHeadingElementAlignPropertyInfo +data DOMHTMLHeadingElementGetAlignMethodInfo +data DOMHTMLHeadingElementSetAlignMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLHtmlElement.hs b/GI/WebKit/Objects/DOMHTMLHtmlElement.hs --- a/GI/WebKit/Objects/DOMHTMLHtmlElement.hs +++ b/GI/WebKit/Objects/DOMHTMLHtmlElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMHTMLHtmlElementGetManifest + DOMHTMLHtmlElementGetManifestMethodInfo , dOMHTMLHtmlElementGetManifest , -- ** dOMHTMLHtmlElementGetVersion + DOMHTMLHtmlElementGetVersionMethodInfo , dOMHTMLHtmlElementGetVersion , -- ** dOMHTMLHtmlElementSetManifest + DOMHTMLHtmlElementSetManifestMethodInfo , dOMHTMLHtmlElementSetManifest , -- ** dOMHTMLHtmlElementSetVersion + DOMHTMLHtmlElementSetVersionMethodInfo , dOMHTMLHtmlElementSetVersion , @@ -85,6 +90,175 @@ noDOMHTMLHtmlElement :: Maybe DOMHTMLHtmlElement noDOMHTMLHtmlElement = Nothing +type family ResolveDOMHTMLHtmlElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLHtmlElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLHtmlElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLHtmlElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLHtmlElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLHtmlElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLHtmlElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLHtmlElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLHtmlElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLHtmlElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLHtmlElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLHtmlElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLHtmlElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLHtmlElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLHtmlElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLHtmlElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLHtmlElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLHtmlElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLHtmlElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLHtmlElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLHtmlElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLHtmlElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLHtmlElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLHtmlElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLHtmlElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLHtmlElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLHtmlElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLHtmlElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLHtmlElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLHtmlElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLHtmlElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLHtmlElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLHtmlElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLHtmlElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLHtmlElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLHtmlElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLHtmlElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLHtmlElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLHtmlElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLHtmlElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLHtmlElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLHtmlElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLHtmlElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLHtmlElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLHtmlElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLHtmlElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLHtmlElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLHtmlElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLHtmlElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLHtmlElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLHtmlElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLHtmlElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLHtmlElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLHtmlElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLHtmlElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLHtmlElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLHtmlElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLHtmlElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLHtmlElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLHtmlElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLHtmlElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLHtmlElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLHtmlElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLHtmlElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLHtmlElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLHtmlElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLHtmlElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLHtmlElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLHtmlElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLHtmlElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLHtmlElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLHtmlElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLHtmlElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLHtmlElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLHtmlElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLHtmlElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLHtmlElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLHtmlElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLHtmlElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLHtmlElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLHtmlElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLHtmlElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLHtmlElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLHtmlElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLHtmlElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLHtmlElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLHtmlElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLHtmlElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLHtmlElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLHtmlElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLHtmlElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLHtmlElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLHtmlElementMethod "getManifest" o = DOMHTMLHtmlElementGetManifestMethodInfo + ResolveDOMHTMLHtmlElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLHtmlElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLHtmlElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLHtmlElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLHtmlElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLHtmlElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLHtmlElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLHtmlElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLHtmlElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLHtmlElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLHtmlElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLHtmlElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLHtmlElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLHtmlElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLHtmlElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLHtmlElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLHtmlElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLHtmlElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLHtmlElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLHtmlElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLHtmlElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLHtmlElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLHtmlElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLHtmlElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLHtmlElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLHtmlElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLHtmlElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLHtmlElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLHtmlElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLHtmlElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLHtmlElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLHtmlElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLHtmlElementMethod "getVersion" o = DOMHTMLHtmlElementGetVersionMethodInfo + ResolveDOMHTMLHtmlElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLHtmlElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLHtmlElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLHtmlElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLHtmlElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLHtmlElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLHtmlElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLHtmlElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLHtmlElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLHtmlElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLHtmlElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLHtmlElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLHtmlElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLHtmlElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLHtmlElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLHtmlElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLHtmlElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLHtmlElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLHtmlElementMethod "setManifest" o = DOMHTMLHtmlElementSetManifestMethodInfo + ResolveDOMHTMLHtmlElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLHtmlElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLHtmlElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLHtmlElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLHtmlElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLHtmlElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLHtmlElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLHtmlElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLHtmlElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLHtmlElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLHtmlElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLHtmlElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLHtmlElementMethod "setVersion" o = DOMHTMLHtmlElementSetVersionMethodInfo + ResolveDOMHTMLHtmlElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLHtmlElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLHtmlElementMethod t DOMHTMLHtmlElement, MethodInfo info DOMHTMLHtmlElement p) => IsLabelProxy t (DOMHTMLHtmlElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLHtmlElementMethod t DOMHTMLHtmlElement, MethodInfo info DOMHTMLHtmlElement p) => IsLabel t (DOMHTMLHtmlElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "manifest" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -104,7 +278,7 @@ type AttrSetTypeConstraint DOMHTMLHtmlElementManifestPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLHtmlElementManifestPropertyInfo = DOMHTMLHtmlElementK type AttrGetType DOMHTMLHtmlElementManifestPropertyInfo = T.Text - type AttrLabel DOMHTMLHtmlElementManifestPropertyInfo = "DOMHTMLHtmlElement::manifest" + type AttrLabel DOMHTMLHtmlElementManifestPropertyInfo = "manifest" attrGet _ = getDOMHTMLHtmlElementManifest attrSet _ = setDOMHTMLHtmlElementManifest attrConstruct _ = constructDOMHTMLHtmlElementManifest @@ -128,22 +302,21 @@ type AttrSetTypeConstraint DOMHTMLHtmlElementVersionPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLHtmlElementVersionPropertyInfo = DOMHTMLHtmlElementK type AttrGetType DOMHTMLHtmlElementVersionPropertyInfo = T.Text - type AttrLabel DOMHTMLHtmlElementVersionPropertyInfo = "DOMHTMLHtmlElement::version" + type AttrLabel DOMHTMLHtmlElementVersionPropertyInfo = "version" attrGet _ = getDOMHTMLHtmlElementVersion attrSet _ = setDOMHTMLHtmlElementVersion attrConstruct _ = constructDOMHTMLHtmlElementVersion type instance AttributeList DOMHTMLHtmlElement = DOMHTMLHtmlElementAttributeList -type DOMHTMLHtmlElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("manifest", DOMHTMLHtmlElementManifestPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("version", DOMHTMLHtmlElementVersionPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLHtmlElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("manifest", DOMHTMLHtmlElementManifestPropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("version", DOMHTMLHtmlElementVersionPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLHtmlElement = DOMHTMLHtmlElementSignalList -type DOMHTMLHtmlElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLHtmlElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLHtmlElement::get_manifest -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -155,8 +328,8 @@ dOMHTMLHtmlElementGetManifest :: (MonadIO m, DOMHTMLHtmlElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLHtmlElementGetManifest _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_html_element_get_manifest _obj' @@ -166,11 +339,14 @@ touchManagedPtr _obj return result' +data DOMHTMLHtmlElementGetManifestMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLHtmlElementK a) => MethodInfo DOMHTMLHtmlElementGetManifestMethodInfo a signature where + overloadedMethod _ = dOMHTMLHtmlElementGetManifest + -- method DOMHTMLHtmlElement::get_version -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -182,8 +358,8 @@ dOMHTMLHtmlElementGetVersion :: (MonadIO m, DOMHTMLHtmlElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLHtmlElementGetVersion _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_html_element_get_version _obj' @@ -193,11 +369,14 @@ touchManagedPtr _obj return result' +data DOMHTMLHtmlElementGetVersionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLHtmlElementK a) => MethodInfo DOMHTMLHtmlElementGetVersionMethodInfo a signature where + overloadedMethod _ = dOMHTMLHtmlElementGetVersion + -- method DOMHTMLHtmlElement::set_manifest -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -210,9 +389,9 @@ dOMHTMLHtmlElementSetManifest :: (MonadIO m, DOMHTMLHtmlElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLHtmlElementSetManifest _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -221,11 +400,14 @@ freeMem value' return () +data DOMHTMLHtmlElementSetManifestMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLHtmlElementK a) => MethodInfo DOMHTMLHtmlElementSetManifestMethodInfo a signature where + overloadedMethod _ = dOMHTMLHtmlElementSetManifest + -- method DOMHTMLHtmlElement::set_version -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLHtmlElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -238,9 +420,9 @@ dOMHTMLHtmlElementSetVersion :: (MonadIO m, DOMHTMLHtmlElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLHtmlElementSetVersion _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -248,5 +430,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLHtmlElementSetVersionMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLHtmlElementK a) => MethodInfo DOMHTMLHtmlElementSetVersionMethodInfo a signature where + overloadedMethod _ = dOMHTMLHtmlElementSetVersion diff --git a/GI/WebKit/Objects/DOMHTMLHtmlElement.hs-boot b/GI/WebKit/Objects/DOMHTMLHtmlElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLHtmlElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLHtmlElement.hs-boot @@ -13,3 +13,7 @@ instance (GObject o, IsDescendantOf DOMHTMLHtmlElement o) => DOMHTMLHtmlElementK o data DOMHTMLHtmlElementManifestPropertyInfo data DOMHTMLHtmlElementVersionPropertyInfo +data DOMHTMLHtmlElementGetManifestMethodInfo +data DOMHTMLHtmlElementGetVersionMethodInfo +data DOMHTMLHtmlElementSetManifestMethodInfo +data DOMHTMLHtmlElementSetVersionMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLIFrameElement.hs b/GI/WebKit/Objects/DOMHTMLIFrameElement.hs --- a/GI/WebKit/Objects/DOMHTMLIFrameElement.hs +++ b/GI/WebKit/Objects/DOMHTMLIFrameElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,114 +18,142 @@ -- * Methods -- ** dOMHTMLIFrameElementGetAlign + DOMHTMLIFrameElementGetAlignMethodInfo , dOMHTMLIFrameElementGetAlign , -- ** dOMHTMLIFrameElementGetContentDocument + DOMHTMLIFrameElementGetContentDocumentMethodInfo, dOMHTMLIFrameElementGetContentDocument , -- ** dOMHTMLIFrameElementGetContentWindow + DOMHTMLIFrameElementGetContentWindowMethodInfo, dOMHTMLIFrameElementGetContentWindow , -- ** dOMHTMLIFrameElementGetFrameBorder + DOMHTMLIFrameElementGetFrameBorderMethodInfo, dOMHTMLIFrameElementGetFrameBorder , -- ** dOMHTMLIFrameElementGetHeight + DOMHTMLIFrameElementGetHeightMethodInfo , dOMHTMLIFrameElementGetHeight , -- ** dOMHTMLIFrameElementGetLongDesc + DOMHTMLIFrameElementGetLongDescMethodInfo, dOMHTMLIFrameElementGetLongDesc , -- ** dOMHTMLIFrameElementGetMarginHeight + DOMHTMLIFrameElementGetMarginHeightMethodInfo, dOMHTMLIFrameElementGetMarginHeight , -- ** dOMHTMLIFrameElementGetMarginWidth + DOMHTMLIFrameElementGetMarginWidthMethodInfo, dOMHTMLIFrameElementGetMarginWidth , -- ** dOMHTMLIFrameElementGetName + DOMHTMLIFrameElementGetNameMethodInfo , dOMHTMLIFrameElementGetName , -- ** dOMHTMLIFrameElementGetSandbox + DOMHTMLIFrameElementGetSandboxMethodInfo, dOMHTMLIFrameElementGetSandbox , -- ** dOMHTMLIFrameElementGetScrolling + DOMHTMLIFrameElementGetScrollingMethodInfo, dOMHTMLIFrameElementGetScrolling , -- ** dOMHTMLIFrameElementGetSeamless + DOMHTMLIFrameElementGetSeamlessMethodInfo, dOMHTMLIFrameElementGetSeamless , -- ** dOMHTMLIFrameElementGetSrc + DOMHTMLIFrameElementGetSrcMethodInfo , dOMHTMLIFrameElementGetSrc , -- ** dOMHTMLIFrameElementGetSrcdoc + DOMHTMLIFrameElementGetSrcdocMethodInfo , dOMHTMLIFrameElementGetSrcdoc , -- ** dOMHTMLIFrameElementGetWidth + DOMHTMLIFrameElementGetWidthMethodInfo , dOMHTMLIFrameElementGetWidth , -- ** dOMHTMLIFrameElementSetAlign + DOMHTMLIFrameElementSetAlignMethodInfo , dOMHTMLIFrameElementSetAlign , -- ** dOMHTMLIFrameElementSetFrameBorder + DOMHTMLIFrameElementSetFrameBorderMethodInfo, dOMHTMLIFrameElementSetFrameBorder , -- ** dOMHTMLIFrameElementSetHeight + DOMHTMLIFrameElementSetHeightMethodInfo , dOMHTMLIFrameElementSetHeight , -- ** dOMHTMLIFrameElementSetLongDesc + DOMHTMLIFrameElementSetLongDescMethodInfo, dOMHTMLIFrameElementSetLongDesc , -- ** dOMHTMLIFrameElementSetMarginHeight + DOMHTMLIFrameElementSetMarginHeightMethodInfo, dOMHTMLIFrameElementSetMarginHeight , -- ** dOMHTMLIFrameElementSetMarginWidth + DOMHTMLIFrameElementSetMarginWidthMethodInfo, dOMHTMLIFrameElementSetMarginWidth , -- ** dOMHTMLIFrameElementSetName + DOMHTMLIFrameElementSetNameMethodInfo , dOMHTMLIFrameElementSetName , -- ** dOMHTMLIFrameElementSetSandbox + DOMHTMLIFrameElementSetSandboxMethodInfo, dOMHTMLIFrameElementSetSandbox , -- ** dOMHTMLIFrameElementSetScrolling + DOMHTMLIFrameElementSetScrollingMethodInfo, dOMHTMLIFrameElementSetScrolling , -- ** dOMHTMLIFrameElementSetSeamless + DOMHTMLIFrameElementSetSeamlessMethodInfo, dOMHTMLIFrameElementSetSeamless , -- ** dOMHTMLIFrameElementSetSrc + DOMHTMLIFrameElementSetSrcMethodInfo , dOMHTMLIFrameElementSetSrc , -- ** dOMHTMLIFrameElementSetSrcdoc + DOMHTMLIFrameElementSetSrcdocMethodInfo , dOMHTMLIFrameElementSetSrcdoc , -- ** dOMHTMLIFrameElementSetWidth + DOMHTMLIFrameElementSetWidthMethodInfo , dOMHTMLIFrameElementSetWidth , @@ -268,6 +297,199 @@ noDOMHTMLIFrameElement :: Maybe DOMHTMLIFrameElement noDOMHTMLIFrameElement = Nothing +type family ResolveDOMHTMLIFrameElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLIFrameElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLIFrameElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLIFrameElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLIFrameElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLIFrameElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLIFrameElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLIFrameElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLIFrameElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLIFrameElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLIFrameElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLIFrameElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLIFrameElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLIFrameElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLIFrameElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLIFrameElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLIFrameElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLIFrameElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLIFrameElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLIFrameElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLIFrameElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLIFrameElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLIFrameElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLIFrameElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLIFrameElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLIFrameElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLIFrameElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLIFrameElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLIFrameElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLIFrameElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLIFrameElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLIFrameElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLIFrameElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLIFrameElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLIFrameElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLIFrameElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLIFrameElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLIFrameElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLIFrameElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLIFrameElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLIFrameElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLIFrameElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLIFrameElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLIFrameElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLIFrameElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLIFrameElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLIFrameElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLIFrameElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLIFrameElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLIFrameElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLIFrameElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLIFrameElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLIFrameElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLIFrameElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLIFrameElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLIFrameElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLIFrameElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLIFrameElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLIFrameElementMethod "getAlign" o = DOMHTMLIFrameElementGetAlignMethodInfo + ResolveDOMHTMLIFrameElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLIFrameElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLIFrameElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLIFrameElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLIFrameElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLIFrameElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLIFrameElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLIFrameElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLIFrameElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLIFrameElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLIFrameElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLIFrameElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLIFrameElementMethod "getContentDocument" o = DOMHTMLIFrameElementGetContentDocumentMethodInfo + ResolveDOMHTMLIFrameElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLIFrameElementMethod "getContentWindow" o = DOMHTMLIFrameElementGetContentWindowMethodInfo + ResolveDOMHTMLIFrameElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLIFrameElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLIFrameElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLIFrameElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLIFrameElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLIFrameElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLIFrameElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLIFrameElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLIFrameElementMethod "getFrameBorder" o = DOMHTMLIFrameElementGetFrameBorderMethodInfo + ResolveDOMHTMLIFrameElementMethod "getHeight" o = DOMHTMLIFrameElementGetHeightMethodInfo + ResolveDOMHTMLIFrameElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLIFrameElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLIFrameElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLIFrameElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLIFrameElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLIFrameElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLIFrameElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLIFrameElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLIFrameElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLIFrameElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLIFrameElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLIFrameElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLIFrameElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLIFrameElementMethod "getLongDesc" o = DOMHTMLIFrameElementGetLongDescMethodInfo + ResolveDOMHTMLIFrameElementMethod "getMarginHeight" o = DOMHTMLIFrameElementGetMarginHeightMethodInfo + ResolveDOMHTMLIFrameElementMethod "getMarginWidth" o = DOMHTMLIFrameElementGetMarginWidthMethodInfo + ResolveDOMHTMLIFrameElementMethod "getName" o = DOMHTMLIFrameElementGetNameMethodInfo + ResolveDOMHTMLIFrameElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLIFrameElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLIFrameElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLIFrameElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLIFrameElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLIFrameElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLIFrameElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLIFrameElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLIFrameElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLIFrameElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLIFrameElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLIFrameElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLIFrameElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLIFrameElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLIFrameElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLIFrameElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLIFrameElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLIFrameElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLIFrameElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLIFrameElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLIFrameElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLIFrameElementMethod "getSandbox" o = DOMHTMLIFrameElementGetSandboxMethodInfo + ResolveDOMHTMLIFrameElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLIFrameElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLIFrameElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLIFrameElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLIFrameElementMethod "getScrolling" o = DOMHTMLIFrameElementGetScrollingMethodInfo + ResolveDOMHTMLIFrameElementMethod "getSeamless" o = DOMHTMLIFrameElementGetSeamlessMethodInfo + ResolveDOMHTMLIFrameElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLIFrameElementMethod "getSrc" o = DOMHTMLIFrameElementGetSrcMethodInfo + ResolveDOMHTMLIFrameElementMethod "getSrcdoc" o = DOMHTMLIFrameElementGetSrcdocMethodInfo + ResolveDOMHTMLIFrameElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLIFrameElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLIFrameElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLIFrameElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLIFrameElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLIFrameElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLIFrameElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLIFrameElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLIFrameElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLIFrameElementMethod "getWidth" o = DOMHTMLIFrameElementGetWidthMethodInfo + ResolveDOMHTMLIFrameElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLIFrameElementMethod "setAlign" o = DOMHTMLIFrameElementSetAlignMethodInfo + ResolveDOMHTMLIFrameElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLIFrameElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLIFrameElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLIFrameElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLIFrameElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLIFrameElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLIFrameElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLIFrameElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLIFrameElementMethod "setFrameBorder" o = DOMHTMLIFrameElementSetFrameBorderMethodInfo + ResolveDOMHTMLIFrameElementMethod "setHeight" o = DOMHTMLIFrameElementSetHeightMethodInfo + ResolveDOMHTMLIFrameElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLIFrameElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLIFrameElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLIFrameElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLIFrameElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLIFrameElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLIFrameElementMethod "setLongDesc" o = DOMHTMLIFrameElementSetLongDescMethodInfo + ResolveDOMHTMLIFrameElementMethod "setMarginHeight" o = DOMHTMLIFrameElementSetMarginHeightMethodInfo + ResolveDOMHTMLIFrameElementMethod "setMarginWidth" o = DOMHTMLIFrameElementSetMarginWidthMethodInfo + ResolveDOMHTMLIFrameElementMethod "setName" o = DOMHTMLIFrameElementSetNameMethodInfo + ResolveDOMHTMLIFrameElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLIFrameElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLIFrameElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLIFrameElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLIFrameElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLIFrameElementMethod "setSandbox" o = DOMHTMLIFrameElementSetSandboxMethodInfo + ResolveDOMHTMLIFrameElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLIFrameElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLIFrameElementMethod "setScrolling" o = DOMHTMLIFrameElementSetScrollingMethodInfo + ResolveDOMHTMLIFrameElementMethod "setSeamless" o = DOMHTMLIFrameElementSetSeamlessMethodInfo + ResolveDOMHTMLIFrameElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLIFrameElementMethod "setSrc" o = DOMHTMLIFrameElementSetSrcMethodInfo + ResolveDOMHTMLIFrameElementMethod "setSrcdoc" o = DOMHTMLIFrameElementSetSrcdocMethodInfo + ResolveDOMHTMLIFrameElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLIFrameElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLIFrameElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLIFrameElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLIFrameElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLIFrameElementMethod "setWidth" o = DOMHTMLIFrameElementSetWidthMethodInfo + ResolveDOMHTMLIFrameElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLIFrameElementMethod t DOMHTMLIFrameElement, MethodInfo info DOMHTMLIFrameElement p) => IsLabelProxy t (DOMHTMLIFrameElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLIFrameElementMethod t DOMHTMLIFrameElement, MethodInfo info DOMHTMLIFrameElement p) => IsLabel t (DOMHTMLIFrameElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -287,7 +509,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementAlignPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementAlignPropertyInfo = "DOMHTMLIFrameElement::align" + type AttrLabel DOMHTMLIFrameElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLIFrameElementAlign attrSet _ = setDOMHTMLIFrameElementAlign attrConstruct _ = constructDOMHTMLIFrameElementAlign @@ -305,7 +527,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementContentDocumentPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLIFrameElementContentDocumentPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementContentDocumentPropertyInfo = DOMDocument - type AttrLabel DOMHTMLIFrameElementContentDocumentPropertyInfo = "DOMHTMLIFrameElement::content-document" + type AttrLabel DOMHTMLIFrameElementContentDocumentPropertyInfo = "content-document" attrGet _ = getDOMHTMLIFrameElementContentDocument attrSet _ = undefined attrConstruct _ = undefined @@ -323,7 +545,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementContentWindowPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLIFrameElementContentWindowPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementContentWindowPropertyInfo = DOMDOMWindow - type AttrLabel DOMHTMLIFrameElementContentWindowPropertyInfo = "DOMHTMLIFrameElement::content-window" + type AttrLabel DOMHTMLIFrameElementContentWindowPropertyInfo = "content-window" attrGet _ = getDOMHTMLIFrameElementContentWindow attrSet _ = undefined attrConstruct _ = undefined @@ -347,7 +569,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementFrameBorderPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementFrameBorderPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementFrameBorderPropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementFrameBorderPropertyInfo = "DOMHTMLIFrameElement::frame-border" + type AttrLabel DOMHTMLIFrameElementFrameBorderPropertyInfo = "frame-border" attrGet _ = getDOMHTMLIFrameElementFrameBorder attrSet _ = setDOMHTMLIFrameElementFrameBorder attrConstruct _ = constructDOMHTMLIFrameElementFrameBorder @@ -371,7 +593,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementHeightPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementHeightPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementHeightPropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementHeightPropertyInfo = "DOMHTMLIFrameElement::height" + type AttrLabel DOMHTMLIFrameElementHeightPropertyInfo = "height" attrGet _ = getDOMHTMLIFrameElementHeight attrSet _ = setDOMHTMLIFrameElementHeight attrConstruct _ = constructDOMHTMLIFrameElementHeight @@ -395,7 +617,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementLongDescPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementLongDescPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementLongDescPropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementLongDescPropertyInfo = "DOMHTMLIFrameElement::long-desc" + type AttrLabel DOMHTMLIFrameElementLongDescPropertyInfo = "long-desc" attrGet _ = getDOMHTMLIFrameElementLongDesc attrSet _ = setDOMHTMLIFrameElementLongDesc attrConstruct _ = constructDOMHTMLIFrameElementLongDesc @@ -419,7 +641,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementMarginHeightPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementMarginHeightPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementMarginHeightPropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementMarginHeightPropertyInfo = "DOMHTMLIFrameElement::margin-height" + type AttrLabel DOMHTMLIFrameElementMarginHeightPropertyInfo = "margin-height" attrGet _ = getDOMHTMLIFrameElementMarginHeight attrSet _ = setDOMHTMLIFrameElementMarginHeight attrConstruct _ = constructDOMHTMLIFrameElementMarginHeight @@ -443,7 +665,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementMarginWidthPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementMarginWidthPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementMarginWidthPropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementMarginWidthPropertyInfo = "DOMHTMLIFrameElement::margin-width" + type AttrLabel DOMHTMLIFrameElementMarginWidthPropertyInfo = "margin-width" attrGet _ = getDOMHTMLIFrameElementMarginWidth attrSet _ = setDOMHTMLIFrameElementMarginWidth attrConstruct _ = constructDOMHTMLIFrameElementMarginWidth @@ -467,7 +689,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementNamePropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementNamePropertyInfo = "DOMHTMLIFrameElement::name" + type AttrLabel DOMHTMLIFrameElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLIFrameElementName attrSet _ = setDOMHTMLIFrameElementName attrConstruct _ = constructDOMHTMLIFrameElementName @@ -491,7 +713,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementSandboxPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementSandboxPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementSandboxPropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementSandboxPropertyInfo = "DOMHTMLIFrameElement::sandbox" + type AttrLabel DOMHTMLIFrameElementSandboxPropertyInfo = "sandbox" attrGet _ = getDOMHTMLIFrameElementSandbox attrSet _ = setDOMHTMLIFrameElementSandbox attrConstruct _ = constructDOMHTMLIFrameElementSandbox @@ -515,7 +737,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementScrollingPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementScrollingPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementScrollingPropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementScrollingPropertyInfo = "DOMHTMLIFrameElement::scrolling" + type AttrLabel DOMHTMLIFrameElementScrollingPropertyInfo = "scrolling" attrGet _ = getDOMHTMLIFrameElementScrolling attrSet _ = setDOMHTMLIFrameElementScrolling attrConstruct _ = constructDOMHTMLIFrameElementScrolling @@ -539,7 +761,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementSeamlessPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLIFrameElementSeamlessPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementSeamlessPropertyInfo = Bool - type AttrLabel DOMHTMLIFrameElementSeamlessPropertyInfo = "DOMHTMLIFrameElement::seamless" + type AttrLabel DOMHTMLIFrameElementSeamlessPropertyInfo = "seamless" attrGet _ = getDOMHTMLIFrameElementSeamless attrSet _ = setDOMHTMLIFrameElementSeamless attrConstruct _ = constructDOMHTMLIFrameElementSeamless @@ -563,7 +785,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementSrcPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementSrcPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementSrcPropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementSrcPropertyInfo = "DOMHTMLIFrameElement::src" + type AttrLabel DOMHTMLIFrameElementSrcPropertyInfo = "src" attrGet _ = getDOMHTMLIFrameElementSrc attrSet _ = setDOMHTMLIFrameElementSrc attrConstruct _ = constructDOMHTMLIFrameElementSrc @@ -587,7 +809,7 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementSrcdocPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementSrcdocPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementSrcdocPropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementSrcdocPropertyInfo = "DOMHTMLIFrameElement::srcdoc" + type AttrLabel DOMHTMLIFrameElementSrcdocPropertyInfo = "srcdoc" attrGet _ = getDOMHTMLIFrameElementSrcdoc attrSet _ = setDOMHTMLIFrameElementSrcdoc attrConstruct _ = constructDOMHTMLIFrameElementSrcdoc @@ -611,22 +833,21 @@ type AttrSetTypeConstraint DOMHTMLIFrameElementWidthPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLIFrameElementWidthPropertyInfo = DOMHTMLIFrameElementK type AttrGetType DOMHTMLIFrameElementWidthPropertyInfo = T.Text - type AttrLabel DOMHTMLIFrameElementWidthPropertyInfo = "DOMHTMLIFrameElement::width" + type AttrLabel DOMHTMLIFrameElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLIFrameElementWidth attrSet _ = setDOMHTMLIFrameElementWidth attrConstruct _ = constructDOMHTMLIFrameElementWidth type instance AttributeList DOMHTMLIFrameElement = DOMHTMLIFrameElementAttributeList -type DOMHTMLIFrameElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLIFrameElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-document", DOMHTMLIFrameElementContentDocumentPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("content-window", DOMHTMLIFrameElementContentWindowPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("frame-border", DOMHTMLIFrameElementFrameBorderPropertyInfo), '("height", DOMHTMLIFrameElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("long-desc", DOMHTMLIFrameElementLongDescPropertyInfo), '("margin-height", DOMHTMLIFrameElementMarginHeightPropertyInfo), '("margin-width", DOMHTMLIFrameElementMarginWidthPropertyInfo), '("name", DOMHTMLIFrameElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("sandbox", DOMHTMLIFrameElementSandboxPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("scrolling", DOMHTMLIFrameElementScrollingPropertyInfo), '("seamless", DOMHTMLIFrameElementSeamlessPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLIFrameElementSrcPropertyInfo), '("srcdoc", DOMHTMLIFrameElementSrcdocPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLIFrameElementWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLIFrameElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLIFrameElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentDocument", DOMHTMLIFrameElementContentDocumentPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("contentWindow", DOMHTMLIFrameElementContentWindowPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("frameBorder", DOMHTMLIFrameElementFrameBorderPropertyInfo), '("height", DOMHTMLIFrameElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("longDesc", DOMHTMLIFrameElementLongDescPropertyInfo), '("marginHeight", DOMHTMLIFrameElementMarginHeightPropertyInfo), '("marginWidth", DOMHTMLIFrameElementMarginWidthPropertyInfo), '("name", DOMHTMLIFrameElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("sandbox", DOMHTMLIFrameElementSandboxPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("scrolling", DOMHTMLIFrameElementScrollingPropertyInfo), '("seamless", DOMHTMLIFrameElementSeamlessPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLIFrameElementSrcPropertyInfo), '("srcdoc", DOMHTMLIFrameElementSrcdocPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLIFrameElementWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLIFrameElement = DOMHTMLIFrameElementSignalList -type DOMHTMLIFrameElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLIFrameElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLIFrameElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -638,8 +859,8 @@ dOMHTMLIFrameElementGetAlign :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_align _obj' @@ -649,11 +870,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetAlign + -- method DOMHTMLIFrameElement::get_content_document -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDocument" -- throws : False -- Skip return : False @@ -665,8 +889,8 @@ dOMHTMLIFrameElementGetContentDocument :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m DOMDocument + a -- _obj + -> m DOMDocument -- result dOMHTMLIFrameElementGetContentDocument _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_content_document _obj' @@ -675,11 +899,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetContentDocumentMethodInfo +instance (signature ~ (m DOMDocument), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetContentDocumentMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetContentDocument + -- method DOMHTMLIFrameElement::get_content_window -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMWindow" -- throws : False -- Skip return : False @@ -691,8 +918,8 @@ dOMHTMLIFrameElementGetContentWindow :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m DOMDOMWindow + a -- _obj + -> m DOMDOMWindow -- result dOMHTMLIFrameElementGetContentWindow _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_content_window _obj' @@ -701,11 +928,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetContentWindowMethodInfo +instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetContentWindowMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetContentWindow + -- method DOMHTMLIFrameElement::get_frame_border -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -717,8 +947,8 @@ dOMHTMLIFrameElementGetFrameBorder :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetFrameBorder _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_frame_border _obj' @@ -728,11 +958,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetFrameBorderMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetFrameBorderMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetFrameBorder + -- method DOMHTMLIFrameElement::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -744,8 +977,8 @@ dOMHTMLIFrameElementGetHeight :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_height _obj' @@ -755,11 +988,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetHeightMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetHeight + -- method DOMHTMLIFrameElement::get_long_desc -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -771,8 +1007,8 @@ dOMHTMLIFrameElementGetLongDesc :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetLongDesc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_long_desc _obj' @@ -782,11 +1018,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetLongDescMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetLongDescMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetLongDesc + -- method DOMHTMLIFrameElement::get_margin_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -798,8 +1037,8 @@ dOMHTMLIFrameElementGetMarginHeight :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetMarginHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_margin_height _obj' @@ -809,11 +1048,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetMarginHeightMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetMarginHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetMarginHeight + -- method DOMHTMLIFrameElement::get_margin_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -825,8 +1067,8 @@ dOMHTMLIFrameElementGetMarginWidth :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetMarginWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_margin_width _obj' @@ -836,11 +1078,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetMarginWidthMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetMarginWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetMarginWidth + -- method DOMHTMLIFrameElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -852,8 +1097,8 @@ dOMHTMLIFrameElementGetName :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_name _obj' @@ -863,11 +1108,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetName + -- method DOMHTMLIFrameElement::get_sandbox -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -879,8 +1127,8 @@ dOMHTMLIFrameElementGetSandbox :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetSandbox _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_sandbox _obj' @@ -890,11 +1138,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetSandboxMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetSandboxMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetSandbox + -- method DOMHTMLIFrameElement::get_scrolling -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -906,8 +1157,8 @@ dOMHTMLIFrameElementGetScrolling :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetScrolling _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_scrolling _obj' @@ -917,11 +1168,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetScrollingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetScrollingMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetScrolling + -- method DOMHTMLIFrameElement::get_seamless -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -933,8 +1187,8 @@ dOMHTMLIFrameElementGetSeamless :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLIFrameElementGetSeamless _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_seamless _obj' @@ -942,11 +1196,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetSeamlessMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetSeamlessMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetSeamless + -- method DOMHTMLIFrameElement::get_src -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -958,8 +1215,8 @@ dOMHTMLIFrameElementGetSrc :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetSrc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_src _obj' @@ -969,11 +1226,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetSrcMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetSrc + -- method DOMHTMLIFrameElement::get_srcdoc -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -985,8 +1245,8 @@ dOMHTMLIFrameElementGetSrcdoc :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetSrcdoc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_srcdoc _obj' @@ -996,11 +1256,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetSrcdocMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetSrcdocMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetSrcdoc + -- method DOMHTMLIFrameElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1012,8 +1275,8 @@ dOMHTMLIFrameElementGetWidth :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLIFrameElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_iframe_element_get_width _obj' @@ -1023,11 +1286,14 @@ touchManagedPtr _obj return result' +data DOMHTMLIFrameElementGetWidthMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementGetWidth + -- method DOMHTMLIFrameElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1040,9 +1306,9 @@ dOMHTMLIFrameElementSetAlign :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1051,11 +1317,14 @@ freeMem value' return () +data DOMHTMLIFrameElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetAlign + -- method DOMHTMLIFrameElement::set_frame_border -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1068,9 +1337,9 @@ dOMHTMLIFrameElementSetFrameBorder :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetFrameBorder _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1079,11 +1348,14 @@ freeMem value' return () +data DOMHTMLIFrameElementSetFrameBorderMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetFrameBorderMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetFrameBorder + -- method DOMHTMLIFrameElement::set_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1096,9 +1368,9 @@ dOMHTMLIFrameElementSetHeight :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1107,11 +1379,14 @@ freeMem value' return () +data DOMHTMLIFrameElementSetHeightMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetHeight + -- method DOMHTMLIFrameElement::set_long_desc -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1124,9 +1399,9 @@ dOMHTMLIFrameElementSetLongDesc :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetLongDesc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1135,11 +1410,14 @@ freeMem value' return () +data DOMHTMLIFrameElementSetLongDescMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetLongDescMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetLongDesc + -- method DOMHTMLIFrameElement::set_margin_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1152,9 +1430,9 @@ dOMHTMLIFrameElementSetMarginHeight :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetMarginHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1163,11 +1441,14 @@ freeMem value' return () +data DOMHTMLIFrameElementSetMarginHeightMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetMarginHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetMarginHeight + -- method DOMHTMLIFrameElement::set_margin_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1180,9 +1461,9 @@ dOMHTMLIFrameElementSetMarginWidth :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetMarginWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1191,11 +1472,14 @@ freeMem value' return () +data DOMHTMLIFrameElementSetMarginWidthMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetMarginWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetMarginWidth + -- method DOMHTMLIFrameElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1208,9 +1492,9 @@ dOMHTMLIFrameElementSetName :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1219,11 +1503,14 @@ freeMem value' return () +data DOMHTMLIFrameElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetName + -- method DOMHTMLIFrameElement::set_sandbox -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1236,9 +1523,9 @@ dOMHTMLIFrameElementSetSandbox :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetSandbox _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1247,11 +1534,14 @@ freeMem value' return () +data DOMHTMLIFrameElementSetSandboxMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetSandboxMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetSandbox + -- method DOMHTMLIFrameElement::set_scrolling -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1264,9 +1554,9 @@ dOMHTMLIFrameElementSetScrolling :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetScrolling _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1275,11 +1565,14 @@ freeMem value' return () +data DOMHTMLIFrameElementSetScrollingMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetScrollingMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetScrolling + -- method DOMHTMLIFrameElement::set_seamless -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1292,9 +1585,9 @@ dOMHTMLIFrameElementSetSeamless :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLIFrameElementSetSeamless _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1302,11 +1595,14 @@ touchManagedPtr _obj return () +data DOMHTMLIFrameElementSetSeamlessMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetSeamlessMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetSeamless + -- method DOMHTMLIFrameElement::set_src -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1319,9 +1615,9 @@ dOMHTMLIFrameElementSetSrc :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetSrc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1330,11 +1626,14 @@ freeMem value' return () +data DOMHTMLIFrameElementSetSrcMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetSrc + -- method DOMHTMLIFrameElement::set_srcdoc -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1347,9 +1646,9 @@ dOMHTMLIFrameElementSetSrcdoc :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetSrcdoc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1358,11 +1657,14 @@ freeMem value' return () +data DOMHTMLIFrameElementSetSrcdocMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetSrcdocMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetSrcdoc + -- method DOMHTMLIFrameElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLIFrameElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1375,9 +1677,9 @@ dOMHTMLIFrameElementSetWidth :: (MonadIO m, DOMHTMLIFrameElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLIFrameElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1385,5 +1687,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLIFrameElementSetWidthMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLIFrameElementK a) => MethodInfo DOMHTMLIFrameElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLIFrameElementSetWidth diff --git a/GI/WebKit/Objects/DOMHTMLIFrameElement.hs-boot b/GI/WebKit/Objects/DOMHTMLIFrameElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLIFrameElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLIFrameElement.hs-boot @@ -26,3 +26,31 @@ data DOMHTMLIFrameElementSrcPropertyInfo data DOMHTMLIFrameElementSrcdocPropertyInfo data DOMHTMLIFrameElementWidthPropertyInfo +data DOMHTMLIFrameElementGetAlignMethodInfo +data DOMHTMLIFrameElementGetContentDocumentMethodInfo +data DOMHTMLIFrameElementGetContentWindowMethodInfo +data DOMHTMLIFrameElementGetFrameBorderMethodInfo +data DOMHTMLIFrameElementGetHeightMethodInfo +data DOMHTMLIFrameElementGetLongDescMethodInfo +data DOMHTMLIFrameElementGetMarginHeightMethodInfo +data DOMHTMLIFrameElementGetMarginWidthMethodInfo +data DOMHTMLIFrameElementGetNameMethodInfo +data DOMHTMLIFrameElementGetSandboxMethodInfo +data DOMHTMLIFrameElementGetScrollingMethodInfo +data DOMHTMLIFrameElementGetSeamlessMethodInfo +data DOMHTMLIFrameElementGetSrcMethodInfo +data DOMHTMLIFrameElementGetSrcdocMethodInfo +data DOMHTMLIFrameElementGetWidthMethodInfo +data DOMHTMLIFrameElementSetAlignMethodInfo +data DOMHTMLIFrameElementSetFrameBorderMethodInfo +data DOMHTMLIFrameElementSetHeightMethodInfo +data DOMHTMLIFrameElementSetLongDescMethodInfo +data DOMHTMLIFrameElementSetMarginHeightMethodInfo +data DOMHTMLIFrameElementSetMarginWidthMethodInfo +data DOMHTMLIFrameElementSetNameMethodInfo +data DOMHTMLIFrameElementSetSandboxMethodInfo +data DOMHTMLIFrameElementSetScrollingMethodInfo +data DOMHTMLIFrameElementSetSeamlessMethodInfo +data DOMHTMLIFrameElementSetSrcMethodInfo +data DOMHTMLIFrameElementSetSrcdocMethodInfo +data DOMHTMLIFrameElementSetWidthMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLImageElement.hs b/GI/WebKit/Objects/DOMHTMLImageElement.hs --- a/GI/WebKit/Objects/DOMHTMLImageElement.hs +++ b/GI/WebKit/Objects/DOMHTMLImageElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,142 +18,177 @@ -- * Methods -- ** dOMHTMLImageElementGetAlign + DOMHTMLImageElementGetAlignMethodInfo , dOMHTMLImageElementGetAlign , -- ** dOMHTMLImageElementGetAlt + DOMHTMLImageElementGetAltMethodInfo , dOMHTMLImageElementGetAlt , -- ** dOMHTMLImageElementGetBorder + DOMHTMLImageElementGetBorderMethodInfo , dOMHTMLImageElementGetBorder , -- ** dOMHTMLImageElementGetComplete + DOMHTMLImageElementGetCompleteMethodInfo, dOMHTMLImageElementGetComplete , -- ** dOMHTMLImageElementGetCrossOrigin + DOMHTMLImageElementGetCrossOriginMethodInfo, dOMHTMLImageElementGetCrossOrigin , -- ** dOMHTMLImageElementGetHeight + DOMHTMLImageElementGetHeightMethodInfo , dOMHTMLImageElementGetHeight , -- ** dOMHTMLImageElementGetHspace + DOMHTMLImageElementGetHspaceMethodInfo , dOMHTMLImageElementGetHspace , -- ** dOMHTMLImageElementGetIsMap + DOMHTMLImageElementGetIsMapMethodInfo , dOMHTMLImageElementGetIsMap , -- ** dOMHTMLImageElementGetLongDesc + DOMHTMLImageElementGetLongDescMethodInfo, dOMHTMLImageElementGetLongDesc , -- ** dOMHTMLImageElementGetLowsrc + DOMHTMLImageElementGetLowsrcMethodInfo , dOMHTMLImageElementGetLowsrc , -- ** dOMHTMLImageElementGetName + DOMHTMLImageElementGetNameMethodInfo , dOMHTMLImageElementGetName , -- ** dOMHTMLImageElementGetNaturalHeight + DOMHTMLImageElementGetNaturalHeightMethodInfo, dOMHTMLImageElementGetNaturalHeight , -- ** dOMHTMLImageElementGetNaturalWidth + DOMHTMLImageElementGetNaturalWidthMethodInfo, dOMHTMLImageElementGetNaturalWidth , -- ** dOMHTMLImageElementGetSrc + DOMHTMLImageElementGetSrcMethodInfo , dOMHTMLImageElementGetSrc , -- ** dOMHTMLImageElementGetSrcset + DOMHTMLImageElementGetSrcsetMethodInfo , dOMHTMLImageElementGetSrcset , -- ** dOMHTMLImageElementGetUseMap + DOMHTMLImageElementGetUseMapMethodInfo , dOMHTMLImageElementGetUseMap , -- ** dOMHTMLImageElementGetVspace + DOMHTMLImageElementGetVspaceMethodInfo , dOMHTMLImageElementGetVspace , -- ** dOMHTMLImageElementGetWidth + DOMHTMLImageElementGetWidthMethodInfo , dOMHTMLImageElementGetWidth , -- ** dOMHTMLImageElementGetX + DOMHTMLImageElementGetXMethodInfo , dOMHTMLImageElementGetX , -- ** dOMHTMLImageElementGetY + DOMHTMLImageElementGetYMethodInfo , dOMHTMLImageElementGetY , -- ** dOMHTMLImageElementSetAlign + DOMHTMLImageElementSetAlignMethodInfo , dOMHTMLImageElementSetAlign , -- ** dOMHTMLImageElementSetAlt + DOMHTMLImageElementSetAltMethodInfo , dOMHTMLImageElementSetAlt , -- ** dOMHTMLImageElementSetBorder + DOMHTMLImageElementSetBorderMethodInfo , dOMHTMLImageElementSetBorder , -- ** dOMHTMLImageElementSetCrossOrigin + DOMHTMLImageElementSetCrossOriginMethodInfo, dOMHTMLImageElementSetCrossOrigin , -- ** dOMHTMLImageElementSetHeight + DOMHTMLImageElementSetHeightMethodInfo , dOMHTMLImageElementSetHeight , -- ** dOMHTMLImageElementSetHspace + DOMHTMLImageElementSetHspaceMethodInfo , dOMHTMLImageElementSetHspace , -- ** dOMHTMLImageElementSetIsMap + DOMHTMLImageElementSetIsMapMethodInfo , dOMHTMLImageElementSetIsMap , -- ** dOMHTMLImageElementSetLongDesc + DOMHTMLImageElementSetLongDescMethodInfo, dOMHTMLImageElementSetLongDesc , -- ** dOMHTMLImageElementSetLowsrc + DOMHTMLImageElementSetLowsrcMethodInfo , dOMHTMLImageElementSetLowsrc , -- ** dOMHTMLImageElementSetName + DOMHTMLImageElementSetNameMethodInfo , dOMHTMLImageElementSetName , -- ** dOMHTMLImageElementSetSrc + DOMHTMLImageElementSetSrcMethodInfo , dOMHTMLImageElementSetSrc , -- ** dOMHTMLImageElementSetSrcset + DOMHTMLImageElementSetSrcsetMethodInfo , dOMHTMLImageElementSetSrcset , -- ** dOMHTMLImageElementSetUseMap + DOMHTMLImageElementSetUseMapMethodInfo , dOMHTMLImageElementSetUseMap , -- ** dOMHTMLImageElementSetVspace + DOMHTMLImageElementSetVspaceMethodInfo , dOMHTMLImageElementSetVspace , -- ** dOMHTMLImageElementSetWidth + DOMHTMLImageElementSetWidthMethodInfo , dOMHTMLImageElementSetWidth , @@ -325,6 +361,206 @@ noDOMHTMLImageElement :: Maybe DOMHTMLImageElement noDOMHTMLImageElement = Nothing +type family ResolveDOMHTMLImageElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLImageElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLImageElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLImageElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLImageElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLImageElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLImageElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLImageElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLImageElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLImageElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLImageElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLImageElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLImageElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLImageElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLImageElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLImageElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLImageElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLImageElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLImageElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLImageElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLImageElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLImageElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLImageElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLImageElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLImageElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLImageElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLImageElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLImageElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLImageElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLImageElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLImageElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLImageElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLImageElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLImageElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLImageElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLImageElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLImageElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLImageElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLImageElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLImageElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLImageElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLImageElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLImageElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLImageElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLImageElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLImageElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLImageElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLImageElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLImageElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLImageElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLImageElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLImageElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLImageElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLImageElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLImageElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLImageElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLImageElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLImageElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLImageElementMethod "getAlign" o = DOMHTMLImageElementGetAlignMethodInfo + ResolveDOMHTMLImageElementMethod "getAlt" o = DOMHTMLImageElementGetAltMethodInfo + ResolveDOMHTMLImageElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLImageElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLImageElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLImageElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLImageElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLImageElementMethod "getBorder" o = DOMHTMLImageElementGetBorderMethodInfo + ResolveDOMHTMLImageElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLImageElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLImageElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLImageElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLImageElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLImageElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLImageElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLImageElementMethod "getComplete" o = DOMHTMLImageElementGetCompleteMethodInfo + ResolveDOMHTMLImageElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLImageElementMethod "getCrossOrigin" o = DOMHTMLImageElementGetCrossOriginMethodInfo + ResolveDOMHTMLImageElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLImageElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLImageElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLImageElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLImageElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLImageElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLImageElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLImageElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLImageElementMethod "getHeight" o = DOMHTMLImageElementGetHeightMethodInfo + ResolveDOMHTMLImageElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLImageElementMethod "getHspace" o = DOMHTMLImageElementGetHspaceMethodInfo + ResolveDOMHTMLImageElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLImageElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLImageElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLImageElementMethod "getIsMap" o = DOMHTMLImageElementGetIsMapMethodInfo + ResolveDOMHTMLImageElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLImageElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLImageElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLImageElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLImageElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLImageElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLImageElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLImageElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLImageElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLImageElementMethod "getLongDesc" o = DOMHTMLImageElementGetLongDescMethodInfo + ResolveDOMHTMLImageElementMethod "getLowsrc" o = DOMHTMLImageElementGetLowsrcMethodInfo + ResolveDOMHTMLImageElementMethod "getName" o = DOMHTMLImageElementGetNameMethodInfo + ResolveDOMHTMLImageElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLImageElementMethod "getNaturalHeight" o = DOMHTMLImageElementGetNaturalHeightMethodInfo + ResolveDOMHTMLImageElementMethod "getNaturalWidth" o = DOMHTMLImageElementGetNaturalWidthMethodInfo + ResolveDOMHTMLImageElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLImageElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLImageElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLImageElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLImageElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLImageElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLImageElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLImageElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLImageElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLImageElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLImageElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLImageElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLImageElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLImageElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLImageElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLImageElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLImageElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLImageElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLImageElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLImageElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLImageElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLImageElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLImageElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLImageElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLImageElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLImageElementMethod "getSrc" o = DOMHTMLImageElementGetSrcMethodInfo + ResolveDOMHTMLImageElementMethod "getSrcset" o = DOMHTMLImageElementGetSrcsetMethodInfo + ResolveDOMHTMLImageElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLImageElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLImageElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLImageElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLImageElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLImageElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLImageElementMethod "getUseMap" o = DOMHTMLImageElementGetUseMapMethodInfo + ResolveDOMHTMLImageElementMethod "getVspace" o = DOMHTMLImageElementGetVspaceMethodInfo + ResolveDOMHTMLImageElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLImageElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLImageElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLImageElementMethod "getWidth" o = DOMHTMLImageElementGetWidthMethodInfo + ResolveDOMHTMLImageElementMethod "getX" o = DOMHTMLImageElementGetXMethodInfo + ResolveDOMHTMLImageElementMethod "getY" o = DOMHTMLImageElementGetYMethodInfo + ResolveDOMHTMLImageElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLImageElementMethod "setAlign" o = DOMHTMLImageElementSetAlignMethodInfo + ResolveDOMHTMLImageElementMethod "setAlt" o = DOMHTMLImageElementSetAltMethodInfo + ResolveDOMHTMLImageElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLImageElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLImageElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLImageElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLImageElementMethod "setBorder" o = DOMHTMLImageElementSetBorderMethodInfo + ResolveDOMHTMLImageElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLImageElementMethod "setCrossOrigin" o = DOMHTMLImageElementSetCrossOriginMethodInfo + ResolveDOMHTMLImageElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLImageElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLImageElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLImageElementMethod "setHeight" o = DOMHTMLImageElementSetHeightMethodInfo + ResolveDOMHTMLImageElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLImageElementMethod "setHspace" o = DOMHTMLImageElementSetHspaceMethodInfo + ResolveDOMHTMLImageElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLImageElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLImageElementMethod "setIsMap" o = DOMHTMLImageElementSetIsMapMethodInfo + ResolveDOMHTMLImageElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLImageElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLImageElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLImageElementMethod "setLongDesc" o = DOMHTMLImageElementSetLongDescMethodInfo + ResolveDOMHTMLImageElementMethod "setLowsrc" o = DOMHTMLImageElementSetLowsrcMethodInfo + ResolveDOMHTMLImageElementMethod "setName" o = DOMHTMLImageElementSetNameMethodInfo + ResolveDOMHTMLImageElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLImageElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLImageElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLImageElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLImageElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLImageElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLImageElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLImageElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLImageElementMethod "setSrc" o = DOMHTMLImageElementSetSrcMethodInfo + ResolveDOMHTMLImageElementMethod "setSrcset" o = DOMHTMLImageElementSetSrcsetMethodInfo + ResolveDOMHTMLImageElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLImageElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLImageElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLImageElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLImageElementMethod "setUseMap" o = DOMHTMLImageElementSetUseMapMethodInfo + ResolveDOMHTMLImageElementMethod "setVspace" o = DOMHTMLImageElementSetVspaceMethodInfo + ResolveDOMHTMLImageElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLImageElementMethod "setWidth" o = DOMHTMLImageElementSetWidthMethodInfo + ResolveDOMHTMLImageElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLImageElementMethod t DOMHTMLImageElement, MethodInfo info DOMHTMLImageElement p) => IsLabelProxy t (DOMHTMLImageElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLImageElementMethod t DOMHTMLImageElement, MethodInfo info DOMHTMLImageElement p) => IsLabel t (DOMHTMLImageElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -344,7 +580,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLImageElementAlignPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLImageElementAlignPropertyInfo = "DOMHTMLImageElement::align" + type AttrLabel DOMHTMLImageElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLImageElementAlign attrSet _ = setDOMHTMLImageElementAlign attrConstruct _ = constructDOMHTMLImageElementAlign @@ -368,7 +604,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementAltPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLImageElementAltPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementAltPropertyInfo = T.Text - type AttrLabel DOMHTMLImageElementAltPropertyInfo = "DOMHTMLImageElement::alt" + type AttrLabel DOMHTMLImageElementAltPropertyInfo = "alt" attrGet _ = getDOMHTMLImageElementAlt attrSet _ = setDOMHTMLImageElementAlt attrConstruct _ = constructDOMHTMLImageElementAlt @@ -392,7 +628,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementBorderPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLImageElementBorderPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementBorderPropertyInfo = T.Text - type AttrLabel DOMHTMLImageElementBorderPropertyInfo = "DOMHTMLImageElement::border" + type AttrLabel DOMHTMLImageElementBorderPropertyInfo = "border" attrGet _ = getDOMHTMLImageElementBorder attrSet _ = setDOMHTMLImageElementBorder attrConstruct _ = constructDOMHTMLImageElementBorder @@ -410,7 +646,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementCompletePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLImageElementCompletePropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementCompletePropertyInfo = Bool - type AttrLabel DOMHTMLImageElementCompletePropertyInfo = "DOMHTMLImageElement::complete" + type AttrLabel DOMHTMLImageElementCompletePropertyInfo = "complete" attrGet _ = getDOMHTMLImageElementComplete attrSet _ = undefined attrConstruct _ = undefined @@ -434,7 +670,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementCrossOriginPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLImageElementCrossOriginPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementCrossOriginPropertyInfo = T.Text - type AttrLabel DOMHTMLImageElementCrossOriginPropertyInfo = "DOMHTMLImageElement::cross-origin" + type AttrLabel DOMHTMLImageElementCrossOriginPropertyInfo = "cross-origin" attrGet _ = getDOMHTMLImageElementCrossOrigin attrSet _ = setDOMHTMLImageElementCrossOrigin attrConstruct _ = constructDOMHTMLImageElementCrossOrigin @@ -458,7 +694,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementHeightPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLImageElementHeightPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementHeightPropertyInfo = Int64 - type AttrLabel DOMHTMLImageElementHeightPropertyInfo = "DOMHTMLImageElement::height" + type AttrLabel DOMHTMLImageElementHeightPropertyInfo = "height" attrGet _ = getDOMHTMLImageElementHeight attrSet _ = setDOMHTMLImageElementHeight attrConstruct _ = constructDOMHTMLImageElementHeight @@ -482,7 +718,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementHspacePropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLImageElementHspacePropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementHspacePropertyInfo = Int64 - type AttrLabel DOMHTMLImageElementHspacePropertyInfo = "DOMHTMLImageElement::hspace" + type AttrLabel DOMHTMLImageElementHspacePropertyInfo = "hspace" attrGet _ = getDOMHTMLImageElementHspace attrSet _ = setDOMHTMLImageElementHspace attrConstruct _ = constructDOMHTMLImageElementHspace @@ -506,7 +742,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementIsMapPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLImageElementIsMapPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementIsMapPropertyInfo = Bool - type AttrLabel DOMHTMLImageElementIsMapPropertyInfo = "DOMHTMLImageElement::is-map" + type AttrLabel DOMHTMLImageElementIsMapPropertyInfo = "is-map" attrGet _ = getDOMHTMLImageElementIsMap attrSet _ = setDOMHTMLImageElementIsMap attrConstruct _ = constructDOMHTMLImageElementIsMap @@ -530,7 +766,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementLongDescPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLImageElementLongDescPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementLongDescPropertyInfo = T.Text - type AttrLabel DOMHTMLImageElementLongDescPropertyInfo = "DOMHTMLImageElement::long-desc" + type AttrLabel DOMHTMLImageElementLongDescPropertyInfo = "long-desc" attrGet _ = getDOMHTMLImageElementLongDesc attrSet _ = setDOMHTMLImageElementLongDesc attrConstruct _ = constructDOMHTMLImageElementLongDesc @@ -554,7 +790,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementLowsrcPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLImageElementLowsrcPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementLowsrcPropertyInfo = T.Text - type AttrLabel DOMHTMLImageElementLowsrcPropertyInfo = "DOMHTMLImageElement::lowsrc" + type AttrLabel DOMHTMLImageElementLowsrcPropertyInfo = "lowsrc" attrGet _ = getDOMHTMLImageElementLowsrc attrSet _ = setDOMHTMLImageElementLowsrc attrConstruct _ = constructDOMHTMLImageElementLowsrc @@ -578,7 +814,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLImageElementNamePropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLImageElementNamePropertyInfo = "DOMHTMLImageElement::name" + type AttrLabel DOMHTMLImageElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLImageElementName attrSet _ = setDOMHTMLImageElementName attrConstruct _ = constructDOMHTMLImageElementName @@ -596,7 +832,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementNaturalHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLImageElementNaturalHeightPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementNaturalHeightPropertyInfo = Int64 - type AttrLabel DOMHTMLImageElementNaturalHeightPropertyInfo = "DOMHTMLImageElement::natural-height" + type AttrLabel DOMHTMLImageElementNaturalHeightPropertyInfo = "natural-height" attrGet _ = getDOMHTMLImageElementNaturalHeight attrSet _ = undefined attrConstruct _ = undefined @@ -614,7 +850,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementNaturalWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLImageElementNaturalWidthPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementNaturalWidthPropertyInfo = Int64 - type AttrLabel DOMHTMLImageElementNaturalWidthPropertyInfo = "DOMHTMLImageElement::natural-width" + type AttrLabel DOMHTMLImageElementNaturalWidthPropertyInfo = "natural-width" attrGet _ = getDOMHTMLImageElementNaturalWidth attrSet _ = undefined attrConstruct _ = undefined @@ -638,7 +874,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementSrcPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLImageElementSrcPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementSrcPropertyInfo = T.Text - type AttrLabel DOMHTMLImageElementSrcPropertyInfo = "DOMHTMLImageElement::src" + type AttrLabel DOMHTMLImageElementSrcPropertyInfo = "src" attrGet _ = getDOMHTMLImageElementSrc attrSet _ = setDOMHTMLImageElementSrc attrConstruct _ = constructDOMHTMLImageElementSrc @@ -662,7 +898,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementSrcsetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLImageElementSrcsetPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementSrcsetPropertyInfo = T.Text - type AttrLabel DOMHTMLImageElementSrcsetPropertyInfo = "DOMHTMLImageElement::srcset" + type AttrLabel DOMHTMLImageElementSrcsetPropertyInfo = "srcset" attrGet _ = getDOMHTMLImageElementSrcset attrSet _ = setDOMHTMLImageElementSrcset attrConstruct _ = constructDOMHTMLImageElementSrcset @@ -686,7 +922,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementUseMapPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLImageElementUseMapPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementUseMapPropertyInfo = T.Text - type AttrLabel DOMHTMLImageElementUseMapPropertyInfo = "DOMHTMLImageElement::use-map" + type AttrLabel DOMHTMLImageElementUseMapPropertyInfo = "use-map" attrGet _ = getDOMHTMLImageElementUseMap attrSet _ = setDOMHTMLImageElementUseMap attrConstruct _ = constructDOMHTMLImageElementUseMap @@ -710,7 +946,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementVspacePropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLImageElementVspacePropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementVspacePropertyInfo = Int64 - type AttrLabel DOMHTMLImageElementVspacePropertyInfo = "DOMHTMLImageElement::vspace" + type AttrLabel DOMHTMLImageElementVspacePropertyInfo = "vspace" attrGet _ = getDOMHTMLImageElementVspace attrSet _ = setDOMHTMLImageElementVspace attrConstruct _ = constructDOMHTMLImageElementVspace @@ -734,7 +970,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementWidthPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLImageElementWidthPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementWidthPropertyInfo = Int64 - type AttrLabel DOMHTMLImageElementWidthPropertyInfo = "DOMHTMLImageElement::width" + type AttrLabel DOMHTMLImageElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLImageElementWidth attrSet _ = setDOMHTMLImageElementWidth attrConstruct _ = constructDOMHTMLImageElementWidth @@ -752,7 +988,7 @@ type AttrSetTypeConstraint DOMHTMLImageElementXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLImageElementXPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementXPropertyInfo = Int64 - type AttrLabel DOMHTMLImageElementXPropertyInfo = "DOMHTMLImageElement::x" + type AttrLabel DOMHTMLImageElementXPropertyInfo = "x" attrGet _ = getDOMHTMLImageElementX attrSet _ = undefined attrConstruct _ = undefined @@ -770,22 +1006,21 @@ type AttrSetTypeConstraint DOMHTMLImageElementYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLImageElementYPropertyInfo = DOMHTMLImageElementK type AttrGetType DOMHTMLImageElementYPropertyInfo = Int64 - type AttrLabel DOMHTMLImageElementYPropertyInfo = "DOMHTMLImageElement::y" + type AttrLabel DOMHTMLImageElementYPropertyInfo = "y" attrGet _ = getDOMHTMLImageElementY attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHTMLImageElement = DOMHTMLImageElementAttributeList -type DOMHTMLImageElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLImageElementAlignPropertyInfo), '("alt", DOMHTMLImageElementAltPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("border", DOMHTMLImageElementBorderPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("complete", DOMHTMLImageElementCompletePropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("cross-origin", DOMHTMLImageElementCrossOriginPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLImageElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLImageElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("is-map", DOMHTMLImageElementIsMapPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("long-desc", DOMHTMLImageElementLongDescPropertyInfo), '("lowsrc", DOMHTMLImageElementLowsrcPropertyInfo), '("name", DOMHTMLImageElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("natural-height", DOMHTMLImageElementNaturalHeightPropertyInfo), '("natural-width", DOMHTMLImageElementNaturalWidthPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLImageElementSrcPropertyInfo), '("srcset", DOMHTMLImageElementSrcsetPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("use-map", DOMHTMLImageElementUseMapPropertyInfo), '("vspace", DOMHTMLImageElementVspacePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLImageElementWidthPropertyInfo), '("x", DOMHTMLImageElementXPropertyInfo), '("y", DOMHTMLImageElementYPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLImageElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLImageElementAlignPropertyInfo), '("alt", DOMHTMLImageElementAltPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("border", DOMHTMLImageElementBorderPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("complete", DOMHTMLImageElementCompletePropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("crossOrigin", DOMHTMLImageElementCrossOriginPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLImageElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLImageElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("isMap", DOMHTMLImageElementIsMapPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("longDesc", DOMHTMLImageElementLongDescPropertyInfo), '("lowsrc", DOMHTMLImageElementLowsrcPropertyInfo), '("name", DOMHTMLImageElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("naturalHeight", DOMHTMLImageElementNaturalHeightPropertyInfo), '("naturalWidth", DOMHTMLImageElementNaturalWidthPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLImageElementSrcPropertyInfo), '("srcset", DOMHTMLImageElementSrcsetPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("useMap", DOMHTMLImageElementUseMapPropertyInfo), '("vspace", DOMHTMLImageElementVspacePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLImageElementWidthPropertyInfo), '("x", DOMHTMLImageElementXPropertyInfo), '("y", DOMHTMLImageElementYPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLImageElement = DOMHTMLImageElementSignalList -type DOMHTMLImageElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLImageElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLImageElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -797,8 +1032,8 @@ dOMHTMLImageElementGetAlign :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLImageElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_align _obj' @@ -808,11 +1043,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetAlign + -- method DOMHTMLImageElement::get_alt -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -824,8 +1062,8 @@ dOMHTMLImageElementGetAlt :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLImageElementGetAlt _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_alt _obj' @@ -835,11 +1073,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetAltMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetAltMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetAlt + -- method DOMHTMLImageElement::get_border -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -851,8 +1092,8 @@ dOMHTMLImageElementGetBorder :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLImageElementGetBorder _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_border _obj' @@ -862,11 +1103,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetBorderMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetBorderMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetBorder + -- method DOMHTMLImageElement::get_complete -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -878,8 +1122,8 @@ dOMHTMLImageElementGetComplete :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLImageElementGetComplete _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_complete _obj' @@ -887,11 +1131,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetCompleteMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetCompleteMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetComplete + -- method DOMHTMLImageElement::get_cross_origin -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -903,8 +1150,8 @@ dOMHTMLImageElementGetCrossOrigin :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLImageElementGetCrossOrigin _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_cross_origin _obj' @@ -914,11 +1161,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetCrossOriginMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetCrossOriginMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetCrossOrigin + -- method DOMHTMLImageElement::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -930,19 +1180,22 @@ dOMHTMLImageElementGetHeight :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLImageElementGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_height _obj' touchManagedPtr _obj return result +data DOMHTMLImageElementGetHeightMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetHeight + -- method DOMHTMLImageElement::get_hspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -954,19 +1207,22 @@ dOMHTMLImageElementGetHspace :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLImageElementGetHspace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_hspace _obj' touchManagedPtr _obj return result +data DOMHTMLImageElementGetHspaceMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetHspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetHspace + -- method DOMHTMLImageElement::get_is_map -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -978,8 +1234,8 @@ dOMHTMLImageElementGetIsMap :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLImageElementGetIsMap _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_is_map _obj' @@ -987,11 +1243,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetIsMapMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetIsMapMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetIsMap + -- method DOMHTMLImageElement::get_long_desc -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1003,8 +1262,8 @@ dOMHTMLImageElementGetLongDesc :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLImageElementGetLongDesc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_long_desc _obj' @@ -1014,11 +1273,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetLongDescMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetLongDescMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetLongDesc + -- method DOMHTMLImageElement::get_lowsrc -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1030,8 +1292,8 @@ dOMHTMLImageElementGetLowsrc :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLImageElementGetLowsrc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_lowsrc _obj' @@ -1041,11 +1303,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetLowsrcMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetLowsrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetLowsrc + -- method DOMHTMLImageElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1057,8 +1322,8 @@ dOMHTMLImageElementGetName :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLImageElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_name _obj' @@ -1068,11 +1333,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetName + -- method DOMHTMLImageElement::get_natural_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1084,19 +1352,22 @@ dOMHTMLImageElementGetNaturalHeight :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLImageElementGetNaturalHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_natural_height _obj' touchManagedPtr _obj return result +data DOMHTMLImageElementGetNaturalHeightMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetNaturalHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetNaturalHeight + -- method DOMHTMLImageElement::get_natural_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1108,19 +1379,22 @@ dOMHTMLImageElementGetNaturalWidth :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLImageElementGetNaturalWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_natural_width _obj' touchManagedPtr _obj return result +data DOMHTMLImageElementGetNaturalWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetNaturalWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetNaturalWidth + -- method DOMHTMLImageElement::get_src -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1132,8 +1406,8 @@ dOMHTMLImageElementGetSrc :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLImageElementGetSrc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_src _obj' @@ -1143,11 +1417,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetSrcMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetSrc + -- method DOMHTMLImageElement::get_srcset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1159,8 +1436,8 @@ dOMHTMLImageElementGetSrcset :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLImageElementGetSrcset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_srcset _obj' @@ -1170,11 +1447,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetSrcsetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetSrcsetMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetSrcset + -- method DOMHTMLImageElement::get_use_map -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1186,8 +1466,8 @@ dOMHTMLImageElementGetUseMap :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLImageElementGetUseMap _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_use_map _obj' @@ -1197,11 +1477,14 @@ touchManagedPtr _obj return result' +data DOMHTMLImageElementGetUseMapMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetUseMapMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetUseMap + -- method DOMHTMLImageElement::get_vspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1213,19 +1496,22 @@ dOMHTMLImageElementGetVspace :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLImageElementGetVspace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_vspace _obj' touchManagedPtr _obj return result +data DOMHTMLImageElementGetVspaceMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetVspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetVspace + -- method DOMHTMLImageElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1237,19 +1523,22 @@ dOMHTMLImageElementGetWidth :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLImageElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_width _obj' touchManagedPtr _obj return result +data DOMHTMLImageElementGetWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetWidth + -- method DOMHTMLImageElement::get_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1261,19 +1550,22 @@ dOMHTMLImageElementGetX :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLImageElementGetX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_x _obj' touchManagedPtr _obj return result +data DOMHTMLImageElementGetXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetXMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetX + -- method DOMHTMLImageElement::get_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1285,19 +1577,22 @@ dOMHTMLImageElementGetY :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLImageElementGetY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_image_element_get_y _obj' touchManagedPtr _obj return result +data DOMHTMLImageElementGetYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementGetYMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementGetY + -- method DOMHTMLImageElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1310,9 +1605,9 @@ dOMHTMLImageElementSetAlign :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLImageElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1321,11 +1616,14 @@ freeMem value' return () +data DOMHTMLImageElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetAlign + -- method DOMHTMLImageElement::set_alt -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1338,9 +1636,9 @@ dOMHTMLImageElementSetAlt :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLImageElementSetAlt _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1349,11 +1647,14 @@ freeMem value' return () +data DOMHTMLImageElementSetAltMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetAltMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetAlt + -- method DOMHTMLImageElement::set_border -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1366,9 +1667,9 @@ dOMHTMLImageElementSetBorder :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLImageElementSetBorder _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1377,11 +1678,14 @@ freeMem value' return () +data DOMHTMLImageElementSetBorderMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetBorderMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetBorder + -- method DOMHTMLImageElement::set_cross_origin -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1394,9 +1698,9 @@ dOMHTMLImageElementSetCrossOrigin :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLImageElementSetCrossOrigin _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1405,11 +1709,14 @@ freeMem value' return () +data DOMHTMLImageElementSetCrossOriginMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetCrossOriginMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetCrossOrigin + -- method DOMHTMLImageElement::set_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1422,20 +1729,23 @@ dOMHTMLImageElementSetHeight :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLImageElementSetHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_image_element_set_height _obj' value touchManagedPtr _obj return () +data DOMHTMLImageElementSetHeightMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetHeight + -- method DOMHTMLImageElement::set_hspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1448,20 +1758,23 @@ dOMHTMLImageElementSetHspace :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLImageElementSetHspace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_image_element_set_hspace _obj' value touchManagedPtr _obj return () +data DOMHTMLImageElementSetHspaceMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetHspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetHspace + -- method DOMHTMLImageElement::set_is_map -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1474,9 +1787,9 @@ dOMHTMLImageElementSetIsMap :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLImageElementSetIsMap _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1484,11 +1797,14 @@ touchManagedPtr _obj return () +data DOMHTMLImageElementSetIsMapMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetIsMapMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetIsMap + -- method DOMHTMLImageElement::set_long_desc -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1501,9 +1817,9 @@ dOMHTMLImageElementSetLongDesc :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLImageElementSetLongDesc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1512,11 +1828,14 @@ freeMem value' return () +data DOMHTMLImageElementSetLongDescMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetLongDescMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetLongDesc + -- method DOMHTMLImageElement::set_lowsrc -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1529,9 +1848,9 @@ dOMHTMLImageElementSetLowsrc :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLImageElementSetLowsrc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1540,11 +1859,14 @@ freeMem value' return () +data DOMHTMLImageElementSetLowsrcMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetLowsrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetLowsrc + -- method DOMHTMLImageElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1557,9 +1879,9 @@ dOMHTMLImageElementSetName :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLImageElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1568,11 +1890,14 @@ freeMem value' return () +data DOMHTMLImageElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetName + -- method DOMHTMLImageElement::set_src -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1585,9 +1910,9 @@ dOMHTMLImageElementSetSrc :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLImageElementSetSrc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1596,11 +1921,14 @@ freeMem value' return () +data DOMHTMLImageElementSetSrcMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetSrc + -- method DOMHTMLImageElement::set_srcset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1613,9 +1941,9 @@ dOMHTMLImageElementSetSrcset :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLImageElementSetSrcset _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1624,11 +1952,14 @@ freeMem value' return () +data DOMHTMLImageElementSetSrcsetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetSrcsetMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetSrcset + -- method DOMHTMLImageElement::set_use_map -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1641,9 +1972,9 @@ dOMHTMLImageElementSetUseMap :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLImageElementSetUseMap _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1652,11 +1983,14 @@ freeMem value' return () +data DOMHTMLImageElementSetUseMapMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetUseMapMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetUseMap + -- method DOMHTMLImageElement::set_vspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1669,20 +2003,23 @@ dOMHTMLImageElementSetVspace :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLImageElementSetVspace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_image_element_set_vspace _obj' value touchManagedPtr _obj return () +data DOMHTMLImageElementSetVspaceMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetVspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetVspace + -- method DOMHTMLImageElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLImageElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1695,13 +2032,17 @@ dOMHTMLImageElementSetWidth :: (MonadIO m, DOMHTMLImageElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLImageElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_image_element_set_width _obj' value touchManagedPtr _obj return () + +data DOMHTMLImageElementSetWidthMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLImageElementK a) => MethodInfo DOMHTMLImageElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLImageElementSetWidth diff --git a/GI/WebKit/Objects/DOMHTMLImageElement.hs-boot b/GI/WebKit/Objects/DOMHTMLImageElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLImageElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLImageElement.hs-boot @@ -31,3 +31,38 @@ data DOMHTMLImageElementWidthPropertyInfo data DOMHTMLImageElementXPropertyInfo data DOMHTMLImageElementYPropertyInfo +data DOMHTMLImageElementGetAlignMethodInfo +data DOMHTMLImageElementGetAltMethodInfo +data DOMHTMLImageElementGetBorderMethodInfo +data DOMHTMLImageElementGetCompleteMethodInfo +data DOMHTMLImageElementGetCrossOriginMethodInfo +data DOMHTMLImageElementGetHeightMethodInfo +data DOMHTMLImageElementGetHspaceMethodInfo +data DOMHTMLImageElementGetIsMapMethodInfo +data DOMHTMLImageElementGetLongDescMethodInfo +data DOMHTMLImageElementGetLowsrcMethodInfo +data DOMHTMLImageElementGetNameMethodInfo +data DOMHTMLImageElementGetNaturalHeightMethodInfo +data DOMHTMLImageElementGetNaturalWidthMethodInfo +data DOMHTMLImageElementGetSrcMethodInfo +data DOMHTMLImageElementGetSrcsetMethodInfo +data DOMHTMLImageElementGetUseMapMethodInfo +data DOMHTMLImageElementGetVspaceMethodInfo +data DOMHTMLImageElementGetWidthMethodInfo +data DOMHTMLImageElementGetXMethodInfo +data DOMHTMLImageElementGetYMethodInfo +data DOMHTMLImageElementSetAlignMethodInfo +data DOMHTMLImageElementSetAltMethodInfo +data DOMHTMLImageElementSetBorderMethodInfo +data DOMHTMLImageElementSetCrossOriginMethodInfo +data DOMHTMLImageElementSetHeightMethodInfo +data DOMHTMLImageElementSetHspaceMethodInfo +data DOMHTMLImageElementSetIsMapMethodInfo +data DOMHTMLImageElementSetLongDescMethodInfo +data DOMHTMLImageElementSetLowsrcMethodInfo +data DOMHTMLImageElementSetNameMethodInfo +data DOMHTMLImageElementSetSrcMethodInfo +data DOMHTMLImageElementSetSrcsetMethodInfo +data DOMHTMLImageElementSetUseMapMethodInfo +data DOMHTMLImageElementSetVspaceMethodInfo +data DOMHTMLImageElementSetWidthMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLInputElement.hs b/GI/WebKit/Objects/DOMHTMLInputElement.hs --- a/GI/WebKit/Objects/DOMHTMLInputElement.hs +++ b/GI/WebKit/Objects/DOMHTMLInputElement.hs @@ -1,4474 +1,5120 @@ -{- | -Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte -License : LGPL-2.1 -Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) --} - -module GI.WebKit.Objects.DOMHTMLInputElement - ( - --- * Exported types - DOMHTMLInputElement(..) , - DOMHTMLInputElementK , - toDOMHTMLInputElement , - noDOMHTMLInputElement , - - - -- * Methods --- ** dOMHTMLInputElementCheckValidity - dOMHTMLInputElementCheckValidity , - - --- ** dOMHTMLInputElementGetAccept - dOMHTMLInputElementGetAccept , - - --- ** dOMHTMLInputElementGetAlign - dOMHTMLInputElementGetAlign , - - --- ** dOMHTMLInputElementGetAlt - dOMHTMLInputElementGetAlt , - - --- ** dOMHTMLInputElementGetAutocapitalize - dOMHTMLInputElementGetAutocapitalize , - - --- ** dOMHTMLInputElementGetAutocomplete - dOMHTMLInputElementGetAutocomplete , - - --- ** dOMHTMLInputElementGetAutocorrect - dOMHTMLInputElementGetAutocorrect , - - --- ** dOMHTMLInputElementGetAutofocus - dOMHTMLInputElementGetAutofocus , - - --- ** dOMHTMLInputElementGetCapture - dOMHTMLInputElementGetCapture , - - --- ** dOMHTMLInputElementGetChecked - dOMHTMLInputElementGetChecked , - - --- ** dOMHTMLInputElementGetDefaultChecked - dOMHTMLInputElementGetDefaultChecked , - - --- ** dOMHTMLInputElementGetDefaultValue - dOMHTMLInputElementGetDefaultValue , - - --- ** dOMHTMLInputElementGetDirName - dOMHTMLInputElementGetDirName , - - --- ** dOMHTMLInputElementGetDisabled - dOMHTMLInputElementGetDisabled , - - --- ** dOMHTMLInputElementGetFiles - dOMHTMLInputElementGetFiles , - - --- ** dOMHTMLInputElementGetForm - dOMHTMLInputElementGetForm , - - --- ** dOMHTMLInputElementGetFormAction - dOMHTMLInputElementGetFormAction , - - --- ** dOMHTMLInputElementGetFormEnctype - dOMHTMLInputElementGetFormEnctype , - - --- ** dOMHTMLInputElementGetFormMethod - dOMHTMLInputElementGetFormMethod , - - --- ** dOMHTMLInputElementGetFormNoValidate - dOMHTMLInputElementGetFormNoValidate , - - --- ** dOMHTMLInputElementGetFormTarget - dOMHTMLInputElementGetFormTarget , - - --- ** dOMHTMLInputElementGetHeight - dOMHTMLInputElementGetHeight , - - --- ** dOMHTMLInputElementGetIncremental - dOMHTMLInputElementGetIncremental , - - --- ** dOMHTMLInputElementGetIndeterminate - dOMHTMLInputElementGetIndeterminate , - - --- ** dOMHTMLInputElementGetLabels - dOMHTMLInputElementGetLabels , - - --- ** dOMHTMLInputElementGetList - dOMHTMLInputElementGetList , - - --- ** dOMHTMLInputElementGetMax - dOMHTMLInputElementGetMax , - - --- ** dOMHTMLInputElementGetMaxLength - dOMHTMLInputElementGetMaxLength , - - --- ** dOMHTMLInputElementGetMin - dOMHTMLInputElementGetMin , - - --- ** dOMHTMLInputElementGetMultiple - dOMHTMLInputElementGetMultiple , - - --- ** dOMHTMLInputElementGetName - dOMHTMLInputElementGetName , - - --- ** dOMHTMLInputElementGetPattern - dOMHTMLInputElementGetPattern , - - --- ** dOMHTMLInputElementGetPlaceholder - dOMHTMLInputElementGetPlaceholder , - - --- ** dOMHTMLInputElementGetReadOnly - dOMHTMLInputElementGetReadOnly , - - --- ** dOMHTMLInputElementGetRequired - dOMHTMLInputElementGetRequired , - - --- ** dOMHTMLInputElementGetSize - dOMHTMLInputElementGetSize , - - --- ** dOMHTMLInputElementGetSrc - dOMHTMLInputElementGetSrc , - - --- ** dOMHTMLInputElementGetStep - dOMHTMLInputElementGetStep , - - --- ** dOMHTMLInputElementGetUseMap - dOMHTMLInputElementGetUseMap , - - --- ** dOMHTMLInputElementGetValidationMessage - dOMHTMLInputElementGetValidationMessage , - - --- ** dOMHTMLInputElementGetValidity - dOMHTMLInputElementGetValidity , - - --- ** dOMHTMLInputElementGetValue - dOMHTMLInputElementGetValue , - - --- ** dOMHTMLInputElementGetValueAsNumber - dOMHTMLInputElementGetValueAsNumber , - - --- ** dOMHTMLInputElementGetWebkitGrammar - dOMHTMLInputElementGetWebkitGrammar , - - --- ** dOMHTMLInputElementGetWebkitSpeech - dOMHTMLInputElementGetWebkitSpeech , - - --- ** dOMHTMLInputElementGetWebkitdirectory - dOMHTMLInputElementGetWebkitdirectory , - - --- ** dOMHTMLInputElementGetWidth - dOMHTMLInputElementGetWidth , - - --- ** dOMHTMLInputElementGetWillValidate - dOMHTMLInputElementGetWillValidate , - - --- ** dOMHTMLInputElementIsEdited - dOMHTMLInputElementIsEdited , - - --- ** dOMHTMLInputElementSelect - dOMHTMLInputElementSelect , - - --- ** dOMHTMLInputElementSetAccept - dOMHTMLInputElementSetAccept , - - --- ** dOMHTMLInputElementSetAlign - dOMHTMLInputElementSetAlign , - - --- ** dOMHTMLInputElementSetAlt - dOMHTMLInputElementSetAlt , - - --- ** dOMHTMLInputElementSetAutocapitalize - dOMHTMLInputElementSetAutocapitalize , - - --- ** dOMHTMLInputElementSetAutocomplete - dOMHTMLInputElementSetAutocomplete , - - --- ** dOMHTMLInputElementSetAutocorrect - dOMHTMLInputElementSetAutocorrect , - - --- ** dOMHTMLInputElementSetAutofocus - dOMHTMLInputElementSetAutofocus , - - --- ** dOMHTMLInputElementSetCapture - dOMHTMLInputElementSetCapture , - - --- ** dOMHTMLInputElementSetChecked - dOMHTMLInputElementSetChecked , - - --- ** dOMHTMLInputElementSetCustomValidity - dOMHTMLInputElementSetCustomValidity , - - --- ** dOMHTMLInputElementSetDefaultChecked - dOMHTMLInputElementSetDefaultChecked , - - --- ** dOMHTMLInputElementSetDefaultValue - dOMHTMLInputElementSetDefaultValue , - - --- ** dOMHTMLInputElementSetDirName - dOMHTMLInputElementSetDirName , - - --- ** dOMHTMLInputElementSetDisabled - dOMHTMLInputElementSetDisabled , - - --- ** dOMHTMLInputElementSetFiles - dOMHTMLInputElementSetFiles , - - --- ** dOMHTMLInputElementSetFormAction - dOMHTMLInputElementSetFormAction , - - --- ** dOMHTMLInputElementSetFormEnctype - dOMHTMLInputElementSetFormEnctype , - - --- ** dOMHTMLInputElementSetFormMethod - dOMHTMLInputElementSetFormMethod , - - --- ** dOMHTMLInputElementSetFormNoValidate - dOMHTMLInputElementSetFormNoValidate , - - --- ** dOMHTMLInputElementSetFormTarget - dOMHTMLInputElementSetFormTarget , - - --- ** dOMHTMLInputElementSetHeight - dOMHTMLInputElementSetHeight , - - --- ** dOMHTMLInputElementSetIncremental - dOMHTMLInputElementSetIncremental , - - --- ** dOMHTMLInputElementSetIndeterminate - dOMHTMLInputElementSetIndeterminate , - - --- ** dOMHTMLInputElementSetMax - dOMHTMLInputElementSetMax , - - --- ** dOMHTMLInputElementSetMaxLength - dOMHTMLInputElementSetMaxLength , - - --- ** dOMHTMLInputElementSetMin - dOMHTMLInputElementSetMin , - - --- ** dOMHTMLInputElementSetMultiple - dOMHTMLInputElementSetMultiple , - - --- ** dOMHTMLInputElementSetName - dOMHTMLInputElementSetName , - - --- ** dOMHTMLInputElementSetPattern - dOMHTMLInputElementSetPattern , - - --- ** dOMHTMLInputElementSetPlaceholder - dOMHTMLInputElementSetPlaceholder , - - --- ** dOMHTMLInputElementSetRangeText - dOMHTMLInputElementSetRangeText , - - --- ** dOMHTMLInputElementSetReadOnly - dOMHTMLInputElementSetReadOnly , - - --- ** dOMHTMLInputElementSetRequired - dOMHTMLInputElementSetRequired , - - --- ** dOMHTMLInputElementSetSize - dOMHTMLInputElementSetSize , - - --- ** dOMHTMLInputElementSetSrc - dOMHTMLInputElementSetSrc , - - --- ** dOMHTMLInputElementSetStep - dOMHTMLInputElementSetStep , - - --- ** dOMHTMLInputElementSetUseMap - dOMHTMLInputElementSetUseMap , - - --- ** dOMHTMLInputElementSetValue - dOMHTMLInputElementSetValue , - - --- ** dOMHTMLInputElementSetValueAsNumber - dOMHTMLInputElementSetValueAsNumber , - - --- ** dOMHTMLInputElementSetValueForUser - dOMHTMLInputElementSetValueForUser , - - --- ** dOMHTMLInputElementSetWebkitGrammar - dOMHTMLInputElementSetWebkitGrammar , - - --- ** dOMHTMLInputElementSetWebkitSpeech - dOMHTMLInputElementSetWebkitSpeech , - - --- ** dOMHTMLInputElementSetWebkitdirectory - dOMHTMLInputElementSetWebkitdirectory , - - --- ** dOMHTMLInputElementSetWidth - dOMHTMLInputElementSetWidth , - - --- ** dOMHTMLInputElementStepDown - dOMHTMLInputElementStepDown , - - --- ** dOMHTMLInputElementStepUp - dOMHTMLInputElementStepUp , - - - - - -- * Properties --- ** Accept - DOMHTMLInputElementAcceptPropertyInfo , - constructDOMHTMLInputElementAccept , - getDOMHTMLInputElementAccept , - setDOMHTMLInputElementAccept , - - --- ** Align - DOMHTMLInputElementAlignPropertyInfo , - constructDOMHTMLInputElementAlign , - getDOMHTMLInputElementAlign , - setDOMHTMLInputElementAlign , - - --- ** Alt - DOMHTMLInputElementAltPropertyInfo , - constructDOMHTMLInputElementAlt , - getDOMHTMLInputElementAlt , - setDOMHTMLInputElementAlt , - - --- ** Autocapitalize - DOMHTMLInputElementAutocapitalizePropertyInfo, - constructDOMHTMLInputElementAutocapitalize, - getDOMHTMLInputElementAutocapitalize , - setDOMHTMLInputElementAutocapitalize , - - --- ** Autocomplete - DOMHTMLInputElementAutocompletePropertyInfo, - constructDOMHTMLInputElementAutocomplete, - getDOMHTMLInputElementAutocomplete , - setDOMHTMLInputElementAutocomplete , - - --- ** Autocorrect - DOMHTMLInputElementAutocorrectPropertyInfo, - constructDOMHTMLInputElementAutocorrect , - getDOMHTMLInputElementAutocorrect , - setDOMHTMLInputElementAutocorrect , - - --- ** Autofocus - DOMHTMLInputElementAutofocusPropertyInfo, - constructDOMHTMLInputElementAutofocus , - getDOMHTMLInputElementAutofocus , - setDOMHTMLInputElementAutofocus , - - --- ** Capture - DOMHTMLInputElementCapturePropertyInfo , - constructDOMHTMLInputElementCapture , - getDOMHTMLInputElementCapture , - setDOMHTMLInputElementCapture , - - --- ** Checked - DOMHTMLInputElementCheckedPropertyInfo , - constructDOMHTMLInputElementChecked , - getDOMHTMLInputElementChecked , - setDOMHTMLInputElementChecked , - - --- ** DefaultChecked - DOMHTMLInputElementDefaultCheckedPropertyInfo, - constructDOMHTMLInputElementDefaultChecked, - getDOMHTMLInputElementDefaultChecked , - setDOMHTMLInputElementDefaultChecked , - - --- ** DefaultValue - DOMHTMLInputElementDefaultValuePropertyInfo, - constructDOMHTMLInputElementDefaultValue, - getDOMHTMLInputElementDefaultValue , - setDOMHTMLInputElementDefaultValue , - - --- ** DirName - DOMHTMLInputElementDirNamePropertyInfo , - constructDOMHTMLInputElementDirName , - getDOMHTMLInputElementDirName , - setDOMHTMLInputElementDirName , - - --- ** Disabled - DOMHTMLInputElementDisabledPropertyInfo , - constructDOMHTMLInputElementDisabled , - getDOMHTMLInputElementDisabled , - setDOMHTMLInputElementDisabled , - - --- ** Files - DOMHTMLInputElementFilesPropertyInfo , - getDOMHTMLInputElementFiles , - - --- ** Form - DOMHTMLInputElementFormPropertyInfo , - getDOMHTMLInputElementForm , - - --- ** FormAction - DOMHTMLInputElementFormActionPropertyInfo, - constructDOMHTMLInputElementFormAction , - getDOMHTMLInputElementFormAction , - setDOMHTMLInputElementFormAction , - - --- ** FormEnctype - DOMHTMLInputElementFormEnctypePropertyInfo, - constructDOMHTMLInputElementFormEnctype , - getDOMHTMLInputElementFormEnctype , - setDOMHTMLInputElementFormEnctype , - - --- ** FormMethod - DOMHTMLInputElementFormMethodPropertyInfo, - constructDOMHTMLInputElementFormMethod , - getDOMHTMLInputElementFormMethod , - setDOMHTMLInputElementFormMethod , - - --- ** FormNoValidate - DOMHTMLInputElementFormNoValidatePropertyInfo, - constructDOMHTMLInputElementFormNoValidate, - getDOMHTMLInputElementFormNoValidate , - setDOMHTMLInputElementFormNoValidate , - - --- ** FormTarget - DOMHTMLInputElementFormTargetPropertyInfo, - constructDOMHTMLInputElementFormTarget , - getDOMHTMLInputElementFormTarget , - setDOMHTMLInputElementFormTarget , - - --- ** Height - DOMHTMLInputElementHeightPropertyInfo , - constructDOMHTMLInputElementHeight , - getDOMHTMLInputElementHeight , - setDOMHTMLInputElementHeight , - - --- ** Incremental - DOMHTMLInputElementIncrementalPropertyInfo, - constructDOMHTMLInputElementIncremental , - getDOMHTMLInputElementIncremental , - setDOMHTMLInputElementIncremental , - - --- ** Indeterminate - DOMHTMLInputElementIndeterminatePropertyInfo, - constructDOMHTMLInputElementIndeterminate, - getDOMHTMLInputElementIndeterminate , - setDOMHTMLInputElementIndeterminate , - - --- ** Labels - DOMHTMLInputElementLabelsPropertyInfo , - getDOMHTMLInputElementLabels , - - --- ** List - DOMHTMLInputElementListPropertyInfo , - getDOMHTMLInputElementList , - - --- ** Max - DOMHTMLInputElementMaxPropertyInfo , - constructDOMHTMLInputElementMax , - getDOMHTMLInputElementMax , - setDOMHTMLInputElementMax , - - --- ** MaxLength - DOMHTMLInputElementMaxLengthPropertyInfo, - constructDOMHTMLInputElementMaxLength , - getDOMHTMLInputElementMaxLength , - setDOMHTMLInputElementMaxLength , - - --- ** Min - DOMHTMLInputElementMinPropertyInfo , - constructDOMHTMLInputElementMin , - getDOMHTMLInputElementMin , - setDOMHTMLInputElementMin , - - --- ** Multiple - DOMHTMLInputElementMultiplePropertyInfo , - constructDOMHTMLInputElementMultiple , - getDOMHTMLInputElementMultiple , - setDOMHTMLInputElementMultiple , - - --- ** Name - DOMHTMLInputElementNamePropertyInfo , - constructDOMHTMLInputElementName , - getDOMHTMLInputElementName , - setDOMHTMLInputElementName , - - --- ** Pattern - DOMHTMLInputElementPatternPropertyInfo , - constructDOMHTMLInputElementPattern , - getDOMHTMLInputElementPattern , - setDOMHTMLInputElementPattern , - - --- ** Placeholder - DOMHTMLInputElementPlaceholderPropertyInfo, - constructDOMHTMLInputElementPlaceholder , - getDOMHTMLInputElementPlaceholder , - setDOMHTMLInputElementPlaceholder , - - --- ** ReadOnly - DOMHTMLInputElementReadOnlyPropertyInfo , - constructDOMHTMLInputElementReadOnly , - getDOMHTMLInputElementReadOnly , - setDOMHTMLInputElementReadOnly , - - --- ** Required - DOMHTMLInputElementRequiredPropertyInfo , - constructDOMHTMLInputElementRequired , - getDOMHTMLInputElementRequired , - setDOMHTMLInputElementRequired , - - --- ** Size - DOMHTMLInputElementSizePropertyInfo , - constructDOMHTMLInputElementSize , - getDOMHTMLInputElementSize , - setDOMHTMLInputElementSize , - - --- ** Src - DOMHTMLInputElementSrcPropertyInfo , - constructDOMHTMLInputElementSrc , - getDOMHTMLInputElementSrc , - setDOMHTMLInputElementSrc , - - --- ** Step - DOMHTMLInputElementStepPropertyInfo , - constructDOMHTMLInputElementStep , - getDOMHTMLInputElementStep , - setDOMHTMLInputElementStep , - - --- ** Type - DOMHTMLInputElementTypePropertyInfo , - constructDOMHTMLInputElementType , - getDOMHTMLInputElementType , - setDOMHTMLInputElementType , - - --- ** UseMap - DOMHTMLInputElementUseMapPropertyInfo , - constructDOMHTMLInputElementUseMap , - getDOMHTMLInputElementUseMap , - setDOMHTMLInputElementUseMap , - - --- ** ValidationMessage - DOMHTMLInputElementValidationMessagePropertyInfo, - getDOMHTMLInputElementValidationMessage , - - --- ** Validity - DOMHTMLInputElementValidityPropertyInfo , - getDOMHTMLInputElementValidity , - - --- ** Value - DOMHTMLInputElementValuePropertyInfo , - constructDOMHTMLInputElementValue , - getDOMHTMLInputElementValue , - setDOMHTMLInputElementValue , - - --- ** ValueAsNumber - DOMHTMLInputElementValueAsNumberPropertyInfo, - constructDOMHTMLInputElementValueAsNumber, - getDOMHTMLInputElementValueAsNumber , - setDOMHTMLInputElementValueAsNumber , - - --- ** WebkitGrammar - DOMHTMLInputElementWebkitGrammarPropertyInfo, - constructDOMHTMLInputElementWebkitGrammar, - getDOMHTMLInputElementWebkitGrammar , - setDOMHTMLInputElementWebkitGrammar , - - --- ** WebkitSpeech - DOMHTMLInputElementWebkitSpeechPropertyInfo, - constructDOMHTMLInputElementWebkitSpeech, - getDOMHTMLInputElementWebkitSpeech , - setDOMHTMLInputElementWebkitSpeech , - - --- ** Webkitdirectory - DOMHTMLInputElementWebkitdirectoryPropertyInfo, - constructDOMHTMLInputElementWebkitdirectory, - getDOMHTMLInputElementWebkitdirectory , - setDOMHTMLInputElementWebkitdirectory , - - --- ** Width - DOMHTMLInputElementWidthPropertyInfo , - constructDOMHTMLInputElementWidth , - getDOMHTMLInputElementWidth , - setDOMHTMLInputElementWidth , - - --- ** WillValidate - DOMHTMLInputElementWillValidatePropertyInfo, - getDOMHTMLInputElementWillValidate , - - - - - ) where - -import Prelude () -import Data.GI.Base.ShortPrelude - -import qualified Data.Text as T -import qualified Data.ByteString.Char8 as B -import qualified Data.Map as Map - -import GI.WebKit.Types -import GI.WebKit.Callbacks -import qualified GI.GObject as GObject - -newtype DOMHTMLInputElement = DOMHTMLInputElement (ForeignPtr DOMHTMLInputElement) -foreign import ccall "webkit_dom_html_input_element_get_type" - c_webkit_dom_html_input_element_get_type :: IO GType - -type instance ParentTypes DOMHTMLInputElement = DOMHTMLInputElementParentTypes -type DOMHTMLInputElementParentTypes = '[DOMHTMLElement, DOMElement, DOMNode, DOMObject, GObject.Object, DOMEventTarget] - -instance GObject DOMHTMLInputElement where - gobjectIsInitiallyUnowned _ = False - gobjectType _ = c_webkit_dom_html_input_element_get_type - - -class GObject o => DOMHTMLInputElementK o -instance (GObject o, IsDescendantOf DOMHTMLInputElement o) => DOMHTMLInputElementK o - -toDOMHTMLInputElement :: DOMHTMLInputElementK o => o -> IO DOMHTMLInputElement -toDOMHTMLInputElement = unsafeCastTo DOMHTMLInputElement - -noDOMHTMLInputElement :: Maybe DOMHTMLInputElement -noDOMHTMLInputElement = Nothing - --- VVV Prop "accept" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementAccept :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementAccept obj = liftIO $ getObjectPropertyString obj "accept" - -setDOMHTMLInputElementAccept :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementAccept obj val = liftIO $ setObjectPropertyString obj "accept" val - -constructDOMHTMLInputElementAccept :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementAccept val = constructObjectPropertyString "accept" val - -data DOMHTMLInputElementAcceptPropertyInfo -instance AttrInfo DOMHTMLInputElementAcceptPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementAcceptPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementAcceptPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementAcceptPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementAcceptPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementAcceptPropertyInfo = "DOMHTMLInputElement::accept" - attrGet _ = getDOMHTMLInputElementAccept - attrSet _ = setDOMHTMLInputElementAccept - attrConstruct _ = constructDOMHTMLInputElementAccept - --- VVV Prop "align" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementAlign :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementAlign obj = liftIO $ getObjectPropertyString obj "align" - -setDOMHTMLInputElementAlign :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val - -constructDOMHTMLInputElementAlign :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementAlign val = constructObjectPropertyString "align" val - -data DOMHTMLInputElementAlignPropertyInfo -instance AttrInfo DOMHTMLInputElementAlignPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementAlignPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementAlignPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementAlignPropertyInfo = "DOMHTMLInputElement::align" - attrGet _ = getDOMHTMLInputElementAlign - attrSet _ = setDOMHTMLInputElementAlign - attrConstruct _ = constructDOMHTMLInputElementAlign - --- VVV Prop "alt" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementAlt :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementAlt obj = liftIO $ getObjectPropertyString obj "alt" - -setDOMHTMLInputElementAlt :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementAlt obj val = liftIO $ setObjectPropertyString obj "alt" val - -constructDOMHTMLInputElementAlt :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementAlt val = constructObjectPropertyString "alt" val - -data DOMHTMLInputElementAltPropertyInfo -instance AttrInfo DOMHTMLInputElementAltPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementAltPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementAltPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementAltPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementAltPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementAltPropertyInfo = "DOMHTMLInputElement::alt" - attrGet _ = getDOMHTMLInputElementAlt - attrSet _ = setDOMHTMLInputElementAlt - attrConstruct _ = constructDOMHTMLInputElementAlt - --- VVV Prop "autocapitalize" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementAutocapitalize :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementAutocapitalize obj = liftIO $ getObjectPropertyString obj "autocapitalize" - -setDOMHTMLInputElementAutocapitalize :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementAutocapitalize obj val = liftIO $ setObjectPropertyString obj "autocapitalize" val - -constructDOMHTMLInputElementAutocapitalize :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementAutocapitalize val = constructObjectPropertyString "autocapitalize" val - -data DOMHTMLInputElementAutocapitalizePropertyInfo -instance AttrInfo DOMHTMLInputElementAutocapitalizePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementAutocapitalizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementAutocapitalizePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementAutocapitalizePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementAutocapitalizePropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementAutocapitalizePropertyInfo = "DOMHTMLInputElement::autocapitalize" - attrGet _ = getDOMHTMLInputElementAutocapitalize - attrSet _ = setDOMHTMLInputElementAutocapitalize - attrConstruct _ = constructDOMHTMLInputElementAutocapitalize - --- VVV Prop "autocomplete" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementAutocomplete :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementAutocomplete obj = liftIO $ getObjectPropertyString obj "autocomplete" - -setDOMHTMLInputElementAutocomplete :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementAutocomplete obj val = liftIO $ setObjectPropertyString obj "autocomplete" val - -constructDOMHTMLInputElementAutocomplete :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementAutocomplete val = constructObjectPropertyString "autocomplete" val - -data DOMHTMLInputElementAutocompletePropertyInfo -instance AttrInfo DOMHTMLInputElementAutocompletePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementAutocompletePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementAutocompletePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementAutocompletePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementAutocompletePropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementAutocompletePropertyInfo = "DOMHTMLInputElement::autocomplete" - attrGet _ = getDOMHTMLInputElementAutocomplete - attrSet _ = setDOMHTMLInputElementAutocomplete - attrConstruct _ = constructDOMHTMLInputElementAutocomplete - --- VVV Prop "autocorrect" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementAutocorrect :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementAutocorrect obj = liftIO $ getObjectPropertyBool obj "autocorrect" - -setDOMHTMLInputElementAutocorrect :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementAutocorrect obj val = liftIO $ setObjectPropertyBool obj "autocorrect" val - -constructDOMHTMLInputElementAutocorrect :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementAutocorrect val = constructObjectPropertyBool "autocorrect" val - -data DOMHTMLInputElementAutocorrectPropertyInfo -instance AttrInfo DOMHTMLInputElementAutocorrectPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementAutocorrectPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementAutocorrectPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementAutocorrectPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementAutocorrectPropertyInfo = Bool - type AttrLabel DOMHTMLInputElementAutocorrectPropertyInfo = "DOMHTMLInputElement::autocorrect" - attrGet _ = getDOMHTMLInputElementAutocorrect - attrSet _ = setDOMHTMLInputElementAutocorrect - attrConstruct _ = constructDOMHTMLInputElementAutocorrect - --- VVV Prop "autofocus" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementAutofocus :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementAutofocus obj = liftIO $ getObjectPropertyBool obj "autofocus" - -setDOMHTMLInputElementAutofocus :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementAutofocus obj val = liftIO $ setObjectPropertyBool obj "autofocus" val - -constructDOMHTMLInputElementAutofocus :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementAutofocus val = constructObjectPropertyBool "autofocus" val - -data DOMHTMLInputElementAutofocusPropertyInfo -instance AttrInfo DOMHTMLInputElementAutofocusPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementAutofocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementAutofocusPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementAutofocusPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementAutofocusPropertyInfo = Bool - type AttrLabel DOMHTMLInputElementAutofocusPropertyInfo = "DOMHTMLInputElement::autofocus" - attrGet _ = getDOMHTMLInputElementAutofocus - attrSet _ = setDOMHTMLInputElementAutofocus - attrConstruct _ = constructDOMHTMLInputElementAutofocus - --- VVV Prop "capture" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementCapture :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementCapture obj = liftIO $ getObjectPropertyString obj "capture" - -setDOMHTMLInputElementCapture :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementCapture obj val = liftIO $ setObjectPropertyString obj "capture" val - -constructDOMHTMLInputElementCapture :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementCapture val = constructObjectPropertyString "capture" val - -data DOMHTMLInputElementCapturePropertyInfo -instance AttrInfo DOMHTMLInputElementCapturePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementCapturePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementCapturePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementCapturePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementCapturePropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementCapturePropertyInfo = "DOMHTMLInputElement::capture" - attrGet _ = getDOMHTMLInputElementCapture - attrSet _ = setDOMHTMLInputElementCapture - attrConstruct _ = constructDOMHTMLInputElementCapture - --- VVV Prop "checked" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementChecked obj = liftIO $ getObjectPropertyBool obj "checked" - -setDOMHTMLInputElementChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementChecked obj val = liftIO $ setObjectPropertyBool obj "checked" val - -constructDOMHTMLInputElementChecked :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementChecked val = constructObjectPropertyBool "checked" val - -data DOMHTMLInputElementCheckedPropertyInfo -instance AttrInfo DOMHTMLInputElementCheckedPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementCheckedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementCheckedPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementCheckedPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementCheckedPropertyInfo = Bool - type AttrLabel DOMHTMLInputElementCheckedPropertyInfo = "DOMHTMLInputElement::checked" - attrGet _ = getDOMHTMLInputElementChecked - attrSet _ = setDOMHTMLInputElementChecked - attrConstruct _ = constructDOMHTMLInputElementChecked - --- VVV Prop "default-checked" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementDefaultChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementDefaultChecked obj = liftIO $ getObjectPropertyBool obj "default-checked" - -setDOMHTMLInputElementDefaultChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementDefaultChecked obj val = liftIO $ setObjectPropertyBool obj "default-checked" val - -constructDOMHTMLInputElementDefaultChecked :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementDefaultChecked val = constructObjectPropertyBool "default-checked" val - -data DOMHTMLInputElementDefaultCheckedPropertyInfo -instance AttrInfo DOMHTMLInputElementDefaultCheckedPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementDefaultCheckedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementDefaultCheckedPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementDefaultCheckedPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementDefaultCheckedPropertyInfo = Bool - type AttrLabel DOMHTMLInputElementDefaultCheckedPropertyInfo = "DOMHTMLInputElement::default-checked" - attrGet _ = getDOMHTMLInputElementDefaultChecked - attrSet _ = setDOMHTMLInputElementDefaultChecked - attrConstruct _ = constructDOMHTMLInputElementDefaultChecked - --- VVV Prop "default-value" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementDefaultValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementDefaultValue obj = liftIO $ getObjectPropertyString obj "default-value" - -setDOMHTMLInputElementDefaultValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementDefaultValue obj val = liftIO $ setObjectPropertyString obj "default-value" val - -constructDOMHTMLInputElementDefaultValue :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementDefaultValue val = constructObjectPropertyString "default-value" val - -data DOMHTMLInputElementDefaultValuePropertyInfo -instance AttrInfo DOMHTMLInputElementDefaultValuePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementDefaultValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementDefaultValuePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementDefaultValuePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementDefaultValuePropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementDefaultValuePropertyInfo = "DOMHTMLInputElement::default-value" - attrGet _ = getDOMHTMLInputElementDefaultValue - attrSet _ = setDOMHTMLInputElementDefaultValue - attrConstruct _ = constructDOMHTMLInputElementDefaultValue - --- VVV Prop "dir-name" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementDirName :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementDirName obj = liftIO $ getObjectPropertyString obj "dir-name" - -setDOMHTMLInputElementDirName :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementDirName obj val = liftIO $ setObjectPropertyString obj "dir-name" val - -constructDOMHTMLInputElementDirName :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementDirName val = constructObjectPropertyString "dir-name" val - -data DOMHTMLInputElementDirNamePropertyInfo -instance AttrInfo DOMHTMLInputElementDirNamePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementDirNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementDirNamePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementDirNamePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementDirNamePropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementDirNamePropertyInfo = "DOMHTMLInputElement::dir-name" - attrGet _ = getDOMHTMLInputElementDirName - attrSet _ = setDOMHTMLInputElementDirName - attrConstruct _ = constructDOMHTMLInputElementDirName - --- VVV Prop "disabled" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementDisabled :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled" - -setDOMHTMLInputElementDisabled :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val - -constructDOMHTMLInputElementDisabled :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementDisabled val = constructObjectPropertyBool "disabled" val - -data DOMHTMLInputElementDisabledPropertyInfo -instance AttrInfo DOMHTMLInputElementDisabledPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementDisabledPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementDisabledPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementDisabledPropertyInfo = Bool - type AttrLabel DOMHTMLInputElementDisabledPropertyInfo = "DOMHTMLInputElement::disabled" - attrGet _ = getDOMHTMLInputElementDisabled - attrSet _ = setDOMHTMLInputElementDisabled - attrConstruct _ = constructDOMHTMLInputElementDisabled - --- VVV Prop "files" - -- Type: TInterface "WebKit" "DOMFileList" - -- Flags: [PropertyReadable] - -getDOMHTMLInputElementFiles :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMFileList -getDOMHTMLInputElementFiles obj = liftIO $ getObjectPropertyObject obj "files" DOMFileList - -data DOMHTMLInputElementFilesPropertyInfo -instance AttrInfo DOMHTMLInputElementFilesPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementFilesPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementFilesPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLInputElementFilesPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementFilesPropertyInfo = DOMFileList - type AttrLabel DOMHTMLInputElementFilesPropertyInfo = "DOMHTMLInputElement::files" - attrGet _ = getDOMHTMLInputElementFiles - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "form" - -- Type: TInterface "WebKit" "DOMHTMLFormElement" - -- Flags: [PropertyReadable] - -getDOMHTMLInputElementForm :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMHTMLFormElement -getDOMHTMLInputElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement - -data DOMHTMLInputElementFormPropertyInfo -instance AttrInfo DOMHTMLInputElementFormPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementFormPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementFormPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLInputElementFormPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementFormPropertyInfo = DOMHTMLFormElement - type AttrLabel DOMHTMLInputElementFormPropertyInfo = "DOMHTMLInputElement::form" - attrGet _ = getDOMHTMLInputElementForm - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "form-action" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementFormAction :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementFormAction obj = liftIO $ getObjectPropertyString obj "form-action" - -setDOMHTMLInputElementFormAction :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementFormAction obj val = liftIO $ setObjectPropertyString obj "form-action" val - -constructDOMHTMLInputElementFormAction :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementFormAction val = constructObjectPropertyString "form-action" val - -data DOMHTMLInputElementFormActionPropertyInfo -instance AttrInfo DOMHTMLInputElementFormActionPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementFormActionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementFormActionPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementFormActionPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementFormActionPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementFormActionPropertyInfo = "DOMHTMLInputElement::form-action" - attrGet _ = getDOMHTMLInputElementFormAction - attrSet _ = setDOMHTMLInputElementFormAction - attrConstruct _ = constructDOMHTMLInputElementFormAction - --- VVV Prop "form-enctype" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementFormEnctype :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementFormEnctype obj = liftIO $ getObjectPropertyString obj "form-enctype" - -setDOMHTMLInputElementFormEnctype :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementFormEnctype obj val = liftIO $ setObjectPropertyString obj "form-enctype" val - -constructDOMHTMLInputElementFormEnctype :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementFormEnctype val = constructObjectPropertyString "form-enctype" val - -data DOMHTMLInputElementFormEnctypePropertyInfo -instance AttrInfo DOMHTMLInputElementFormEnctypePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementFormEnctypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementFormEnctypePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementFormEnctypePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementFormEnctypePropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementFormEnctypePropertyInfo = "DOMHTMLInputElement::form-enctype" - attrGet _ = getDOMHTMLInputElementFormEnctype - attrSet _ = setDOMHTMLInputElementFormEnctype - attrConstruct _ = constructDOMHTMLInputElementFormEnctype - --- VVV Prop "form-method" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementFormMethod :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementFormMethod obj = liftIO $ getObjectPropertyString obj "form-method" - -setDOMHTMLInputElementFormMethod :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementFormMethod obj val = liftIO $ setObjectPropertyString obj "form-method" val - -constructDOMHTMLInputElementFormMethod :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementFormMethod val = constructObjectPropertyString "form-method" val - -data DOMHTMLInputElementFormMethodPropertyInfo -instance AttrInfo DOMHTMLInputElementFormMethodPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementFormMethodPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementFormMethodPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementFormMethodPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementFormMethodPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementFormMethodPropertyInfo = "DOMHTMLInputElement::form-method" - attrGet _ = getDOMHTMLInputElementFormMethod - attrSet _ = setDOMHTMLInputElementFormMethod - attrConstruct _ = constructDOMHTMLInputElementFormMethod - --- VVV Prop "form-no-validate" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementFormNoValidate :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementFormNoValidate obj = liftIO $ getObjectPropertyBool obj "form-no-validate" - -setDOMHTMLInputElementFormNoValidate :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementFormNoValidate obj val = liftIO $ setObjectPropertyBool obj "form-no-validate" val - -constructDOMHTMLInputElementFormNoValidate :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementFormNoValidate val = constructObjectPropertyBool "form-no-validate" val - -data DOMHTMLInputElementFormNoValidatePropertyInfo -instance AttrInfo DOMHTMLInputElementFormNoValidatePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementFormNoValidatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementFormNoValidatePropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementFormNoValidatePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementFormNoValidatePropertyInfo = Bool - type AttrLabel DOMHTMLInputElementFormNoValidatePropertyInfo = "DOMHTMLInputElement::form-no-validate" - attrGet _ = getDOMHTMLInputElementFormNoValidate - attrSet _ = setDOMHTMLInputElementFormNoValidate - attrConstruct _ = constructDOMHTMLInputElementFormNoValidate - --- VVV Prop "form-target" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementFormTarget :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementFormTarget obj = liftIO $ getObjectPropertyString obj "form-target" - -setDOMHTMLInputElementFormTarget :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementFormTarget obj val = liftIO $ setObjectPropertyString obj "form-target" val - -constructDOMHTMLInputElementFormTarget :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementFormTarget val = constructObjectPropertyString "form-target" val - -data DOMHTMLInputElementFormTargetPropertyInfo -instance AttrInfo DOMHTMLInputElementFormTargetPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementFormTargetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementFormTargetPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementFormTargetPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementFormTargetPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementFormTargetPropertyInfo = "DOMHTMLInputElement::form-target" - attrGet _ = getDOMHTMLInputElementFormTarget - attrSet _ = setDOMHTMLInputElementFormTarget - attrConstruct _ = constructDOMHTMLInputElementFormTarget - --- VVV Prop "height" - -- Type: TBasicType TUInt64 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementHeight :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Word64 -getDOMHTMLInputElementHeight obj = liftIO $ getObjectPropertyUInt64 obj "height" - -setDOMHTMLInputElementHeight :: (MonadIO m, DOMHTMLInputElementK o) => o -> Word64 -> m () -setDOMHTMLInputElementHeight obj val = liftIO $ setObjectPropertyUInt64 obj "height" val - -constructDOMHTMLInputElementHeight :: Word64 -> IO ([Char], GValue) -constructDOMHTMLInputElementHeight val = constructObjectPropertyUInt64 "height" val - -data DOMHTMLInputElementHeightPropertyInfo -instance AttrInfo DOMHTMLInputElementHeightPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementHeightPropertyInfo = (~) Word64 - type AttrBaseTypeConstraint DOMHTMLInputElementHeightPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementHeightPropertyInfo = Word64 - type AttrLabel DOMHTMLInputElementHeightPropertyInfo = "DOMHTMLInputElement::height" - attrGet _ = getDOMHTMLInputElementHeight - attrSet _ = setDOMHTMLInputElementHeight - attrConstruct _ = constructDOMHTMLInputElementHeight - --- VVV Prop "incremental" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementIncremental :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementIncremental obj = liftIO $ getObjectPropertyBool obj "incremental" - -setDOMHTMLInputElementIncremental :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementIncremental obj val = liftIO $ setObjectPropertyBool obj "incremental" val - -constructDOMHTMLInputElementIncremental :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementIncremental val = constructObjectPropertyBool "incremental" val - -data DOMHTMLInputElementIncrementalPropertyInfo -instance AttrInfo DOMHTMLInputElementIncrementalPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementIncrementalPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementIncrementalPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementIncrementalPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementIncrementalPropertyInfo = Bool - type AttrLabel DOMHTMLInputElementIncrementalPropertyInfo = "DOMHTMLInputElement::incremental" - attrGet _ = getDOMHTMLInputElementIncremental - attrSet _ = setDOMHTMLInputElementIncremental - attrConstruct _ = constructDOMHTMLInputElementIncremental - --- VVV Prop "indeterminate" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementIndeterminate :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementIndeterminate obj = liftIO $ getObjectPropertyBool obj "indeterminate" - -setDOMHTMLInputElementIndeterminate :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementIndeterminate obj val = liftIO $ setObjectPropertyBool obj "indeterminate" val - -constructDOMHTMLInputElementIndeterminate :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementIndeterminate val = constructObjectPropertyBool "indeterminate" val - -data DOMHTMLInputElementIndeterminatePropertyInfo -instance AttrInfo DOMHTMLInputElementIndeterminatePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementIndeterminatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementIndeterminatePropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementIndeterminatePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementIndeterminatePropertyInfo = Bool - type AttrLabel DOMHTMLInputElementIndeterminatePropertyInfo = "DOMHTMLInputElement::indeterminate" - attrGet _ = getDOMHTMLInputElementIndeterminate - attrSet _ = setDOMHTMLInputElementIndeterminate - attrConstruct _ = constructDOMHTMLInputElementIndeterminate - --- VVV Prop "labels" - -- Type: TInterface "WebKit" "DOMNodeList" - -- Flags: [PropertyReadable] - -getDOMHTMLInputElementLabels :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMNodeList -getDOMHTMLInputElementLabels obj = liftIO $ getObjectPropertyObject obj "labels" DOMNodeList - -data DOMHTMLInputElementLabelsPropertyInfo -instance AttrInfo DOMHTMLInputElementLabelsPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementLabelsPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementLabelsPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLInputElementLabelsPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementLabelsPropertyInfo = DOMNodeList - type AttrLabel DOMHTMLInputElementLabelsPropertyInfo = "DOMHTMLInputElement::labels" - attrGet _ = getDOMHTMLInputElementLabels - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "list" - -- Type: TInterface "WebKit" "DOMHTMLElement" - -- Flags: [PropertyReadable] - -getDOMHTMLInputElementList :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMHTMLElement -getDOMHTMLInputElementList obj = liftIO $ getObjectPropertyObject obj "list" DOMHTMLElement - -data DOMHTMLInputElementListPropertyInfo -instance AttrInfo DOMHTMLInputElementListPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementListPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementListPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLInputElementListPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementListPropertyInfo = DOMHTMLElement - type AttrLabel DOMHTMLInputElementListPropertyInfo = "DOMHTMLInputElement::list" - attrGet _ = getDOMHTMLInputElementList - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "max" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementMax :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementMax obj = liftIO $ getObjectPropertyString obj "max" - -setDOMHTMLInputElementMax :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementMax obj val = liftIO $ setObjectPropertyString obj "max" val - -constructDOMHTMLInputElementMax :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementMax val = constructObjectPropertyString "max" val - -data DOMHTMLInputElementMaxPropertyInfo -instance AttrInfo DOMHTMLInputElementMaxPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementMaxPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementMaxPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementMaxPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementMaxPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementMaxPropertyInfo = "DOMHTMLInputElement::max" - attrGet _ = getDOMHTMLInputElementMax - attrSet _ = setDOMHTMLInputElementMax - attrConstruct _ = constructDOMHTMLInputElementMax - --- VVV Prop "max-length" - -- Type: TBasicType TInt64 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementMaxLength :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Int64 -getDOMHTMLInputElementMaxLength obj = liftIO $ getObjectPropertyInt64 obj "max-length" - -setDOMHTMLInputElementMaxLength :: (MonadIO m, DOMHTMLInputElementK o) => o -> Int64 -> m () -setDOMHTMLInputElementMaxLength obj val = liftIO $ setObjectPropertyInt64 obj "max-length" val - -constructDOMHTMLInputElementMaxLength :: Int64 -> IO ([Char], GValue) -constructDOMHTMLInputElementMaxLength val = constructObjectPropertyInt64 "max-length" val - -data DOMHTMLInputElementMaxLengthPropertyInfo -instance AttrInfo DOMHTMLInputElementMaxLengthPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementMaxLengthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementMaxLengthPropertyInfo = (~) Int64 - type AttrBaseTypeConstraint DOMHTMLInputElementMaxLengthPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementMaxLengthPropertyInfo = Int64 - type AttrLabel DOMHTMLInputElementMaxLengthPropertyInfo = "DOMHTMLInputElement::max-length" - attrGet _ = getDOMHTMLInputElementMaxLength - attrSet _ = setDOMHTMLInputElementMaxLength - attrConstruct _ = constructDOMHTMLInputElementMaxLength - --- VVV Prop "min" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementMin :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementMin obj = liftIO $ getObjectPropertyString obj "min" - -setDOMHTMLInputElementMin :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementMin obj val = liftIO $ setObjectPropertyString obj "min" val - -constructDOMHTMLInputElementMin :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementMin val = constructObjectPropertyString "min" val - -data DOMHTMLInputElementMinPropertyInfo -instance AttrInfo DOMHTMLInputElementMinPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementMinPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementMinPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementMinPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementMinPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementMinPropertyInfo = "DOMHTMLInputElement::min" - attrGet _ = getDOMHTMLInputElementMin - attrSet _ = setDOMHTMLInputElementMin - attrConstruct _ = constructDOMHTMLInputElementMin - --- VVV Prop "multiple" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementMultiple :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementMultiple obj = liftIO $ getObjectPropertyBool obj "multiple" - -setDOMHTMLInputElementMultiple :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementMultiple obj val = liftIO $ setObjectPropertyBool obj "multiple" val - -constructDOMHTMLInputElementMultiple :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementMultiple val = constructObjectPropertyBool "multiple" val - -data DOMHTMLInputElementMultiplePropertyInfo -instance AttrInfo DOMHTMLInputElementMultiplePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementMultiplePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementMultiplePropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementMultiplePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementMultiplePropertyInfo = Bool - type AttrLabel DOMHTMLInputElementMultiplePropertyInfo = "DOMHTMLInputElement::multiple" - attrGet _ = getDOMHTMLInputElementMultiple - attrSet _ = setDOMHTMLInputElementMultiple - attrConstruct _ = constructDOMHTMLInputElementMultiple - --- VVV Prop "name" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementName :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementName obj = liftIO $ getObjectPropertyString obj "name" - -setDOMHTMLInputElementName :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementName obj val = liftIO $ setObjectPropertyString obj "name" val - -constructDOMHTMLInputElementName :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementName val = constructObjectPropertyString "name" val - -data DOMHTMLInputElementNamePropertyInfo -instance AttrInfo DOMHTMLInputElementNamePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementNamePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementNamePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementNamePropertyInfo = "DOMHTMLInputElement::name" - attrGet _ = getDOMHTMLInputElementName - attrSet _ = setDOMHTMLInputElementName - attrConstruct _ = constructDOMHTMLInputElementName - --- VVV Prop "pattern" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementPattern :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementPattern obj = liftIO $ getObjectPropertyString obj "pattern" - -setDOMHTMLInputElementPattern :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementPattern obj val = liftIO $ setObjectPropertyString obj "pattern" val - -constructDOMHTMLInputElementPattern :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementPattern val = constructObjectPropertyString "pattern" val - -data DOMHTMLInputElementPatternPropertyInfo -instance AttrInfo DOMHTMLInputElementPatternPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementPatternPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementPatternPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementPatternPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementPatternPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementPatternPropertyInfo = "DOMHTMLInputElement::pattern" - attrGet _ = getDOMHTMLInputElementPattern - attrSet _ = setDOMHTMLInputElementPattern - attrConstruct _ = constructDOMHTMLInputElementPattern - --- VVV Prop "placeholder" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementPlaceholder :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementPlaceholder obj = liftIO $ getObjectPropertyString obj "placeholder" - -setDOMHTMLInputElementPlaceholder :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementPlaceholder obj val = liftIO $ setObjectPropertyString obj "placeholder" val - -constructDOMHTMLInputElementPlaceholder :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementPlaceholder val = constructObjectPropertyString "placeholder" val - -data DOMHTMLInputElementPlaceholderPropertyInfo -instance AttrInfo DOMHTMLInputElementPlaceholderPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementPlaceholderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementPlaceholderPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementPlaceholderPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementPlaceholderPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementPlaceholderPropertyInfo = "DOMHTMLInputElement::placeholder" - attrGet _ = getDOMHTMLInputElementPlaceholder - attrSet _ = setDOMHTMLInputElementPlaceholder - attrConstruct _ = constructDOMHTMLInputElementPlaceholder - --- VVV Prop "read-only" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementReadOnly :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementReadOnly obj = liftIO $ getObjectPropertyBool obj "read-only" - -setDOMHTMLInputElementReadOnly :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementReadOnly obj val = liftIO $ setObjectPropertyBool obj "read-only" val - -constructDOMHTMLInputElementReadOnly :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementReadOnly val = constructObjectPropertyBool "read-only" val - -data DOMHTMLInputElementReadOnlyPropertyInfo -instance AttrInfo DOMHTMLInputElementReadOnlyPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementReadOnlyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementReadOnlyPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementReadOnlyPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementReadOnlyPropertyInfo = Bool - type AttrLabel DOMHTMLInputElementReadOnlyPropertyInfo = "DOMHTMLInputElement::read-only" - attrGet _ = getDOMHTMLInputElementReadOnly - attrSet _ = setDOMHTMLInputElementReadOnly - attrConstruct _ = constructDOMHTMLInputElementReadOnly - --- VVV Prop "required" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementRequired :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementRequired obj = liftIO $ getObjectPropertyBool obj "required" - -setDOMHTMLInputElementRequired :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementRequired obj val = liftIO $ setObjectPropertyBool obj "required" val - -constructDOMHTMLInputElementRequired :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementRequired val = constructObjectPropertyBool "required" val - -data DOMHTMLInputElementRequiredPropertyInfo -instance AttrInfo DOMHTMLInputElementRequiredPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementRequiredPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementRequiredPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementRequiredPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementRequiredPropertyInfo = Bool - type AttrLabel DOMHTMLInputElementRequiredPropertyInfo = "DOMHTMLInputElement::required" - attrGet _ = getDOMHTMLInputElementRequired - attrSet _ = setDOMHTMLInputElementRequired - attrConstruct _ = constructDOMHTMLInputElementRequired - --- VVV Prop "size" - -- Type: TBasicType TUInt64 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementSize :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Word64 -getDOMHTMLInputElementSize obj = liftIO $ getObjectPropertyUInt64 obj "size" - -setDOMHTMLInputElementSize :: (MonadIO m, DOMHTMLInputElementK o) => o -> Word64 -> m () -setDOMHTMLInputElementSize obj val = liftIO $ setObjectPropertyUInt64 obj "size" val - -constructDOMHTMLInputElementSize :: Word64 -> IO ([Char], GValue) -constructDOMHTMLInputElementSize val = constructObjectPropertyUInt64 "size" val - -data DOMHTMLInputElementSizePropertyInfo -instance AttrInfo DOMHTMLInputElementSizePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementSizePropertyInfo = (~) Word64 - type AttrBaseTypeConstraint DOMHTMLInputElementSizePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementSizePropertyInfo = Word64 - type AttrLabel DOMHTMLInputElementSizePropertyInfo = "DOMHTMLInputElement::size" - attrGet _ = getDOMHTMLInputElementSize - attrSet _ = setDOMHTMLInputElementSize - attrConstruct _ = constructDOMHTMLInputElementSize - --- VVV Prop "src" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementSrc :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementSrc obj = liftIO $ getObjectPropertyString obj "src" - -setDOMHTMLInputElementSrc :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementSrc obj val = liftIO $ setObjectPropertyString obj "src" val - -constructDOMHTMLInputElementSrc :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementSrc val = constructObjectPropertyString "src" val - -data DOMHTMLInputElementSrcPropertyInfo -instance AttrInfo DOMHTMLInputElementSrcPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementSrcPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementSrcPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementSrcPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementSrcPropertyInfo = "DOMHTMLInputElement::src" - attrGet _ = getDOMHTMLInputElementSrc - attrSet _ = setDOMHTMLInputElementSrc - attrConstruct _ = constructDOMHTMLInputElementSrc - --- VVV Prop "step" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementStep :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementStep obj = liftIO $ getObjectPropertyString obj "step" - -setDOMHTMLInputElementStep :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementStep obj val = liftIO $ setObjectPropertyString obj "step" val - -constructDOMHTMLInputElementStep :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementStep val = constructObjectPropertyString "step" val - -data DOMHTMLInputElementStepPropertyInfo -instance AttrInfo DOMHTMLInputElementStepPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementStepPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementStepPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementStepPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementStepPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementStepPropertyInfo = "DOMHTMLInputElement::step" - attrGet _ = getDOMHTMLInputElementStep - attrSet _ = setDOMHTMLInputElementStep - attrConstruct _ = constructDOMHTMLInputElementStep - --- VVV Prop "type" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementType :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementType obj = liftIO $ getObjectPropertyString obj "type" - -setDOMHTMLInputElementType :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementType obj val = liftIO $ setObjectPropertyString obj "type" val - -constructDOMHTMLInputElementType :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementType val = constructObjectPropertyString "type" val - -data DOMHTMLInputElementTypePropertyInfo -instance AttrInfo DOMHTMLInputElementTypePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementTypePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementTypePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementTypePropertyInfo = "DOMHTMLInputElement::type" - attrGet _ = getDOMHTMLInputElementType - attrSet _ = setDOMHTMLInputElementType - attrConstruct _ = constructDOMHTMLInputElementType - --- VVV Prop "use-map" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementUseMap :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementUseMap obj = liftIO $ getObjectPropertyString obj "use-map" - -setDOMHTMLInputElementUseMap :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementUseMap obj val = liftIO $ setObjectPropertyString obj "use-map" val - -constructDOMHTMLInputElementUseMap :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementUseMap val = constructObjectPropertyString "use-map" val - -data DOMHTMLInputElementUseMapPropertyInfo -instance AttrInfo DOMHTMLInputElementUseMapPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementUseMapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementUseMapPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementUseMapPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementUseMapPropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementUseMapPropertyInfo = "DOMHTMLInputElement::use-map" - attrGet _ = getDOMHTMLInputElementUseMap - attrSet _ = setDOMHTMLInputElementUseMap - attrConstruct _ = constructDOMHTMLInputElementUseMap - --- VVV Prop "validation-message" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMHTMLInputElementValidationMessage :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementValidationMessage obj = liftIO $ getObjectPropertyString obj "validation-message" - -data DOMHTMLInputElementValidationMessagePropertyInfo -instance AttrInfo DOMHTMLInputElementValidationMessagePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementValidationMessagePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementValidationMessagePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLInputElementValidationMessagePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementValidationMessagePropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementValidationMessagePropertyInfo = "DOMHTMLInputElement::validation-message" - attrGet _ = getDOMHTMLInputElementValidationMessage - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "validity" - -- Type: TInterface "WebKit" "DOMValidityState" - -- Flags: [PropertyReadable] - -getDOMHTMLInputElementValidity :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMValidityState -getDOMHTMLInputElementValidity obj = liftIO $ getObjectPropertyObject obj "validity" DOMValidityState - -data DOMHTMLInputElementValidityPropertyInfo -instance AttrInfo DOMHTMLInputElementValidityPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementValidityPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementValidityPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLInputElementValidityPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementValidityPropertyInfo = DOMValidityState - type AttrLabel DOMHTMLInputElementValidityPropertyInfo = "DOMHTMLInputElement::validity" - attrGet _ = getDOMHTMLInputElementValidity - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "value" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text -getDOMHTMLInputElementValue obj = liftIO $ getObjectPropertyString obj "value" - -setDOMHTMLInputElementValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () -setDOMHTMLInputElementValue obj val = liftIO $ setObjectPropertyString obj "value" val - -constructDOMHTMLInputElementValue :: T.Text -> IO ([Char], GValue) -constructDOMHTMLInputElementValue val = constructObjectPropertyString "value" val - -data DOMHTMLInputElementValuePropertyInfo -instance AttrInfo DOMHTMLInputElementValuePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementValuePropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLInputElementValuePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementValuePropertyInfo = T.Text - type AttrLabel DOMHTMLInputElementValuePropertyInfo = "DOMHTMLInputElement::value" - attrGet _ = getDOMHTMLInputElementValue - attrSet _ = setDOMHTMLInputElementValue - attrConstruct _ = constructDOMHTMLInputElementValue - --- VVV Prop "value-as-number" - -- Type: TBasicType TDouble - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementValueAsNumber :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Double -getDOMHTMLInputElementValueAsNumber obj = liftIO $ getObjectPropertyDouble obj "value-as-number" - -setDOMHTMLInputElementValueAsNumber :: (MonadIO m, DOMHTMLInputElementK o) => o -> Double -> m () -setDOMHTMLInputElementValueAsNumber obj val = liftIO $ setObjectPropertyDouble obj "value-as-number" val - -constructDOMHTMLInputElementValueAsNumber :: Double -> IO ([Char], GValue) -constructDOMHTMLInputElementValueAsNumber val = constructObjectPropertyDouble "value-as-number" val - -data DOMHTMLInputElementValueAsNumberPropertyInfo -instance AttrInfo DOMHTMLInputElementValueAsNumberPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementValueAsNumberPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementValueAsNumberPropertyInfo = (~) Double - type AttrBaseTypeConstraint DOMHTMLInputElementValueAsNumberPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementValueAsNumberPropertyInfo = Double - type AttrLabel DOMHTMLInputElementValueAsNumberPropertyInfo = "DOMHTMLInputElement::value-as-number" - attrGet _ = getDOMHTMLInputElementValueAsNumber - attrSet _ = setDOMHTMLInputElementValueAsNumber - attrConstruct _ = constructDOMHTMLInputElementValueAsNumber - --- VVV Prop "webkit-grammar" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementWebkitGrammar :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementWebkitGrammar obj = liftIO $ getObjectPropertyBool obj "webkit-grammar" - -setDOMHTMLInputElementWebkitGrammar :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementWebkitGrammar obj val = liftIO $ setObjectPropertyBool obj "webkit-grammar" val - -constructDOMHTMLInputElementWebkitGrammar :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementWebkitGrammar val = constructObjectPropertyBool "webkit-grammar" val - -data DOMHTMLInputElementWebkitGrammarPropertyInfo -instance AttrInfo DOMHTMLInputElementWebkitGrammarPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementWebkitGrammarPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementWebkitGrammarPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementWebkitGrammarPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementWebkitGrammarPropertyInfo = Bool - type AttrLabel DOMHTMLInputElementWebkitGrammarPropertyInfo = "DOMHTMLInputElement::webkit-grammar" - attrGet _ = getDOMHTMLInputElementWebkitGrammar - attrSet _ = setDOMHTMLInputElementWebkitGrammar - attrConstruct _ = constructDOMHTMLInputElementWebkitGrammar - --- VVV Prop "webkit-speech" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementWebkitSpeech :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementWebkitSpeech obj = liftIO $ getObjectPropertyBool obj "webkit-speech" - -setDOMHTMLInputElementWebkitSpeech :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementWebkitSpeech obj val = liftIO $ setObjectPropertyBool obj "webkit-speech" val - -constructDOMHTMLInputElementWebkitSpeech :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementWebkitSpeech val = constructObjectPropertyBool "webkit-speech" val - -data DOMHTMLInputElementWebkitSpeechPropertyInfo -instance AttrInfo DOMHTMLInputElementWebkitSpeechPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementWebkitSpeechPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementWebkitSpeechPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementWebkitSpeechPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementWebkitSpeechPropertyInfo = Bool - type AttrLabel DOMHTMLInputElementWebkitSpeechPropertyInfo = "DOMHTMLInputElement::webkit-speech" - attrGet _ = getDOMHTMLInputElementWebkitSpeech - attrSet _ = setDOMHTMLInputElementWebkitSpeech - attrConstruct _ = constructDOMHTMLInputElementWebkitSpeech - --- VVV Prop "webkitdirectory" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementWebkitdirectory :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementWebkitdirectory obj = liftIO $ getObjectPropertyBool obj "webkitdirectory" - -setDOMHTMLInputElementWebkitdirectory :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () -setDOMHTMLInputElementWebkitdirectory obj val = liftIO $ setObjectPropertyBool obj "webkitdirectory" val - -constructDOMHTMLInputElementWebkitdirectory :: Bool -> IO ([Char], GValue) -constructDOMHTMLInputElementWebkitdirectory val = constructObjectPropertyBool "webkitdirectory" val - -data DOMHTMLInputElementWebkitdirectoryPropertyInfo -instance AttrInfo DOMHTMLInputElementWebkitdirectoryPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementWebkitdirectoryPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementWebkitdirectoryPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLInputElementWebkitdirectoryPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementWebkitdirectoryPropertyInfo = Bool - type AttrLabel DOMHTMLInputElementWebkitdirectoryPropertyInfo = "DOMHTMLInputElement::webkitdirectory" - attrGet _ = getDOMHTMLInputElementWebkitdirectory - attrSet _ = setDOMHTMLInputElementWebkitdirectory - attrConstruct _ = constructDOMHTMLInputElementWebkitdirectory - --- VVV Prop "width" - -- Type: TBasicType TUInt64 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLInputElementWidth :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Word64 -getDOMHTMLInputElementWidth obj = liftIO $ getObjectPropertyUInt64 obj "width" - -setDOMHTMLInputElementWidth :: (MonadIO m, DOMHTMLInputElementK o) => o -> Word64 -> m () -setDOMHTMLInputElementWidth obj val = liftIO $ setObjectPropertyUInt64 obj "width" val - -constructDOMHTMLInputElementWidth :: Word64 -> IO ([Char], GValue) -constructDOMHTMLInputElementWidth val = constructObjectPropertyUInt64 "width" val - -data DOMHTMLInputElementWidthPropertyInfo -instance AttrInfo DOMHTMLInputElementWidthPropertyInfo where - type AttrAllowedOps DOMHTMLInputElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementWidthPropertyInfo = (~) Word64 - type AttrBaseTypeConstraint DOMHTMLInputElementWidthPropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementWidthPropertyInfo = Word64 - type AttrLabel DOMHTMLInputElementWidthPropertyInfo = "DOMHTMLInputElement::width" - attrGet _ = getDOMHTMLInputElementWidth - attrSet _ = setDOMHTMLInputElementWidth - attrConstruct _ = constructDOMHTMLInputElementWidth - --- VVV Prop "will-validate" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMHTMLInputElementWillValidate :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool -getDOMHTMLInputElementWillValidate obj = liftIO $ getObjectPropertyBool obj "will-validate" - -data DOMHTMLInputElementWillValidatePropertyInfo -instance AttrInfo DOMHTMLInputElementWillValidatePropertyInfo where - type AttrAllowedOps DOMHTMLInputElementWillValidatePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLInputElementWillValidatePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLInputElementWillValidatePropertyInfo = DOMHTMLInputElementK - type AttrGetType DOMHTMLInputElementWillValidatePropertyInfo = Bool - type AttrLabel DOMHTMLInputElementWillValidatePropertyInfo = "DOMHTMLInputElement::will-validate" - attrGet _ = getDOMHTMLInputElementWillValidate - attrSet _ = undefined - attrConstruct _ = undefined - -type instance AttributeList DOMHTMLInputElement = DOMHTMLInputElementAttributeList -type DOMHTMLInputElementAttributeList = ('[ '("accept", DOMHTMLInputElementAcceptPropertyInfo), '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLInputElementAlignPropertyInfo), '("alt", DOMHTMLInputElementAltPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autocapitalize", DOMHTMLInputElementAutocapitalizePropertyInfo), '("autocomplete", DOMHTMLInputElementAutocompletePropertyInfo), '("autocorrect", DOMHTMLInputElementAutocorrectPropertyInfo), '("autofocus", DOMHTMLInputElementAutofocusPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("capture", DOMHTMLInputElementCapturePropertyInfo), '("checked", DOMHTMLInputElementCheckedPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("default-checked", DOMHTMLInputElementDefaultCheckedPropertyInfo), '("default-value", DOMHTMLInputElementDefaultValuePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("dir-name", DOMHTMLInputElementDirNamePropertyInfo), '("disabled", DOMHTMLInputElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("files", DOMHTMLInputElementFilesPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLInputElementFormPropertyInfo), '("form-action", DOMHTMLInputElementFormActionPropertyInfo), '("form-enctype", DOMHTMLInputElementFormEnctypePropertyInfo), '("form-method", DOMHTMLInputElementFormMethodPropertyInfo), '("form-no-validate", DOMHTMLInputElementFormNoValidatePropertyInfo), '("form-target", DOMHTMLInputElementFormTargetPropertyInfo), '("height", DOMHTMLInputElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("incremental", DOMHTMLInputElementIncrementalPropertyInfo), '("indeterminate", DOMHTMLInputElementIndeterminatePropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLInputElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("list", DOMHTMLInputElementListPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("max", DOMHTMLInputElementMaxPropertyInfo), '("max-length", DOMHTMLInputElementMaxLengthPropertyInfo), '("min", DOMHTMLInputElementMinPropertyInfo), '("multiple", DOMHTMLInputElementMultiplePropertyInfo), '("name", DOMHTMLInputElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("pattern", DOMHTMLInputElementPatternPropertyInfo), '("placeholder", DOMHTMLInputElementPlaceholderPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("read-only", DOMHTMLInputElementReadOnlyPropertyInfo), '("required", DOMHTMLInputElementRequiredPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLInputElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLInputElementSrcPropertyInfo), '("step", DOMHTMLInputElementStepPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLInputElementTypePropertyInfo), '("use-map", DOMHTMLInputElementUseMapPropertyInfo), '("validation-message", DOMHTMLInputElementValidationMessagePropertyInfo), '("validity", DOMHTMLInputElementValidityPropertyInfo), '("value", DOMHTMLInputElementValuePropertyInfo), '("value-as-number", DOMHTMLInputElementValueAsNumberPropertyInfo), '("webkit-grammar", DOMHTMLInputElementWebkitGrammarPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkit-speech", DOMHTMLInputElementWebkitSpeechPropertyInfo), '("webkitdirectory", DOMHTMLInputElementWebkitdirectoryPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLInputElementWidthPropertyInfo), '("will-validate", DOMHTMLInputElementWillValidatePropertyInfo)] :: [(Symbol, *)]) - -type instance SignalList DOMHTMLInputElement = DOMHTMLInputElementSignalList -type DOMHTMLInputElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) - --- method DOMHTMLInputElement::check_validity --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_check_validity" webkit_dom_html_input_element_check_validity :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementCheckValidity :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementCheckValidity _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_check_validity _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_accept --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_accept" webkit_dom_html_input_element_get_accept :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetAccept :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetAccept _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_accept _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_accept" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_align --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_align" webkit_dom_html_input_element_get_align :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetAlign :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetAlign _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_align _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_align" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_alt --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_alt" webkit_dom_html_input_element_get_alt :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetAlt :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetAlt _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_alt _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_alt" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_autocapitalize --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_autocapitalize" webkit_dom_html_input_element_get_autocapitalize :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetAutocapitalize :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetAutocapitalize _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_autocapitalize _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_autocapitalize" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_autocomplete --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_autocomplete" webkit_dom_html_input_element_get_autocomplete :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetAutocomplete :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetAutocomplete _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_autocomplete _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_autocomplete" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_autocorrect --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_autocorrect" webkit_dom_html_input_element_get_autocorrect :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetAutocorrect :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetAutocorrect _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_autocorrect _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_autofocus --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_autofocus" webkit_dom_html_input_element_get_autofocus :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetAutofocus :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetAutofocus _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_autofocus _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_capture --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_capture" webkit_dom_html_input_element_get_capture :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetCapture :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetCapture _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_capture _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_capture" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_checked --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_checked" webkit_dom_html_input_element_get_checked :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetChecked :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetChecked _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_checked _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_default_checked --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_default_checked" webkit_dom_html_input_element_get_default_checked :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetDefaultChecked :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetDefaultChecked _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_default_checked _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_default_value --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_default_value" webkit_dom_html_input_element_get_default_value :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetDefaultValue :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetDefaultValue _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_default_value _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_default_value" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_dir_name --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_dir_name" webkit_dom_html_input_element_get_dir_name :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetDirName :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetDirName _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_dir_name _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_dir_name" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_disabled --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_disabled" webkit_dom_html_input_element_get_disabled :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetDisabled :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetDisabled _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_disabled _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_files --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMFileList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_files" webkit_dom_html_input_element_get_files :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO (Ptr DOMFileList) - - -dOMHTMLInputElementGetFiles :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m DOMFileList -dOMHTMLInputElementGetFiles _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_files _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_files" result - result' <- (wrapObject DOMFileList) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_form --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMHTMLFormElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_form" webkit_dom_html_input_element_get_form :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO (Ptr DOMHTMLFormElement) - - -dOMHTMLInputElementGetForm :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m DOMHTMLFormElement -dOMHTMLInputElementGetForm _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_form _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_form" result - result' <- (newObject DOMHTMLFormElement) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_form_action --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_form_action" webkit_dom_html_input_element_get_form_action :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetFormAction :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetFormAction _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_form_action _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_form_action" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_form_enctype --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_form_enctype" webkit_dom_html_input_element_get_form_enctype :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetFormEnctype :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetFormEnctype _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_form_enctype _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_form_enctype" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_form_method --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_form_method" webkit_dom_html_input_element_get_form_method :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetFormMethod :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetFormMethod _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_form_method _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_form_method" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_form_no_validate --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_form_no_validate" webkit_dom_html_input_element_get_form_no_validate :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetFormNoValidate :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetFormNoValidate _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_form_no_validate _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_form_target --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_form_target" webkit_dom_html_input_element_get_form_target :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetFormTarget :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetFormTarget _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_form_target _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_form_target" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_height --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_height" webkit_dom_html_input_element_get_height :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO Word64 - - -dOMHTMLInputElementGetHeight :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Word64 -dOMHTMLInputElementGetHeight _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_height _obj' - touchManagedPtr _obj - return result - --- method DOMHTMLInputElement::get_incremental --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_incremental" webkit_dom_html_input_element_get_incremental :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetIncremental :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetIncremental _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_incremental _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_indeterminate --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_indeterminate" webkit_dom_html_input_element_get_indeterminate :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetIndeterminate :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetIndeterminate _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_indeterminate _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_labels --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMNodeList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_labels" webkit_dom_html_input_element_get_labels :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO (Ptr DOMNodeList) - - -dOMHTMLInputElementGetLabels :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m DOMNodeList -dOMHTMLInputElementGetLabels _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_labels _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_labels" result - result' <- (wrapObject DOMNodeList) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_list --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMHTMLElement" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_list" webkit_dom_html_input_element_get_list :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO (Ptr DOMHTMLElement) - - -dOMHTMLInputElementGetList :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m DOMHTMLElement -dOMHTMLInputElementGetList _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_list _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_list" result - result' <- (newObject DOMHTMLElement) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_max --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_max" webkit_dom_html_input_element_get_max :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetMax :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetMax _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_max _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_max" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_max_length --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_max_length" webkit_dom_html_input_element_get_max_length :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO Int64 - - -dOMHTMLInputElementGetMaxLength :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Int64 -dOMHTMLInputElementGetMaxLength _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_max_length _obj' - touchManagedPtr _obj - return result - --- method DOMHTMLInputElement::get_min --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_min" webkit_dom_html_input_element_get_min :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetMin :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetMin _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_min _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_min" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_multiple --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_multiple" webkit_dom_html_input_element_get_multiple :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetMultiple :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetMultiple _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_multiple _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_name --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_name" webkit_dom_html_input_element_get_name :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetName :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetName _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_name _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_name" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_pattern --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_pattern" webkit_dom_html_input_element_get_pattern :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetPattern :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetPattern _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_pattern _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_pattern" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_placeholder --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_placeholder" webkit_dom_html_input_element_get_placeholder :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetPlaceholder :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetPlaceholder _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_placeholder _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_placeholder" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_read_only --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_read_only" webkit_dom_html_input_element_get_read_only :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetReadOnly :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetReadOnly _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_read_only _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_required --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_required" webkit_dom_html_input_element_get_required :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetRequired :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetRequired _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_required _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_size --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_size" webkit_dom_html_input_element_get_size :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO Word64 - - -dOMHTMLInputElementGetSize :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Word64 -dOMHTMLInputElementGetSize _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_size _obj' - touchManagedPtr _obj - return result - --- method DOMHTMLInputElement::get_src --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_src" webkit_dom_html_input_element_get_src :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetSrc :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetSrc _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_src _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_src" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_step --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_step" webkit_dom_html_input_element_get_step :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetStep :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetStep _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_step _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_step" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_use_map --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_use_map" webkit_dom_html_input_element_get_use_map :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetUseMap :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetUseMap _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_use_map _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_use_map" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_validation_message --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_validation_message" webkit_dom_html_input_element_get_validation_message :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetValidationMessage :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetValidationMessage _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_validation_message _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_validation_message" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_validity --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMValidityState" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_validity" webkit_dom_html_input_element_get_validity :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO (Ptr DOMValidityState) - - -dOMHTMLInputElementGetValidity :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m DOMValidityState -dOMHTMLInputElementGetValidity _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_validity _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_validity" result - result' <- (wrapObject DOMValidityState) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_value --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_value" webkit_dom_html_input_element_get_value :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CString - - -dOMHTMLInputElementGetValue :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m T.Text -dOMHTMLInputElementGetValue _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_value _obj' - checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_value" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_value_as_number --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TDouble --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_value_as_number" webkit_dom_html_input_element_get_value_as_number :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CDouble - - -dOMHTMLInputElementGetValueAsNumber :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Double -dOMHTMLInputElementGetValueAsNumber _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_value_as_number _obj' - let result' = realToFrac result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_webkit_grammar --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_webkit_grammar" webkit_dom_html_input_element_get_webkit_grammar :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetWebkitGrammar :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetWebkitGrammar _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_webkit_grammar _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_webkit_speech --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_webkit_speech" webkit_dom_html_input_element_get_webkit_speech :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetWebkitSpeech :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetWebkitSpeech _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_webkit_speech _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_webkitdirectory --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_webkitdirectory" webkit_dom_html_input_element_get_webkitdirectory :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetWebkitdirectory :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetWebkitdirectory _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_webkitdirectory _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::get_width --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_width" webkit_dom_html_input_element_get_width :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO Word64 - - -dOMHTMLInputElementGetWidth :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Word64 -dOMHTMLInputElementGetWidth _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_width _obj' - touchManagedPtr _obj - return result - --- method DOMHTMLInputElement::get_will_validate --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_get_will_validate" webkit_dom_html_input_element_get_will_validate :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementGetWillValidate :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementGetWillValidate _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_get_will_validate _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::is_edited --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_is_edited" webkit_dom_html_input_element_is_edited :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO CInt - - -dOMHTMLInputElementIsEdited :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m Bool -dOMHTMLInputElementIsEdited _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_input_element_is_edited _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLInputElement::select --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_select" webkit_dom_html_input_element_select :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - IO () - - -dOMHTMLInputElementSelect :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - m () -dOMHTMLInputElementSelect _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_html_input_element_select _obj' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_accept --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_accept" webkit_dom_html_input_element_set_accept :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetAccept :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetAccept _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_accept _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_align --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_align" webkit_dom_html_input_element_set_align :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetAlign :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetAlign _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_align _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_alt --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_alt" webkit_dom_html_input_element_set_alt :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetAlt :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetAlt _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_alt _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_autocapitalize --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_autocapitalize" webkit_dom_html_input_element_set_autocapitalize :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetAutocapitalize :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetAutocapitalize _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_autocapitalize _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_autocomplete --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_autocomplete" webkit_dom_html_input_element_set_autocomplete :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetAutocomplete :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetAutocomplete _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_autocomplete _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_autocorrect --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_autocorrect" webkit_dom_html_input_element_set_autocorrect :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetAutocorrect :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetAutocorrect _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_autocorrect _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_autofocus --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_autofocus" webkit_dom_html_input_element_set_autofocus :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetAutofocus :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetAutofocus _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_autofocus _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_capture --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_capture" webkit_dom_html_input_element_set_capture :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetCapture :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetCapture _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_capture _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_checked --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_checked" webkit_dom_html_input_element_set_checked :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetChecked :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetChecked _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_checked _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_custom_validity --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_custom_validity" webkit_dom_html_input_element_set_custom_validity :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- error : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetCustomValidity :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- error - m () -dOMHTMLInputElementSetCustomValidity _obj error_ = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - error_' <- textToCString error_ - webkit_dom_html_input_element_set_custom_validity _obj' error_' - touchManagedPtr _obj - freeMem error_' - return () - --- method DOMHTMLInputElement::set_default_checked --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_default_checked" webkit_dom_html_input_element_set_default_checked :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetDefaultChecked :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetDefaultChecked _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_default_checked _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_default_value --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_default_value" webkit_dom_html_input_element_set_default_value :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetDefaultValue :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetDefaultValue _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_default_value _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_dir_name --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_dir_name" webkit_dom_html_input_element_set_dir_name :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetDirName :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetDirName _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_dir_name _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_disabled --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_disabled" webkit_dom_html_input_element_set_disabled :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetDisabled :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetDisabled _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_disabled _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_files --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMFileList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMFileList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_files" webkit_dom_html_input_element_set_files :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - Ptr DOMFileList -> -- value : TInterface "WebKit" "DOMFileList" - IO () - - -dOMHTMLInputElementSetFiles :: - (MonadIO m, DOMHTMLInputElementK a, DOMFileListK b) => - a -> -- _obj - b -> -- value - m () -dOMHTMLInputElementSetFiles _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = unsafeManagedPtrCastPtr value - webkit_dom_html_input_element_set_files _obj' value' - touchManagedPtr _obj - touchManagedPtr value - return () - --- method DOMHTMLInputElement::set_form_action --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_form_action" webkit_dom_html_input_element_set_form_action :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetFormAction :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetFormAction _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_form_action _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_form_enctype --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_form_enctype" webkit_dom_html_input_element_set_form_enctype :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetFormEnctype :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetFormEnctype _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_form_enctype _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_form_method --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_form_method" webkit_dom_html_input_element_set_form_method :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetFormMethod :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetFormMethod _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_form_method _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_form_no_validate --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_form_no_validate" webkit_dom_html_input_element_set_form_no_validate :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetFormNoValidate :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetFormNoValidate _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_form_no_validate _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_form_target --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_form_target" webkit_dom_html_input_element_set_form_target :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetFormTarget :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetFormTarget _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_form_target _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_height --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_height" webkit_dom_html_input_element_set_height :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - Word64 -> -- value : TBasicType TUInt64 - IO () - - -dOMHTMLInputElementSetHeight :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Word64 -> -- value - m () -dOMHTMLInputElementSetHeight _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_html_input_element_set_height _obj' value - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_incremental --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_incremental" webkit_dom_html_input_element_set_incremental :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetIncremental :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetIncremental _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_incremental _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_indeterminate --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_indeterminate" webkit_dom_html_input_element_set_indeterminate :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetIndeterminate :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetIndeterminate _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_indeterminate _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_max --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_max" webkit_dom_html_input_element_set_max :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetMax :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetMax _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_max _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_max_length --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_max_length" webkit_dom_html_input_element_set_max_length :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - Int64 -> -- value : TBasicType TInt64 - Ptr (Ptr GError) -> -- error - IO () - - -dOMHTMLInputElementSetMaxLength :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Int64 -> -- value - m () -dOMHTMLInputElementSetMaxLength _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - onException (do - propagateGError $ webkit_dom_html_input_element_set_max_length _obj' value - touchManagedPtr _obj - return () - ) (do - return () - ) - --- method DOMHTMLInputElement::set_min --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_min" webkit_dom_html_input_element_set_min :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetMin :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetMin _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_min _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_multiple --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_multiple" webkit_dom_html_input_element_set_multiple :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetMultiple :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetMultiple _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_multiple _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_name --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_name" webkit_dom_html_input_element_set_name :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetName :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetName _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_name _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_pattern --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_pattern" webkit_dom_html_input_element_set_pattern :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetPattern :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetPattern _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_pattern _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_placeholder --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_placeholder" webkit_dom_html_input_element_set_placeholder :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetPlaceholder :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetPlaceholder _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_placeholder _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_range_text --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "replacement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "start", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "end", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectionMode", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "replacement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "start", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "end", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectionMode", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_range_text" webkit_dom_html_input_element_set_range_text :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- replacement : TBasicType TUTF8 - Word64 -> -- start : TBasicType TUInt64 - Word64 -> -- end : TBasicType TUInt64 - CString -> -- selectionMode : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO () - - -dOMHTMLInputElementSetRangeText :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- replacement - Word64 -> -- start - Word64 -> -- end - T.Text -> -- selectionMode - m () -dOMHTMLInputElementSetRangeText _obj replacement start end selectionMode = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - replacement' <- textToCString replacement - selectionMode' <- textToCString selectionMode - onException (do - propagateGError $ webkit_dom_html_input_element_set_range_text _obj' replacement' start end selectionMode' - touchManagedPtr _obj - freeMem replacement' - freeMem selectionMode' - return () - ) (do - freeMem replacement' - freeMem selectionMode' - ) - --- method DOMHTMLInputElement::set_read_only --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_read_only" webkit_dom_html_input_element_set_read_only :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetReadOnly :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetReadOnly _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_read_only _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_required --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_required" webkit_dom_html_input_element_set_required :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetRequired :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetRequired _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_required _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_size --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_size" webkit_dom_html_input_element_set_size :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - Word64 -> -- value : TBasicType TUInt64 - Ptr (Ptr GError) -> -- error - IO () - - -dOMHTMLInputElementSetSize :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Word64 -> -- value - m () -dOMHTMLInputElementSetSize _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - onException (do - propagateGError $ webkit_dom_html_input_element_set_size _obj' value - touchManagedPtr _obj - return () - ) (do - return () - ) - --- method DOMHTMLInputElement::set_src --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_src" webkit_dom_html_input_element_set_src :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetSrc :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetSrc _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_src _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_step --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_step" webkit_dom_html_input_element_set_step :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetStep :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetStep _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_step _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_use_map --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_use_map" webkit_dom_html_input_element_set_use_map :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetUseMap :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetUseMap _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_use_map _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_value --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_value" webkit_dom_html_input_element_set_value :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetValue :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetValue _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_value _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_value_as_number --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_value_as_number" webkit_dom_html_input_element_set_value_as_number :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CDouble -> -- value : TBasicType TDouble - Ptr (Ptr GError) -> -- error - IO () - - -dOMHTMLInputElementSetValueAsNumber :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Double -> -- value - m () -dOMHTMLInputElementSetValueAsNumber _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = realToFrac value - onException (do - propagateGError $ webkit_dom_html_input_element_set_value_as_number _obj' value' - touchManagedPtr _obj - return () - ) (do - return () - ) - --- method DOMHTMLInputElement::set_value_for_user --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_value_for_user" webkit_dom_html_input_element_set_value_for_user :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLInputElementSetValueForUser :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLInputElementSetValueForUser _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_input_element_set_value_for_user _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLInputElement::set_webkit_grammar --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_webkit_grammar" webkit_dom_html_input_element_set_webkit_grammar :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetWebkitGrammar :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetWebkitGrammar _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_webkit_grammar _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_webkit_speech --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_webkit_speech" webkit_dom_html_input_element_set_webkit_speech :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetWebkitSpeech :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetWebkitSpeech _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_webkit_speech _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_webkitdirectory --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_webkitdirectory" webkit_dom_html_input_element_set_webkitdirectory :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLInputElementSetWebkitdirectory :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLInputElementSetWebkitdirectory _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_input_element_set_webkitdirectory _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::set_width --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_set_width" webkit_dom_html_input_element_set_width :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - Word64 -> -- value : TBasicType TUInt64 - IO () - - -dOMHTMLInputElementSetWidth :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Word64 -> -- value - m () -dOMHTMLInputElementSetWidth _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_html_input_element_set_width _obj' value - touchManagedPtr _obj - return () - --- method DOMHTMLInputElement::step_down --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "n", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "n", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_step_down" webkit_dom_html_input_element_step_down :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - Int64 -> -- n : TBasicType TInt64 - Ptr (Ptr GError) -> -- error - IO () - - -dOMHTMLInputElementStepDown :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Int64 -> -- n - m () -dOMHTMLInputElementStepDown _obj n = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - onException (do - propagateGError $ webkit_dom_html_input_element_step_down _obj' n - touchManagedPtr _obj - return () - ) (do - return () - ) - --- method DOMHTMLInputElement::step_up --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "n", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "n", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_html_input_element_step_up" webkit_dom_html_input_element_step_up :: - Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" - Int64 -> -- n : TBasicType TInt64 - Ptr (Ptr GError) -> -- error - IO () - - -dOMHTMLInputElementStepUp :: - (MonadIO m, DOMHTMLInputElementK a) => - a -> -- _obj - Int64 -> -- n - m () -dOMHTMLInputElementStepUp _obj n = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - onException (do - propagateGError $ webkit_dom_html_input_element_step_up _obj' n - touchManagedPtr _obj - return () - ) (do - return () - ) + +{- | +Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte +License : LGPL-2.1 +Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) +-} + +module GI.WebKit.Objects.DOMHTMLInputElement + ( + +-- * Exported types + DOMHTMLInputElement(..) , + DOMHTMLInputElementK , + toDOMHTMLInputElement , + noDOMHTMLInputElement , + + + -- * Methods +-- ** dOMHTMLInputElementCheckValidity + DOMHTMLInputElementCheckValidityMethodInfo, + dOMHTMLInputElementCheckValidity , + + +-- ** dOMHTMLInputElementGetAccept + DOMHTMLInputElementGetAcceptMethodInfo , + dOMHTMLInputElementGetAccept , + + +-- ** dOMHTMLInputElementGetAlign + DOMHTMLInputElementGetAlignMethodInfo , + dOMHTMLInputElementGetAlign , + + +-- ** dOMHTMLInputElementGetAlt + DOMHTMLInputElementGetAltMethodInfo , + dOMHTMLInputElementGetAlt , + + +-- ** dOMHTMLInputElementGetAutocapitalize + DOMHTMLInputElementGetAutocapitalizeMethodInfo, + dOMHTMLInputElementGetAutocapitalize , + + +-- ** dOMHTMLInputElementGetAutocomplete + DOMHTMLInputElementGetAutocompleteMethodInfo, + dOMHTMLInputElementGetAutocomplete , + + +-- ** dOMHTMLInputElementGetAutocorrect + DOMHTMLInputElementGetAutocorrectMethodInfo, + dOMHTMLInputElementGetAutocorrect , + + +-- ** dOMHTMLInputElementGetAutofocus + DOMHTMLInputElementGetAutofocusMethodInfo, + dOMHTMLInputElementGetAutofocus , + + +-- ** dOMHTMLInputElementGetCapture + DOMHTMLInputElementGetCaptureMethodInfo , + dOMHTMLInputElementGetCapture , + + +-- ** dOMHTMLInputElementGetChecked + DOMHTMLInputElementGetCheckedMethodInfo , + dOMHTMLInputElementGetChecked , + + +-- ** dOMHTMLInputElementGetDefaultChecked + DOMHTMLInputElementGetDefaultCheckedMethodInfo, + dOMHTMLInputElementGetDefaultChecked , + + +-- ** dOMHTMLInputElementGetDefaultValue + DOMHTMLInputElementGetDefaultValueMethodInfo, + dOMHTMLInputElementGetDefaultValue , + + +-- ** dOMHTMLInputElementGetDirName + DOMHTMLInputElementGetDirNameMethodInfo , + dOMHTMLInputElementGetDirName , + + +-- ** dOMHTMLInputElementGetDisabled + DOMHTMLInputElementGetDisabledMethodInfo, + dOMHTMLInputElementGetDisabled , + + +-- ** dOMHTMLInputElementGetFiles + DOMHTMLInputElementGetFilesMethodInfo , + dOMHTMLInputElementGetFiles , + + +-- ** dOMHTMLInputElementGetForm + DOMHTMLInputElementGetFormMethodInfo , + dOMHTMLInputElementGetForm , + + +-- ** dOMHTMLInputElementGetFormAction + DOMHTMLInputElementGetFormActionMethodInfo, + dOMHTMLInputElementGetFormAction , + + +-- ** dOMHTMLInputElementGetFormEnctype + DOMHTMLInputElementGetFormEnctypeMethodInfo, + dOMHTMLInputElementGetFormEnctype , + + +-- ** dOMHTMLInputElementGetFormMethod + DOMHTMLInputElementGetFormMethodMethodInfo, + dOMHTMLInputElementGetFormMethod , + + +-- ** dOMHTMLInputElementGetFormNoValidate + DOMHTMLInputElementGetFormNoValidateMethodInfo, + dOMHTMLInputElementGetFormNoValidate , + + +-- ** dOMHTMLInputElementGetFormTarget + DOMHTMLInputElementGetFormTargetMethodInfo, + dOMHTMLInputElementGetFormTarget , + + +-- ** dOMHTMLInputElementGetHeight + DOMHTMLInputElementGetHeightMethodInfo , + dOMHTMLInputElementGetHeight , + + +-- ** dOMHTMLInputElementGetIncremental + DOMHTMLInputElementGetIncrementalMethodInfo, + dOMHTMLInputElementGetIncremental , + + +-- ** dOMHTMLInputElementGetIndeterminate + DOMHTMLInputElementGetIndeterminateMethodInfo, + dOMHTMLInputElementGetIndeterminate , + + +-- ** dOMHTMLInputElementGetLabels + DOMHTMLInputElementGetLabelsMethodInfo , + dOMHTMLInputElementGetLabels , + + +-- ** dOMHTMLInputElementGetList + DOMHTMLInputElementGetListMethodInfo , + dOMHTMLInputElementGetList , + + +-- ** dOMHTMLInputElementGetMax + DOMHTMLInputElementGetMaxMethodInfo , + dOMHTMLInputElementGetMax , + + +-- ** dOMHTMLInputElementGetMaxLength + DOMHTMLInputElementGetMaxLengthMethodInfo, + dOMHTMLInputElementGetMaxLength , + + +-- ** dOMHTMLInputElementGetMin + DOMHTMLInputElementGetMinMethodInfo , + dOMHTMLInputElementGetMin , + + +-- ** dOMHTMLInputElementGetMultiple + DOMHTMLInputElementGetMultipleMethodInfo, + dOMHTMLInputElementGetMultiple , + + +-- ** dOMHTMLInputElementGetName + DOMHTMLInputElementGetNameMethodInfo , + dOMHTMLInputElementGetName , + + +-- ** dOMHTMLInputElementGetPattern + DOMHTMLInputElementGetPatternMethodInfo , + dOMHTMLInputElementGetPattern , + + +-- ** dOMHTMLInputElementGetPlaceholder + DOMHTMLInputElementGetPlaceholderMethodInfo, + dOMHTMLInputElementGetPlaceholder , + + +-- ** dOMHTMLInputElementGetReadOnly + DOMHTMLInputElementGetReadOnlyMethodInfo, + dOMHTMLInputElementGetReadOnly , + + +-- ** dOMHTMLInputElementGetRequired + DOMHTMLInputElementGetRequiredMethodInfo, + dOMHTMLInputElementGetRequired , + + +-- ** dOMHTMLInputElementGetSize + DOMHTMLInputElementGetSizeMethodInfo , + dOMHTMLInputElementGetSize , + + +-- ** dOMHTMLInputElementGetSrc + DOMHTMLInputElementGetSrcMethodInfo , + dOMHTMLInputElementGetSrc , + + +-- ** dOMHTMLInputElementGetStep + DOMHTMLInputElementGetStepMethodInfo , + dOMHTMLInputElementGetStep , + + +-- ** dOMHTMLInputElementGetUseMap + DOMHTMLInputElementGetUseMapMethodInfo , + dOMHTMLInputElementGetUseMap , + + +-- ** dOMHTMLInputElementGetValidationMessage + DOMHTMLInputElementGetValidationMessageMethodInfo, + dOMHTMLInputElementGetValidationMessage , + + +-- ** dOMHTMLInputElementGetValidity + DOMHTMLInputElementGetValidityMethodInfo, + dOMHTMLInputElementGetValidity , + + +-- ** dOMHTMLInputElementGetValue + DOMHTMLInputElementGetValueMethodInfo , + dOMHTMLInputElementGetValue , + + +-- ** dOMHTMLInputElementGetValueAsNumber + DOMHTMLInputElementGetValueAsNumberMethodInfo, + dOMHTMLInputElementGetValueAsNumber , + + +-- ** dOMHTMLInputElementGetWebkitGrammar + DOMHTMLInputElementGetWebkitGrammarMethodInfo, + dOMHTMLInputElementGetWebkitGrammar , + + +-- ** dOMHTMLInputElementGetWebkitSpeech + DOMHTMLInputElementGetWebkitSpeechMethodInfo, + dOMHTMLInputElementGetWebkitSpeech , + + +-- ** dOMHTMLInputElementGetWebkitdirectory + DOMHTMLInputElementGetWebkitdirectoryMethodInfo, + dOMHTMLInputElementGetWebkitdirectory , + + +-- ** dOMHTMLInputElementGetWidth + DOMHTMLInputElementGetWidthMethodInfo , + dOMHTMLInputElementGetWidth , + + +-- ** dOMHTMLInputElementGetWillValidate + DOMHTMLInputElementGetWillValidateMethodInfo, + dOMHTMLInputElementGetWillValidate , + + +-- ** dOMHTMLInputElementIsEdited + DOMHTMLInputElementIsEditedMethodInfo , + dOMHTMLInputElementIsEdited , + + +-- ** dOMHTMLInputElementSelect + DOMHTMLInputElementSelectMethodInfo , + dOMHTMLInputElementSelect , + + +-- ** dOMHTMLInputElementSetAccept + DOMHTMLInputElementSetAcceptMethodInfo , + dOMHTMLInputElementSetAccept , + + +-- ** dOMHTMLInputElementSetAlign + DOMHTMLInputElementSetAlignMethodInfo , + dOMHTMLInputElementSetAlign , + + +-- ** dOMHTMLInputElementSetAlt + DOMHTMLInputElementSetAltMethodInfo , + dOMHTMLInputElementSetAlt , + + +-- ** dOMHTMLInputElementSetAutocapitalize + DOMHTMLInputElementSetAutocapitalizeMethodInfo, + dOMHTMLInputElementSetAutocapitalize , + + +-- ** dOMHTMLInputElementSetAutocomplete + DOMHTMLInputElementSetAutocompleteMethodInfo, + dOMHTMLInputElementSetAutocomplete , + + +-- ** dOMHTMLInputElementSetAutocorrect + DOMHTMLInputElementSetAutocorrectMethodInfo, + dOMHTMLInputElementSetAutocorrect , + + +-- ** dOMHTMLInputElementSetAutofocus + DOMHTMLInputElementSetAutofocusMethodInfo, + dOMHTMLInputElementSetAutofocus , + + +-- ** dOMHTMLInputElementSetCapture + DOMHTMLInputElementSetCaptureMethodInfo , + dOMHTMLInputElementSetCapture , + + +-- ** dOMHTMLInputElementSetChecked + DOMHTMLInputElementSetCheckedMethodInfo , + dOMHTMLInputElementSetChecked , + + +-- ** dOMHTMLInputElementSetCustomValidity + DOMHTMLInputElementSetCustomValidityMethodInfo, + dOMHTMLInputElementSetCustomValidity , + + +-- ** dOMHTMLInputElementSetDefaultChecked + DOMHTMLInputElementSetDefaultCheckedMethodInfo, + dOMHTMLInputElementSetDefaultChecked , + + +-- ** dOMHTMLInputElementSetDefaultValue + DOMHTMLInputElementSetDefaultValueMethodInfo, + dOMHTMLInputElementSetDefaultValue , + + +-- ** dOMHTMLInputElementSetDirName + DOMHTMLInputElementSetDirNameMethodInfo , + dOMHTMLInputElementSetDirName , + + +-- ** dOMHTMLInputElementSetDisabled + DOMHTMLInputElementSetDisabledMethodInfo, + dOMHTMLInputElementSetDisabled , + + +-- ** dOMHTMLInputElementSetFiles + DOMHTMLInputElementSetFilesMethodInfo , + dOMHTMLInputElementSetFiles , + + +-- ** dOMHTMLInputElementSetFormAction + DOMHTMLInputElementSetFormActionMethodInfo, + dOMHTMLInputElementSetFormAction , + + +-- ** dOMHTMLInputElementSetFormEnctype + DOMHTMLInputElementSetFormEnctypeMethodInfo, + dOMHTMLInputElementSetFormEnctype , + + +-- ** dOMHTMLInputElementSetFormMethod + DOMHTMLInputElementSetFormMethodMethodInfo, + dOMHTMLInputElementSetFormMethod , + + +-- ** dOMHTMLInputElementSetFormNoValidate + DOMHTMLInputElementSetFormNoValidateMethodInfo, + dOMHTMLInputElementSetFormNoValidate , + + +-- ** dOMHTMLInputElementSetFormTarget + DOMHTMLInputElementSetFormTargetMethodInfo, + dOMHTMLInputElementSetFormTarget , + + +-- ** dOMHTMLInputElementSetHeight + DOMHTMLInputElementSetHeightMethodInfo , + dOMHTMLInputElementSetHeight , + + +-- ** dOMHTMLInputElementSetIncremental + DOMHTMLInputElementSetIncrementalMethodInfo, + dOMHTMLInputElementSetIncremental , + + +-- ** dOMHTMLInputElementSetIndeterminate + DOMHTMLInputElementSetIndeterminateMethodInfo, + dOMHTMLInputElementSetIndeterminate , + + +-- ** dOMHTMLInputElementSetMax + DOMHTMLInputElementSetMaxMethodInfo , + dOMHTMLInputElementSetMax , + + +-- ** dOMHTMLInputElementSetMaxLength + DOMHTMLInputElementSetMaxLengthMethodInfo, + dOMHTMLInputElementSetMaxLength , + + +-- ** dOMHTMLInputElementSetMin + DOMHTMLInputElementSetMinMethodInfo , + dOMHTMLInputElementSetMin , + + +-- ** dOMHTMLInputElementSetMultiple + DOMHTMLInputElementSetMultipleMethodInfo, + dOMHTMLInputElementSetMultiple , + + +-- ** dOMHTMLInputElementSetName + DOMHTMLInputElementSetNameMethodInfo , + dOMHTMLInputElementSetName , + + +-- ** dOMHTMLInputElementSetPattern + DOMHTMLInputElementSetPatternMethodInfo , + dOMHTMLInputElementSetPattern , + + +-- ** dOMHTMLInputElementSetPlaceholder + DOMHTMLInputElementSetPlaceholderMethodInfo, + dOMHTMLInputElementSetPlaceholder , + + +-- ** dOMHTMLInputElementSetRangeText + DOMHTMLInputElementSetRangeTextMethodInfo, + dOMHTMLInputElementSetRangeText , + + +-- ** dOMHTMLInputElementSetReadOnly + DOMHTMLInputElementSetReadOnlyMethodInfo, + dOMHTMLInputElementSetReadOnly , + + +-- ** dOMHTMLInputElementSetRequired + DOMHTMLInputElementSetRequiredMethodInfo, + dOMHTMLInputElementSetRequired , + + +-- ** dOMHTMLInputElementSetSize + DOMHTMLInputElementSetSizeMethodInfo , + dOMHTMLInputElementSetSize , + + +-- ** dOMHTMLInputElementSetSrc + DOMHTMLInputElementSetSrcMethodInfo , + dOMHTMLInputElementSetSrc , + + +-- ** dOMHTMLInputElementSetStep + DOMHTMLInputElementSetStepMethodInfo , + dOMHTMLInputElementSetStep , + + +-- ** dOMHTMLInputElementSetUseMap + DOMHTMLInputElementSetUseMapMethodInfo , + dOMHTMLInputElementSetUseMap , + + +-- ** dOMHTMLInputElementSetValue + DOMHTMLInputElementSetValueMethodInfo , + dOMHTMLInputElementSetValue , + + +-- ** dOMHTMLInputElementSetValueAsNumber + DOMHTMLInputElementSetValueAsNumberMethodInfo, + dOMHTMLInputElementSetValueAsNumber , + + +-- ** dOMHTMLInputElementSetValueForUser + DOMHTMLInputElementSetValueForUserMethodInfo, + dOMHTMLInputElementSetValueForUser , + + +-- ** dOMHTMLInputElementSetWebkitGrammar + DOMHTMLInputElementSetWebkitGrammarMethodInfo, + dOMHTMLInputElementSetWebkitGrammar , + + +-- ** dOMHTMLInputElementSetWebkitSpeech + DOMHTMLInputElementSetWebkitSpeechMethodInfo, + dOMHTMLInputElementSetWebkitSpeech , + + +-- ** dOMHTMLInputElementSetWebkitdirectory + DOMHTMLInputElementSetWebkitdirectoryMethodInfo, + dOMHTMLInputElementSetWebkitdirectory , + + +-- ** dOMHTMLInputElementSetWidth + DOMHTMLInputElementSetWidthMethodInfo , + dOMHTMLInputElementSetWidth , + + +-- ** dOMHTMLInputElementStepDown + DOMHTMLInputElementStepDownMethodInfo , + dOMHTMLInputElementStepDown , + + +-- ** dOMHTMLInputElementStepUp + DOMHTMLInputElementStepUpMethodInfo , + dOMHTMLInputElementStepUp , + + + + + -- * Properties +-- ** Accept + DOMHTMLInputElementAcceptPropertyInfo , + constructDOMHTMLInputElementAccept , + getDOMHTMLInputElementAccept , + setDOMHTMLInputElementAccept , + + +-- ** Align + DOMHTMLInputElementAlignPropertyInfo , + constructDOMHTMLInputElementAlign , + getDOMHTMLInputElementAlign , + setDOMHTMLInputElementAlign , + + +-- ** Alt + DOMHTMLInputElementAltPropertyInfo , + constructDOMHTMLInputElementAlt , + getDOMHTMLInputElementAlt , + setDOMHTMLInputElementAlt , + + +-- ** Autocapitalize + DOMHTMLInputElementAutocapitalizePropertyInfo, + constructDOMHTMLInputElementAutocapitalize, + getDOMHTMLInputElementAutocapitalize , + setDOMHTMLInputElementAutocapitalize , + + +-- ** Autocomplete + DOMHTMLInputElementAutocompletePropertyInfo, + constructDOMHTMLInputElementAutocomplete, + getDOMHTMLInputElementAutocomplete , + setDOMHTMLInputElementAutocomplete , + + +-- ** Autocorrect + DOMHTMLInputElementAutocorrectPropertyInfo, + constructDOMHTMLInputElementAutocorrect , + getDOMHTMLInputElementAutocorrect , + setDOMHTMLInputElementAutocorrect , + + +-- ** Autofocus + DOMHTMLInputElementAutofocusPropertyInfo, + constructDOMHTMLInputElementAutofocus , + getDOMHTMLInputElementAutofocus , + setDOMHTMLInputElementAutofocus , + + +-- ** Capture + DOMHTMLInputElementCapturePropertyInfo , + constructDOMHTMLInputElementCapture , + getDOMHTMLInputElementCapture , + setDOMHTMLInputElementCapture , + + +-- ** Checked + DOMHTMLInputElementCheckedPropertyInfo , + constructDOMHTMLInputElementChecked , + getDOMHTMLInputElementChecked , + setDOMHTMLInputElementChecked , + + +-- ** DefaultChecked + DOMHTMLInputElementDefaultCheckedPropertyInfo, + constructDOMHTMLInputElementDefaultChecked, + getDOMHTMLInputElementDefaultChecked , + setDOMHTMLInputElementDefaultChecked , + + +-- ** DefaultValue + DOMHTMLInputElementDefaultValuePropertyInfo, + constructDOMHTMLInputElementDefaultValue, + getDOMHTMLInputElementDefaultValue , + setDOMHTMLInputElementDefaultValue , + + +-- ** DirName + DOMHTMLInputElementDirNamePropertyInfo , + constructDOMHTMLInputElementDirName , + getDOMHTMLInputElementDirName , + setDOMHTMLInputElementDirName , + + +-- ** Disabled + DOMHTMLInputElementDisabledPropertyInfo , + constructDOMHTMLInputElementDisabled , + getDOMHTMLInputElementDisabled , + setDOMHTMLInputElementDisabled , + + +-- ** Files + DOMHTMLInputElementFilesPropertyInfo , + getDOMHTMLInputElementFiles , + + +-- ** Form + DOMHTMLInputElementFormPropertyInfo , + getDOMHTMLInputElementForm , + + +-- ** FormAction + DOMHTMLInputElementFormActionPropertyInfo, + constructDOMHTMLInputElementFormAction , + getDOMHTMLInputElementFormAction , + setDOMHTMLInputElementFormAction , + + +-- ** FormEnctype + DOMHTMLInputElementFormEnctypePropertyInfo, + constructDOMHTMLInputElementFormEnctype , + getDOMHTMLInputElementFormEnctype , + setDOMHTMLInputElementFormEnctype , + + +-- ** FormMethod + DOMHTMLInputElementFormMethodPropertyInfo, + constructDOMHTMLInputElementFormMethod , + getDOMHTMLInputElementFormMethod , + setDOMHTMLInputElementFormMethod , + + +-- ** FormNoValidate + DOMHTMLInputElementFormNoValidatePropertyInfo, + constructDOMHTMLInputElementFormNoValidate, + getDOMHTMLInputElementFormNoValidate , + setDOMHTMLInputElementFormNoValidate , + + +-- ** FormTarget + DOMHTMLInputElementFormTargetPropertyInfo, + constructDOMHTMLInputElementFormTarget , + getDOMHTMLInputElementFormTarget , + setDOMHTMLInputElementFormTarget , + + +-- ** Height + DOMHTMLInputElementHeightPropertyInfo , + constructDOMHTMLInputElementHeight , + getDOMHTMLInputElementHeight , + setDOMHTMLInputElementHeight , + + +-- ** Incremental + DOMHTMLInputElementIncrementalPropertyInfo, + constructDOMHTMLInputElementIncremental , + getDOMHTMLInputElementIncremental , + setDOMHTMLInputElementIncremental , + + +-- ** Indeterminate + DOMHTMLInputElementIndeterminatePropertyInfo, + constructDOMHTMLInputElementIndeterminate, + getDOMHTMLInputElementIndeterminate , + setDOMHTMLInputElementIndeterminate , + + +-- ** Labels + DOMHTMLInputElementLabelsPropertyInfo , + getDOMHTMLInputElementLabels , + + +-- ** List + DOMHTMLInputElementListPropertyInfo , + getDOMHTMLInputElementList , + + +-- ** Max + DOMHTMLInputElementMaxPropertyInfo , + constructDOMHTMLInputElementMax , + getDOMHTMLInputElementMax , + setDOMHTMLInputElementMax , + + +-- ** MaxLength + DOMHTMLInputElementMaxLengthPropertyInfo, + constructDOMHTMLInputElementMaxLength , + getDOMHTMLInputElementMaxLength , + setDOMHTMLInputElementMaxLength , + + +-- ** Min + DOMHTMLInputElementMinPropertyInfo , + constructDOMHTMLInputElementMin , + getDOMHTMLInputElementMin , + setDOMHTMLInputElementMin , + + +-- ** Multiple + DOMHTMLInputElementMultiplePropertyInfo , + constructDOMHTMLInputElementMultiple , + getDOMHTMLInputElementMultiple , + setDOMHTMLInputElementMultiple , + + +-- ** Name + DOMHTMLInputElementNamePropertyInfo , + constructDOMHTMLInputElementName , + getDOMHTMLInputElementName , + setDOMHTMLInputElementName , + + +-- ** Pattern + DOMHTMLInputElementPatternPropertyInfo , + constructDOMHTMLInputElementPattern , + getDOMHTMLInputElementPattern , + setDOMHTMLInputElementPattern , + + +-- ** Placeholder + DOMHTMLInputElementPlaceholderPropertyInfo, + constructDOMHTMLInputElementPlaceholder , + getDOMHTMLInputElementPlaceholder , + setDOMHTMLInputElementPlaceholder , + + +-- ** ReadOnly + DOMHTMLInputElementReadOnlyPropertyInfo , + constructDOMHTMLInputElementReadOnly , + getDOMHTMLInputElementReadOnly , + setDOMHTMLInputElementReadOnly , + + +-- ** Required + DOMHTMLInputElementRequiredPropertyInfo , + constructDOMHTMLInputElementRequired , + getDOMHTMLInputElementRequired , + setDOMHTMLInputElementRequired , + + +-- ** Size + DOMHTMLInputElementSizePropertyInfo , + constructDOMHTMLInputElementSize , + getDOMHTMLInputElementSize , + setDOMHTMLInputElementSize , + + +-- ** Src + DOMHTMLInputElementSrcPropertyInfo , + constructDOMHTMLInputElementSrc , + getDOMHTMLInputElementSrc , + setDOMHTMLInputElementSrc , + + +-- ** Step + DOMHTMLInputElementStepPropertyInfo , + constructDOMHTMLInputElementStep , + getDOMHTMLInputElementStep , + setDOMHTMLInputElementStep , + + +-- ** Type + DOMHTMLInputElementTypePropertyInfo , + constructDOMHTMLInputElementType , + getDOMHTMLInputElementType , + setDOMHTMLInputElementType , + + +-- ** UseMap + DOMHTMLInputElementUseMapPropertyInfo , + constructDOMHTMLInputElementUseMap , + getDOMHTMLInputElementUseMap , + setDOMHTMLInputElementUseMap , + + +-- ** ValidationMessage + DOMHTMLInputElementValidationMessagePropertyInfo, + getDOMHTMLInputElementValidationMessage , + + +-- ** Validity + DOMHTMLInputElementValidityPropertyInfo , + getDOMHTMLInputElementValidity , + + +-- ** Value + DOMHTMLInputElementValuePropertyInfo , + constructDOMHTMLInputElementValue , + getDOMHTMLInputElementValue , + setDOMHTMLInputElementValue , + + +-- ** ValueAsNumber + DOMHTMLInputElementValueAsNumberPropertyInfo, + constructDOMHTMLInputElementValueAsNumber, + getDOMHTMLInputElementValueAsNumber , + setDOMHTMLInputElementValueAsNumber , + + +-- ** WebkitGrammar + DOMHTMLInputElementWebkitGrammarPropertyInfo, + constructDOMHTMLInputElementWebkitGrammar, + getDOMHTMLInputElementWebkitGrammar , + setDOMHTMLInputElementWebkitGrammar , + + +-- ** WebkitSpeech + DOMHTMLInputElementWebkitSpeechPropertyInfo, + constructDOMHTMLInputElementWebkitSpeech, + getDOMHTMLInputElementWebkitSpeech , + setDOMHTMLInputElementWebkitSpeech , + + +-- ** Webkitdirectory + DOMHTMLInputElementWebkitdirectoryPropertyInfo, + constructDOMHTMLInputElementWebkitdirectory, + getDOMHTMLInputElementWebkitdirectory , + setDOMHTMLInputElementWebkitdirectory , + + +-- ** Width + DOMHTMLInputElementWidthPropertyInfo , + constructDOMHTMLInputElementWidth , + getDOMHTMLInputElementWidth , + setDOMHTMLInputElementWidth , + + +-- ** WillValidate + DOMHTMLInputElementWillValidatePropertyInfo, + getDOMHTMLInputElementWillValidate , + + + + + ) where + +import Prelude () +import Data.GI.Base.ShortPrelude + +import qualified Data.Text as T +import qualified Data.ByteString.Char8 as B +import qualified Data.Map as Map + +import GI.WebKit.Types +import GI.WebKit.Callbacks +import qualified GI.GObject as GObject + +newtype DOMHTMLInputElement = DOMHTMLInputElement (ForeignPtr DOMHTMLInputElement) +foreign import ccall "webkit_dom_html_input_element_get_type" + c_webkit_dom_html_input_element_get_type :: IO GType + +type instance ParentTypes DOMHTMLInputElement = DOMHTMLInputElementParentTypes +type DOMHTMLInputElementParentTypes = '[DOMHTMLElement, DOMElement, DOMNode, DOMObject, GObject.Object, DOMEventTarget] + +instance GObject DOMHTMLInputElement where + gobjectIsInitiallyUnowned _ = False + gobjectType _ = c_webkit_dom_html_input_element_get_type + + +class GObject o => DOMHTMLInputElementK o +instance (GObject o, IsDescendantOf DOMHTMLInputElement o) => DOMHTMLInputElementK o + +toDOMHTMLInputElement :: DOMHTMLInputElementK o => o -> IO DOMHTMLInputElement +toDOMHTMLInputElement = unsafeCastTo DOMHTMLInputElement + +noDOMHTMLInputElement :: Maybe DOMHTMLInputElement +noDOMHTMLInputElement = Nothing + +type family ResolveDOMHTMLInputElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLInputElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLInputElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLInputElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLInputElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLInputElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLInputElementMethod "checkValidity" o = DOMHTMLInputElementCheckValidityMethodInfo + ResolveDOMHTMLInputElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLInputElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLInputElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLInputElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLInputElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLInputElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLInputElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLInputElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLInputElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLInputElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLInputElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLInputElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLInputElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLInputElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLInputElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLInputElementMethod "isEdited" o = DOMHTMLInputElementIsEditedMethodInfo + ResolveDOMHTMLInputElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLInputElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLInputElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLInputElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLInputElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLInputElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLInputElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLInputElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLInputElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLInputElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLInputElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLInputElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLInputElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLInputElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLInputElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLInputElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLInputElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLInputElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLInputElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLInputElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLInputElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLInputElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLInputElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLInputElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLInputElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLInputElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLInputElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLInputElementMethod "select" o = DOMHTMLInputElementSelectMethodInfo + ResolveDOMHTMLInputElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLInputElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLInputElementMethod "stepDown" o = DOMHTMLInputElementStepDownMethodInfo + ResolveDOMHTMLInputElementMethod "stepUp" o = DOMHTMLInputElementStepUpMethodInfo + ResolveDOMHTMLInputElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLInputElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLInputElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLInputElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLInputElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLInputElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLInputElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLInputElementMethod "getAccept" o = DOMHTMLInputElementGetAcceptMethodInfo + ResolveDOMHTMLInputElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLInputElementMethod "getAlign" o = DOMHTMLInputElementGetAlignMethodInfo + ResolveDOMHTMLInputElementMethod "getAlt" o = DOMHTMLInputElementGetAltMethodInfo + ResolveDOMHTMLInputElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLInputElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLInputElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLInputElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLInputElementMethod "getAutocapitalize" o = DOMHTMLInputElementGetAutocapitalizeMethodInfo + ResolveDOMHTMLInputElementMethod "getAutocomplete" o = DOMHTMLInputElementGetAutocompleteMethodInfo + ResolveDOMHTMLInputElementMethod "getAutocorrect" o = DOMHTMLInputElementGetAutocorrectMethodInfo + ResolveDOMHTMLInputElementMethod "getAutofocus" o = DOMHTMLInputElementGetAutofocusMethodInfo + ResolveDOMHTMLInputElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLInputElementMethod "getCapture" o = DOMHTMLInputElementGetCaptureMethodInfo + ResolveDOMHTMLInputElementMethod "getChecked" o = DOMHTMLInputElementGetCheckedMethodInfo + ResolveDOMHTMLInputElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLInputElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLInputElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLInputElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLInputElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLInputElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLInputElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLInputElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLInputElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLInputElementMethod "getDefaultChecked" o = DOMHTMLInputElementGetDefaultCheckedMethodInfo + ResolveDOMHTMLInputElementMethod "getDefaultValue" o = DOMHTMLInputElementGetDefaultValueMethodInfo + ResolveDOMHTMLInputElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLInputElementMethod "getDirName" o = DOMHTMLInputElementGetDirNameMethodInfo + ResolveDOMHTMLInputElementMethod "getDisabled" o = DOMHTMLInputElementGetDisabledMethodInfo + ResolveDOMHTMLInputElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLInputElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLInputElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLInputElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLInputElementMethod "getFiles" o = DOMHTMLInputElementGetFilesMethodInfo + ResolveDOMHTMLInputElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLInputElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLInputElementMethod "getForm" o = DOMHTMLInputElementGetFormMethodInfo + ResolveDOMHTMLInputElementMethod "getFormAction" o = DOMHTMLInputElementGetFormActionMethodInfo + ResolveDOMHTMLInputElementMethod "getFormEnctype" o = DOMHTMLInputElementGetFormEnctypeMethodInfo + ResolveDOMHTMLInputElementMethod "getFormMethod" o = DOMHTMLInputElementGetFormMethodMethodInfo + ResolveDOMHTMLInputElementMethod "getFormNoValidate" o = DOMHTMLInputElementGetFormNoValidateMethodInfo + ResolveDOMHTMLInputElementMethod "getFormTarget" o = DOMHTMLInputElementGetFormTargetMethodInfo + ResolveDOMHTMLInputElementMethod "getHeight" o = DOMHTMLInputElementGetHeightMethodInfo + ResolveDOMHTMLInputElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLInputElementMethod "getIncremental" o = DOMHTMLInputElementGetIncrementalMethodInfo + ResolveDOMHTMLInputElementMethod "getIndeterminate" o = DOMHTMLInputElementGetIndeterminateMethodInfo + ResolveDOMHTMLInputElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLInputElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLInputElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLInputElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLInputElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLInputElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLInputElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLInputElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLInputElementMethod "getLabels" o = DOMHTMLInputElementGetLabelsMethodInfo + ResolveDOMHTMLInputElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLInputElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLInputElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLInputElementMethod "getList" o = DOMHTMLInputElementGetListMethodInfo + ResolveDOMHTMLInputElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLInputElementMethod "getMax" o = DOMHTMLInputElementGetMaxMethodInfo + ResolveDOMHTMLInputElementMethod "getMaxLength" o = DOMHTMLInputElementGetMaxLengthMethodInfo + ResolveDOMHTMLInputElementMethod "getMin" o = DOMHTMLInputElementGetMinMethodInfo + ResolveDOMHTMLInputElementMethod "getMultiple" o = DOMHTMLInputElementGetMultipleMethodInfo + ResolveDOMHTMLInputElementMethod "getName" o = DOMHTMLInputElementGetNameMethodInfo + ResolveDOMHTMLInputElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLInputElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLInputElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLInputElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLInputElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLInputElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLInputElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLInputElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLInputElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLInputElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLInputElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLInputElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLInputElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLInputElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLInputElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLInputElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLInputElementMethod "getPattern" o = DOMHTMLInputElementGetPatternMethodInfo + ResolveDOMHTMLInputElementMethod "getPlaceholder" o = DOMHTMLInputElementGetPlaceholderMethodInfo + ResolveDOMHTMLInputElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLInputElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLInputElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLInputElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLInputElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLInputElementMethod "getReadOnly" o = DOMHTMLInputElementGetReadOnlyMethodInfo + ResolveDOMHTMLInputElementMethod "getRequired" o = DOMHTMLInputElementGetRequiredMethodInfo + ResolveDOMHTMLInputElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLInputElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLInputElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLInputElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLInputElementMethod "getSize" o = DOMHTMLInputElementGetSizeMethodInfo + ResolveDOMHTMLInputElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLInputElementMethod "getSrc" o = DOMHTMLInputElementGetSrcMethodInfo + ResolveDOMHTMLInputElementMethod "getStep" o = DOMHTMLInputElementGetStepMethodInfo + ResolveDOMHTMLInputElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLInputElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLInputElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLInputElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLInputElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLInputElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLInputElementMethod "getUseMap" o = DOMHTMLInputElementGetUseMapMethodInfo + ResolveDOMHTMLInputElementMethod "getValidationMessage" o = DOMHTMLInputElementGetValidationMessageMethodInfo + ResolveDOMHTMLInputElementMethod "getValidity" o = DOMHTMLInputElementGetValidityMethodInfo + ResolveDOMHTMLInputElementMethod "getValue" o = DOMHTMLInputElementGetValueMethodInfo + ResolveDOMHTMLInputElementMethod "getValueAsNumber" o = DOMHTMLInputElementGetValueAsNumberMethodInfo + ResolveDOMHTMLInputElementMethod "getWebkitGrammar" o = DOMHTMLInputElementGetWebkitGrammarMethodInfo + ResolveDOMHTMLInputElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLInputElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLInputElementMethod "getWebkitSpeech" o = DOMHTMLInputElementGetWebkitSpeechMethodInfo + ResolveDOMHTMLInputElementMethod "getWebkitdirectory" o = DOMHTMLInputElementGetWebkitdirectoryMethodInfo + ResolveDOMHTMLInputElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLInputElementMethod "getWidth" o = DOMHTMLInputElementGetWidthMethodInfo + ResolveDOMHTMLInputElementMethod "getWillValidate" o = DOMHTMLInputElementGetWillValidateMethodInfo + ResolveDOMHTMLInputElementMethod "setAccept" o = DOMHTMLInputElementSetAcceptMethodInfo + ResolveDOMHTMLInputElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLInputElementMethod "setAlign" o = DOMHTMLInputElementSetAlignMethodInfo + ResolveDOMHTMLInputElementMethod "setAlt" o = DOMHTMLInputElementSetAltMethodInfo + ResolveDOMHTMLInputElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLInputElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLInputElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLInputElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLInputElementMethod "setAutocapitalize" o = DOMHTMLInputElementSetAutocapitalizeMethodInfo + ResolveDOMHTMLInputElementMethod "setAutocomplete" o = DOMHTMLInputElementSetAutocompleteMethodInfo + ResolveDOMHTMLInputElementMethod "setAutocorrect" o = DOMHTMLInputElementSetAutocorrectMethodInfo + ResolveDOMHTMLInputElementMethod "setAutofocus" o = DOMHTMLInputElementSetAutofocusMethodInfo + ResolveDOMHTMLInputElementMethod "setCapture" o = DOMHTMLInputElementSetCaptureMethodInfo + ResolveDOMHTMLInputElementMethod "setChecked" o = DOMHTMLInputElementSetCheckedMethodInfo + ResolveDOMHTMLInputElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLInputElementMethod "setCustomValidity" o = DOMHTMLInputElementSetCustomValidityMethodInfo + ResolveDOMHTMLInputElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLInputElementMethod "setDefaultChecked" o = DOMHTMLInputElementSetDefaultCheckedMethodInfo + ResolveDOMHTMLInputElementMethod "setDefaultValue" o = DOMHTMLInputElementSetDefaultValueMethodInfo + ResolveDOMHTMLInputElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLInputElementMethod "setDirName" o = DOMHTMLInputElementSetDirNameMethodInfo + ResolveDOMHTMLInputElementMethod "setDisabled" o = DOMHTMLInputElementSetDisabledMethodInfo + ResolveDOMHTMLInputElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLInputElementMethod "setFiles" o = DOMHTMLInputElementSetFilesMethodInfo + ResolveDOMHTMLInputElementMethod "setFormAction" o = DOMHTMLInputElementSetFormActionMethodInfo + ResolveDOMHTMLInputElementMethod "setFormEnctype" o = DOMHTMLInputElementSetFormEnctypeMethodInfo + ResolveDOMHTMLInputElementMethod "setFormMethod" o = DOMHTMLInputElementSetFormMethodMethodInfo + ResolveDOMHTMLInputElementMethod "setFormNoValidate" o = DOMHTMLInputElementSetFormNoValidateMethodInfo + ResolveDOMHTMLInputElementMethod "setFormTarget" o = DOMHTMLInputElementSetFormTargetMethodInfo + ResolveDOMHTMLInputElementMethod "setHeight" o = DOMHTMLInputElementSetHeightMethodInfo + ResolveDOMHTMLInputElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLInputElementMethod "setIncremental" o = DOMHTMLInputElementSetIncrementalMethodInfo + ResolveDOMHTMLInputElementMethod "setIndeterminate" o = DOMHTMLInputElementSetIndeterminateMethodInfo + ResolveDOMHTMLInputElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLInputElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLInputElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLInputElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLInputElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLInputElementMethod "setMax" o = DOMHTMLInputElementSetMaxMethodInfo + ResolveDOMHTMLInputElementMethod "setMaxLength" o = DOMHTMLInputElementSetMaxLengthMethodInfo + ResolveDOMHTMLInputElementMethod "setMin" o = DOMHTMLInputElementSetMinMethodInfo + ResolveDOMHTMLInputElementMethod "setMultiple" o = DOMHTMLInputElementSetMultipleMethodInfo + ResolveDOMHTMLInputElementMethod "setName" o = DOMHTMLInputElementSetNameMethodInfo + ResolveDOMHTMLInputElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLInputElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLInputElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLInputElementMethod "setPattern" o = DOMHTMLInputElementSetPatternMethodInfo + ResolveDOMHTMLInputElementMethod "setPlaceholder" o = DOMHTMLInputElementSetPlaceholderMethodInfo + ResolveDOMHTMLInputElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLInputElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLInputElementMethod "setRangeText" o = DOMHTMLInputElementSetRangeTextMethodInfo + ResolveDOMHTMLInputElementMethod "setReadOnly" o = DOMHTMLInputElementSetReadOnlyMethodInfo + ResolveDOMHTMLInputElementMethod "setRequired" o = DOMHTMLInputElementSetRequiredMethodInfo + ResolveDOMHTMLInputElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLInputElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLInputElementMethod "setSize" o = DOMHTMLInputElementSetSizeMethodInfo + ResolveDOMHTMLInputElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLInputElementMethod "setSrc" o = DOMHTMLInputElementSetSrcMethodInfo + ResolveDOMHTMLInputElementMethod "setStep" o = DOMHTMLInputElementSetStepMethodInfo + ResolveDOMHTMLInputElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLInputElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLInputElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLInputElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLInputElementMethod "setUseMap" o = DOMHTMLInputElementSetUseMapMethodInfo + ResolveDOMHTMLInputElementMethod "setValue" o = DOMHTMLInputElementSetValueMethodInfo + ResolveDOMHTMLInputElementMethod "setValueAsNumber" o = DOMHTMLInputElementSetValueAsNumberMethodInfo + ResolveDOMHTMLInputElementMethod "setValueForUser" o = DOMHTMLInputElementSetValueForUserMethodInfo + ResolveDOMHTMLInputElementMethod "setWebkitGrammar" o = DOMHTMLInputElementSetWebkitGrammarMethodInfo + ResolveDOMHTMLInputElementMethod "setWebkitSpeech" o = DOMHTMLInputElementSetWebkitSpeechMethodInfo + ResolveDOMHTMLInputElementMethod "setWebkitdirectory" o = DOMHTMLInputElementSetWebkitdirectoryMethodInfo + ResolveDOMHTMLInputElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLInputElementMethod "setWidth" o = DOMHTMLInputElementSetWidthMethodInfo + ResolveDOMHTMLInputElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLInputElementMethod t DOMHTMLInputElement, MethodInfo info DOMHTMLInputElement p) => IsLabelProxy t (DOMHTMLInputElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLInputElementMethod t DOMHTMLInputElement, MethodInfo info DOMHTMLInputElement p) => IsLabel t (DOMHTMLInputElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + +-- VVV Prop "accept" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementAccept :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementAccept obj = liftIO $ getObjectPropertyString obj "accept" + +setDOMHTMLInputElementAccept :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementAccept obj val = liftIO $ setObjectPropertyString obj "accept" val + +constructDOMHTMLInputElementAccept :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementAccept val = constructObjectPropertyString "accept" val + +data DOMHTMLInputElementAcceptPropertyInfo +instance AttrInfo DOMHTMLInputElementAcceptPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementAcceptPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementAcceptPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementAcceptPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementAcceptPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementAcceptPropertyInfo = "accept" + attrGet _ = getDOMHTMLInputElementAccept + attrSet _ = setDOMHTMLInputElementAccept + attrConstruct _ = constructDOMHTMLInputElementAccept + +-- VVV Prop "align" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementAlign :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementAlign obj = liftIO $ getObjectPropertyString obj "align" + +setDOMHTMLInputElementAlign :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementAlign obj val = liftIO $ setObjectPropertyString obj "align" val + +constructDOMHTMLInputElementAlign :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementAlign val = constructObjectPropertyString "align" val + +data DOMHTMLInputElementAlignPropertyInfo +instance AttrInfo DOMHTMLInputElementAlignPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementAlignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementAlignPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementAlignPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementAlignPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementAlignPropertyInfo = "align" + attrGet _ = getDOMHTMLInputElementAlign + attrSet _ = setDOMHTMLInputElementAlign + attrConstruct _ = constructDOMHTMLInputElementAlign + +-- VVV Prop "alt" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementAlt :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementAlt obj = liftIO $ getObjectPropertyString obj "alt" + +setDOMHTMLInputElementAlt :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementAlt obj val = liftIO $ setObjectPropertyString obj "alt" val + +constructDOMHTMLInputElementAlt :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementAlt val = constructObjectPropertyString "alt" val + +data DOMHTMLInputElementAltPropertyInfo +instance AttrInfo DOMHTMLInputElementAltPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementAltPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementAltPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementAltPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementAltPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementAltPropertyInfo = "alt" + attrGet _ = getDOMHTMLInputElementAlt + attrSet _ = setDOMHTMLInputElementAlt + attrConstruct _ = constructDOMHTMLInputElementAlt + +-- VVV Prop "autocapitalize" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementAutocapitalize :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementAutocapitalize obj = liftIO $ getObjectPropertyString obj "autocapitalize" + +setDOMHTMLInputElementAutocapitalize :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementAutocapitalize obj val = liftIO $ setObjectPropertyString obj "autocapitalize" val + +constructDOMHTMLInputElementAutocapitalize :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementAutocapitalize val = constructObjectPropertyString "autocapitalize" val + +data DOMHTMLInputElementAutocapitalizePropertyInfo +instance AttrInfo DOMHTMLInputElementAutocapitalizePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementAutocapitalizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementAutocapitalizePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementAutocapitalizePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementAutocapitalizePropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementAutocapitalizePropertyInfo = "autocapitalize" + attrGet _ = getDOMHTMLInputElementAutocapitalize + attrSet _ = setDOMHTMLInputElementAutocapitalize + attrConstruct _ = constructDOMHTMLInputElementAutocapitalize + +-- VVV Prop "autocomplete" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementAutocomplete :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementAutocomplete obj = liftIO $ getObjectPropertyString obj "autocomplete" + +setDOMHTMLInputElementAutocomplete :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementAutocomplete obj val = liftIO $ setObjectPropertyString obj "autocomplete" val + +constructDOMHTMLInputElementAutocomplete :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementAutocomplete val = constructObjectPropertyString "autocomplete" val + +data DOMHTMLInputElementAutocompletePropertyInfo +instance AttrInfo DOMHTMLInputElementAutocompletePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementAutocompletePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementAutocompletePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementAutocompletePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementAutocompletePropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementAutocompletePropertyInfo = "autocomplete" + attrGet _ = getDOMHTMLInputElementAutocomplete + attrSet _ = setDOMHTMLInputElementAutocomplete + attrConstruct _ = constructDOMHTMLInputElementAutocomplete + +-- VVV Prop "autocorrect" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementAutocorrect :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementAutocorrect obj = liftIO $ getObjectPropertyBool obj "autocorrect" + +setDOMHTMLInputElementAutocorrect :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementAutocorrect obj val = liftIO $ setObjectPropertyBool obj "autocorrect" val + +constructDOMHTMLInputElementAutocorrect :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementAutocorrect val = constructObjectPropertyBool "autocorrect" val + +data DOMHTMLInputElementAutocorrectPropertyInfo +instance AttrInfo DOMHTMLInputElementAutocorrectPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementAutocorrectPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementAutocorrectPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementAutocorrectPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementAutocorrectPropertyInfo = Bool + type AttrLabel DOMHTMLInputElementAutocorrectPropertyInfo = "autocorrect" + attrGet _ = getDOMHTMLInputElementAutocorrect + attrSet _ = setDOMHTMLInputElementAutocorrect + attrConstruct _ = constructDOMHTMLInputElementAutocorrect + +-- VVV Prop "autofocus" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementAutofocus :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementAutofocus obj = liftIO $ getObjectPropertyBool obj "autofocus" + +setDOMHTMLInputElementAutofocus :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementAutofocus obj val = liftIO $ setObjectPropertyBool obj "autofocus" val + +constructDOMHTMLInputElementAutofocus :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementAutofocus val = constructObjectPropertyBool "autofocus" val + +data DOMHTMLInputElementAutofocusPropertyInfo +instance AttrInfo DOMHTMLInputElementAutofocusPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementAutofocusPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementAutofocusPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementAutofocusPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementAutofocusPropertyInfo = Bool + type AttrLabel DOMHTMLInputElementAutofocusPropertyInfo = "autofocus" + attrGet _ = getDOMHTMLInputElementAutofocus + attrSet _ = setDOMHTMLInputElementAutofocus + attrConstruct _ = constructDOMHTMLInputElementAutofocus + +-- VVV Prop "capture" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementCapture :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementCapture obj = liftIO $ getObjectPropertyString obj "capture" + +setDOMHTMLInputElementCapture :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementCapture obj val = liftIO $ setObjectPropertyString obj "capture" val + +constructDOMHTMLInputElementCapture :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementCapture val = constructObjectPropertyString "capture" val + +data DOMHTMLInputElementCapturePropertyInfo +instance AttrInfo DOMHTMLInputElementCapturePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementCapturePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementCapturePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementCapturePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementCapturePropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementCapturePropertyInfo = "capture" + attrGet _ = getDOMHTMLInputElementCapture + attrSet _ = setDOMHTMLInputElementCapture + attrConstruct _ = constructDOMHTMLInputElementCapture + +-- VVV Prop "checked" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementChecked obj = liftIO $ getObjectPropertyBool obj "checked" + +setDOMHTMLInputElementChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementChecked obj val = liftIO $ setObjectPropertyBool obj "checked" val + +constructDOMHTMLInputElementChecked :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementChecked val = constructObjectPropertyBool "checked" val + +data DOMHTMLInputElementCheckedPropertyInfo +instance AttrInfo DOMHTMLInputElementCheckedPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementCheckedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementCheckedPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementCheckedPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementCheckedPropertyInfo = Bool + type AttrLabel DOMHTMLInputElementCheckedPropertyInfo = "checked" + attrGet _ = getDOMHTMLInputElementChecked + attrSet _ = setDOMHTMLInputElementChecked + attrConstruct _ = constructDOMHTMLInputElementChecked + +-- VVV Prop "default-checked" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementDefaultChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementDefaultChecked obj = liftIO $ getObjectPropertyBool obj "default-checked" + +setDOMHTMLInputElementDefaultChecked :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementDefaultChecked obj val = liftIO $ setObjectPropertyBool obj "default-checked" val + +constructDOMHTMLInputElementDefaultChecked :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementDefaultChecked val = constructObjectPropertyBool "default-checked" val + +data DOMHTMLInputElementDefaultCheckedPropertyInfo +instance AttrInfo DOMHTMLInputElementDefaultCheckedPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementDefaultCheckedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementDefaultCheckedPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementDefaultCheckedPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementDefaultCheckedPropertyInfo = Bool + type AttrLabel DOMHTMLInputElementDefaultCheckedPropertyInfo = "default-checked" + attrGet _ = getDOMHTMLInputElementDefaultChecked + attrSet _ = setDOMHTMLInputElementDefaultChecked + attrConstruct _ = constructDOMHTMLInputElementDefaultChecked + +-- VVV Prop "default-value" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementDefaultValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementDefaultValue obj = liftIO $ getObjectPropertyString obj "default-value" + +setDOMHTMLInputElementDefaultValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementDefaultValue obj val = liftIO $ setObjectPropertyString obj "default-value" val + +constructDOMHTMLInputElementDefaultValue :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementDefaultValue val = constructObjectPropertyString "default-value" val + +data DOMHTMLInputElementDefaultValuePropertyInfo +instance AttrInfo DOMHTMLInputElementDefaultValuePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementDefaultValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementDefaultValuePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementDefaultValuePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementDefaultValuePropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementDefaultValuePropertyInfo = "default-value" + attrGet _ = getDOMHTMLInputElementDefaultValue + attrSet _ = setDOMHTMLInputElementDefaultValue + attrConstruct _ = constructDOMHTMLInputElementDefaultValue + +-- VVV Prop "dir-name" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementDirName :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementDirName obj = liftIO $ getObjectPropertyString obj "dir-name" + +setDOMHTMLInputElementDirName :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementDirName obj val = liftIO $ setObjectPropertyString obj "dir-name" val + +constructDOMHTMLInputElementDirName :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementDirName val = constructObjectPropertyString "dir-name" val + +data DOMHTMLInputElementDirNamePropertyInfo +instance AttrInfo DOMHTMLInputElementDirNamePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementDirNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementDirNamePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementDirNamePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementDirNamePropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementDirNamePropertyInfo = "dir-name" + attrGet _ = getDOMHTMLInputElementDirName + attrSet _ = setDOMHTMLInputElementDirName + attrConstruct _ = constructDOMHTMLInputElementDirName + +-- VVV Prop "disabled" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementDisabled :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementDisabled obj = liftIO $ getObjectPropertyBool obj "disabled" + +setDOMHTMLInputElementDisabled :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementDisabled obj val = liftIO $ setObjectPropertyBool obj "disabled" val + +constructDOMHTMLInputElementDisabled :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementDisabled val = constructObjectPropertyBool "disabled" val + +data DOMHTMLInputElementDisabledPropertyInfo +instance AttrInfo DOMHTMLInputElementDisabledPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementDisabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementDisabledPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementDisabledPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementDisabledPropertyInfo = Bool + type AttrLabel DOMHTMLInputElementDisabledPropertyInfo = "disabled" + attrGet _ = getDOMHTMLInputElementDisabled + attrSet _ = setDOMHTMLInputElementDisabled + attrConstruct _ = constructDOMHTMLInputElementDisabled + +-- VVV Prop "files" + -- Type: TInterface "WebKit" "DOMFileList" + -- Flags: [PropertyReadable] + +getDOMHTMLInputElementFiles :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMFileList +getDOMHTMLInputElementFiles obj = liftIO $ getObjectPropertyObject obj "files" DOMFileList + +data DOMHTMLInputElementFilesPropertyInfo +instance AttrInfo DOMHTMLInputElementFilesPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementFilesPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementFilesPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLInputElementFilesPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementFilesPropertyInfo = DOMFileList + type AttrLabel DOMHTMLInputElementFilesPropertyInfo = "files" + attrGet _ = getDOMHTMLInputElementFiles + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "form" + -- Type: TInterface "WebKit" "DOMHTMLFormElement" + -- Flags: [PropertyReadable] + +getDOMHTMLInputElementForm :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMHTMLFormElement +getDOMHTMLInputElementForm obj = liftIO $ getObjectPropertyObject obj "form" DOMHTMLFormElement + +data DOMHTMLInputElementFormPropertyInfo +instance AttrInfo DOMHTMLInputElementFormPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementFormPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementFormPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLInputElementFormPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementFormPropertyInfo = DOMHTMLFormElement + type AttrLabel DOMHTMLInputElementFormPropertyInfo = "form" + attrGet _ = getDOMHTMLInputElementForm + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "form-action" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementFormAction :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementFormAction obj = liftIO $ getObjectPropertyString obj "form-action" + +setDOMHTMLInputElementFormAction :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementFormAction obj val = liftIO $ setObjectPropertyString obj "form-action" val + +constructDOMHTMLInputElementFormAction :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementFormAction val = constructObjectPropertyString "form-action" val + +data DOMHTMLInputElementFormActionPropertyInfo +instance AttrInfo DOMHTMLInputElementFormActionPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementFormActionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementFormActionPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementFormActionPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementFormActionPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementFormActionPropertyInfo = "form-action" + attrGet _ = getDOMHTMLInputElementFormAction + attrSet _ = setDOMHTMLInputElementFormAction + attrConstruct _ = constructDOMHTMLInputElementFormAction + +-- VVV Prop "form-enctype" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementFormEnctype :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementFormEnctype obj = liftIO $ getObjectPropertyString obj "form-enctype" + +setDOMHTMLInputElementFormEnctype :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementFormEnctype obj val = liftIO $ setObjectPropertyString obj "form-enctype" val + +constructDOMHTMLInputElementFormEnctype :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementFormEnctype val = constructObjectPropertyString "form-enctype" val + +data DOMHTMLInputElementFormEnctypePropertyInfo +instance AttrInfo DOMHTMLInputElementFormEnctypePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementFormEnctypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementFormEnctypePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementFormEnctypePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementFormEnctypePropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementFormEnctypePropertyInfo = "form-enctype" + attrGet _ = getDOMHTMLInputElementFormEnctype + attrSet _ = setDOMHTMLInputElementFormEnctype + attrConstruct _ = constructDOMHTMLInputElementFormEnctype + +-- VVV Prop "form-method" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementFormMethod :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementFormMethod obj = liftIO $ getObjectPropertyString obj "form-method" + +setDOMHTMLInputElementFormMethod :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementFormMethod obj val = liftIO $ setObjectPropertyString obj "form-method" val + +constructDOMHTMLInputElementFormMethod :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementFormMethod val = constructObjectPropertyString "form-method" val + +data DOMHTMLInputElementFormMethodPropertyInfo +instance AttrInfo DOMHTMLInputElementFormMethodPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementFormMethodPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementFormMethodPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementFormMethodPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementFormMethodPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementFormMethodPropertyInfo = "form-method" + attrGet _ = getDOMHTMLInputElementFormMethod + attrSet _ = setDOMHTMLInputElementFormMethod + attrConstruct _ = constructDOMHTMLInputElementFormMethod + +-- VVV Prop "form-no-validate" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementFormNoValidate :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementFormNoValidate obj = liftIO $ getObjectPropertyBool obj "form-no-validate" + +setDOMHTMLInputElementFormNoValidate :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementFormNoValidate obj val = liftIO $ setObjectPropertyBool obj "form-no-validate" val + +constructDOMHTMLInputElementFormNoValidate :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementFormNoValidate val = constructObjectPropertyBool "form-no-validate" val + +data DOMHTMLInputElementFormNoValidatePropertyInfo +instance AttrInfo DOMHTMLInputElementFormNoValidatePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementFormNoValidatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementFormNoValidatePropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementFormNoValidatePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementFormNoValidatePropertyInfo = Bool + type AttrLabel DOMHTMLInputElementFormNoValidatePropertyInfo = "form-no-validate" + attrGet _ = getDOMHTMLInputElementFormNoValidate + attrSet _ = setDOMHTMLInputElementFormNoValidate + attrConstruct _ = constructDOMHTMLInputElementFormNoValidate + +-- VVV Prop "form-target" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementFormTarget :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementFormTarget obj = liftIO $ getObjectPropertyString obj "form-target" + +setDOMHTMLInputElementFormTarget :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementFormTarget obj val = liftIO $ setObjectPropertyString obj "form-target" val + +constructDOMHTMLInputElementFormTarget :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementFormTarget val = constructObjectPropertyString "form-target" val + +data DOMHTMLInputElementFormTargetPropertyInfo +instance AttrInfo DOMHTMLInputElementFormTargetPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementFormTargetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementFormTargetPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementFormTargetPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementFormTargetPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementFormTargetPropertyInfo = "form-target" + attrGet _ = getDOMHTMLInputElementFormTarget + attrSet _ = setDOMHTMLInputElementFormTarget + attrConstruct _ = constructDOMHTMLInputElementFormTarget + +-- VVV Prop "height" + -- Type: TBasicType TUInt64 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementHeight :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Word64 +getDOMHTMLInputElementHeight obj = liftIO $ getObjectPropertyUInt64 obj "height" + +setDOMHTMLInputElementHeight :: (MonadIO m, DOMHTMLInputElementK o) => o -> Word64 -> m () +setDOMHTMLInputElementHeight obj val = liftIO $ setObjectPropertyUInt64 obj "height" val + +constructDOMHTMLInputElementHeight :: Word64 -> IO ([Char], GValue) +constructDOMHTMLInputElementHeight val = constructObjectPropertyUInt64 "height" val + +data DOMHTMLInputElementHeightPropertyInfo +instance AttrInfo DOMHTMLInputElementHeightPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementHeightPropertyInfo = (~) Word64 + type AttrBaseTypeConstraint DOMHTMLInputElementHeightPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementHeightPropertyInfo = Word64 + type AttrLabel DOMHTMLInputElementHeightPropertyInfo = "height" + attrGet _ = getDOMHTMLInputElementHeight + attrSet _ = setDOMHTMLInputElementHeight + attrConstruct _ = constructDOMHTMLInputElementHeight + +-- VVV Prop "incremental" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementIncremental :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementIncremental obj = liftIO $ getObjectPropertyBool obj "incremental" + +setDOMHTMLInputElementIncremental :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementIncremental obj val = liftIO $ setObjectPropertyBool obj "incremental" val + +constructDOMHTMLInputElementIncremental :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementIncremental val = constructObjectPropertyBool "incremental" val + +data DOMHTMLInputElementIncrementalPropertyInfo +instance AttrInfo DOMHTMLInputElementIncrementalPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementIncrementalPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementIncrementalPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementIncrementalPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementIncrementalPropertyInfo = Bool + type AttrLabel DOMHTMLInputElementIncrementalPropertyInfo = "incremental" + attrGet _ = getDOMHTMLInputElementIncremental + attrSet _ = setDOMHTMLInputElementIncremental + attrConstruct _ = constructDOMHTMLInputElementIncremental + +-- VVV Prop "indeterminate" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementIndeterminate :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementIndeterminate obj = liftIO $ getObjectPropertyBool obj "indeterminate" + +setDOMHTMLInputElementIndeterminate :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementIndeterminate obj val = liftIO $ setObjectPropertyBool obj "indeterminate" val + +constructDOMHTMLInputElementIndeterminate :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementIndeterminate val = constructObjectPropertyBool "indeterminate" val + +data DOMHTMLInputElementIndeterminatePropertyInfo +instance AttrInfo DOMHTMLInputElementIndeterminatePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementIndeterminatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementIndeterminatePropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementIndeterminatePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementIndeterminatePropertyInfo = Bool + type AttrLabel DOMHTMLInputElementIndeterminatePropertyInfo = "indeterminate" + attrGet _ = getDOMHTMLInputElementIndeterminate + attrSet _ = setDOMHTMLInputElementIndeterminate + attrConstruct _ = constructDOMHTMLInputElementIndeterminate + +-- VVV Prop "labels" + -- Type: TInterface "WebKit" "DOMNodeList" + -- Flags: [PropertyReadable] + +getDOMHTMLInputElementLabels :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMNodeList +getDOMHTMLInputElementLabels obj = liftIO $ getObjectPropertyObject obj "labels" DOMNodeList + +data DOMHTMLInputElementLabelsPropertyInfo +instance AttrInfo DOMHTMLInputElementLabelsPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementLabelsPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementLabelsPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLInputElementLabelsPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementLabelsPropertyInfo = DOMNodeList + type AttrLabel DOMHTMLInputElementLabelsPropertyInfo = "labels" + attrGet _ = getDOMHTMLInputElementLabels + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "list" + -- Type: TInterface "WebKit" "DOMHTMLElement" + -- Flags: [PropertyReadable] + +getDOMHTMLInputElementList :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMHTMLElement +getDOMHTMLInputElementList obj = liftIO $ getObjectPropertyObject obj "list" DOMHTMLElement + +data DOMHTMLInputElementListPropertyInfo +instance AttrInfo DOMHTMLInputElementListPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementListPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementListPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLInputElementListPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementListPropertyInfo = DOMHTMLElement + type AttrLabel DOMHTMLInputElementListPropertyInfo = "list" + attrGet _ = getDOMHTMLInputElementList + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "max" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementMax :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementMax obj = liftIO $ getObjectPropertyString obj "max" + +setDOMHTMLInputElementMax :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementMax obj val = liftIO $ setObjectPropertyString obj "max" val + +constructDOMHTMLInputElementMax :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementMax val = constructObjectPropertyString "max" val + +data DOMHTMLInputElementMaxPropertyInfo +instance AttrInfo DOMHTMLInputElementMaxPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementMaxPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementMaxPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementMaxPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementMaxPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementMaxPropertyInfo = "max" + attrGet _ = getDOMHTMLInputElementMax + attrSet _ = setDOMHTMLInputElementMax + attrConstruct _ = constructDOMHTMLInputElementMax + +-- VVV Prop "max-length" + -- Type: TBasicType TInt64 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementMaxLength :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Int64 +getDOMHTMLInputElementMaxLength obj = liftIO $ getObjectPropertyInt64 obj "max-length" + +setDOMHTMLInputElementMaxLength :: (MonadIO m, DOMHTMLInputElementK o) => o -> Int64 -> m () +setDOMHTMLInputElementMaxLength obj val = liftIO $ setObjectPropertyInt64 obj "max-length" val + +constructDOMHTMLInputElementMaxLength :: Int64 -> IO ([Char], GValue) +constructDOMHTMLInputElementMaxLength val = constructObjectPropertyInt64 "max-length" val + +data DOMHTMLInputElementMaxLengthPropertyInfo +instance AttrInfo DOMHTMLInputElementMaxLengthPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementMaxLengthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementMaxLengthPropertyInfo = (~) Int64 + type AttrBaseTypeConstraint DOMHTMLInputElementMaxLengthPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementMaxLengthPropertyInfo = Int64 + type AttrLabel DOMHTMLInputElementMaxLengthPropertyInfo = "max-length" + attrGet _ = getDOMHTMLInputElementMaxLength + attrSet _ = setDOMHTMLInputElementMaxLength + attrConstruct _ = constructDOMHTMLInputElementMaxLength + +-- VVV Prop "min" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementMin :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementMin obj = liftIO $ getObjectPropertyString obj "min" + +setDOMHTMLInputElementMin :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementMin obj val = liftIO $ setObjectPropertyString obj "min" val + +constructDOMHTMLInputElementMin :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementMin val = constructObjectPropertyString "min" val + +data DOMHTMLInputElementMinPropertyInfo +instance AttrInfo DOMHTMLInputElementMinPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementMinPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementMinPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementMinPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementMinPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementMinPropertyInfo = "min" + attrGet _ = getDOMHTMLInputElementMin + attrSet _ = setDOMHTMLInputElementMin + attrConstruct _ = constructDOMHTMLInputElementMin + +-- VVV Prop "multiple" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementMultiple :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementMultiple obj = liftIO $ getObjectPropertyBool obj "multiple" + +setDOMHTMLInputElementMultiple :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementMultiple obj val = liftIO $ setObjectPropertyBool obj "multiple" val + +constructDOMHTMLInputElementMultiple :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementMultiple val = constructObjectPropertyBool "multiple" val + +data DOMHTMLInputElementMultiplePropertyInfo +instance AttrInfo DOMHTMLInputElementMultiplePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementMultiplePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementMultiplePropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementMultiplePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementMultiplePropertyInfo = Bool + type AttrLabel DOMHTMLInputElementMultiplePropertyInfo = "multiple" + attrGet _ = getDOMHTMLInputElementMultiple + attrSet _ = setDOMHTMLInputElementMultiple + attrConstruct _ = constructDOMHTMLInputElementMultiple + +-- VVV Prop "name" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementName :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementName obj = liftIO $ getObjectPropertyString obj "name" + +setDOMHTMLInputElementName :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementName obj val = liftIO $ setObjectPropertyString obj "name" val + +constructDOMHTMLInputElementName :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementName val = constructObjectPropertyString "name" val + +data DOMHTMLInputElementNamePropertyInfo +instance AttrInfo DOMHTMLInputElementNamePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementNamePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementNamePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementNamePropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementNamePropertyInfo = "name" + attrGet _ = getDOMHTMLInputElementName + attrSet _ = setDOMHTMLInputElementName + attrConstruct _ = constructDOMHTMLInputElementName + +-- VVV Prop "pattern" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementPattern :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementPattern obj = liftIO $ getObjectPropertyString obj "pattern" + +setDOMHTMLInputElementPattern :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementPattern obj val = liftIO $ setObjectPropertyString obj "pattern" val + +constructDOMHTMLInputElementPattern :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementPattern val = constructObjectPropertyString "pattern" val + +data DOMHTMLInputElementPatternPropertyInfo +instance AttrInfo DOMHTMLInputElementPatternPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementPatternPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementPatternPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementPatternPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementPatternPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementPatternPropertyInfo = "pattern" + attrGet _ = getDOMHTMLInputElementPattern + attrSet _ = setDOMHTMLInputElementPattern + attrConstruct _ = constructDOMHTMLInputElementPattern + +-- VVV Prop "placeholder" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementPlaceholder :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementPlaceholder obj = liftIO $ getObjectPropertyString obj "placeholder" + +setDOMHTMLInputElementPlaceholder :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementPlaceholder obj val = liftIO $ setObjectPropertyString obj "placeholder" val + +constructDOMHTMLInputElementPlaceholder :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementPlaceholder val = constructObjectPropertyString "placeholder" val + +data DOMHTMLInputElementPlaceholderPropertyInfo +instance AttrInfo DOMHTMLInputElementPlaceholderPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementPlaceholderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementPlaceholderPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementPlaceholderPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementPlaceholderPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementPlaceholderPropertyInfo = "placeholder" + attrGet _ = getDOMHTMLInputElementPlaceholder + attrSet _ = setDOMHTMLInputElementPlaceholder + attrConstruct _ = constructDOMHTMLInputElementPlaceholder + +-- VVV Prop "read-only" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementReadOnly :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementReadOnly obj = liftIO $ getObjectPropertyBool obj "read-only" + +setDOMHTMLInputElementReadOnly :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementReadOnly obj val = liftIO $ setObjectPropertyBool obj "read-only" val + +constructDOMHTMLInputElementReadOnly :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementReadOnly val = constructObjectPropertyBool "read-only" val + +data DOMHTMLInputElementReadOnlyPropertyInfo +instance AttrInfo DOMHTMLInputElementReadOnlyPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementReadOnlyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementReadOnlyPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementReadOnlyPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementReadOnlyPropertyInfo = Bool + type AttrLabel DOMHTMLInputElementReadOnlyPropertyInfo = "read-only" + attrGet _ = getDOMHTMLInputElementReadOnly + attrSet _ = setDOMHTMLInputElementReadOnly + attrConstruct _ = constructDOMHTMLInputElementReadOnly + +-- VVV Prop "required" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementRequired :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementRequired obj = liftIO $ getObjectPropertyBool obj "required" + +setDOMHTMLInputElementRequired :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementRequired obj val = liftIO $ setObjectPropertyBool obj "required" val + +constructDOMHTMLInputElementRequired :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementRequired val = constructObjectPropertyBool "required" val + +data DOMHTMLInputElementRequiredPropertyInfo +instance AttrInfo DOMHTMLInputElementRequiredPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementRequiredPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementRequiredPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementRequiredPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementRequiredPropertyInfo = Bool + type AttrLabel DOMHTMLInputElementRequiredPropertyInfo = "required" + attrGet _ = getDOMHTMLInputElementRequired + attrSet _ = setDOMHTMLInputElementRequired + attrConstruct _ = constructDOMHTMLInputElementRequired + +-- VVV Prop "size" + -- Type: TBasicType TUInt64 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementSize :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Word64 +getDOMHTMLInputElementSize obj = liftIO $ getObjectPropertyUInt64 obj "size" + +setDOMHTMLInputElementSize :: (MonadIO m, DOMHTMLInputElementK o) => o -> Word64 -> m () +setDOMHTMLInputElementSize obj val = liftIO $ setObjectPropertyUInt64 obj "size" val + +constructDOMHTMLInputElementSize :: Word64 -> IO ([Char], GValue) +constructDOMHTMLInputElementSize val = constructObjectPropertyUInt64 "size" val + +data DOMHTMLInputElementSizePropertyInfo +instance AttrInfo DOMHTMLInputElementSizePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementSizePropertyInfo = (~) Word64 + type AttrBaseTypeConstraint DOMHTMLInputElementSizePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementSizePropertyInfo = Word64 + type AttrLabel DOMHTMLInputElementSizePropertyInfo = "size" + attrGet _ = getDOMHTMLInputElementSize + attrSet _ = setDOMHTMLInputElementSize + attrConstruct _ = constructDOMHTMLInputElementSize + +-- VVV Prop "src" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementSrc :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementSrc obj = liftIO $ getObjectPropertyString obj "src" + +setDOMHTMLInputElementSrc :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementSrc obj val = liftIO $ setObjectPropertyString obj "src" val + +constructDOMHTMLInputElementSrc :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementSrc val = constructObjectPropertyString "src" val + +data DOMHTMLInputElementSrcPropertyInfo +instance AttrInfo DOMHTMLInputElementSrcPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementSrcPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementSrcPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementSrcPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementSrcPropertyInfo = "src" + attrGet _ = getDOMHTMLInputElementSrc + attrSet _ = setDOMHTMLInputElementSrc + attrConstruct _ = constructDOMHTMLInputElementSrc + +-- VVV Prop "step" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementStep :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementStep obj = liftIO $ getObjectPropertyString obj "step" + +setDOMHTMLInputElementStep :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementStep obj val = liftIO $ setObjectPropertyString obj "step" val + +constructDOMHTMLInputElementStep :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementStep val = constructObjectPropertyString "step" val + +data DOMHTMLInputElementStepPropertyInfo +instance AttrInfo DOMHTMLInputElementStepPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementStepPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementStepPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementStepPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementStepPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementStepPropertyInfo = "step" + attrGet _ = getDOMHTMLInputElementStep + attrSet _ = setDOMHTMLInputElementStep + attrConstruct _ = constructDOMHTMLInputElementStep + +-- VVV Prop "type" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementType :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementType obj = liftIO $ getObjectPropertyString obj "type" + +setDOMHTMLInputElementType :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementType obj val = liftIO $ setObjectPropertyString obj "type" val + +constructDOMHTMLInputElementType :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementType val = constructObjectPropertyString "type" val + +data DOMHTMLInputElementTypePropertyInfo +instance AttrInfo DOMHTMLInputElementTypePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementTypePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementTypePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementTypePropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementTypePropertyInfo = "type" + attrGet _ = getDOMHTMLInputElementType + attrSet _ = setDOMHTMLInputElementType + attrConstruct _ = constructDOMHTMLInputElementType + +-- VVV Prop "use-map" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementUseMap :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementUseMap obj = liftIO $ getObjectPropertyString obj "use-map" + +setDOMHTMLInputElementUseMap :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementUseMap obj val = liftIO $ setObjectPropertyString obj "use-map" val + +constructDOMHTMLInputElementUseMap :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementUseMap val = constructObjectPropertyString "use-map" val + +data DOMHTMLInputElementUseMapPropertyInfo +instance AttrInfo DOMHTMLInputElementUseMapPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementUseMapPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementUseMapPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementUseMapPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementUseMapPropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementUseMapPropertyInfo = "use-map" + attrGet _ = getDOMHTMLInputElementUseMap + attrSet _ = setDOMHTMLInputElementUseMap + attrConstruct _ = constructDOMHTMLInputElementUseMap + +-- VVV Prop "validation-message" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMHTMLInputElementValidationMessage :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementValidationMessage obj = liftIO $ getObjectPropertyString obj "validation-message" + +data DOMHTMLInputElementValidationMessagePropertyInfo +instance AttrInfo DOMHTMLInputElementValidationMessagePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementValidationMessagePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementValidationMessagePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLInputElementValidationMessagePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementValidationMessagePropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementValidationMessagePropertyInfo = "validation-message" + attrGet _ = getDOMHTMLInputElementValidationMessage + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "validity" + -- Type: TInterface "WebKit" "DOMValidityState" + -- Flags: [PropertyReadable] + +getDOMHTMLInputElementValidity :: (MonadIO m, DOMHTMLInputElementK o) => o -> m DOMValidityState +getDOMHTMLInputElementValidity obj = liftIO $ getObjectPropertyObject obj "validity" DOMValidityState + +data DOMHTMLInputElementValidityPropertyInfo +instance AttrInfo DOMHTMLInputElementValidityPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementValidityPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementValidityPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLInputElementValidityPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementValidityPropertyInfo = DOMValidityState + type AttrLabel DOMHTMLInputElementValidityPropertyInfo = "validity" + attrGet _ = getDOMHTMLInputElementValidity + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "value" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> m T.Text +getDOMHTMLInputElementValue obj = liftIO $ getObjectPropertyString obj "value" + +setDOMHTMLInputElementValue :: (MonadIO m, DOMHTMLInputElementK o) => o -> T.Text -> m () +setDOMHTMLInputElementValue obj val = liftIO $ setObjectPropertyString obj "value" val + +constructDOMHTMLInputElementValue :: T.Text -> IO ([Char], GValue) +constructDOMHTMLInputElementValue val = constructObjectPropertyString "value" val + +data DOMHTMLInputElementValuePropertyInfo +instance AttrInfo DOMHTMLInputElementValuePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementValuePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementValuePropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLInputElementValuePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementValuePropertyInfo = T.Text + type AttrLabel DOMHTMLInputElementValuePropertyInfo = "value" + attrGet _ = getDOMHTMLInputElementValue + attrSet _ = setDOMHTMLInputElementValue + attrConstruct _ = constructDOMHTMLInputElementValue + +-- VVV Prop "value-as-number" + -- Type: TBasicType TDouble + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementValueAsNumber :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Double +getDOMHTMLInputElementValueAsNumber obj = liftIO $ getObjectPropertyDouble obj "value-as-number" + +setDOMHTMLInputElementValueAsNumber :: (MonadIO m, DOMHTMLInputElementK o) => o -> Double -> m () +setDOMHTMLInputElementValueAsNumber obj val = liftIO $ setObjectPropertyDouble obj "value-as-number" val + +constructDOMHTMLInputElementValueAsNumber :: Double -> IO ([Char], GValue) +constructDOMHTMLInputElementValueAsNumber val = constructObjectPropertyDouble "value-as-number" val + +data DOMHTMLInputElementValueAsNumberPropertyInfo +instance AttrInfo DOMHTMLInputElementValueAsNumberPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementValueAsNumberPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementValueAsNumberPropertyInfo = (~) Double + type AttrBaseTypeConstraint DOMHTMLInputElementValueAsNumberPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementValueAsNumberPropertyInfo = Double + type AttrLabel DOMHTMLInputElementValueAsNumberPropertyInfo = "value-as-number" + attrGet _ = getDOMHTMLInputElementValueAsNumber + attrSet _ = setDOMHTMLInputElementValueAsNumber + attrConstruct _ = constructDOMHTMLInputElementValueAsNumber + +-- VVV Prop "webkit-grammar" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementWebkitGrammar :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementWebkitGrammar obj = liftIO $ getObjectPropertyBool obj "webkit-grammar" + +setDOMHTMLInputElementWebkitGrammar :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementWebkitGrammar obj val = liftIO $ setObjectPropertyBool obj "webkit-grammar" val + +constructDOMHTMLInputElementWebkitGrammar :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementWebkitGrammar val = constructObjectPropertyBool "webkit-grammar" val + +data DOMHTMLInputElementWebkitGrammarPropertyInfo +instance AttrInfo DOMHTMLInputElementWebkitGrammarPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementWebkitGrammarPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementWebkitGrammarPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementWebkitGrammarPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementWebkitGrammarPropertyInfo = Bool + type AttrLabel DOMHTMLInputElementWebkitGrammarPropertyInfo = "webkit-grammar" + attrGet _ = getDOMHTMLInputElementWebkitGrammar + attrSet _ = setDOMHTMLInputElementWebkitGrammar + attrConstruct _ = constructDOMHTMLInputElementWebkitGrammar + +-- VVV Prop "webkit-speech" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementWebkitSpeech :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementWebkitSpeech obj = liftIO $ getObjectPropertyBool obj "webkit-speech" + +setDOMHTMLInputElementWebkitSpeech :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementWebkitSpeech obj val = liftIO $ setObjectPropertyBool obj "webkit-speech" val + +constructDOMHTMLInputElementWebkitSpeech :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementWebkitSpeech val = constructObjectPropertyBool "webkit-speech" val + +data DOMHTMLInputElementWebkitSpeechPropertyInfo +instance AttrInfo DOMHTMLInputElementWebkitSpeechPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementWebkitSpeechPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementWebkitSpeechPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementWebkitSpeechPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementWebkitSpeechPropertyInfo = Bool + type AttrLabel DOMHTMLInputElementWebkitSpeechPropertyInfo = "webkit-speech" + attrGet _ = getDOMHTMLInputElementWebkitSpeech + attrSet _ = setDOMHTMLInputElementWebkitSpeech + attrConstruct _ = constructDOMHTMLInputElementWebkitSpeech + +-- VVV Prop "webkitdirectory" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementWebkitdirectory :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementWebkitdirectory obj = liftIO $ getObjectPropertyBool obj "webkitdirectory" + +setDOMHTMLInputElementWebkitdirectory :: (MonadIO m, DOMHTMLInputElementK o) => o -> Bool -> m () +setDOMHTMLInputElementWebkitdirectory obj val = liftIO $ setObjectPropertyBool obj "webkitdirectory" val + +constructDOMHTMLInputElementWebkitdirectory :: Bool -> IO ([Char], GValue) +constructDOMHTMLInputElementWebkitdirectory val = constructObjectPropertyBool "webkitdirectory" val + +data DOMHTMLInputElementWebkitdirectoryPropertyInfo +instance AttrInfo DOMHTMLInputElementWebkitdirectoryPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementWebkitdirectoryPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementWebkitdirectoryPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLInputElementWebkitdirectoryPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementWebkitdirectoryPropertyInfo = Bool + type AttrLabel DOMHTMLInputElementWebkitdirectoryPropertyInfo = "webkitdirectory" + attrGet _ = getDOMHTMLInputElementWebkitdirectory + attrSet _ = setDOMHTMLInputElementWebkitdirectory + attrConstruct _ = constructDOMHTMLInputElementWebkitdirectory + +-- VVV Prop "width" + -- Type: TBasicType TUInt64 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLInputElementWidth :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Word64 +getDOMHTMLInputElementWidth obj = liftIO $ getObjectPropertyUInt64 obj "width" + +setDOMHTMLInputElementWidth :: (MonadIO m, DOMHTMLInputElementK o) => o -> Word64 -> m () +setDOMHTMLInputElementWidth obj val = liftIO $ setObjectPropertyUInt64 obj "width" val + +constructDOMHTMLInputElementWidth :: Word64 -> IO ([Char], GValue) +constructDOMHTMLInputElementWidth val = constructObjectPropertyUInt64 "width" val + +data DOMHTMLInputElementWidthPropertyInfo +instance AttrInfo DOMHTMLInputElementWidthPropertyInfo where + type AttrAllowedOps DOMHTMLInputElementWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementWidthPropertyInfo = (~) Word64 + type AttrBaseTypeConstraint DOMHTMLInputElementWidthPropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementWidthPropertyInfo = Word64 + type AttrLabel DOMHTMLInputElementWidthPropertyInfo = "width" + attrGet _ = getDOMHTMLInputElementWidth + attrSet _ = setDOMHTMLInputElementWidth + attrConstruct _ = constructDOMHTMLInputElementWidth + +-- VVV Prop "will-validate" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMHTMLInputElementWillValidate :: (MonadIO m, DOMHTMLInputElementK o) => o -> m Bool +getDOMHTMLInputElementWillValidate obj = liftIO $ getObjectPropertyBool obj "will-validate" + +data DOMHTMLInputElementWillValidatePropertyInfo +instance AttrInfo DOMHTMLInputElementWillValidatePropertyInfo where + type AttrAllowedOps DOMHTMLInputElementWillValidatePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLInputElementWillValidatePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLInputElementWillValidatePropertyInfo = DOMHTMLInputElementK + type AttrGetType DOMHTMLInputElementWillValidatePropertyInfo = Bool + type AttrLabel DOMHTMLInputElementWillValidatePropertyInfo = "will-validate" + attrGet _ = getDOMHTMLInputElementWillValidate + attrSet _ = undefined + attrConstruct _ = undefined + +type instance AttributeList DOMHTMLInputElement = DOMHTMLInputElementAttributeList +type DOMHTMLInputElementAttributeList = ('[ '("accept", DOMHTMLInputElementAcceptPropertyInfo), '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLInputElementAlignPropertyInfo), '("alt", DOMHTMLInputElementAltPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autocapitalize", DOMHTMLInputElementAutocapitalizePropertyInfo), '("autocomplete", DOMHTMLInputElementAutocompletePropertyInfo), '("autocorrect", DOMHTMLInputElementAutocorrectPropertyInfo), '("autofocus", DOMHTMLInputElementAutofocusPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("capture", DOMHTMLInputElementCapturePropertyInfo), '("checked", DOMHTMLInputElementCheckedPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("defaultChecked", DOMHTMLInputElementDefaultCheckedPropertyInfo), '("defaultValue", DOMHTMLInputElementDefaultValuePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("dirName", DOMHTMLInputElementDirNamePropertyInfo), '("disabled", DOMHTMLInputElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("files", DOMHTMLInputElementFilesPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLInputElementFormPropertyInfo), '("formAction", DOMHTMLInputElementFormActionPropertyInfo), '("formEnctype", DOMHTMLInputElementFormEnctypePropertyInfo), '("formMethod", DOMHTMLInputElementFormMethodPropertyInfo), '("formNoValidate", DOMHTMLInputElementFormNoValidatePropertyInfo), '("formTarget", DOMHTMLInputElementFormTargetPropertyInfo), '("height", DOMHTMLInputElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("incremental", DOMHTMLInputElementIncrementalPropertyInfo), '("indeterminate", DOMHTMLInputElementIndeterminatePropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLInputElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("list", DOMHTMLInputElementListPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("max", DOMHTMLInputElementMaxPropertyInfo), '("maxLength", DOMHTMLInputElementMaxLengthPropertyInfo), '("min", DOMHTMLInputElementMinPropertyInfo), '("multiple", DOMHTMLInputElementMultiplePropertyInfo), '("name", DOMHTMLInputElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("pattern", DOMHTMLInputElementPatternPropertyInfo), '("placeholder", DOMHTMLInputElementPlaceholderPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("readOnly", DOMHTMLInputElementReadOnlyPropertyInfo), '("required", DOMHTMLInputElementRequiredPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("size", DOMHTMLInputElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLInputElementSrcPropertyInfo), '("step", DOMHTMLInputElementStepPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLInputElementTypePropertyInfo), '("useMap", DOMHTMLInputElementUseMapPropertyInfo), '("validationMessage", DOMHTMLInputElementValidationMessagePropertyInfo), '("validity", DOMHTMLInputElementValidityPropertyInfo), '("value", DOMHTMLInputElementValuePropertyInfo), '("valueAsNumber", DOMHTMLInputElementValueAsNumberPropertyInfo), '("webkitGrammar", DOMHTMLInputElementWebkitGrammarPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitSpeech", DOMHTMLInputElementWebkitSpeechPropertyInfo), '("webkitdirectory", DOMHTMLInputElementWebkitdirectoryPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLInputElementWidthPropertyInfo), '("willValidate", DOMHTMLInputElementWillValidatePropertyInfo)] :: [(Symbol, *)]) + +type instance SignalList DOMHTMLInputElement = DOMHTMLInputElementSignalList +type DOMHTMLInputElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) + +-- method DOMHTMLInputElement::check_validity +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_check_validity" webkit_dom_html_input_element_check_validity :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementCheckValidity :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementCheckValidity _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_check_validity _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementCheckValidityMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementCheckValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementCheckValidity + +-- method DOMHTMLInputElement::get_accept +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_accept" webkit_dom_html_input_element_get_accept :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetAccept :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetAccept _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_accept _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_accept" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetAcceptMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetAcceptMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetAccept + +-- method DOMHTMLInputElement::get_align +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_align" webkit_dom_html_input_element_get_align :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetAlign :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetAlign _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_align _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_align" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetAlign + +-- method DOMHTMLInputElement::get_alt +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_alt" webkit_dom_html_input_element_get_alt :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetAlt :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetAlt _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_alt _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_alt" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetAltMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetAltMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetAlt + +-- method DOMHTMLInputElement::get_autocapitalize +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_autocapitalize" webkit_dom_html_input_element_get_autocapitalize :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetAutocapitalize :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetAutocapitalize _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_autocapitalize _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_autocapitalize" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetAutocapitalizeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetAutocapitalizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetAutocapitalize + +-- method DOMHTMLInputElement::get_autocomplete +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_autocomplete" webkit_dom_html_input_element_get_autocomplete :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetAutocomplete :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetAutocomplete _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_autocomplete _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_autocomplete" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetAutocompleteMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetAutocompleteMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetAutocomplete + +-- method DOMHTMLInputElement::get_autocorrect +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_autocorrect" webkit_dom_html_input_element_get_autocorrect :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetAutocorrect :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetAutocorrect _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_autocorrect _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetAutocorrectMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetAutocorrectMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetAutocorrect + +-- method DOMHTMLInputElement::get_autofocus +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_autofocus" webkit_dom_html_input_element_get_autofocus :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetAutofocus :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetAutofocus _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_autofocus _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetAutofocusMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetAutofocusMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetAutofocus + +-- method DOMHTMLInputElement::get_capture +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_capture" webkit_dom_html_input_element_get_capture :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetCapture :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetCapture _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_capture _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_capture" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetCaptureMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetCaptureMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetCapture + +-- method DOMHTMLInputElement::get_checked +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_checked" webkit_dom_html_input_element_get_checked :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetChecked :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetChecked _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_checked _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetCheckedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetCheckedMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetChecked + +-- method DOMHTMLInputElement::get_default_checked +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_default_checked" webkit_dom_html_input_element_get_default_checked :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetDefaultChecked :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetDefaultChecked _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_default_checked _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetDefaultCheckedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetDefaultCheckedMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetDefaultChecked + +-- method DOMHTMLInputElement::get_default_value +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_default_value" webkit_dom_html_input_element_get_default_value :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetDefaultValue :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetDefaultValue _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_default_value _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_default_value" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetDefaultValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetDefaultValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetDefaultValue + +-- method DOMHTMLInputElement::get_dir_name +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_dir_name" webkit_dom_html_input_element_get_dir_name :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetDirName :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetDirName _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_dir_name _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_dir_name" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetDirNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetDirNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetDirName + +-- method DOMHTMLInputElement::get_disabled +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_disabled" webkit_dom_html_input_element_get_disabled :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetDisabled :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetDisabled _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_disabled _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetDisabled + +-- method DOMHTMLInputElement::get_files +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMFileList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_files" webkit_dom_html_input_element_get_files :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO (Ptr DOMFileList) + + +dOMHTMLInputElementGetFiles :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m DOMFileList -- result +dOMHTMLInputElementGetFiles _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_files _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_files" result + result' <- (wrapObject DOMFileList) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetFilesMethodInfo +instance (signature ~ (m DOMFileList), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetFilesMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetFiles + +-- method DOMHTMLInputElement::get_form +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMHTMLFormElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_form" webkit_dom_html_input_element_get_form :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO (Ptr DOMHTMLFormElement) + + +dOMHTMLInputElementGetForm :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m DOMHTMLFormElement -- result +dOMHTMLInputElementGetForm _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_form _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_form" result + result' <- (newObject DOMHTMLFormElement) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetFormMethodInfo +instance (signature ~ (m DOMHTMLFormElement), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetFormMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetForm + +-- method DOMHTMLInputElement::get_form_action +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_form_action" webkit_dom_html_input_element_get_form_action :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetFormAction :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetFormAction _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_form_action _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_form_action" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetFormActionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetFormActionMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetFormAction + +-- method DOMHTMLInputElement::get_form_enctype +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_form_enctype" webkit_dom_html_input_element_get_form_enctype :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetFormEnctype :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetFormEnctype _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_form_enctype _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_form_enctype" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetFormEnctypeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetFormEnctypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetFormEnctype + +-- method DOMHTMLInputElement::get_form_method +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_form_method" webkit_dom_html_input_element_get_form_method :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetFormMethod :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetFormMethod _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_form_method _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_form_method" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetFormMethodMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetFormMethodMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetFormMethod + +-- method DOMHTMLInputElement::get_form_no_validate +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_form_no_validate" webkit_dom_html_input_element_get_form_no_validate :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetFormNoValidate :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetFormNoValidate _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_form_no_validate _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetFormNoValidateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetFormNoValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetFormNoValidate + +-- method DOMHTMLInputElement::get_form_target +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_form_target" webkit_dom_html_input_element_get_form_target :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetFormTarget :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetFormTarget _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_form_target _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_form_target" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetFormTargetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetFormTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetFormTarget + +-- method DOMHTMLInputElement::get_height +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_height" webkit_dom_html_input_element_get_height :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO Word64 + + +dOMHTMLInputElementGetHeight :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Word64 -- result +dOMHTMLInputElementGetHeight _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_height _obj' + touchManagedPtr _obj + return result + +data DOMHTMLInputElementGetHeightMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetHeight + +-- method DOMHTMLInputElement::get_incremental +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_incremental" webkit_dom_html_input_element_get_incremental :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetIncremental :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetIncremental _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_incremental _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetIncrementalMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetIncrementalMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetIncremental + +-- method DOMHTMLInputElement::get_indeterminate +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_indeterminate" webkit_dom_html_input_element_get_indeterminate :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetIndeterminate :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetIndeterminate _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_indeterminate _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetIndeterminateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetIndeterminateMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetIndeterminate + +-- method DOMHTMLInputElement::get_labels +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMNodeList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_labels" webkit_dom_html_input_element_get_labels :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO (Ptr DOMNodeList) + + +dOMHTMLInputElementGetLabels :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m DOMNodeList -- result +dOMHTMLInputElementGetLabels _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_labels _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_labels" result + result' <- (wrapObject DOMNodeList) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetLabelsMethodInfo +instance (signature ~ (m DOMNodeList), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetLabelsMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetLabels + +-- method DOMHTMLInputElement::get_list +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMHTMLElement" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_list" webkit_dom_html_input_element_get_list :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO (Ptr DOMHTMLElement) + + +dOMHTMLInputElementGetList :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m DOMHTMLElement -- result +dOMHTMLInputElementGetList _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_list _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_list" result + result' <- (newObject DOMHTMLElement) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetListMethodInfo +instance (signature ~ (m DOMHTMLElement), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetListMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetList + +-- method DOMHTMLInputElement::get_max +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_max" webkit_dom_html_input_element_get_max :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetMax :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetMax _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_max _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_max" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetMaxMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetMaxMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetMax + +-- method DOMHTMLInputElement::get_max_length +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_max_length" webkit_dom_html_input_element_get_max_length :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO Int64 + + +dOMHTMLInputElementGetMaxLength :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Int64 -- result +dOMHTMLInputElementGetMaxLength _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_max_length _obj' + touchManagedPtr _obj + return result + +data DOMHTMLInputElementGetMaxLengthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetMaxLengthMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetMaxLength + +-- method DOMHTMLInputElement::get_min +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_min" webkit_dom_html_input_element_get_min :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetMin :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetMin _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_min _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_min" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetMinMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetMinMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetMin + +-- method DOMHTMLInputElement::get_multiple +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_multiple" webkit_dom_html_input_element_get_multiple :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetMultiple :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetMultiple _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_multiple _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetMultipleMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetMultipleMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetMultiple + +-- method DOMHTMLInputElement::get_name +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_name" webkit_dom_html_input_element_get_name :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetName :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetName _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_name _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_name" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetName + +-- method DOMHTMLInputElement::get_pattern +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_pattern" webkit_dom_html_input_element_get_pattern :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetPattern :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetPattern _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_pattern _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_pattern" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetPatternMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetPatternMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetPattern + +-- method DOMHTMLInputElement::get_placeholder +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_placeholder" webkit_dom_html_input_element_get_placeholder :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetPlaceholder :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetPlaceholder _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_placeholder _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_placeholder" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetPlaceholderMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetPlaceholderMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetPlaceholder + +-- method DOMHTMLInputElement::get_read_only +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_read_only" webkit_dom_html_input_element_get_read_only :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetReadOnly :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetReadOnly _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_read_only _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetReadOnlyMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetReadOnlyMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetReadOnly + +-- method DOMHTMLInputElement::get_required +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_required" webkit_dom_html_input_element_get_required :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetRequired :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetRequired _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_required _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetRequiredMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetRequiredMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetRequired + +-- method DOMHTMLInputElement::get_size +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_size" webkit_dom_html_input_element_get_size :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO Word64 + + +dOMHTMLInputElementGetSize :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Word64 -- result +dOMHTMLInputElementGetSize _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_size _obj' + touchManagedPtr _obj + return result + +data DOMHTMLInputElementGetSizeMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetSizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetSize + +-- method DOMHTMLInputElement::get_src +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_src" webkit_dom_html_input_element_get_src :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetSrc :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetSrc _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_src _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_src" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetSrcMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetSrc + +-- method DOMHTMLInputElement::get_step +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_step" webkit_dom_html_input_element_get_step :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetStep :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetStep _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_step _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_step" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetStepMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetStepMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetStep + +-- method DOMHTMLInputElement::get_use_map +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_use_map" webkit_dom_html_input_element_get_use_map :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetUseMap :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetUseMap _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_use_map _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_use_map" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetUseMapMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetUseMapMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetUseMap + +-- method DOMHTMLInputElement::get_validation_message +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_validation_message" webkit_dom_html_input_element_get_validation_message :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetValidationMessage :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetValidationMessage _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_validation_message _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_validation_message" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetValidationMessageMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetValidationMessageMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetValidationMessage + +-- method DOMHTMLInputElement::get_validity +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMValidityState" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_validity" webkit_dom_html_input_element_get_validity :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO (Ptr DOMValidityState) + + +dOMHTMLInputElementGetValidity :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m DOMValidityState -- result +dOMHTMLInputElementGetValidity _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_validity _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_validity" result + result' <- (wrapObject DOMValidityState) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetValidityMethodInfo +instance (signature ~ (m DOMValidityState), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetValidity + +-- method DOMHTMLInputElement::get_value +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_value" webkit_dom_html_input_element_get_value :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CString + + +dOMHTMLInputElementGetValue :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLInputElementGetValue _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_value _obj' + checkUnexpectedReturnNULL "webkit_dom_html_input_element_get_value" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetValue + +-- method DOMHTMLInputElement::get_value_as_number +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TDouble +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_value_as_number" webkit_dom_html_input_element_get_value_as_number :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CDouble + + +dOMHTMLInputElementGetValueAsNumber :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Double -- result +dOMHTMLInputElementGetValueAsNumber _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_value_as_number _obj' + let result' = realToFrac result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetValueAsNumberMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetValueAsNumberMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetValueAsNumber + +-- method DOMHTMLInputElement::get_webkit_grammar +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_webkit_grammar" webkit_dom_html_input_element_get_webkit_grammar :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetWebkitGrammar :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetWebkitGrammar _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_webkit_grammar _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetWebkitGrammarMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetWebkitGrammarMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetWebkitGrammar + +-- method DOMHTMLInputElement::get_webkit_speech +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_webkit_speech" webkit_dom_html_input_element_get_webkit_speech :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetWebkitSpeech :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetWebkitSpeech _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_webkit_speech _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetWebkitSpeechMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetWebkitSpeechMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetWebkitSpeech + +-- method DOMHTMLInputElement::get_webkitdirectory +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_webkitdirectory" webkit_dom_html_input_element_get_webkitdirectory :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetWebkitdirectory :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetWebkitdirectory _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_webkitdirectory _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetWebkitdirectoryMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetWebkitdirectoryMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetWebkitdirectory + +-- method DOMHTMLInputElement::get_width +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_width" webkit_dom_html_input_element_get_width :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO Word64 + + +dOMHTMLInputElementGetWidth :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Word64 -- result +dOMHTMLInputElementGetWidth _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_width _obj' + touchManagedPtr _obj + return result + +data DOMHTMLInputElementGetWidthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetWidth + +-- method DOMHTMLInputElement::get_will_validate +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_get_will_validate" webkit_dom_html_input_element_get_will_validate :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementGetWillValidate :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementGetWillValidate _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_get_will_validate _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementGetWillValidateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementGetWillValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementGetWillValidate + +-- method DOMHTMLInputElement::is_edited +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_is_edited" webkit_dom_html_input_element_is_edited :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO CInt + + +dOMHTMLInputElementIsEdited :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLInputElementIsEdited _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_input_element_is_edited _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLInputElementIsEditedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementIsEditedMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementIsEdited + +-- method DOMHTMLInputElement::select +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_select" webkit_dom_html_input_element_select :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + IO () + + +dOMHTMLInputElementSelect :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> m () -- result +dOMHTMLInputElementSelect _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_html_input_element_select _obj' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSelectMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSelectMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSelect + +-- method DOMHTMLInputElement::set_accept +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_accept" webkit_dom_html_input_element_set_accept :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetAccept :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetAccept _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_accept _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetAcceptMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetAcceptMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetAccept + +-- method DOMHTMLInputElement::set_align +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_align" webkit_dom_html_input_element_set_align :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetAlign :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetAlign _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_align _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetAlign + +-- method DOMHTMLInputElement::set_alt +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_alt" webkit_dom_html_input_element_set_alt :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetAlt :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetAlt _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_alt _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetAltMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetAltMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetAlt + +-- method DOMHTMLInputElement::set_autocapitalize +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_autocapitalize" webkit_dom_html_input_element_set_autocapitalize :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetAutocapitalize :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetAutocapitalize _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_autocapitalize _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetAutocapitalizeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetAutocapitalizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetAutocapitalize + +-- method DOMHTMLInputElement::set_autocomplete +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_autocomplete" webkit_dom_html_input_element_set_autocomplete :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetAutocomplete :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetAutocomplete _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_autocomplete _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetAutocompleteMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetAutocompleteMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetAutocomplete + +-- method DOMHTMLInputElement::set_autocorrect +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_autocorrect" webkit_dom_html_input_element_set_autocorrect :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetAutocorrect :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetAutocorrect _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_autocorrect _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetAutocorrectMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetAutocorrectMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetAutocorrect + +-- method DOMHTMLInputElement::set_autofocus +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_autofocus" webkit_dom_html_input_element_set_autofocus :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetAutofocus :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetAutofocus _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_autofocus _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetAutofocusMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetAutofocusMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetAutofocus + +-- method DOMHTMLInputElement::set_capture +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_capture" webkit_dom_html_input_element_set_capture :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetCapture :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetCapture _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_capture _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetCaptureMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetCaptureMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetCapture + +-- method DOMHTMLInputElement::set_checked +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_checked" webkit_dom_html_input_element_set_checked :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetChecked :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetChecked _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_checked _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetCheckedMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetCheckedMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetChecked + +-- method DOMHTMLInputElement::set_custom_validity +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_custom_validity" webkit_dom_html_input_element_set_custom_validity :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- error : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetCustomValidity :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- error_ + -> m () -- result +dOMHTMLInputElementSetCustomValidity _obj error_ = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + error_' <- textToCString error_ + webkit_dom_html_input_element_set_custom_validity _obj' error_' + touchManagedPtr _obj + freeMem error_' + return () + +data DOMHTMLInputElementSetCustomValidityMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetCustomValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetCustomValidity + +-- method DOMHTMLInputElement::set_default_checked +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_default_checked" webkit_dom_html_input_element_set_default_checked :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetDefaultChecked :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetDefaultChecked _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_default_checked _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetDefaultCheckedMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetDefaultCheckedMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetDefaultChecked + +-- method DOMHTMLInputElement::set_default_value +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_default_value" webkit_dom_html_input_element_set_default_value :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetDefaultValue :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetDefaultValue _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_default_value _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetDefaultValueMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetDefaultValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetDefaultValue + +-- method DOMHTMLInputElement::set_dir_name +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_dir_name" webkit_dom_html_input_element_set_dir_name :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetDirName :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetDirName _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_dir_name _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetDirNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetDirNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetDirName + +-- method DOMHTMLInputElement::set_disabled +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_disabled" webkit_dom_html_input_element_set_disabled :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetDisabled :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetDisabled _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_disabled _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetDisabled + +-- method DOMHTMLInputElement::set_files +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TInterface "WebKit" "DOMFileList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_files" webkit_dom_html_input_element_set_files :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + Ptr DOMFileList -> -- value : TInterface "WebKit" "DOMFileList" + IO () + + +dOMHTMLInputElementSetFiles :: + (MonadIO m, DOMHTMLInputElementK a, DOMFileListK b) => + a -- _obj + -> b -- value + -> m () -- result +dOMHTMLInputElementSetFiles _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = unsafeManagedPtrCastPtr value + webkit_dom_html_input_element_set_files _obj' value' + touchManagedPtr _obj + touchManagedPtr value + return () + +data DOMHTMLInputElementSetFilesMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMHTMLInputElementK a, DOMFileListK b) => MethodInfo DOMHTMLInputElementSetFilesMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetFiles + +-- method DOMHTMLInputElement::set_form_action +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_form_action" webkit_dom_html_input_element_set_form_action :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetFormAction :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetFormAction _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_form_action _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetFormActionMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetFormActionMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetFormAction + +-- method DOMHTMLInputElement::set_form_enctype +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_form_enctype" webkit_dom_html_input_element_set_form_enctype :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetFormEnctype :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetFormEnctype _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_form_enctype _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetFormEnctypeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetFormEnctypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetFormEnctype + +-- method DOMHTMLInputElement::set_form_method +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_form_method" webkit_dom_html_input_element_set_form_method :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetFormMethod :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetFormMethod _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_form_method _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetFormMethodMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetFormMethodMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetFormMethod + +-- method DOMHTMLInputElement::set_form_no_validate +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_form_no_validate" webkit_dom_html_input_element_set_form_no_validate :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetFormNoValidate :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetFormNoValidate _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_form_no_validate _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetFormNoValidateMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetFormNoValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetFormNoValidate + +-- method DOMHTMLInputElement::set_form_target +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_form_target" webkit_dom_html_input_element_set_form_target :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetFormTarget :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetFormTarget _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_form_target _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetFormTargetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetFormTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetFormTarget + +-- method DOMHTMLInputElement::set_height +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_height" webkit_dom_html_input_element_set_height :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + Word64 -> -- value : TBasicType TUInt64 + IO () + + +dOMHTMLInputElementSetHeight :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Word64 -- value + -> m () -- result +dOMHTMLInputElementSetHeight _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_html_input_element_set_height _obj' value + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetHeightMethodInfo +instance (signature ~ (Word64 -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetHeight + +-- method DOMHTMLInputElement::set_incremental +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_incremental" webkit_dom_html_input_element_set_incremental :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetIncremental :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetIncremental _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_incremental _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetIncrementalMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetIncrementalMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetIncremental + +-- method DOMHTMLInputElement::set_indeterminate +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_indeterminate" webkit_dom_html_input_element_set_indeterminate :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetIndeterminate :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetIndeterminate _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_indeterminate _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetIndeterminateMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetIndeterminateMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetIndeterminate + +-- method DOMHTMLInputElement::set_max +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_max" webkit_dom_html_input_element_set_max :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetMax :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetMax _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_max _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetMaxMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetMaxMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetMax + +-- method DOMHTMLInputElement::set_max_length +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_max_length" webkit_dom_html_input_element_set_max_length :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + Int64 -> -- value : TBasicType TInt64 + Ptr (Ptr GError) -> -- error + IO () + + +dOMHTMLInputElementSetMaxLength :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Int64 -- value + -> m () -- result +dOMHTMLInputElementSetMaxLength _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + onException (do + propagateGError $ webkit_dom_html_input_element_set_max_length _obj' value + touchManagedPtr _obj + return () + ) (do + return () + ) + +data DOMHTMLInputElementSetMaxLengthMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetMaxLengthMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetMaxLength + +-- method DOMHTMLInputElement::set_min +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_min" webkit_dom_html_input_element_set_min :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetMin :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetMin _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_min _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetMinMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetMinMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetMin + +-- method DOMHTMLInputElement::set_multiple +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_multiple" webkit_dom_html_input_element_set_multiple :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetMultiple :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetMultiple _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_multiple _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetMultipleMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetMultipleMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetMultiple + +-- method DOMHTMLInputElement::set_name +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_name" webkit_dom_html_input_element_set_name :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetName :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetName _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_name _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetName + +-- method DOMHTMLInputElement::set_pattern +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_pattern" webkit_dom_html_input_element_set_pattern :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetPattern :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetPattern _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_pattern _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetPatternMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetPatternMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetPattern + +-- method DOMHTMLInputElement::set_placeholder +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_placeholder" webkit_dom_html_input_element_set_placeholder :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetPlaceholder :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetPlaceholder _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_placeholder _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetPlaceholderMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetPlaceholderMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetPlaceholder + +-- method DOMHTMLInputElement::set_range_text +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "replacement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selectionMode", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_range_text" webkit_dom_html_input_element_set_range_text :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- replacement : TBasicType TUTF8 + Word64 -> -- start : TBasicType TUInt64 + Word64 -> -- end : TBasicType TUInt64 + CString -> -- selectionMode : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO () + + +dOMHTMLInputElementSetRangeText :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- replacement + -> Word64 -- start + -> Word64 -- end + -> T.Text -- selectionMode + -> m () -- result +dOMHTMLInputElementSetRangeText _obj replacement start end selectionMode = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + replacement' <- textToCString replacement + selectionMode' <- textToCString selectionMode + onException (do + propagateGError $ webkit_dom_html_input_element_set_range_text _obj' replacement' start end selectionMode' + touchManagedPtr _obj + freeMem replacement' + freeMem selectionMode' + return () + ) (do + freeMem replacement' + freeMem selectionMode' + ) + +data DOMHTMLInputElementSetRangeTextMethodInfo +instance (signature ~ (T.Text -> Word64 -> Word64 -> T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetRangeTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetRangeText + +-- method DOMHTMLInputElement::set_read_only +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_read_only" webkit_dom_html_input_element_set_read_only :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetReadOnly :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetReadOnly _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_read_only _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetReadOnlyMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetReadOnlyMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetReadOnly + +-- method DOMHTMLInputElement::set_required +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_required" webkit_dom_html_input_element_set_required :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetRequired :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetRequired _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_required _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetRequiredMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetRequiredMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetRequired + +-- method DOMHTMLInputElement::set_size +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_size" webkit_dom_html_input_element_set_size :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + Word64 -> -- value : TBasicType TUInt64 + Ptr (Ptr GError) -> -- error + IO () + + +dOMHTMLInputElementSetSize :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Word64 -- value + -> m () -- result +dOMHTMLInputElementSetSize _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + onException (do + propagateGError $ webkit_dom_html_input_element_set_size _obj' value + touchManagedPtr _obj + return () + ) (do + return () + ) + +data DOMHTMLInputElementSetSizeMethodInfo +instance (signature ~ (Word64 -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetSizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetSize + +-- method DOMHTMLInputElement::set_src +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_src" webkit_dom_html_input_element_set_src :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetSrc :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetSrc _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_src _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetSrcMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetSrc + +-- method DOMHTMLInputElement::set_step +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_step" webkit_dom_html_input_element_set_step :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetStep :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetStep _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_step _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetStepMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetStepMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetStep + +-- method DOMHTMLInputElement::set_use_map +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_use_map" webkit_dom_html_input_element_set_use_map :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetUseMap :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetUseMap _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_use_map _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetUseMapMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetUseMapMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetUseMap + +-- method DOMHTMLInputElement::set_value +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_value" webkit_dom_html_input_element_set_value :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetValue :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetValue _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_value _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetValueMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetValue + +-- method DOMHTMLInputElement::set_value_as_number +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_value_as_number" webkit_dom_html_input_element_set_value_as_number :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CDouble -> -- value : TBasicType TDouble + Ptr (Ptr GError) -> -- error + IO () + + +dOMHTMLInputElementSetValueAsNumber :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Double -- value + -> m () -- result +dOMHTMLInputElementSetValueAsNumber _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = realToFrac value + onException (do + propagateGError $ webkit_dom_html_input_element_set_value_as_number _obj' value' + touchManagedPtr _obj + return () + ) (do + return () + ) + +data DOMHTMLInputElementSetValueAsNumberMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetValueAsNumberMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetValueAsNumber + +-- method DOMHTMLInputElement::set_value_for_user +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_value_for_user" webkit_dom_html_input_element_set_value_for_user :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLInputElementSetValueForUser :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLInputElementSetValueForUser _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_input_element_set_value_for_user _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLInputElementSetValueForUserMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetValueForUserMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetValueForUser + +-- method DOMHTMLInputElement::set_webkit_grammar +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_webkit_grammar" webkit_dom_html_input_element_set_webkit_grammar :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetWebkitGrammar :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetWebkitGrammar _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_webkit_grammar _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetWebkitGrammarMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetWebkitGrammarMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetWebkitGrammar + +-- method DOMHTMLInputElement::set_webkit_speech +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_webkit_speech" webkit_dom_html_input_element_set_webkit_speech :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetWebkitSpeech :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetWebkitSpeech _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_webkit_speech _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetWebkitSpeechMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetWebkitSpeechMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetWebkitSpeech + +-- method DOMHTMLInputElement::set_webkitdirectory +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_webkitdirectory" webkit_dom_html_input_element_set_webkitdirectory :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLInputElementSetWebkitdirectory :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLInputElementSetWebkitdirectory _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_input_element_set_webkitdirectory _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetWebkitdirectoryMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetWebkitdirectoryMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetWebkitdirectory + +-- method DOMHTMLInputElement::set_width +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_set_width" webkit_dom_html_input_element_set_width :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + Word64 -> -- value : TBasicType TUInt64 + IO () + + +dOMHTMLInputElementSetWidth :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Word64 -- value + -> m () -- result +dOMHTMLInputElementSetWidth _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_html_input_element_set_width _obj' value + touchManagedPtr _obj + return () + +data DOMHTMLInputElementSetWidthMethodInfo +instance (signature ~ (Word64 -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementSetWidth + +-- method DOMHTMLInputElement::step_down +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "n", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_step_down" webkit_dom_html_input_element_step_down :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + Int64 -> -- n : TBasicType TInt64 + Ptr (Ptr GError) -> -- error + IO () + + +dOMHTMLInputElementStepDown :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Int64 -- n + -> m () -- result +dOMHTMLInputElementStepDown _obj n = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + onException (do + propagateGError $ webkit_dom_html_input_element_step_down _obj' n + touchManagedPtr _obj + return () + ) (do + return () + ) + +data DOMHTMLInputElementStepDownMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementStepDownMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementStepDown + +-- method DOMHTMLInputElement::step_up +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLInputElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "n", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_html_input_element_step_up" webkit_dom_html_input_element_step_up :: + Ptr DOMHTMLInputElement -> -- _obj : TInterface "WebKit" "DOMHTMLInputElement" + Int64 -> -- n : TBasicType TInt64 + Ptr (Ptr GError) -> -- error + IO () + + +dOMHTMLInputElementStepUp :: + (MonadIO m, DOMHTMLInputElementK a) => + a -- _obj + -> Int64 -- n + -> m () -- result +dOMHTMLInputElementStepUp _obj n = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + onException (do + propagateGError $ webkit_dom_html_input_element_step_up _obj' n + touchManagedPtr _obj + return () + ) (do + return () + ) + +data DOMHTMLInputElementStepUpMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLInputElementK a) => MethodInfo DOMHTMLInputElementStepUpMethodInfo a signature where + overloadedMethod _ = dOMHTMLInputElementStepUp diff --git a/GI/WebKit/Objects/DOMHTMLInputElement.hs-boot b/GI/WebKit/Objects/DOMHTMLInputElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLInputElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLInputElement.hs-boot @@ -59,3 +59,99 @@ data DOMHTMLInputElementWebkitdirectoryPropertyInfo data DOMHTMLInputElementWidthPropertyInfo data DOMHTMLInputElementWillValidatePropertyInfo +data DOMHTMLInputElementCheckValidityMethodInfo +data DOMHTMLInputElementGetAcceptMethodInfo +data DOMHTMLInputElementGetAlignMethodInfo +data DOMHTMLInputElementGetAltMethodInfo +data DOMHTMLInputElementGetAutocapitalizeMethodInfo +data DOMHTMLInputElementGetAutocompleteMethodInfo +data DOMHTMLInputElementGetAutocorrectMethodInfo +data DOMHTMLInputElementGetAutofocusMethodInfo +data DOMHTMLInputElementGetCaptureMethodInfo +data DOMHTMLInputElementGetCheckedMethodInfo +data DOMHTMLInputElementGetDefaultCheckedMethodInfo +data DOMHTMLInputElementGetDefaultValueMethodInfo +data DOMHTMLInputElementGetDirNameMethodInfo +data DOMHTMLInputElementGetDisabledMethodInfo +data DOMHTMLInputElementGetFilesMethodInfo +data DOMHTMLInputElementGetFormMethodInfo +data DOMHTMLInputElementGetFormActionMethodInfo +data DOMHTMLInputElementGetFormEnctypeMethodInfo +data DOMHTMLInputElementGetFormMethodMethodInfo +data DOMHTMLInputElementGetFormNoValidateMethodInfo +data DOMHTMLInputElementGetFormTargetMethodInfo +data DOMHTMLInputElementGetHeightMethodInfo +data DOMHTMLInputElementGetIncrementalMethodInfo +data DOMHTMLInputElementGetIndeterminateMethodInfo +data DOMHTMLInputElementGetLabelsMethodInfo +data DOMHTMLInputElementGetListMethodInfo +data DOMHTMLInputElementGetMaxMethodInfo +data DOMHTMLInputElementGetMaxLengthMethodInfo +data DOMHTMLInputElementGetMinMethodInfo +data DOMHTMLInputElementGetMultipleMethodInfo +data DOMHTMLInputElementGetNameMethodInfo +data DOMHTMLInputElementGetPatternMethodInfo +data DOMHTMLInputElementGetPlaceholderMethodInfo +data DOMHTMLInputElementGetReadOnlyMethodInfo +data DOMHTMLInputElementGetRequiredMethodInfo +data DOMHTMLInputElementGetSizeMethodInfo +data DOMHTMLInputElementGetSrcMethodInfo +data DOMHTMLInputElementGetStepMethodInfo +data DOMHTMLInputElementGetUseMapMethodInfo +data DOMHTMLInputElementGetValidationMessageMethodInfo +data DOMHTMLInputElementGetValidityMethodInfo +data DOMHTMLInputElementGetValueMethodInfo +data DOMHTMLInputElementGetValueAsNumberMethodInfo +data DOMHTMLInputElementGetWebkitGrammarMethodInfo +data DOMHTMLInputElementGetWebkitSpeechMethodInfo +data DOMHTMLInputElementGetWebkitdirectoryMethodInfo +data DOMHTMLInputElementGetWidthMethodInfo +data DOMHTMLInputElementGetWillValidateMethodInfo +data DOMHTMLInputElementIsEditedMethodInfo +data DOMHTMLInputElementSelectMethodInfo +data DOMHTMLInputElementSetAcceptMethodInfo +data DOMHTMLInputElementSetAlignMethodInfo +data DOMHTMLInputElementSetAltMethodInfo +data DOMHTMLInputElementSetAutocapitalizeMethodInfo +data DOMHTMLInputElementSetAutocompleteMethodInfo +data DOMHTMLInputElementSetAutocorrectMethodInfo +data DOMHTMLInputElementSetAutofocusMethodInfo +data DOMHTMLInputElementSetCaptureMethodInfo +data DOMHTMLInputElementSetCheckedMethodInfo +data DOMHTMLInputElementSetCustomValidityMethodInfo +data DOMHTMLInputElementSetDefaultCheckedMethodInfo +data DOMHTMLInputElementSetDefaultValueMethodInfo +data DOMHTMLInputElementSetDirNameMethodInfo +data DOMHTMLInputElementSetDisabledMethodInfo +data DOMHTMLInputElementSetFilesMethodInfo +data DOMHTMLInputElementSetFormActionMethodInfo +data DOMHTMLInputElementSetFormEnctypeMethodInfo +data DOMHTMLInputElementSetFormMethodMethodInfo +data DOMHTMLInputElementSetFormNoValidateMethodInfo +data DOMHTMLInputElementSetFormTargetMethodInfo +data DOMHTMLInputElementSetHeightMethodInfo +data DOMHTMLInputElementSetIncrementalMethodInfo +data DOMHTMLInputElementSetIndeterminateMethodInfo +data DOMHTMLInputElementSetMaxMethodInfo +data DOMHTMLInputElementSetMaxLengthMethodInfo +data DOMHTMLInputElementSetMinMethodInfo +data DOMHTMLInputElementSetMultipleMethodInfo +data DOMHTMLInputElementSetNameMethodInfo +data DOMHTMLInputElementSetPatternMethodInfo +data DOMHTMLInputElementSetPlaceholderMethodInfo +data DOMHTMLInputElementSetRangeTextMethodInfo +data DOMHTMLInputElementSetReadOnlyMethodInfo +data DOMHTMLInputElementSetRequiredMethodInfo +data DOMHTMLInputElementSetSizeMethodInfo +data DOMHTMLInputElementSetSrcMethodInfo +data DOMHTMLInputElementSetStepMethodInfo +data DOMHTMLInputElementSetUseMapMethodInfo +data DOMHTMLInputElementSetValueMethodInfo +data DOMHTMLInputElementSetValueAsNumberMethodInfo +data DOMHTMLInputElementSetValueForUserMethodInfo +data DOMHTMLInputElementSetWebkitGrammarMethodInfo +data DOMHTMLInputElementSetWebkitSpeechMethodInfo +data DOMHTMLInputElementSetWebkitdirectoryMethodInfo +data DOMHTMLInputElementSetWidthMethodInfo +data DOMHTMLInputElementStepDownMethodInfo +data DOMHTMLInputElementStepUpMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLKeygenElement.hs b/GI/WebKit/Objects/DOMHTMLKeygenElement.hs --- a/GI/WebKit/Objects/DOMHTMLKeygenElement.hs +++ b/GI/WebKit/Objects/DOMHTMLKeygenElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,70 +18,87 @@ -- * Methods -- ** dOMHTMLKeygenElementCheckValidity + DOMHTMLKeygenElementCheckValidityMethodInfo, dOMHTMLKeygenElementCheckValidity , -- ** dOMHTMLKeygenElementGetAutofocus + DOMHTMLKeygenElementGetAutofocusMethodInfo, dOMHTMLKeygenElementGetAutofocus , -- ** dOMHTMLKeygenElementGetChallenge + DOMHTMLKeygenElementGetChallengeMethodInfo, dOMHTMLKeygenElementGetChallenge , -- ** dOMHTMLKeygenElementGetDisabled + DOMHTMLKeygenElementGetDisabledMethodInfo, dOMHTMLKeygenElementGetDisabled , -- ** dOMHTMLKeygenElementGetForm + DOMHTMLKeygenElementGetFormMethodInfo , dOMHTMLKeygenElementGetForm , -- ** dOMHTMLKeygenElementGetKeytype + DOMHTMLKeygenElementGetKeytypeMethodInfo, dOMHTMLKeygenElementGetKeytype , -- ** dOMHTMLKeygenElementGetLabels + DOMHTMLKeygenElementGetLabelsMethodInfo , dOMHTMLKeygenElementGetLabels , -- ** dOMHTMLKeygenElementGetName + DOMHTMLKeygenElementGetNameMethodInfo , dOMHTMLKeygenElementGetName , -- ** dOMHTMLKeygenElementGetValidationMessage + DOMHTMLKeygenElementGetValidationMessageMethodInfo, dOMHTMLKeygenElementGetValidationMessage, -- ** dOMHTMLKeygenElementGetValidity + DOMHTMLKeygenElementGetValidityMethodInfo, dOMHTMLKeygenElementGetValidity , -- ** dOMHTMLKeygenElementGetWillValidate + DOMHTMLKeygenElementGetWillValidateMethodInfo, dOMHTMLKeygenElementGetWillValidate , -- ** dOMHTMLKeygenElementSetAutofocus + DOMHTMLKeygenElementSetAutofocusMethodInfo, dOMHTMLKeygenElementSetAutofocus , -- ** dOMHTMLKeygenElementSetChallenge + DOMHTMLKeygenElementSetChallengeMethodInfo, dOMHTMLKeygenElementSetChallenge , -- ** dOMHTMLKeygenElementSetCustomValidity + DOMHTMLKeygenElementSetCustomValidityMethodInfo, dOMHTMLKeygenElementSetCustomValidity , -- ** dOMHTMLKeygenElementSetDisabled + DOMHTMLKeygenElementSetDisabledMethodInfo, dOMHTMLKeygenElementSetDisabled , -- ** dOMHTMLKeygenElementSetKeytype + DOMHTMLKeygenElementSetKeytypeMethodInfo, dOMHTMLKeygenElementSetKeytype , -- ** dOMHTMLKeygenElementSetName + DOMHTMLKeygenElementSetNameMethodInfo , dOMHTMLKeygenElementSetName , @@ -188,6 +206,188 @@ noDOMHTMLKeygenElement :: Maybe DOMHTMLKeygenElement noDOMHTMLKeygenElement = Nothing +type family ResolveDOMHTMLKeygenElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLKeygenElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLKeygenElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLKeygenElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLKeygenElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLKeygenElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLKeygenElementMethod "checkValidity" o = DOMHTMLKeygenElementCheckValidityMethodInfo + ResolveDOMHTMLKeygenElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLKeygenElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLKeygenElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLKeygenElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLKeygenElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLKeygenElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLKeygenElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLKeygenElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLKeygenElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLKeygenElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLKeygenElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLKeygenElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLKeygenElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLKeygenElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLKeygenElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLKeygenElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLKeygenElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLKeygenElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLKeygenElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLKeygenElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLKeygenElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLKeygenElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLKeygenElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLKeygenElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLKeygenElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLKeygenElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLKeygenElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLKeygenElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLKeygenElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLKeygenElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLKeygenElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLKeygenElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLKeygenElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLKeygenElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLKeygenElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLKeygenElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLKeygenElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLKeygenElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLKeygenElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLKeygenElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLKeygenElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLKeygenElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLKeygenElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLKeygenElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLKeygenElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLKeygenElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLKeygenElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLKeygenElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLKeygenElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLKeygenElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLKeygenElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLKeygenElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLKeygenElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLKeygenElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLKeygenElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLKeygenElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLKeygenElementMethod "getAutofocus" o = DOMHTMLKeygenElementGetAutofocusMethodInfo + ResolveDOMHTMLKeygenElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLKeygenElementMethod "getChallenge" o = DOMHTMLKeygenElementGetChallengeMethodInfo + ResolveDOMHTMLKeygenElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLKeygenElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLKeygenElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLKeygenElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLKeygenElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLKeygenElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLKeygenElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLKeygenElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLKeygenElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLKeygenElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLKeygenElementMethod "getDisabled" o = DOMHTMLKeygenElementGetDisabledMethodInfo + ResolveDOMHTMLKeygenElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLKeygenElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLKeygenElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLKeygenElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLKeygenElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLKeygenElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLKeygenElementMethod "getForm" o = DOMHTMLKeygenElementGetFormMethodInfo + ResolveDOMHTMLKeygenElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLKeygenElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLKeygenElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLKeygenElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLKeygenElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLKeygenElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLKeygenElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLKeygenElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLKeygenElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLKeygenElementMethod "getKeytype" o = DOMHTMLKeygenElementGetKeytypeMethodInfo + ResolveDOMHTMLKeygenElementMethod "getLabels" o = DOMHTMLKeygenElementGetLabelsMethodInfo + ResolveDOMHTMLKeygenElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLKeygenElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLKeygenElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLKeygenElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLKeygenElementMethod "getName" o = DOMHTMLKeygenElementGetNameMethodInfo + ResolveDOMHTMLKeygenElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLKeygenElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLKeygenElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLKeygenElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLKeygenElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLKeygenElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLKeygenElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLKeygenElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLKeygenElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLKeygenElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLKeygenElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLKeygenElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLKeygenElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLKeygenElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLKeygenElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLKeygenElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLKeygenElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLKeygenElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLKeygenElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLKeygenElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLKeygenElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLKeygenElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLKeygenElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLKeygenElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLKeygenElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLKeygenElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLKeygenElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLKeygenElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLKeygenElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLKeygenElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLKeygenElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLKeygenElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLKeygenElementMethod "getValidationMessage" o = DOMHTMLKeygenElementGetValidationMessageMethodInfo + ResolveDOMHTMLKeygenElementMethod "getValidity" o = DOMHTMLKeygenElementGetValidityMethodInfo + ResolveDOMHTMLKeygenElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLKeygenElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLKeygenElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLKeygenElementMethod "getWillValidate" o = DOMHTMLKeygenElementGetWillValidateMethodInfo + ResolveDOMHTMLKeygenElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLKeygenElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLKeygenElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLKeygenElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLKeygenElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLKeygenElementMethod "setAutofocus" o = DOMHTMLKeygenElementSetAutofocusMethodInfo + ResolveDOMHTMLKeygenElementMethod "setChallenge" o = DOMHTMLKeygenElementSetChallengeMethodInfo + ResolveDOMHTMLKeygenElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLKeygenElementMethod "setCustomValidity" o = DOMHTMLKeygenElementSetCustomValidityMethodInfo + ResolveDOMHTMLKeygenElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLKeygenElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLKeygenElementMethod "setDisabled" o = DOMHTMLKeygenElementSetDisabledMethodInfo + ResolveDOMHTMLKeygenElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLKeygenElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLKeygenElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLKeygenElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLKeygenElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLKeygenElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLKeygenElementMethod "setKeytype" o = DOMHTMLKeygenElementSetKeytypeMethodInfo + ResolveDOMHTMLKeygenElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLKeygenElementMethod "setName" o = DOMHTMLKeygenElementSetNameMethodInfo + ResolveDOMHTMLKeygenElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLKeygenElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLKeygenElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLKeygenElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLKeygenElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLKeygenElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLKeygenElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLKeygenElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLKeygenElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLKeygenElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLKeygenElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLKeygenElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLKeygenElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLKeygenElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLKeygenElementMethod t DOMHTMLKeygenElement, MethodInfo info DOMHTMLKeygenElement p) => IsLabelProxy t (DOMHTMLKeygenElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLKeygenElementMethod t DOMHTMLKeygenElement, MethodInfo info DOMHTMLKeygenElement p) => IsLabel t (DOMHTMLKeygenElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "autofocus" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -207,7 +407,7 @@ type AttrSetTypeConstraint DOMHTMLKeygenElementAutofocusPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLKeygenElementAutofocusPropertyInfo = DOMHTMLKeygenElementK type AttrGetType DOMHTMLKeygenElementAutofocusPropertyInfo = Bool - type AttrLabel DOMHTMLKeygenElementAutofocusPropertyInfo = "DOMHTMLKeygenElement::autofocus" + type AttrLabel DOMHTMLKeygenElementAutofocusPropertyInfo = "autofocus" attrGet _ = getDOMHTMLKeygenElementAutofocus attrSet _ = setDOMHTMLKeygenElementAutofocus attrConstruct _ = constructDOMHTMLKeygenElementAutofocus @@ -231,7 +431,7 @@ type AttrSetTypeConstraint DOMHTMLKeygenElementChallengePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLKeygenElementChallengePropertyInfo = DOMHTMLKeygenElementK type AttrGetType DOMHTMLKeygenElementChallengePropertyInfo = T.Text - type AttrLabel DOMHTMLKeygenElementChallengePropertyInfo = "DOMHTMLKeygenElement::challenge" + type AttrLabel DOMHTMLKeygenElementChallengePropertyInfo = "challenge" attrGet _ = getDOMHTMLKeygenElementChallenge attrSet _ = setDOMHTMLKeygenElementChallenge attrConstruct _ = constructDOMHTMLKeygenElementChallenge @@ -255,7 +455,7 @@ type AttrSetTypeConstraint DOMHTMLKeygenElementDisabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLKeygenElementDisabledPropertyInfo = DOMHTMLKeygenElementK type AttrGetType DOMHTMLKeygenElementDisabledPropertyInfo = Bool - type AttrLabel DOMHTMLKeygenElementDisabledPropertyInfo = "DOMHTMLKeygenElement::disabled" + type AttrLabel DOMHTMLKeygenElementDisabledPropertyInfo = "disabled" attrGet _ = getDOMHTMLKeygenElementDisabled attrSet _ = setDOMHTMLKeygenElementDisabled attrConstruct _ = constructDOMHTMLKeygenElementDisabled @@ -273,7 +473,7 @@ type AttrSetTypeConstraint DOMHTMLKeygenElementFormPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLKeygenElementFormPropertyInfo = DOMHTMLKeygenElementK type AttrGetType DOMHTMLKeygenElementFormPropertyInfo = DOMHTMLFormElement - type AttrLabel DOMHTMLKeygenElementFormPropertyInfo = "DOMHTMLKeygenElement::form" + type AttrLabel DOMHTMLKeygenElementFormPropertyInfo = "form" attrGet _ = getDOMHTMLKeygenElementForm attrSet _ = undefined attrConstruct _ = undefined @@ -297,7 +497,7 @@ type AttrSetTypeConstraint DOMHTMLKeygenElementKeytypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLKeygenElementKeytypePropertyInfo = DOMHTMLKeygenElementK type AttrGetType DOMHTMLKeygenElementKeytypePropertyInfo = T.Text - type AttrLabel DOMHTMLKeygenElementKeytypePropertyInfo = "DOMHTMLKeygenElement::keytype" + type AttrLabel DOMHTMLKeygenElementKeytypePropertyInfo = "keytype" attrGet _ = getDOMHTMLKeygenElementKeytype attrSet _ = setDOMHTMLKeygenElementKeytype attrConstruct _ = constructDOMHTMLKeygenElementKeytype @@ -315,7 +515,7 @@ type AttrSetTypeConstraint DOMHTMLKeygenElementLabelsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLKeygenElementLabelsPropertyInfo = DOMHTMLKeygenElementK type AttrGetType DOMHTMLKeygenElementLabelsPropertyInfo = DOMNodeList - type AttrLabel DOMHTMLKeygenElementLabelsPropertyInfo = "DOMHTMLKeygenElement::labels" + type AttrLabel DOMHTMLKeygenElementLabelsPropertyInfo = "labels" attrGet _ = getDOMHTMLKeygenElementLabels attrSet _ = undefined attrConstruct _ = undefined @@ -339,7 +539,7 @@ type AttrSetTypeConstraint DOMHTMLKeygenElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLKeygenElementNamePropertyInfo = DOMHTMLKeygenElementK type AttrGetType DOMHTMLKeygenElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLKeygenElementNamePropertyInfo = "DOMHTMLKeygenElement::name" + type AttrLabel DOMHTMLKeygenElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLKeygenElementName attrSet _ = setDOMHTMLKeygenElementName attrConstruct _ = constructDOMHTMLKeygenElementName @@ -357,7 +557,7 @@ type AttrSetTypeConstraint DOMHTMLKeygenElementTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLKeygenElementTypePropertyInfo = DOMHTMLKeygenElementK type AttrGetType DOMHTMLKeygenElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLKeygenElementTypePropertyInfo = "DOMHTMLKeygenElement::type" + type AttrLabel DOMHTMLKeygenElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLKeygenElementType attrSet _ = undefined attrConstruct _ = undefined @@ -375,7 +575,7 @@ type AttrSetTypeConstraint DOMHTMLKeygenElementValidationMessagePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLKeygenElementValidationMessagePropertyInfo = DOMHTMLKeygenElementK type AttrGetType DOMHTMLKeygenElementValidationMessagePropertyInfo = T.Text - type AttrLabel DOMHTMLKeygenElementValidationMessagePropertyInfo = "DOMHTMLKeygenElement::validation-message" + type AttrLabel DOMHTMLKeygenElementValidationMessagePropertyInfo = "validation-message" attrGet _ = getDOMHTMLKeygenElementValidationMessage attrSet _ = undefined attrConstruct _ = undefined @@ -393,7 +593,7 @@ type AttrSetTypeConstraint DOMHTMLKeygenElementValidityPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLKeygenElementValidityPropertyInfo = DOMHTMLKeygenElementK type AttrGetType DOMHTMLKeygenElementValidityPropertyInfo = DOMValidityState - type AttrLabel DOMHTMLKeygenElementValidityPropertyInfo = "DOMHTMLKeygenElement::validity" + type AttrLabel DOMHTMLKeygenElementValidityPropertyInfo = "validity" attrGet _ = getDOMHTMLKeygenElementValidity attrSet _ = undefined attrConstruct _ = undefined @@ -411,22 +611,21 @@ type AttrSetTypeConstraint DOMHTMLKeygenElementWillValidatePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLKeygenElementWillValidatePropertyInfo = DOMHTMLKeygenElementK type AttrGetType DOMHTMLKeygenElementWillValidatePropertyInfo = Bool - type AttrLabel DOMHTMLKeygenElementWillValidatePropertyInfo = "DOMHTMLKeygenElement::will-validate" + type AttrLabel DOMHTMLKeygenElementWillValidatePropertyInfo = "will-validate" attrGet _ = getDOMHTMLKeygenElementWillValidate attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHTMLKeygenElement = DOMHTMLKeygenElementAttributeList -type DOMHTMLKeygenElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autofocus", DOMHTMLKeygenElementAutofocusPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("challenge", DOMHTMLKeygenElementChallengePropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLKeygenElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLKeygenElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("keytype", DOMHTMLKeygenElementKeytypePropertyInfo), '("labels", DOMHTMLKeygenElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLKeygenElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLKeygenElementTypePropertyInfo), '("validation-message", DOMHTMLKeygenElementValidationMessagePropertyInfo), '("validity", DOMHTMLKeygenElementValidityPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("will-validate", DOMHTMLKeygenElementWillValidatePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLKeygenElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autofocus", DOMHTMLKeygenElementAutofocusPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("challenge", DOMHTMLKeygenElementChallengePropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLKeygenElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLKeygenElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("keytype", DOMHTMLKeygenElementKeytypePropertyInfo), '("labels", DOMHTMLKeygenElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLKeygenElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLKeygenElementTypePropertyInfo), '("validationMessage", DOMHTMLKeygenElementValidationMessagePropertyInfo), '("validity", DOMHTMLKeygenElementValidityPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("willValidate", DOMHTMLKeygenElementWillValidatePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLKeygenElement = DOMHTMLKeygenElementSignalList -type DOMHTMLKeygenElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLKeygenElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLKeygenElement::check_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -438,8 +637,8 @@ dOMHTMLKeygenElementCheckValidity :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLKeygenElementCheckValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_keygen_element_check_validity _obj' @@ -447,11 +646,14 @@ touchManagedPtr _obj return result' +data DOMHTMLKeygenElementCheckValidityMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementCheckValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementCheckValidity + -- method DOMHTMLKeygenElement::get_autofocus -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -463,8 +665,8 @@ dOMHTMLKeygenElementGetAutofocus :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLKeygenElementGetAutofocus _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_keygen_element_get_autofocus _obj' @@ -472,11 +674,14 @@ touchManagedPtr _obj return result' +data DOMHTMLKeygenElementGetAutofocusMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementGetAutofocusMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementGetAutofocus + -- method DOMHTMLKeygenElement::get_challenge -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -488,8 +693,8 @@ dOMHTMLKeygenElementGetChallenge :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLKeygenElementGetChallenge _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_keygen_element_get_challenge _obj' @@ -499,11 +704,14 @@ touchManagedPtr _obj return result' +data DOMHTMLKeygenElementGetChallengeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementGetChallengeMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementGetChallenge + -- method DOMHTMLKeygenElement::get_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -515,8 +723,8 @@ dOMHTMLKeygenElementGetDisabled :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLKeygenElementGetDisabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_keygen_element_get_disabled _obj' @@ -524,11 +732,14 @@ touchManagedPtr _obj return result' +data DOMHTMLKeygenElementGetDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementGetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementGetDisabled + -- method DOMHTMLKeygenElement::get_form -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLFormElement" -- throws : False -- Skip return : False @@ -540,8 +751,8 @@ dOMHTMLKeygenElementGetForm :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - m DOMHTMLFormElement + a -- _obj + -> m DOMHTMLFormElement -- result dOMHTMLKeygenElementGetForm _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_keygen_element_get_form _obj' @@ -550,11 +761,14 @@ touchManagedPtr _obj return result' +data DOMHTMLKeygenElementGetFormMethodInfo +instance (signature ~ (m DOMHTMLFormElement), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementGetFormMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementGetForm + -- method DOMHTMLKeygenElement::get_keytype -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -566,8 +780,8 @@ dOMHTMLKeygenElementGetKeytype :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLKeygenElementGetKeytype _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_keygen_element_get_keytype _obj' @@ -577,11 +791,14 @@ touchManagedPtr _obj return result' +data DOMHTMLKeygenElementGetKeytypeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementGetKeytypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementGetKeytype + -- method DOMHTMLKeygenElement::get_labels -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -593,8 +810,8 @@ dOMHTMLKeygenElementGetLabels :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - m DOMNodeList + a -- _obj + -> m DOMNodeList -- result dOMHTMLKeygenElementGetLabels _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_keygen_element_get_labels _obj' @@ -603,11 +820,14 @@ touchManagedPtr _obj return result' +data DOMHTMLKeygenElementGetLabelsMethodInfo +instance (signature ~ (m DOMNodeList), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementGetLabelsMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementGetLabels + -- method DOMHTMLKeygenElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -619,8 +839,8 @@ dOMHTMLKeygenElementGetName :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLKeygenElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_keygen_element_get_name _obj' @@ -630,11 +850,14 @@ touchManagedPtr _obj return result' +data DOMHTMLKeygenElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementGetName + -- method DOMHTMLKeygenElement::get_validation_message -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -646,8 +869,8 @@ dOMHTMLKeygenElementGetValidationMessage :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLKeygenElementGetValidationMessage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_keygen_element_get_validation_message _obj' @@ -657,11 +880,14 @@ touchManagedPtr _obj return result' +data DOMHTMLKeygenElementGetValidationMessageMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementGetValidationMessageMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementGetValidationMessage + -- method DOMHTMLKeygenElement::get_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMValidityState" -- throws : False -- Skip return : False @@ -673,8 +899,8 @@ dOMHTMLKeygenElementGetValidity :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - m DOMValidityState + a -- _obj + -> m DOMValidityState -- result dOMHTMLKeygenElementGetValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_keygen_element_get_validity _obj' @@ -683,11 +909,14 @@ touchManagedPtr _obj return result' +data DOMHTMLKeygenElementGetValidityMethodInfo +instance (signature ~ (m DOMValidityState), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementGetValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementGetValidity + -- method DOMHTMLKeygenElement::get_will_validate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -699,8 +928,8 @@ dOMHTMLKeygenElementGetWillValidate :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLKeygenElementGetWillValidate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_keygen_element_get_will_validate _obj' @@ -708,11 +937,14 @@ touchManagedPtr _obj return result' +data DOMHTMLKeygenElementGetWillValidateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementGetWillValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementGetWillValidate + -- method DOMHTMLKeygenElement::set_autofocus -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -725,9 +957,9 @@ dOMHTMLKeygenElementSetAutofocus :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLKeygenElementSetAutofocus _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -735,11 +967,14 @@ touchManagedPtr _obj return () +data DOMHTMLKeygenElementSetAutofocusMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementSetAutofocusMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementSetAutofocus + -- method DOMHTMLKeygenElement::set_challenge -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -752,9 +987,9 @@ dOMHTMLKeygenElementSetChallenge :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLKeygenElementSetChallenge _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -763,11 +998,14 @@ freeMem value' return () +data DOMHTMLKeygenElementSetChallengeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementSetChallengeMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementSetChallenge + -- method DOMHTMLKeygenElement::set_custom_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -780,9 +1018,9 @@ dOMHTMLKeygenElementSetCustomValidity :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - T.Text -> -- error - m () + a -- _obj + -> T.Text -- error_ + -> m () -- result dOMHTMLKeygenElementSetCustomValidity _obj error_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj error_' <- textToCString error_ @@ -791,11 +1029,14 @@ freeMem error_' return () +data DOMHTMLKeygenElementSetCustomValidityMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementSetCustomValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementSetCustomValidity + -- method DOMHTMLKeygenElement::set_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -808,9 +1049,9 @@ dOMHTMLKeygenElementSetDisabled :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLKeygenElementSetDisabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -818,11 +1059,14 @@ touchManagedPtr _obj return () +data DOMHTMLKeygenElementSetDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementSetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementSetDisabled + -- method DOMHTMLKeygenElement::set_keytype -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -835,9 +1079,9 @@ dOMHTMLKeygenElementSetKeytype :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLKeygenElementSetKeytype _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -846,11 +1090,14 @@ freeMem value' return () +data DOMHTMLKeygenElementSetKeytypeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementSetKeytypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementSetKeytype + -- method DOMHTMLKeygenElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLKeygenElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -863,9 +1110,9 @@ dOMHTMLKeygenElementSetName :: (MonadIO m, DOMHTMLKeygenElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLKeygenElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -873,5 +1120,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLKeygenElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLKeygenElementK a) => MethodInfo DOMHTMLKeygenElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLKeygenElementSetName diff --git a/GI/WebKit/Objects/DOMHTMLKeygenElement.hs-boot b/GI/WebKit/Objects/DOMHTMLKeygenElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLKeygenElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLKeygenElement.hs-boot @@ -22,3 +22,20 @@ data DOMHTMLKeygenElementValidationMessagePropertyInfo data DOMHTMLKeygenElementValidityPropertyInfo data DOMHTMLKeygenElementWillValidatePropertyInfo +data DOMHTMLKeygenElementCheckValidityMethodInfo +data DOMHTMLKeygenElementGetAutofocusMethodInfo +data DOMHTMLKeygenElementGetChallengeMethodInfo +data DOMHTMLKeygenElementGetDisabledMethodInfo +data DOMHTMLKeygenElementGetFormMethodInfo +data DOMHTMLKeygenElementGetKeytypeMethodInfo +data DOMHTMLKeygenElementGetLabelsMethodInfo +data DOMHTMLKeygenElementGetNameMethodInfo +data DOMHTMLKeygenElementGetValidationMessageMethodInfo +data DOMHTMLKeygenElementGetValidityMethodInfo +data DOMHTMLKeygenElementGetWillValidateMethodInfo +data DOMHTMLKeygenElementSetAutofocusMethodInfo +data DOMHTMLKeygenElementSetChallengeMethodInfo +data DOMHTMLKeygenElementSetCustomValidityMethodInfo +data DOMHTMLKeygenElementSetDisabledMethodInfo +data DOMHTMLKeygenElementSetKeytypeMethodInfo +data DOMHTMLKeygenElementSetNameMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLLIElement.hs b/GI/WebKit/Objects/DOMHTMLLIElement.hs --- a/GI/WebKit/Objects/DOMHTMLLIElement.hs +++ b/GI/WebKit/Objects/DOMHTMLLIElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLLIElementGetValue + DOMHTMLLIElementGetValueMethodInfo , dOMHTMLLIElementGetValue , -- ** dOMHTMLLIElementSetValue + DOMHTMLLIElementSetValueMethodInfo , dOMHTMLLIElementSetValue , @@ -77,6 +80,173 @@ noDOMHTMLLIElement :: Maybe DOMHTMLLIElement noDOMHTMLLIElement = Nothing +type family ResolveDOMHTMLLIElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLLIElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLLIElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLLIElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLLIElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLLIElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLLIElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLLIElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLLIElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLLIElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLLIElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLLIElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLLIElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLLIElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLLIElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLLIElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLLIElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLLIElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLLIElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLLIElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLLIElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLLIElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLLIElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLLIElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLLIElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLLIElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLLIElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLLIElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLLIElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLLIElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLLIElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLLIElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLLIElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLLIElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLLIElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLLIElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLLIElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLLIElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLLIElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLLIElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLLIElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLLIElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLLIElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLLIElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLLIElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLLIElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLLIElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLLIElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLLIElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLLIElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLLIElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLLIElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLLIElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLLIElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLLIElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLLIElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLLIElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLLIElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLLIElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLLIElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLLIElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLLIElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLLIElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLLIElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLLIElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLLIElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLLIElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLLIElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLLIElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLLIElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLLIElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLLIElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLLIElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLLIElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLLIElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLLIElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLLIElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLLIElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLLIElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLLIElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLLIElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLLIElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLLIElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLLIElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLLIElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLLIElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLLIElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLLIElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLLIElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLLIElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLLIElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLLIElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLLIElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLLIElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLLIElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLLIElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLLIElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLLIElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLLIElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLLIElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLLIElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLLIElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLLIElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLLIElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLLIElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLLIElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLLIElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLLIElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLLIElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLLIElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLLIElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLLIElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLLIElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLLIElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLLIElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLLIElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLLIElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLLIElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLLIElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLLIElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLLIElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLLIElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLLIElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLLIElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLLIElementMethod "getValue" o = DOMHTMLLIElementGetValueMethodInfo + ResolveDOMHTMLLIElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLLIElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLLIElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLLIElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLLIElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLLIElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLLIElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLLIElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLLIElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLLIElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLLIElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLLIElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLLIElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLLIElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLLIElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLLIElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLLIElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLLIElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLLIElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLLIElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLLIElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLLIElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLLIElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLLIElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLLIElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLLIElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLLIElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLLIElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLLIElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLLIElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLLIElementMethod "setValue" o = DOMHTMLLIElementSetValueMethodInfo + ResolveDOMHTMLLIElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLLIElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLLIElementMethod t DOMHTMLLIElement, MethodInfo info DOMHTMLLIElement p) => IsLabelProxy t (DOMHTMLLIElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLLIElementMethod t DOMHTMLLIElement, MethodInfo info DOMHTMLLIElement p) => IsLabel t (DOMHTMLLIElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "type" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -96,7 +266,7 @@ type AttrSetTypeConstraint DOMHTMLLIElementTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLLIElementTypePropertyInfo = DOMHTMLLIElementK type AttrGetType DOMHTMLLIElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLLIElementTypePropertyInfo = "DOMHTMLLIElement::type" + type AttrLabel DOMHTMLLIElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLLIElementType attrSet _ = setDOMHTMLLIElementType attrConstruct _ = constructDOMHTMLLIElementType @@ -120,22 +290,21 @@ type AttrSetTypeConstraint DOMHTMLLIElementValuePropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLLIElementValuePropertyInfo = DOMHTMLLIElementK type AttrGetType DOMHTMLLIElementValuePropertyInfo = Int64 - type AttrLabel DOMHTMLLIElementValuePropertyInfo = "DOMHTMLLIElement::value" + type AttrLabel DOMHTMLLIElementValuePropertyInfo = "value" attrGet _ = getDOMHTMLLIElementValue attrSet _ = setDOMHTMLLIElementValue attrConstruct _ = constructDOMHTMLLIElementValue type instance AttributeList DOMHTMLLIElement = DOMHTMLLIElementAttributeList -type DOMHTMLLIElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLLIElementTypePropertyInfo), '("value", DOMHTMLLIElementValuePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLLIElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLLIElementTypePropertyInfo), '("value", DOMHTMLLIElementValuePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLLIElement = DOMHTMLLIElementSignalList -type DOMHTMLLIElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLLIElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLLIElement::get_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLIElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLIElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLIElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -147,19 +316,22 @@ dOMHTMLLIElementGetValue :: (MonadIO m, DOMHTMLLIElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLLIElementGetValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_htmlli_element_get_value _obj' touchManagedPtr _obj return result +data DOMHTMLLIElementGetValueMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLLIElementK a) => MethodInfo DOMHTMLLIElementGetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLLIElementGetValue + -- method DOMHTMLLIElement::set_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLIElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLIElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLIElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -172,13 +344,17 @@ dOMHTMLLIElementSetValue :: (MonadIO m, DOMHTMLLIElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLLIElementSetValue _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_htmlli_element_set_value _obj' value touchManagedPtr _obj return () + +data DOMHTMLLIElementSetValueMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLLIElementK a) => MethodInfo DOMHTMLLIElementSetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLLIElementSetValue diff --git a/GI/WebKit/Objects/DOMHTMLLIElement.hs-boot b/GI/WebKit/Objects/DOMHTMLLIElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLLIElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLLIElement.hs-boot @@ -13,3 +13,5 @@ instance (GObject o, IsDescendantOf DOMHTMLLIElement o) => DOMHTMLLIElementK o data DOMHTMLLIElementTypePropertyInfo data DOMHTMLLIElementValuePropertyInfo +data DOMHTMLLIElementGetValueMethodInfo +data DOMHTMLLIElementSetValueMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLLabelElement.hs b/GI/WebKit/Objects/DOMHTMLLabelElement.hs --- a/GI/WebKit/Objects/DOMHTMLLabelElement.hs +++ b/GI/WebKit/Objects/DOMHTMLLabelElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMHTMLLabelElementGetControl + DOMHTMLLabelElementGetControlMethodInfo , dOMHTMLLabelElementGetControl , -- ** dOMHTMLLabelElementGetForm + DOMHTMLLabelElementGetFormMethodInfo , dOMHTMLLabelElementGetForm , -- ** dOMHTMLLabelElementGetHtmlFor + DOMHTMLLabelElementGetHtmlForMethodInfo , dOMHTMLLabelElementGetHtmlFor , -- ** dOMHTMLLabelElementSetHtmlFor + DOMHTMLLabelElementSetHtmlForMethodInfo , dOMHTMLLabelElementSetHtmlFor , @@ -88,6 +93,175 @@ noDOMHTMLLabelElement :: Maybe DOMHTMLLabelElement noDOMHTMLLabelElement = Nothing +type family ResolveDOMHTMLLabelElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLLabelElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLLabelElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLLabelElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLLabelElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLLabelElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLLabelElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLLabelElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLLabelElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLLabelElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLLabelElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLLabelElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLLabelElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLLabelElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLLabelElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLLabelElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLLabelElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLLabelElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLLabelElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLLabelElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLLabelElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLLabelElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLLabelElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLLabelElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLLabelElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLLabelElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLLabelElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLLabelElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLLabelElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLLabelElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLLabelElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLLabelElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLLabelElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLLabelElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLLabelElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLLabelElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLLabelElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLLabelElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLLabelElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLLabelElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLLabelElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLLabelElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLLabelElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLLabelElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLLabelElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLLabelElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLLabelElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLLabelElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLLabelElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLLabelElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLLabelElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLLabelElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLLabelElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLLabelElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLLabelElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLLabelElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLLabelElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLLabelElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLLabelElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLLabelElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLLabelElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLLabelElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLLabelElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLLabelElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLLabelElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLLabelElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLLabelElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLLabelElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLLabelElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLLabelElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLLabelElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLLabelElementMethod "getControl" o = DOMHTMLLabelElementGetControlMethodInfo + ResolveDOMHTMLLabelElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLLabelElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLLabelElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLLabelElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLLabelElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLLabelElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLLabelElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLLabelElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLLabelElementMethod "getForm" o = DOMHTMLLabelElementGetFormMethodInfo + ResolveDOMHTMLLabelElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLLabelElementMethod "getHtmlFor" o = DOMHTMLLabelElementGetHtmlForMethodInfo + ResolveDOMHTMLLabelElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLLabelElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLLabelElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLLabelElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLLabelElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLLabelElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLLabelElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLLabelElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLLabelElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLLabelElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLLabelElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLLabelElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLLabelElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLLabelElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLLabelElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLLabelElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLLabelElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLLabelElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLLabelElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLLabelElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLLabelElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLLabelElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLLabelElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLLabelElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLLabelElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLLabelElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLLabelElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLLabelElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLLabelElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLLabelElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLLabelElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLLabelElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLLabelElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLLabelElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLLabelElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLLabelElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLLabelElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLLabelElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLLabelElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLLabelElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLLabelElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLLabelElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLLabelElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLLabelElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLLabelElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLLabelElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLLabelElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLLabelElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLLabelElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLLabelElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLLabelElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLLabelElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLLabelElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLLabelElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLLabelElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLLabelElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLLabelElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLLabelElementMethod "setHtmlFor" o = DOMHTMLLabelElementSetHtmlForMethodInfo + ResolveDOMHTMLLabelElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLLabelElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLLabelElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLLabelElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLLabelElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLLabelElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLLabelElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLLabelElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLLabelElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLLabelElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLLabelElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLLabelElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLLabelElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLLabelElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLLabelElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLLabelElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLLabelElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLLabelElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLLabelElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLLabelElementMethod t DOMHTMLLabelElement, MethodInfo info DOMHTMLLabelElement p) => IsLabelProxy t (DOMHTMLLabelElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLLabelElementMethod t DOMHTMLLabelElement, MethodInfo info DOMHTMLLabelElement p) => IsLabel t (DOMHTMLLabelElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "control" -- Type: TInterface "WebKit" "DOMHTMLElement" -- Flags: [PropertyReadable] @@ -101,7 +275,7 @@ type AttrSetTypeConstraint DOMHTMLLabelElementControlPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLLabelElementControlPropertyInfo = DOMHTMLLabelElementK type AttrGetType DOMHTMLLabelElementControlPropertyInfo = DOMHTMLElement - type AttrLabel DOMHTMLLabelElementControlPropertyInfo = "DOMHTMLLabelElement::control" + type AttrLabel DOMHTMLLabelElementControlPropertyInfo = "control" attrGet _ = getDOMHTMLLabelElementControl attrSet _ = undefined attrConstruct _ = undefined @@ -119,7 +293,7 @@ type AttrSetTypeConstraint DOMHTMLLabelElementFormPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLLabelElementFormPropertyInfo = DOMHTMLLabelElementK type AttrGetType DOMHTMLLabelElementFormPropertyInfo = DOMHTMLFormElement - type AttrLabel DOMHTMLLabelElementFormPropertyInfo = "DOMHTMLLabelElement::form" + type AttrLabel DOMHTMLLabelElementFormPropertyInfo = "form" attrGet _ = getDOMHTMLLabelElementForm attrSet _ = undefined attrConstruct _ = undefined @@ -143,22 +317,21 @@ type AttrSetTypeConstraint DOMHTMLLabelElementHtmlForPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLLabelElementHtmlForPropertyInfo = DOMHTMLLabelElementK type AttrGetType DOMHTMLLabelElementHtmlForPropertyInfo = T.Text - type AttrLabel DOMHTMLLabelElementHtmlForPropertyInfo = "DOMHTMLLabelElement::html-for" + type AttrLabel DOMHTMLLabelElementHtmlForPropertyInfo = "html-for" attrGet _ = getDOMHTMLLabelElementHtmlFor attrSet _ = setDOMHTMLLabelElementHtmlFor attrConstruct _ = constructDOMHTMLLabelElementHtmlFor type instance AttributeList DOMHTMLLabelElement = DOMHTMLLabelElementAttributeList -type DOMHTMLLabelElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("control", DOMHTMLLabelElementControlPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLLabelElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("html-for", DOMHTMLLabelElementHtmlForPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLLabelElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("control", DOMHTMLLabelElementControlPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLLabelElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("htmlFor", DOMHTMLLabelElementHtmlForPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLLabelElement = DOMHTMLLabelElementSignalList -type DOMHTMLLabelElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLLabelElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLLabelElement::get_control -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLElement" -- throws : False -- Skip return : False @@ -170,8 +343,8 @@ dOMHTMLLabelElementGetControl :: (MonadIO m, DOMHTMLLabelElementK a) => - a -> -- _obj - m DOMHTMLElement + a -- _obj + -> m DOMHTMLElement -- result dOMHTMLLabelElementGetControl _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_label_element_get_control _obj' @@ -180,11 +353,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLabelElementGetControlMethodInfo +instance (signature ~ (m DOMHTMLElement), MonadIO m, DOMHTMLLabelElementK a) => MethodInfo DOMHTMLLabelElementGetControlMethodInfo a signature where + overloadedMethod _ = dOMHTMLLabelElementGetControl + -- method DOMHTMLLabelElement::get_form -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLFormElement" -- throws : False -- Skip return : False @@ -196,8 +372,8 @@ dOMHTMLLabelElementGetForm :: (MonadIO m, DOMHTMLLabelElementK a) => - a -> -- _obj - m DOMHTMLFormElement + a -- _obj + -> m DOMHTMLFormElement -- result dOMHTMLLabelElementGetForm _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_label_element_get_form _obj' @@ -206,11 +382,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLabelElementGetFormMethodInfo +instance (signature ~ (m DOMHTMLFormElement), MonadIO m, DOMHTMLLabelElementK a) => MethodInfo DOMHTMLLabelElementGetFormMethodInfo a signature where + overloadedMethod _ = dOMHTMLLabelElementGetForm + -- method DOMHTMLLabelElement::get_html_for -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -222,8 +401,8 @@ dOMHTMLLabelElementGetHtmlFor :: (MonadIO m, DOMHTMLLabelElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLLabelElementGetHtmlFor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_label_element_get_html_for _obj' @@ -233,11 +412,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLabelElementGetHtmlForMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLLabelElementK a) => MethodInfo DOMHTMLLabelElementGetHtmlForMethodInfo a signature where + overloadedMethod _ = dOMHTMLLabelElementGetHtmlFor + -- method DOMHTMLLabelElement::set_html_for -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLabelElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -250,9 +432,9 @@ dOMHTMLLabelElementSetHtmlFor :: (MonadIO m, DOMHTMLLabelElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLLabelElementSetHtmlFor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -260,5 +442,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLLabelElementSetHtmlForMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLLabelElementK a) => MethodInfo DOMHTMLLabelElementSetHtmlForMethodInfo a signature where + overloadedMethod _ = dOMHTMLLabelElementSetHtmlFor diff --git a/GI/WebKit/Objects/DOMHTMLLabelElement.hs-boot b/GI/WebKit/Objects/DOMHTMLLabelElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLLabelElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLLabelElement.hs-boot @@ -14,3 +14,7 @@ data DOMHTMLLabelElementControlPropertyInfo data DOMHTMLLabelElementFormPropertyInfo data DOMHTMLLabelElementHtmlForPropertyInfo +data DOMHTMLLabelElementGetControlMethodInfo +data DOMHTMLLabelElementGetFormMethodInfo +data DOMHTMLLabelElementGetHtmlForMethodInfo +data DOMHTMLLabelElementSetHtmlForMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLLegendElement.hs b/GI/WebKit/Objects/DOMHTMLLegendElement.hs --- a/GI/WebKit/Objects/DOMHTMLLegendElement.hs +++ b/GI/WebKit/Objects/DOMHTMLLegendElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMHTMLLegendElementGetAlign + DOMHTMLLegendElementGetAlignMethodInfo , dOMHTMLLegendElementGetAlign , -- ** dOMHTMLLegendElementGetForm + DOMHTMLLegendElementGetFormMethodInfo , dOMHTMLLegendElementGetForm , -- ** dOMHTMLLegendElementSetAlign + DOMHTMLLegendElementSetAlignMethodInfo , dOMHTMLLegendElementSetAlign , @@ -79,6 +83,174 @@ noDOMHTMLLegendElement :: Maybe DOMHTMLLegendElement noDOMHTMLLegendElement = Nothing +type family ResolveDOMHTMLLegendElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLLegendElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLLegendElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLLegendElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLLegendElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLLegendElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLLegendElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLLegendElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLLegendElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLLegendElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLLegendElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLLegendElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLLegendElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLLegendElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLLegendElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLLegendElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLLegendElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLLegendElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLLegendElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLLegendElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLLegendElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLLegendElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLLegendElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLLegendElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLLegendElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLLegendElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLLegendElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLLegendElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLLegendElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLLegendElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLLegendElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLLegendElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLLegendElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLLegendElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLLegendElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLLegendElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLLegendElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLLegendElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLLegendElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLLegendElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLLegendElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLLegendElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLLegendElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLLegendElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLLegendElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLLegendElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLLegendElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLLegendElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLLegendElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLLegendElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLLegendElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLLegendElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLLegendElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLLegendElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLLegendElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLLegendElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLLegendElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLLegendElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLLegendElementMethod "getAlign" o = DOMHTMLLegendElementGetAlignMethodInfo + ResolveDOMHTMLLegendElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLLegendElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLLegendElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLLegendElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLLegendElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLLegendElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLLegendElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLLegendElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLLegendElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLLegendElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLLegendElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLLegendElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLLegendElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLLegendElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLLegendElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLLegendElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLLegendElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLLegendElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLLegendElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLLegendElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLLegendElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLLegendElementMethod "getForm" o = DOMHTMLLegendElementGetFormMethodInfo + ResolveDOMHTMLLegendElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLLegendElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLLegendElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLLegendElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLLegendElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLLegendElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLLegendElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLLegendElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLLegendElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLLegendElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLLegendElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLLegendElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLLegendElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLLegendElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLLegendElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLLegendElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLLegendElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLLegendElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLLegendElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLLegendElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLLegendElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLLegendElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLLegendElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLLegendElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLLegendElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLLegendElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLLegendElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLLegendElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLLegendElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLLegendElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLLegendElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLLegendElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLLegendElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLLegendElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLLegendElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLLegendElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLLegendElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLLegendElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLLegendElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLLegendElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLLegendElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLLegendElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLLegendElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLLegendElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLLegendElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLLegendElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLLegendElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLLegendElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLLegendElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLLegendElementMethod "setAlign" o = DOMHTMLLegendElementSetAlignMethodInfo + ResolveDOMHTMLLegendElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLLegendElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLLegendElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLLegendElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLLegendElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLLegendElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLLegendElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLLegendElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLLegendElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLLegendElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLLegendElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLLegendElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLLegendElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLLegendElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLLegendElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLLegendElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLLegendElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLLegendElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLLegendElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLLegendElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLLegendElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLLegendElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLLegendElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLLegendElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLLegendElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLLegendElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLLegendElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLLegendElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLLegendElementMethod t DOMHTMLLegendElement, MethodInfo info DOMHTMLLegendElement p) => IsLabelProxy t (DOMHTMLLegendElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLLegendElementMethod t DOMHTMLLegendElement, MethodInfo info DOMHTMLLegendElement p) => IsLabel t (DOMHTMLLegendElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -98,7 +270,7 @@ type AttrSetTypeConstraint DOMHTMLLegendElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLLegendElementAlignPropertyInfo = DOMHTMLLegendElementK type AttrGetType DOMHTMLLegendElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLLegendElementAlignPropertyInfo = "DOMHTMLLegendElement::align" + type AttrLabel DOMHTMLLegendElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLLegendElementAlign attrSet _ = setDOMHTMLLegendElementAlign attrConstruct _ = constructDOMHTMLLegendElementAlign @@ -116,22 +288,21 @@ type AttrSetTypeConstraint DOMHTMLLegendElementFormPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLLegendElementFormPropertyInfo = DOMHTMLLegendElementK type AttrGetType DOMHTMLLegendElementFormPropertyInfo = DOMHTMLFormElement - type AttrLabel DOMHTMLLegendElementFormPropertyInfo = "DOMHTMLLegendElement::form" + type AttrLabel DOMHTMLLegendElementFormPropertyInfo = "form" attrGet _ = getDOMHTMLLegendElementForm attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHTMLLegendElement = DOMHTMLLegendElementAttributeList -type DOMHTMLLegendElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLLegendElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLLegendElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLLegendElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLLegendElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLLegendElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLLegendElement = DOMHTMLLegendElementSignalList -type DOMHTMLLegendElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLLegendElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLLegendElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLegendElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLegendElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLegendElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -143,8 +314,8 @@ dOMHTMLLegendElementGetAlign :: (MonadIO m, DOMHTMLLegendElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLLegendElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_legend_element_get_align _obj' @@ -154,11 +325,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLegendElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLLegendElementK a) => MethodInfo DOMHTMLLegendElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLLegendElementGetAlign + -- method DOMHTMLLegendElement::get_form -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLegendElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLegendElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLegendElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLFormElement" -- throws : False -- Skip return : False @@ -170,8 +344,8 @@ dOMHTMLLegendElementGetForm :: (MonadIO m, DOMHTMLLegendElementK a) => - a -> -- _obj - m DOMHTMLFormElement + a -- _obj + -> m DOMHTMLFormElement -- result dOMHTMLLegendElementGetForm _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_legend_element_get_form _obj' @@ -180,11 +354,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLegendElementGetFormMethodInfo +instance (signature ~ (m DOMHTMLFormElement), MonadIO m, DOMHTMLLegendElementK a) => MethodInfo DOMHTMLLegendElementGetFormMethodInfo a signature where + overloadedMethod _ = dOMHTMLLegendElementGetForm + -- method DOMHTMLLegendElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLegendElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLegendElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLegendElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -197,9 +374,9 @@ dOMHTMLLegendElementSetAlign :: (MonadIO m, DOMHTMLLegendElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLLegendElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -207,5 +384,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLLegendElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLLegendElementK a) => MethodInfo DOMHTMLLegendElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLLegendElementSetAlign diff --git a/GI/WebKit/Objects/DOMHTMLLegendElement.hs-boot b/GI/WebKit/Objects/DOMHTMLLegendElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLLegendElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLLegendElement.hs-boot @@ -13,3 +13,6 @@ instance (GObject o, IsDescendantOf DOMHTMLLegendElement o) => DOMHTMLLegendElementK o data DOMHTMLLegendElementAlignPropertyInfo data DOMHTMLLegendElementFormPropertyInfo +data DOMHTMLLegendElementGetAlignMethodInfo +data DOMHTMLLegendElementGetFormMethodInfo +data DOMHTMLLegendElementSetAlignMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLLinkElement.hs b/GI/WebKit/Objects/DOMHTMLLinkElement.hs --- a/GI/WebKit/Objects/DOMHTMLLinkElement.hs +++ b/GI/WebKit/Objects/DOMHTMLLinkElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,70 +18,87 @@ -- * Methods -- ** dOMHTMLLinkElementGetCharset + DOMHTMLLinkElementGetCharsetMethodInfo , dOMHTMLLinkElementGetCharset , -- ** dOMHTMLLinkElementGetDisabled + DOMHTMLLinkElementGetDisabledMethodInfo , dOMHTMLLinkElementGetDisabled , -- ** dOMHTMLLinkElementGetHref + DOMHTMLLinkElementGetHrefMethodInfo , dOMHTMLLinkElementGetHref , -- ** dOMHTMLLinkElementGetHreflang + DOMHTMLLinkElementGetHreflangMethodInfo , dOMHTMLLinkElementGetHreflang , -- ** dOMHTMLLinkElementGetMedia + DOMHTMLLinkElementGetMediaMethodInfo , dOMHTMLLinkElementGetMedia , -- ** dOMHTMLLinkElementGetRel + DOMHTMLLinkElementGetRelMethodInfo , dOMHTMLLinkElementGetRel , -- ** dOMHTMLLinkElementGetRev + DOMHTMLLinkElementGetRevMethodInfo , dOMHTMLLinkElementGetRev , -- ** dOMHTMLLinkElementGetSheet + DOMHTMLLinkElementGetSheetMethodInfo , dOMHTMLLinkElementGetSheet , -- ** dOMHTMLLinkElementGetTarget + DOMHTMLLinkElementGetTargetMethodInfo , dOMHTMLLinkElementGetTarget , -- ** dOMHTMLLinkElementSetCharset + DOMHTMLLinkElementSetCharsetMethodInfo , dOMHTMLLinkElementSetCharset , -- ** dOMHTMLLinkElementSetDisabled + DOMHTMLLinkElementSetDisabledMethodInfo , dOMHTMLLinkElementSetDisabled , -- ** dOMHTMLLinkElementSetHref + DOMHTMLLinkElementSetHrefMethodInfo , dOMHTMLLinkElementSetHref , -- ** dOMHTMLLinkElementSetHreflang + DOMHTMLLinkElementSetHreflangMethodInfo , dOMHTMLLinkElementSetHreflang , -- ** dOMHTMLLinkElementSetMedia + DOMHTMLLinkElementSetMediaMethodInfo , dOMHTMLLinkElementSetMedia , -- ** dOMHTMLLinkElementSetRel + DOMHTMLLinkElementSetRelMethodInfo , dOMHTMLLinkElementSetRel , -- ** dOMHTMLLinkElementSetRev + DOMHTMLLinkElementSetRevMethodInfo , dOMHTMLLinkElementSetRev , -- ** dOMHTMLLinkElementSetTarget + DOMHTMLLinkElementSetTargetMethodInfo , dOMHTMLLinkElementSetTarget , @@ -191,6 +209,188 @@ noDOMHTMLLinkElement :: Maybe DOMHTMLLinkElement noDOMHTMLLinkElement = Nothing +type family ResolveDOMHTMLLinkElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLLinkElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLLinkElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLLinkElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLLinkElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLLinkElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLLinkElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLLinkElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLLinkElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLLinkElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLLinkElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLLinkElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLLinkElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLLinkElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLLinkElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLLinkElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLLinkElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLLinkElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLLinkElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLLinkElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLLinkElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLLinkElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLLinkElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLLinkElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLLinkElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLLinkElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLLinkElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLLinkElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLLinkElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLLinkElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLLinkElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLLinkElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLLinkElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLLinkElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLLinkElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLLinkElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLLinkElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLLinkElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLLinkElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLLinkElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLLinkElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLLinkElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLLinkElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLLinkElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLLinkElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLLinkElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLLinkElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLLinkElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLLinkElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLLinkElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLLinkElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLLinkElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLLinkElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLLinkElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLLinkElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLLinkElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLLinkElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLLinkElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLLinkElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLLinkElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLLinkElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLLinkElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLLinkElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLLinkElementMethod "getCharset" o = DOMHTMLLinkElementGetCharsetMethodInfo + ResolveDOMHTMLLinkElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLLinkElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLLinkElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLLinkElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLLinkElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLLinkElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLLinkElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLLinkElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLLinkElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLLinkElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLLinkElementMethod "getDisabled" o = DOMHTMLLinkElementGetDisabledMethodInfo + ResolveDOMHTMLLinkElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLLinkElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLLinkElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLLinkElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLLinkElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLLinkElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLLinkElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLLinkElementMethod "getHref" o = DOMHTMLLinkElementGetHrefMethodInfo + ResolveDOMHTMLLinkElementMethod "getHreflang" o = DOMHTMLLinkElementGetHreflangMethodInfo + ResolveDOMHTMLLinkElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLLinkElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLLinkElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLLinkElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLLinkElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLLinkElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLLinkElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLLinkElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLLinkElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLLinkElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLLinkElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLLinkElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLLinkElementMethod "getMedia" o = DOMHTMLLinkElementGetMediaMethodInfo + ResolveDOMHTMLLinkElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLLinkElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLLinkElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLLinkElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLLinkElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLLinkElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLLinkElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLLinkElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLLinkElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLLinkElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLLinkElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLLinkElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLLinkElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLLinkElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLLinkElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLLinkElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLLinkElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLLinkElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLLinkElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLLinkElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLLinkElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLLinkElementMethod "getRel" o = DOMHTMLLinkElementGetRelMethodInfo + ResolveDOMHTMLLinkElementMethod "getRev" o = DOMHTMLLinkElementGetRevMethodInfo + ResolveDOMHTMLLinkElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLLinkElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLLinkElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLLinkElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLLinkElementMethod "getSheet" o = DOMHTMLLinkElementGetSheetMethodInfo + ResolveDOMHTMLLinkElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLLinkElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLLinkElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLLinkElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLLinkElementMethod "getTarget" o = DOMHTMLLinkElementGetTargetMethodInfo + ResolveDOMHTMLLinkElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLLinkElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLLinkElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLLinkElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLLinkElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLLinkElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLLinkElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLLinkElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLLinkElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLLinkElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLLinkElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLLinkElementMethod "setCharset" o = DOMHTMLLinkElementSetCharsetMethodInfo + ResolveDOMHTMLLinkElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLLinkElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLLinkElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLLinkElementMethod "setDisabled" o = DOMHTMLLinkElementSetDisabledMethodInfo + ResolveDOMHTMLLinkElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLLinkElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLLinkElementMethod "setHref" o = DOMHTMLLinkElementSetHrefMethodInfo + ResolveDOMHTMLLinkElementMethod "setHreflang" o = DOMHTMLLinkElementSetHreflangMethodInfo + ResolveDOMHTMLLinkElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLLinkElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLLinkElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLLinkElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLLinkElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLLinkElementMethod "setMedia" o = DOMHTMLLinkElementSetMediaMethodInfo + ResolveDOMHTMLLinkElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLLinkElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLLinkElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLLinkElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLLinkElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLLinkElementMethod "setRel" o = DOMHTMLLinkElementSetRelMethodInfo + ResolveDOMHTMLLinkElementMethod "setRev" o = DOMHTMLLinkElementSetRevMethodInfo + ResolveDOMHTMLLinkElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLLinkElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLLinkElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLLinkElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLLinkElementMethod "setTarget" o = DOMHTMLLinkElementSetTargetMethodInfo + ResolveDOMHTMLLinkElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLLinkElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLLinkElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLLinkElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLLinkElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLLinkElementMethod t DOMHTMLLinkElement, MethodInfo info DOMHTMLLinkElement p) => IsLabelProxy t (DOMHTMLLinkElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLLinkElementMethod t DOMHTMLLinkElement, MethodInfo info DOMHTMLLinkElement p) => IsLabel t (DOMHTMLLinkElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "charset" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -210,7 +410,7 @@ type AttrSetTypeConstraint DOMHTMLLinkElementCharsetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLLinkElementCharsetPropertyInfo = DOMHTMLLinkElementK type AttrGetType DOMHTMLLinkElementCharsetPropertyInfo = T.Text - type AttrLabel DOMHTMLLinkElementCharsetPropertyInfo = "DOMHTMLLinkElement::charset" + type AttrLabel DOMHTMLLinkElementCharsetPropertyInfo = "charset" attrGet _ = getDOMHTMLLinkElementCharset attrSet _ = setDOMHTMLLinkElementCharset attrConstruct _ = constructDOMHTMLLinkElementCharset @@ -234,7 +434,7 @@ type AttrSetTypeConstraint DOMHTMLLinkElementDisabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLLinkElementDisabledPropertyInfo = DOMHTMLLinkElementK type AttrGetType DOMHTMLLinkElementDisabledPropertyInfo = Bool - type AttrLabel DOMHTMLLinkElementDisabledPropertyInfo = "DOMHTMLLinkElement::disabled" + type AttrLabel DOMHTMLLinkElementDisabledPropertyInfo = "disabled" attrGet _ = getDOMHTMLLinkElementDisabled attrSet _ = setDOMHTMLLinkElementDisabled attrConstruct _ = constructDOMHTMLLinkElementDisabled @@ -258,7 +458,7 @@ type AttrSetTypeConstraint DOMHTMLLinkElementHrefPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLLinkElementHrefPropertyInfo = DOMHTMLLinkElementK type AttrGetType DOMHTMLLinkElementHrefPropertyInfo = T.Text - type AttrLabel DOMHTMLLinkElementHrefPropertyInfo = "DOMHTMLLinkElement::href" + type AttrLabel DOMHTMLLinkElementHrefPropertyInfo = "href" attrGet _ = getDOMHTMLLinkElementHref attrSet _ = setDOMHTMLLinkElementHref attrConstruct _ = constructDOMHTMLLinkElementHref @@ -282,7 +482,7 @@ type AttrSetTypeConstraint DOMHTMLLinkElementHreflangPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLLinkElementHreflangPropertyInfo = DOMHTMLLinkElementK type AttrGetType DOMHTMLLinkElementHreflangPropertyInfo = T.Text - type AttrLabel DOMHTMLLinkElementHreflangPropertyInfo = "DOMHTMLLinkElement::hreflang" + type AttrLabel DOMHTMLLinkElementHreflangPropertyInfo = "hreflang" attrGet _ = getDOMHTMLLinkElementHreflang attrSet _ = setDOMHTMLLinkElementHreflang attrConstruct _ = constructDOMHTMLLinkElementHreflang @@ -306,7 +506,7 @@ type AttrSetTypeConstraint DOMHTMLLinkElementMediaPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLLinkElementMediaPropertyInfo = DOMHTMLLinkElementK type AttrGetType DOMHTMLLinkElementMediaPropertyInfo = T.Text - type AttrLabel DOMHTMLLinkElementMediaPropertyInfo = "DOMHTMLLinkElement::media" + type AttrLabel DOMHTMLLinkElementMediaPropertyInfo = "media" attrGet _ = getDOMHTMLLinkElementMedia attrSet _ = setDOMHTMLLinkElementMedia attrConstruct _ = constructDOMHTMLLinkElementMedia @@ -330,7 +530,7 @@ type AttrSetTypeConstraint DOMHTMLLinkElementRelPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLLinkElementRelPropertyInfo = DOMHTMLLinkElementK type AttrGetType DOMHTMLLinkElementRelPropertyInfo = T.Text - type AttrLabel DOMHTMLLinkElementRelPropertyInfo = "DOMHTMLLinkElement::rel" + type AttrLabel DOMHTMLLinkElementRelPropertyInfo = "rel" attrGet _ = getDOMHTMLLinkElementRel attrSet _ = setDOMHTMLLinkElementRel attrConstruct _ = constructDOMHTMLLinkElementRel @@ -354,7 +554,7 @@ type AttrSetTypeConstraint DOMHTMLLinkElementRevPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLLinkElementRevPropertyInfo = DOMHTMLLinkElementK type AttrGetType DOMHTMLLinkElementRevPropertyInfo = T.Text - type AttrLabel DOMHTMLLinkElementRevPropertyInfo = "DOMHTMLLinkElement::rev" + type AttrLabel DOMHTMLLinkElementRevPropertyInfo = "rev" attrGet _ = getDOMHTMLLinkElementRev attrSet _ = setDOMHTMLLinkElementRev attrConstruct _ = constructDOMHTMLLinkElementRev @@ -372,7 +572,7 @@ type AttrSetTypeConstraint DOMHTMLLinkElementSheetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLLinkElementSheetPropertyInfo = DOMHTMLLinkElementK type AttrGetType DOMHTMLLinkElementSheetPropertyInfo = DOMStyleSheet - type AttrLabel DOMHTMLLinkElementSheetPropertyInfo = "DOMHTMLLinkElement::sheet" + type AttrLabel DOMHTMLLinkElementSheetPropertyInfo = "sheet" attrGet _ = getDOMHTMLLinkElementSheet attrSet _ = undefined attrConstruct _ = undefined @@ -396,7 +596,7 @@ type AttrSetTypeConstraint DOMHTMLLinkElementTargetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLLinkElementTargetPropertyInfo = DOMHTMLLinkElementK type AttrGetType DOMHTMLLinkElementTargetPropertyInfo = T.Text - type AttrLabel DOMHTMLLinkElementTargetPropertyInfo = "DOMHTMLLinkElement::target" + type AttrLabel DOMHTMLLinkElementTargetPropertyInfo = "target" attrGet _ = getDOMHTMLLinkElementTarget attrSet _ = setDOMHTMLLinkElementTarget attrConstruct _ = constructDOMHTMLLinkElementTarget @@ -420,22 +620,21 @@ type AttrSetTypeConstraint DOMHTMLLinkElementTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLLinkElementTypePropertyInfo = DOMHTMLLinkElementK type AttrGetType DOMHTMLLinkElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLLinkElementTypePropertyInfo = "DOMHTMLLinkElement::type" + type AttrLabel DOMHTMLLinkElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLLinkElementType attrSet _ = setDOMHTMLLinkElementType attrConstruct _ = constructDOMHTMLLinkElementType type instance AttributeList DOMHTMLLinkElement = DOMHTMLLinkElementAttributeList -type DOMHTMLLinkElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("charset", DOMHTMLLinkElementCharsetPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLLinkElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("href", DOMHTMLLinkElementHrefPropertyInfo), '("hreflang", DOMHTMLLinkElementHreflangPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("media", DOMHTMLLinkElementMediaPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("rel", DOMHTMLLinkElementRelPropertyInfo), '("rev", DOMHTMLLinkElementRevPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("sheet", DOMHTMLLinkElementSheetPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("target", DOMHTMLLinkElementTargetPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLLinkElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLLinkElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("charset", DOMHTMLLinkElementCharsetPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLLinkElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("href", DOMHTMLLinkElementHrefPropertyInfo), '("hreflang", DOMHTMLLinkElementHreflangPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("media", DOMHTMLLinkElementMediaPropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("rel", DOMHTMLLinkElementRelPropertyInfo), '("rev", DOMHTMLLinkElementRevPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("sheet", DOMHTMLLinkElementSheetPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("target", DOMHTMLLinkElementTargetPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLLinkElementTypePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLLinkElement = DOMHTMLLinkElementSignalList -type DOMHTMLLinkElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLLinkElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLLinkElement::get_charset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -447,8 +646,8 @@ dOMHTMLLinkElementGetCharset :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLLinkElementGetCharset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_link_element_get_charset _obj' @@ -458,11 +657,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLinkElementGetCharsetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementGetCharsetMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementGetCharset + -- method DOMHTMLLinkElement::get_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -474,8 +676,8 @@ dOMHTMLLinkElementGetDisabled :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLLinkElementGetDisabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_link_element_get_disabled _obj' @@ -483,11 +685,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLinkElementGetDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementGetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementGetDisabled + -- method DOMHTMLLinkElement::get_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -499,8 +704,8 @@ dOMHTMLLinkElementGetHref :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLLinkElementGetHref _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_link_element_get_href _obj' @@ -510,11 +715,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLinkElementGetHrefMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementGetHrefMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementGetHref + -- method DOMHTMLLinkElement::get_hreflang -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -526,8 +734,8 @@ dOMHTMLLinkElementGetHreflang :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLLinkElementGetHreflang _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_link_element_get_hreflang _obj' @@ -537,11 +745,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLinkElementGetHreflangMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementGetHreflangMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementGetHreflang + -- method DOMHTMLLinkElement::get_media -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -553,8 +764,8 @@ dOMHTMLLinkElementGetMedia :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLLinkElementGetMedia _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_link_element_get_media _obj' @@ -564,11 +775,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLinkElementGetMediaMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementGetMediaMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementGetMedia + -- method DOMHTMLLinkElement::get_rel -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -580,8 +794,8 @@ dOMHTMLLinkElementGetRel :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLLinkElementGetRel _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_link_element_get_rel _obj' @@ -591,11 +805,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLinkElementGetRelMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementGetRelMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementGetRel + -- method DOMHTMLLinkElement::get_rev -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -607,8 +824,8 @@ dOMHTMLLinkElementGetRev :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLLinkElementGetRev _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_link_element_get_rev _obj' @@ -618,11 +835,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLinkElementGetRevMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementGetRevMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementGetRev + -- method DOMHTMLLinkElement::get_sheet -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMStyleSheet" -- throws : False -- Skip return : False @@ -634,8 +854,8 @@ dOMHTMLLinkElementGetSheet :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - m DOMStyleSheet + a -- _obj + -> m DOMStyleSheet -- result dOMHTMLLinkElementGetSheet _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_link_element_get_sheet _obj' @@ -644,11 +864,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLinkElementGetSheetMethodInfo +instance (signature ~ (m DOMStyleSheet), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementGetSheetMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementGetSheet + -- method DOMHTMLLinkElement::get_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -660,8 +883,8 @@ dOMHTMLLinkElementGetTarget :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLLinkElementGetTarget _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_link_element_get_target _obj' @@ -671,11 +894,14 @@ touchManagedPtr _obj return result' +data DOMHTMLLinkElementGetTargetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementGetTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementGetTarget + -- method DOMHTMLLinkElement::set_charset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -688,9 +914,9 @@ dOMHTMLLinkElementSetCharset :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLLinkElementSetCharset _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -699,11 +925,14 @@ freeMem value' return () +data DOMHTMLLinkElementSetCharsetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementSetCharsetMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementSetCharset + -- method DOMHTMLLinkElement::set_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -716,9 +945,9 @@ dOMHTMLLinkElementSetDisabled :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLLinkElementSetDisabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -726,11 +955,14 @@ touchManagedPtr _obj return () +data DOMHTMLLinkElementSetDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementSetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementSetDisabled + -- method DOMHTMLLinkElement::set_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -743,9 +975,9 @@ dOMHTMLLinkElementSetHref :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLLinkElementSetHref _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -754,11 +986,14 @@ freeMem value' return () +data DOMHTMLLinkElementSetHrefMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementSetHrefMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementSetHref + -- method DOMHTMLLinkElement::set_hreflang -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -771,9 +1006,9 @@ dOMHTMLLinkElementSetHreflang :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLLinkElementSetHreflang _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -782,11 +1017,14 @@ freeMem value' return () +data DOMHTMLLinkElementSetHreflangMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementSetHreflangMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementSetHreflang + -- method DOMHTMLLinkElement::set_media -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -799,9 +1037,9 @@ dOMHTMLLinkElementSetMedia :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLLinkElementSetMedia _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -810,11 +1048,14 @@ freeMem value' return () +data DOMHTMLLinkElementSetMediaMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementSetMediaMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementSetMedia + -- method DOMHTMLLinkElement::set_rel -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -827,9 +1068,9 @@ dOMHTMLLinkElementSetRel :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLLinkElementSetRel _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -838,11 +1079,14 @@ freeMem value' return () +data DOMHTMLLinkElementSetRelMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementSetRelMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementSetRel + -- method DOMHTMLLinkElement::set_rev -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -855,9 +1099,9 @@ dOMHTMLLinkElementSetRev :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLLinkElementSetRev _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -866,11 +1110,14 @@ freeMem value' return () +data DOMHTMLLinkElementSetRevMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementSetRevMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementSetRev + -- method DOMHTMLLinkElement::set_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLLinkElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -883,9 +1130,9 @@ dOMHTMLLinkElementSetTarget :: (MonadIO m, DOMHTMLLinkElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLLinkElementSetTarget _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -893,5 +1140,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLLinkElementSetTargetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLLinkElementK a) => MethodInfo DOMHTMLLinkElementSetTargetMethodInfo a signature where + overloadedMethod _ = dOMHTMLLinkElementSetTarget diff --git a/GI/WebKit/Objects/DOMHTMLLinkElement.hs-boot b/GI/WebKit/Objects/DOMHTMLLinkElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLLinkElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLLinkElement.hs-boot @@ -21,3 +21,20 @@ data DOMHTMLLinkElementSheetPropertyInfo data DOMHTMLLinkElementTargetPropertyInfo data DOMHTMLLinkElementTypePropertyInfo +data DOMHTMLLinkElementGetCharsetMethodInfo +data DOMHTMLLinkElementGetDisabledMethodInfo +data DOMHTMLLinkElementGetHrefMethodInfo +data DOMHTMLLinkElementGetHreflangMethodInfo +data DOMHTMLLinkElementGetMediaMethodInfo +data DOMHTMLLinkElementGetRelMethodInfo +data DOMHTMLLinkElementGetRevMethodInfo +data DOMHTMLLinkElementGetSheetMethodInfo +data DOMHTMLLinkElementGetTargetMethodInfo +data DOMHTMLLinkElementSetCharsetMethodInfo +data DOMHTMLLinkElementSetDisabledMethodInfo +data DOMHTMLLinkElementSetHrefMethodInfo +data DOMHTMLLinkElementSetHreflangMethodInfo +data DOMHTMLLinkElementSetMediaMethodInfo +data DOMHTMLLinkElementSetRelMethodInfo +data DOMHTMLLinkElementSetRevMethodInfo +data DOMHTMLLinkElementSetTargetMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLMapElement.hs b/GI/WebKit/Objects/DOMHTMLMapElement.hs --- a/GI/WebKit/Objects/DOMHTMLMapElement.hs +++ b/GI/WebKit/Objects/DOMHTMLMapElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMHTMLMapElementGetAreas + DOMHTMLMapElementGetAreasMethodInfo , dOMHTMLMapElementGetAreas , -- ** dOMHTMLMapElementGetName + DOMHTMLMapElementGetNameMethodInfo , dOMHTMLMapElementGetName , -- ** dOMHTMLMapElementSetName + DOMHTMLMapElementSetNameMethodInfo , dOMHTMLMapElementSetName , @@ -79,6 +83,174 @@ noDOMHTMLMapElement :: Maybe DOMHTMLMapElement noDOMHTMLMapElement = Nothing +type family ResolveDOMHTMLMapElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLMapElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLMapElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLMapElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLMapElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLMapElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLMapElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLMapElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLMapElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLMapElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLMapElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLMapElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLMapElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLMapElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLMapElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLMapElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLMapElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLMapElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLMapElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLMapElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLMapElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLMapElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLMapElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLMapElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLMapElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLMapElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLMapElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLMapElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLMapElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLMapElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLMapElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLMapElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLMapElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLMapElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLMapElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLMapElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLMapElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLMapElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLMapElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLMapElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLMapElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLMapElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLMapElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLMapElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLMapElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLMapElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLMapElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLMapElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLMapElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLMapElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLMapElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLMapElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLMapElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLMapElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLMapElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLMapElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLMapElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLMapElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLMapElementMethod "getAreas" o = DOMHTMLMapElementGetAreasMethodInfo + ResolveDOMHTMLMapElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLMapElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLMapElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLMapElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLMapElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLMapElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLMapElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLMapElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLMapElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLMapElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLMapElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLMapElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLMapElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLMapElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLMapElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLMapElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLMapElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLMapElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLMapElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLMapElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLMapElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLMapElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLMapElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLMapElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLMapElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLMapElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLMapElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLMapElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLMapElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLMapElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLMapElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLMapElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLMapElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLMapElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLMapElementMethod "getName" o = DOMHTMLMapElementGetNameMethodInfo + ResolveDOMHTMLMapElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLMapElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLMapElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLMapElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLMapElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLMapElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLMapElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLMapElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLMapElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLMapElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLMapElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLMapElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLMapElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLMapElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLMapElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLMapElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLMapElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLMapElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLMapElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLMapElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLMapElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLMapElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLMapElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLMapElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLMapElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLMapElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLMapElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLMapElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLMapElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLMapElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLMapElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLMapElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLMapElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLMapElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLMapElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLMapElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLMapElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLMapElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLMapElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLMapElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLMapElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLMapElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLMapElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLMapElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLMapElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLMapElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLMapElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLMapElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLMapElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLMapElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLMapElementMethod "setName" o = DOMHTMLMapElementSetNameMethodInfo + ResolveDOMHTMLMapElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLMapElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLMapElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLMapElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLMapElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLMapElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLMapElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLMapElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLMapElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLMapElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLMapElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLMapElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLMapElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLMapElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLMapElementMethod t DOMHTMLMapElement, MethodInfo info DOMHTMLMapElement p) => IsLabelProxy t (DOMHTMLMapElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLMapElementMethod t DOMHTMLMapElement, MethodInfo info DOMHTMLMapElement p) => IsLabel t (DOMHTMLMapElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "areas" -- Type: TInterface "WebKit" "DOMHTMLCollection" -- Flags: [PropertyReadable] @@ -92,7 +264,7 @@ type AttrSetTypeConstraint DOMHTMLMapElementAreasPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLMapElementAreasPropertyInfo = DOMHTMLMapElementK type AttrGetType DOMHTMLMapElementAreasPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLMapElementAreasPropertyInfo = "DOMHTMLMapElement::areas" + type AttrLabel DOMHTMLMapElementAreasPropertyInfo = "areas" attrGet _ = getDOMHTMLMapElementAreas attrSet _ = undefined attrConstruct _ = undefined @@ -116,22 +288,21 @@ type AttrSetTypeConstraint DOMHTMLMapElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLMapElementNamePropertyInfo = DOMHTMLMapElementK type AttrGetType DOMHTMLMapElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLMapElementNamePropertyInfo = "DOMHTMLMapElement::name" + type AttrLabel DOMHTMLMapElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLMapElementName attrSet _ = setDOMHTMLMapElementName attrConstruct _ = constructDOMHTMLMapElementName type instance AttributeList DOMHTMLMapElement = DOMHTMLMapElementAttributeList -type DOMHTMLMapElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("areas", DOMHTMLMapElementAreasPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLMapElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLMapElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("areas", DOMHTMLMapElementAreasPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLMapElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLMapElement = DOMHTMLMapElementSignalList -type DOMHTMLMapElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLMapElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLMapElement::get_areas -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMapElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMapElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMapElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -143,8 +314,8 @@ dOMHTMLMapElementGetAreas :: (MonadIO m, DOMHTMLMapElementK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLMapElementGetAreas _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_map_element_get_areas _obj' @@ -153,11 +324,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMapElementGetAreasMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLMapElementK a) => MethodInfo DOMHTMLMapElementGetAreasMethodInfo a signature where + overloadedMethod _ = dOMHTMLMapElementGetAreas + -- method DOMHTMLMapElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMapElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMapElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMapElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -169,8 +343,8 @@ dOMHTMLMapElementGetName :: (MonadIO m, DOMHTMLMapElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLMapElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_map_element_get_name _obj' @@ -180,11 +354,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMapElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMapElementK a) => MethodInfo DOMHTMLMapElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLMapElementGetName + -- method DOMHTMLMapElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMapElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMapElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMapElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -197,9 +374,9 @@ dOMHTMLMapElementSetName :: (MonadIO m, DOMHTMLMapElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLMapElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -207,5 +384,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLMapElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMapElementK a) => MethodInfo DOMHTMLMapElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLMapElementSetName diff --git a/GI/WebKit/Objects/DOMHTMLMapElement.hs-boot b/GI/WebKit/Objects/DOMHTMLMapElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLMapElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLMapElement.hs-boot @@ -13,3 +13,6 @@ instance (GObject o, IsDescendantOf DOMHTMLMapElement o) => DOMHTMLMapElementK o data DOMHTMLMapElementAreasPropertyInfo data DOMHTMLMapElementNamePropertyInfo +data DOMHTMLMapElementGetAreasMethodInfo +data DOMHTMLMapElementGetNameMethodInfo +data DOMHTMLMapElementSetNameMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLMarqueeElement.hs b/GI/WebKit/Objects/DOMHTMLMarqueeElement.hs --- a/GI/WebKit/Objects/DOMHTMLMarqueeElement.hs +++ b/GI/WebKit/Objects/DOMHTMLMarqueeElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,98 +18,122 @@ -- * Methods -- ** dOMHTMLMarqueeElementGetBehavior + DOMHTMLMarqueeElementGetBehaviorMethodInfo, dOMHTMLMarqueeElementGetBehavior , -- ** dOMHTMLMarqueeElementGetBgColor + DOMHTMLMarqueeElementGetBgColorMethodInfo, dOMHTMLMarqueeElementGetBgColor , -- ** dOMHTMLMarqueeElementGetDirection + DOMHTMLMarqueeElementGetDirectionMethodInfo, dOMHTMLMarqueeElementGetDirection , -- ** dOMHTMLMarqueeElementGetHeight + DOMHTMLMarqueeElementGetHeightMethodInfo, dOMHTMLMarqueeElementGetHeight , -- ** dOMHTMLMarqueeElementGetHspace + DOMHTMLMarqueeElementGetHspaceMethodInfo, dOMHTMLMarqueeElementGetHspace , -- ** dOMHTMLMarqueeElementGetLoop + DOMHTMLMarqueeElementGetLoopMethodInfo , dOMHTMLMarqueeElementGetLoop , -- ** dOMHTMLMarqueeElementGetScrollAmount + DOMHTMLMarqueeElementGetScrollAmountMethodInfo, dOMHTMLMarqueeElementGetScrollAmount , -- ** dOMHTMLMarqueeElementGetScrollDelay + DOMHTMLMarqueeElementGetScrollDelayMethodInfo, dOMHTMLMarqueeElementGetScrollDelay , -- ** dOMHTMLMarqueeElementGetTrueSpeed + DOMHTMLMarqueeElementGetTrueSpeedMethodInfo, dOMHTMLMarqueeElementGetTrueSpeed , -- ** dOMHTMLMarqueeElementGetVspace + DOMHTMLMarqueeElementGetVspaceMethodInfo, dOMHTMLMarqueeElementGetVspace , -- ** dOMHTMLMarqueeElementGetWidth + DOMHTMLMarqueeElementGetWidthMethodInfo , dOMHTMLMarqueeElementGetWidth , -- ** dOMHTMLMarqueeElementSetBehavior + DOMHTMLMarqueeElementSetBehaviorMethodInfo, dOMHTMLMarqueeElementSetBehavior , -- ** dOMHTMLMarqueeElementSetBgColor + DOMHTMLMarqueeElementSetBgColorMethodInfo, dOMHTMLMarqueeElementSetBgColor , -- ** dOMHTMLMarqueeElementSetDirection + DOMHTMLMarqueeElementSetDirectionMethodInfo, dOMHTMLMarqueeElementSetDirection , -- ** dOMHTMLMarqueeElementSetHeight + DOMHTMLMarqueeElementSetHeightMethodInfo, dOMHTMLMarqueeElementSetHeight , -- ** dOMHTMLMarqueeElementSetHspace + DOMHTMLMarqueeElementSetHspaceMethodInfo, dOMHTMLMarqueeElementSetHspace , -- ** dOMHTMLMarqueeElementSetLoop + DOMHTMLMarqueeElementSetLoopMethodInfo , dOMHTMLMarqueeElementSetLoop , -- ** dOMHTMLMarqueeElementSetScrollAmount + DOMHTMLMarqueeElementSetScrollAmountMethodInfo, dOMHTMLMarqueeElementSetScrollAmount , -- ** dOMHTMLMarqueeElementSetScrollDelay + DOMHTMLMarqueeElementSetScrollDelayMethodInfo, dOMHTMLMarqueeElementSetScrollDelay , -- ** dOMHTMLMarqueeElementSetTrueSpeed + DOMHTMLMarqueeElementSetTrueSpeedMethodInfo, dOMHTMLMarqueeElementSetTrueSpeed , -- ** dOMHTMLMarqueeElementSetVspace + DOMHTMLMarqueeElementSetVspaceMethodInfo, dOMHTMLMarqueeElementSetVspace , -- ** dOMHTMLMarqueeElementSetWidth + DOMHTMLMarqueeElementSetWidthMethodInfo , dOMHTMLMarqueeElementSetWidth , -- ** dOMHTMLMarqueeElementStart + DOMHTMLMarqueeElementStartMethodInfo , dOMHTMLMarqueeElementStart , -- ** dOMHTMLMarqueeElementStop + DOMHTMLMarqueeElementStopMethodInfo , dOMHTMLMarqueeElementStop , @@ -228,6 +253,195 @@ noDOMHTMLMarqueeElement :: Maybe DOMHTMLMarqueeElement noDOMHTMLMarqueeElement = Nothing +type family ResolveDOMHTMLMarqueeElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLMarqueeElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLMarqueeElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLMarqueeElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLMarqueeElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLMarqueeElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLMarqueeElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLMarqueeElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLMarqueeElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLMarqueeElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLMarqueeElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLMarqueeElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLMarqueeElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLMarqueeElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLMarqueeElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLMarqueeElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLMarqueeElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLMarqueeElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLMarqueeElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLMarqueeElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLMarqueeElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLMarqueeElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLMarqueeElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLMarqueeElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLMarqueeElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLMarqueeElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLMarqueeElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLMarqueeElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLMarqueeElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLMarqueeElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLMarqueeElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLMarqueeElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLMarqueeElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLMarqueeElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLMarqueeElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLMarqueeElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLMarqueeElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLMarqueeElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLMarqueeElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLMarqueeElementMethod "start" o = DOMHTMLMarqueeElementStartMethodInfo + ResolveDOMHTMLMarqueeElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLMarqueeElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLMarqueeElementMethod "stop" o = DOMHTMLMarqueeElementStopMethodInfo + ResolveDOMHTMLMarqueeElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLMarqueeElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLMarqueeElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLMarqueeElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLMarqueeElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLMarqueeElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLMarqueeElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getBehavior" o = DOMHTMLMarqueeElementGetBehaviorMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getBgColor" o = DOMHTMLMarqueeElementGetBgColorMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getDirection" o = DOMHTMLMarqueeElementGetDirectionMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getHeight" o = DOMHTMLMarqueeElementGetHeightMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getHspace" o = DOMHTMLMarqueeElementGetHspaceMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getLoop" o = DOMHTMLMarqueeElementGetLoopMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getScrollAmount" o = DOMHTMLMarqueeElementGetScrollAmountMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getScrollDelay" o = DOMHTMLMarqueeElementGetScrollDelayMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getTrueSpeed" o = DOMHTMLMarqueeElementGetTrueSpeedMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getVspace" o = DOMHTMLMarqueeElementGetVspaceMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLMarqueeElementMethod "getWidth" o = DOMHTMLMarqueeElementGetWidthMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setBehavior" o = DOMHTMLMarqueeElementSetBehaviorMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setBgColor" o = DOMHTMLMarqueeElementSetBgColorMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setDirection" o = DOMHTMLMarqueeElementSetDirectionMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setHeight" o = DOMHTMLMarqueeElementSetHeightMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setHspace" o = DOMHTMLMarqueeElementSetHspaceMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setLoop" o = DOMHTMLMarqueeElementSetLoopMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setScrollAmount" o = DOMHTMLMarqueeElementSetScrollAmountMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setScrollDelay" o = DOMHTMLMarqueeElementSetScrollDelayMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setTrueSpeed" o = DOMHTMLMarqueeElementSetTrueSpeedMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setVspace" o = DOMHTMLMarqueeElementSetVspaceMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLMarqueeElementMethod "setWidth" o = DOMHTMLMarqueeElementSetWidthMethodInfo + ResolveDOMHTMLMarqueeElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLMarqueeElementMethod t DOMHTMLMarqueeElement, MethodInfo info DOMHTMLMarqueeElement p) => IsLabelProxy t (DOMHTMLMarqueeElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLMarqueeElementMethod t DOMHTMLMarqueeElement, MethodInfo info DOMHTMLMarqueeElement p) => IsLabel t (DOMHTMLMarqueeElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "behavior" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -247,7 +461,7 @@ type AttrSetTypeConstraint DOMHTMLMarqueeElementBehaviorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLMarqueeElementBehaviorPropertyInfo = DOMHTMLMarqueeElementK type AttrGetType DOMHTMLMarqueeElementBehaviorPropertyInfo = T.Text - type AttrLabel DOMHTMLMarqueeElementBehaviorPropertyInfo = "DOMHTMLMarqueeElement::behavior" + type AttrLabel DOMHTMLMarqueeElementBehaviorPropertyInfo = "behavior" attrGet _ = getDOMHTMLMarqueeElementBehavior attrSet _ = setDOMHTMLMarqueeElementBehavior attrConstruct _ = constructDOMHTMLMarqueeElementBehavior @@ -271,7 +485,7 @@ type AttrSetTypeConstraint DOMHTMLMarqueeElementBgColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLMarqueeElementBgColorPropertyInfo = DOMHTMLMarqueeElementK type AttrGetType DOMHTMLMarqueeElementBgColorPropertyInfo = T.Text - type AttrLabel DOMHTMLMarqueeElementBgColorPropertyInfo = "DOMHTMLMarqueeElement::bg-color" + type AttrLabel DOMHTMLMarqueeElementBgColorPropertyInfo = "bg-color" attrGet _ = getDOMHTMLMarqueeElementBgColor attrSet _ = setDOMHTMLMarqueeElementBgColor attrConstruct _ = constructDOMHTMLMarqueeElementBgColor @@ -295,7 +509,7 @@ type AttrSetTypeConstraint DOMHTMLMarqueeElementDirectionPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLMarqueeElementDirectionPropertyInfo = DOMHTMLMarqueeElementK type AttrGetType DOMHTMLMarqueeElementDirectionPropertyInfo = T.Text - type AttrLabel DOMHTMLMarqueeElementDirectionPropertyInfo = "DOMHTMLMarqueeElement::direction" + type AttrLabel DOMHTMLMarqueeElementDirectionPropertyInfo = "direction" attrGet _ = getDOMHTMLMarqueeElementDirection attrSet _ = setDOMHTMLMarqueeElementDirection attrConstruct _ = constructDOMHTMLMarqueeElementDirection @@ -319,7 +533,7 @@ type AttrSetTypeConstraint DOMHTMLMarqueeElementHeightPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLMarqueeElementHeightPropertyInfo = DOMHTMLMarqueeElementK type AttrGetType DOMHTMLMarqueeElementHeightPropertyInfo = T.Text - type AttrLabel DOMHTMLMarqueeElementHeightPropertyInfo = "DOMHTMLMarqueeElement::height" + type AttrLabel DOMHTMLMarqueeElementHeightPropertyInfo = "height" attrGet _ = getDOMHTMLMarqueeElementHeight attrSet _ = setDOMHTMLMarqueeElementHeight attrConstruct _ = constructDOMHTMLMarqueeElementHeight @@ -343,7 +557,7 @@ type AttrSetTypeConstraint DOMHTMLMarqueeElementHspacePropertyInfo = (~) Word64 type AttrBaseTypeConstraint DOMHTMLMarqueeElementHspacePropertyInfo = DOMHTMLMarqueeElementK type AttrGetType DOMHTMLMarqueeElementHspacePropertyInfo = Word64 - type AttrLabel DOMHTMLMarqueeElementHspacePropertyInfo = "DOMHTMLMarqueeElement::hspace" + type AttrLabel DOMHTMLMarqueeElementHspacePropertyInfo = "hspace" attrGet _ = getDOMHTMLMarqueeElementHspace attrSet _ = setDOMHTMLMarqueeElementHspace attrConstruct _ = constructDOMHTMLMarqueeElementHspace @@ -367,7 +581,7 @@ type AttrSetTypeConstraint DOMHTMLMarqueeElementLoopPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLMarqueeElementLoopPropertyInfo = DOMHTMLMarqueeElementK type AttrGetType DOMHTMLMarqueeElementLoopPropertyInfo = Int64 - type AttrLabel DOMHTMLMarqueeElementLoopPropertyInfo = "DOMHTMLMarqueeElement::loop" + type AttrLabel DOMHTMLMarqueeElementLoopPropertyInfo = "loop" attrGet _ = getDOMHTMLMarqueeElementLoop attrSet _ = setDOMHTMLMarqueeElementLoop attrConstruct _ = constructDOMHTMLMarqueeElementLoop @@ -391,7 +605,7 @@ type AttrSetTypeConstraint DOMHTMLMarqueeElementScrollAmountPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLMarqueeElementScrollAmountPropertyInfo = DOMHTMLMarqueeElementK type AttrGetType DOMHTMLMarqueeElementScrollAmountPropertyInfo = Int64 - type AttrLabel DOMHTMLMarqueeElementScrollAmountPropertyInfo = "DOMHTMLMarqueeElement::scroll-amount" + type AttrLabel DOMHTMLMarqueeElementScrollAmountPropertyInfo = "scroll-amount" attrGet _ = getDOMHTMLMarqueeElementScrollAmount attrSet _ = setDOMHTMLMarqueeElementScrollAmount attrConstruct _ = constructDOMHTMLMarqueeElementScrollAmount @@ -415,7 +629,7 @@ type AttrSetTypeConstraint DOMHTMLMarqueeElementScrollDelayPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLMarqueeElementScrollDelayPropertyInfo = DOMHTMLMarqueeElementK type AttrGetType DOMHTMLMarqueeElementScrollDelayPropertyInfo = Int64 - type AttrLabel DOMHTMLMarqueeElementScrollDelayPropertyInfo = "DOMHTMLMarqueeElement::scroll-delay" + type AttrLabel DOMHTMLMarqueeElementScrollDelayPropertyInfo = "scroll-delay" attrGet _ = getDOMHTMLMarqueeElementScrollDelay attrSet _ = setDOMHTMLMarqueeElementScrollDelay attrConstruct _ = constructDOMHTMLMarqueeElementScrollDelay @@ -439,7 +653,7 @@ type AttrSetTypeConstraint DOMHTMLMarqueeElementTrueSpeedPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLMarqueeElementTrueSpeedPropertyInfo = DOMHTMLMarqueeElementK type AttrGetType DOMHTMLMarqueeElementTrueSpeedPropertyInfo = Bool - type AttrLabel DOMHTMLMarqueeElementTrueSpeedPropertyInfo = "DOMHTMLMarqueeElement::true-speed" + type AttrLabel DOMHTMLMarqueeElementTrueSpeedPropertyInfo = "true-speed" attrGet _ = getDOMHTMLMarqueeElementTrueSpeed attrSet _ = setDOMHTMLMarqueeElementTrueSpeed attrConstruct _ = constructDOMHTMLMarqueeElementTrueSpeed @@ -463,7 +677,7 @@ type AttrSetTypeConstraint DOMHTMLMarqueeElementVspacePropertyInfo = (~) Word64 type AttrBaseTypeConstraint DOMHTMLMarqueeElementVspacePropertyInfo = DOMHTMLMarqueeElementK type AttrGetType DOMHTMLMarqueeElementVspacePropertyInfo = Word64 - type AttrLabel DOMHTMLMarqueeElementVspacePropertyInfo = "DOMHTMLMarqueeElement::vspace" + type AttrLabel DOMHTMLMarqueeElementVspacePropertyInfo = "vspace" attrGet _ = getDOMHTMLMarqueeElementVspace attrSet _ = setDOMHTMLMarqueeElementVspace attrConstruct _ = constructDOMHTMLMarqueeElementVspace @@ -487,22 +701,21 @@ type AttrSetTypeConstraint DOMHTMLMarqueeElementWidthPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLMarqueeElementWidthPropertyInfo = DOMHTMLMarqueeElementK type AttrGetType DOMHTMLMarqueeElementWidthPropertyInfo = T.Text - type AttrLabel DOMHTMLMarqueeElementWidthPropertyInfo = "DOMHTMLMarqueeElement::width" + type AttrLabel DOMHTMLMarqueeElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLMarqueeElementWidth attrSet _ = setDOMHTMLMarqueeElementWidth attrConstruct _ = constructDOMHTMLMarqueeElementWidth type instance AttributeList DOMHTMLMarqueeElement = DOMHTMLMarqueeElementAttributeList -type DOMHTMLMarqueeElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("behavior", DOMHTMLMarqueeElementBehaviorPropertyInfo), '("bg-color", DOMHTMLMarqueeElementBgColorPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("direction", DOMHTMLMarqueeElementDirectionPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLMarqueeElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLMarqueeElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMarqueeElementLoopPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-amount", DOMHTMLMarqueeElementScrollAmountPropertyInfo), '("scroll-delay", DOMHTMLMarqueeElementScrollDelayPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("true-speed", DOMHTMLMarqueeElementTrueSpeedPropertyInfo), '("vspace", DOMHTMLMarqueeElementVspacePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLMarqueeElementWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLMarqueeElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("behavior", DOMHTMLMarqueeElementBehaviorPropertyInfo), '("bgColor", DOMHTMLMarqueeElementBgColorPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("direction", DOMHTMLMarqueeElementDirectionPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLMarqueeElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLMarqueeElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMarqueeElementLoopPropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollAmount", DOMHTMLMarqueeElementScrollAmountPropertyInfo), '("scrollDelay", DOMHTMLMarqueeElementScrollDelayPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("trueSpeed", DOMHTMLMarqueeElementTrueSpeedPropertyInfo), '("vspace", DOMHTMLMarqueeElementVspacePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLMarqueeElementWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLMarqueeElement = DOMHTMLMarqueeElementSignalList -type DOMHTMLMarqueeElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLMarqueeElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLMarqueeElement::get_behavior -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -514,8 +727,8 @@ dOMHTMLMarqueeElementGetBehavior :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLMarqueeElementGetBehavior _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_marquee_element_get_behavior _obj' @@ -525,11 +738,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMarqueeElementGetBehaviorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementGetBehaviorMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementGetBehavior + -- method DOMHTMLMarqueeElement::get_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -541,8 +757,8 @@ dOMHTMLMarqueeElementGetBgColor :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLMarqueeElementGetBgColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_marquee_element_get_bg_color _obj' @@ -552,11 +768,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMarqueeElementGetBgColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementGetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementGetBgColor + -- method DOMHTMLMarqueeElement::get_direction -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -568,8 +787,8 @@ dOMHTMLMarqueeElementGetDirection :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLMarqueeElementGetDirection _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_marquee_element_get_direction _obj' @@ -579,11 +798,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMarqueeElementGetDirectionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementGetDirectionMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementGetDirection + -- method DOMHTMLMarqueeElement::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -595,8 +817,8 @@ dOMHTMLMarqueeElementGetHeight :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLMarqueeElementGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_marquee_element_get_height _obj' @@ -606,11 +828,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMarqueeElementGetHeightMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementGetHeight + -- method DOMHTMLMarqueeElement::get_hspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -622,19 +847,22 @@ dOMHTMLMarqueeElementGetHspace :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLMarqueeElementGetHspace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_marquee_element_get_hspace _obj' touchManagedPtr _obj return result +data DOMHTMLMarqueeElementGetHspaceMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementGetHspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementGetHspace + -- method DOMHTMLMarqueeElement::get_loop -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -646,19 +874,22 @@ dOMHTMLMarqueeElementGetLoop :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLMarqueeElementGetLoop _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_marquee_element_get_loop _obj' touchManagedPtr _obj return result +data DOMHTMLMarqueeElementGetLoopMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementGetLoopMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementGetLoop + -- method DOMHTMLMarqueeElement::get_scroll_amount -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -670,19 +901,22 @@ dOMHTMLMarqueeElementGetScrollAmount :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLMarqueeElementGetScrollAmount _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_marquee_element_get_scroll_amount _obj' touchManagedPtr _obj return result +data DOMHTMLMarqueeElementGetScrollAmountMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementGetScrollAmountMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementGetScrollAmount + -- method DOMHTMLMarqueeElement::get_scroll_delay -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -694,19 +928,22 @@ dOMHTMLMarqueeElementGetScrollDelay :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLMarqueeElementGetScrollDelay _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_marquee_element_get_scroll_delay _obj' touchManagedPtr _obj return result +data DOMHTMLMarqueeElementGetScrollDelayMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementGetScrollDelayMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementGetScrollDelay + -- method DOMHTMLMarqueeElement::get_true_speed -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -718,8 +955,8 @@ dOMHTMLMarqueeElementGetTrueSpeed :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLMarqueeElementGetTrueSpeed _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_marquee_element_get_true_speed _obj' @@ -727,11 +964,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMarqueeElementGetTrueSpeedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementGetTrueSpeedMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementGetTrueSpeed + -- method DOMHTMLMarqueeElement::get_vspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -743,19 +983,22 @@ dOMHTMLMarqueeElementGetVspace :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLMarqueeElementGetVspace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_marquee_element_get_vspace _obj' touchManagedPtr _obj return result +data DOMHTMLMarqueeElementGetVspaceMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementGetVspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementGetVspace + -- method DOMHTMLMarqueeElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -767,8 +1010,8 @@ dOMHTMLMarqueeElementGetWidth :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLMarqueeElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_marquee_element_get_width _obj' @@ -778,11 +1021,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMarqueeElementGetWidthMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementGetWidth + -- method DOMHTMLMarqueeElement::set_behavior -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -795,9 +1041,9 @@ dOMHTMLMarqueeElementSetBehavior :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLMarqueeElementSetBehavior _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -806,11 +1052,14 @@ freeMem value' return () +data DOMHTMLMarqueeElementSetBehaviorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementSetBehaviorMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementSetBehavior + -- method DOMHTMLMarqueeElement::set_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -823,9 +1072,9 @@ dOMHTMLMarqueeElementSetBgColor :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLMarqueeElementSetBgColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -834,11 +1083,14 @@ freeMem value' return () +data DOMHTMLMarqueeElementSetBgColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementSetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementSetBgColor + -- method DOMHTMLMarqueeElement::set_direction -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -851,9 +1103,9 @@ dOMHTMLMarqueeElementSetDirection :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLMarqueeElementSetDirection _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -862,11 +1114,14 @@ freeMem value' return () +data DOMHTMLMarqueeElementSetDirectionMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementSetDirectionMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementSetDirection + -- method DOMHTMLMarqueeElement::set_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -879,9 +1134,9 @@ dOMHTMLMarqueeElementSetHeight :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLMarqueeElementSetHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -890,11 +1145,14 @@ freeMem value' return () +data DOMHTMLMarqueeElementSetHeightMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementSetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementSetHeight + -- method DOMHTMLMarqueeElement::set_hspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -907,20 +1165,23 @@ dOMHTMLMarqueeElementSetHspace :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - Word64 -> -- value - m () + a -- _obj + -> Word64 -- value + -> m () -- result dOMHTMLMarqueeElementSetHspace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_marquee_element_set_hspace _obj' value touchManagedPtr _obj return () +data DOMHTMLMarqueeElementSetHspaceMethodInfo +instance (signature ~ (Word64 -> m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementSetHspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementSetHspace + -- method DOMHTMLMarqueeElement::set_loop -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -934,9 +1195,9 @@ dOMHTMLMarqueeElementSetLoop :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLMarqueeElementSetLoop _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -947,11 +1208,14 @@ return () ) +data DOMHTMLMarqueeElementSetLoopMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementSetLoopMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementSetLoop + -- method DOMHTMLMarqueeElement::set_scroll_amount -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -965,9 +1229,9 @@ dOMHTMLMarqueeElementSetScrollAmount :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLMarqueeElementSetScrollAmount _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -978,11 +1242,14 @@ return () ) +data DOMHTMLMarqueeElementSetScrollAmountMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementSetScrollAmountMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementSetScrollAmount + -- method DOMHTMLMarqueeElement::set_scroll_delay -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -996,9 +1263,9 @@ dOMHTMLMarqueeElementSetScrollDelay :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLMarqueeElementSetScrollDelay _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -1009,11 +1276,14 @@ return () ) +data DOMHTMLMarqueeElementSetScrollDelayMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementSetScrollDelayMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementSetScrollDelay + -- method DOMHTMLMarqueeElement::set_true_speed -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1026,9 +1296,9 @@ dOMHTMLMarqueeElementSetTrueSpeed :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLMarqueeElementSetTrueSpeed _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1036,11 +1306,14 @@ touchManagedPtr _obj return () +data DOMHTMLMarqueeElementSetTrueSpeedMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementSetTrueSpeedMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementSetTrueSpeed + -- method DOMHTMLMarqueeElement::set_vspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1053,20 +1326,23 @@ dOMHTMLMarqueeElementSetVspace :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - Word64 -> -- value - m () + a -- _obj + -> Word64 -- value + -> m () -- result dOMHTMLMarqueeElementSetVspace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_marquee_element_set_vspace _obj' value touchManagedPtr _obj return () +data DOMHTMLMarqueeElementSetVspaceMethodInfo +instance (signature ~ (Word64 -> m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementSetVspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementSetVspace + -- method DOMHTMLMarqueeElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1079,9 +1355,9 @@ dOMHTMLMarqueeElementSetWidth :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLMarqueeElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1090,11 +1366,14 @@ freeMem value' return () +data DOMHTMLMarqueeElementSetWidthMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementSetWidth + -- method DOMHTMLMarqueeElement::start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1106,19 +1385,22 @@ dOMHTMLMarqueeElementStart :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLMarqueeElementStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_marquee_element_start _obj' touchManagedPtr _obj return () +data DOMHTMLMarqueeElementStartMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementStartMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementStart + -- method DOMHTMLMarqueeElement::stop -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMarqueeElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1130,12 +1412,16 @@ dOMHTMLMarqueeElementStop :: (MonadIO m, DOMHTMLMarqueeElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLMarqueeElementStop _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_marquee_element_stop _obj' touchManagedPtr _obj return () + +data DOMHTMLMarqueeElementStopMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLMarqueeElementK a) => MethodInfo DOMHTMLMarqueeElementStopMethodInfo a signature where + overloadedMethod _ = dOMHTMLMarqueeElementStop diff --git a/GI/WebKit/Objects/DOMHTMLMarqueeElement.hs-boot b/GI/WebKit/Objects/DOMHTMLMarqueeElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLMarqueeElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLMarqueeElement.hs-boot @@ -22,3 +22,27 @@ data DOMHTMLMarqueeElementTrueSpeedPropertyInfo data DOMHTMLMarqueeElementVspacePropertyInfo data DOMHTMLMarqueeElementWidthPropertyInfo +data DOMHTMLMarqueeElementGetBehaviorMethodInfo +data DOMHTMLMarqueeElementGetBgColorMethodInfo +data DOMHTMLMarqueeElementGetDirectionMethodInfo +data DOMHTMLMarqueeElementGetHeightMethodInfo +data DOMHTMLMarqueeElementGetHspaceMethodInfo +data DOMHTMLMarqueeElementGetLoopMethodInfo +data DOMHTMLMarqueeElementGetScrollAmountMethodInfo +data DOMHTMLMarqueeElementGetScrollDelayMethodInfo +data DOMHTMLMarqueeElementGetTrueSpeedMethodInfo +data DOMHTMLMarqueeElementGetVspaceMethodInfo +data DOMHTMLMarqueeElementGetWidthMethodInfo +data DOMHTMLMarqueeElementSetBehaviorMethodInfo +data DOMHTMLMarqueeElementSetBgColorMethodInfo +data DOMHTMLMarqueeElementSetDirectionMethodInfo +data DOMHTMLMarqueeElementSetHeightMethodInfo +data DOMHTMLMarqueeElementSetHspaceMethodInfo +data DOMHTMLMarqueeElementSetLoopMethodInfo +data DOMHTMLMarqueeElementSetScrollAmountMethodInfo +data DOMHTMLMarqueeElementSetScrollDelayMethodInfo +data DOMHTMLMarqueeElementSetTrueSpeedMethodInfo +data DOMHTMLMarqueeElementSetVspaceMethodInfo +data DOMHTMLMarqueeElementSetWidthMethodInfo +data DOMHTMLMarqueeElementStartMethodInfo +data DOMHTMLMarqueeElementStopMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLMediaElement.hs b/GI/WebKit/Objects/DOMHTMLMediaElement.hs --- a/GI/WebKit/Objects/DOMHTMLMediaElement.hs +++ b/GI/WebKit/Objects/DOMHTMLMediaElement.hs @@ -1,2636 +1,3082 @@ -{- | -Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte -License : LGPL-2.1 -Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) --} - -module GI.WebKit.Objects.DOMHTMLMediaElement - ( - --- * Exported types - DOMHTMLMediaElement(..) , - DOMHTMLMediaElementK , - toDOMHTMLMediaElement , - noDOMHTMLMediaElement , - - - -- * Methods --- ** dOMHTMLMediaElementAddTextTrack - dOMHTMLMediaElementAddTextTrack , - - --- ** dOMHTMLMediaElementCanPlayType - dOMHTMLMediaElementCanPlayType , - - --- ** dOMHTMLMediaElementFastSeek - dOMHTMLMediaElementFastSeek , - - --- ** dOMHTMLMediaElementGetAudioTracks - dOMHTMLMediaElementGetAudioTracks , - - --- ** dOMHTMLMediaElementGetAutoplay - dOMHTMLMediaElementGetAutoplay , - - --- ** dOMHTMLMediaElementGetBuffered - dOMHTMLMediaElementGetBuffered , - - --- ** dOMHTMLMediaElementGetController - dOMHTMLMediaElementGetController , - - --- ** dOMHTMLMediaElementGetControls - dOMHTMLMediaElementGetControls , - - --- ** dOMHTMLMediaElementGetCurrentSrc - dOMHTMLMediaElementGetCurrentSrc , - - --- ** dOMHTMLMediaElementGetCurrentTime - dOMHTMLMediaElementGetCurrentTime , - - --- ** dOMHTMLMediaElementGetDefaultMuted - dOMHTMLMediaElementGetDefaultMuted , - - --- ** dOMHTMLMediaElementGetDefaultPlaybackRate - dOMHTMLMediaElementGetDefaultPlaybackRate, - - --- ** dOMHTMLMediaElementGetDuration - dOMHTMLMediaElementGetDuration , - - --- ** dOMHTMLMediaElementGetEnded - dOMHTMLMediaElementGetEnded , - - --- ** dOMHTMLMediaElementGetError - dOMHTMLMediaElementGetError , - - --- ** dOMHTMLMediaElementGetInitialTime - dOMHTMLMediaElementGetInitialTime , - - --- ** dOMHTMLMediaElementGetLoop - dOMHTMLMediaElementGetLoop , - - --- ** dOMHTMLMediaElementGetMediaGroup - dOMHTMLMediaElementGetMediaGroup , - - --- ** dOMHTMLMediaElementGetMuted - dOMHTMLMediaElementGetMuted , - - --- ** dOMHTMLMediaElementGetNetworkState - dOMHTMLMediaElementGetNetworkState , - - --- ** dOMHTMLMediaElementGetPaused - dOMHTMLMediaElementGetPaused , - - --- ** dOMHTMLMediaElementGetPlaybackRate - dOMHTMLMediaElementGetPlaybackRate , - - --- ** dOMHTMLMediaElementGetPlayed - dOMHTMLMediaElementGetPlayed , - - --- ** dOMHTMLMediaElementGetPreload - dOMHTMLMediaElementGetPreload , - - --- ** dOMHTMLMediaElementGetReadyState - dOMHTMLMediaElementGetReadyState , - - --- ** dOMHTMLMediaElementGetSeekable - dOMHTMLMediaElementGetSeekable , - - --- ** dOMHTMLMediaElementGetSeeking - dOMHTMLMediaElementGetSeeking , - - --- ** dOMHTMLMediaElementGetSrc - dOMHTMLMediaElementGetSrc , - - --- ** dOMHTMLMediaElementGetStartTime - dOMHTMLMediaElementGetStartTime , - - --- ** dOMHTMLMediaElementGetTextTracks - dOMHTMLMediaElementGetTextTracks , - - --- ** dOMHTMLMediaElementGetVideoTracks - dOMHTMLMediaElementGetVideoTracks , - - --- ** dOMHTMLMediaElementGetVolume - dOMHTMLMediaElementGetVolume , - - --- ** dOMHTMLMediaElementGetWebkitAudioDecodedByteCount - dOMHTMLMediaElementGetWebkitAudioDecodedByteCount, - - --- ** dOMHTMLMediaElementGetWebkitClosedCaptionsVisible - dOMHTMLMediaElementGetWebkitClosedCaptionsVisible, - - --- ** dOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWireless - dOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWireless, - - --- ** dOMHTMLMediaElementGetWebkitHasClosedCaptions - dOMHTMLMediaElementGetWebkitHasClosedCaptions, - - --- ** dOMHTMLMediaElementGetWebkitPreservesPitch - dOMHTMLMediaElementGetWebkitPreservesPitch, - - --- ** dOMHTMLMediaElementGetWebkitVideoDecodedByteCount - dOMHTMLMediaElementGetWebkitVideoDecodedByteCount, - - --- ** dOMHTMLMediaElementLoad - dOMHTMLMediaElementLoad , - - --- ** dOMHTMLMediaElementPause - dOMHTMLMediaElementPause , - - --- ** dOMHTMLMediaElementPlay - dOMHTMLMediaElementPlay , - - --- ** dOMHTMLMediaElementSetAutoplay - dOMHTMLMediaElementSetAutoplay , - - --- ** dOMHTMLMediaElementSetControls - dOMHTMLMediaElementSetControls , - - --- ** dOMHTMLMediaElementSetCurrentTime - dOMHTMLMediaElementSetCurrentTime , - - --- ** dOMHTMLMediaElementSetDefaultMuted - dOMHTMLMediaElementSetDefaultMuted , - - --- ** dOMHTMLMediaElementSetDefaultPlaybackRate - dOMHTMLMediaElementSetDefaultPlaybackRate, - - --- ** dOMHTMLMediaElementSetLoop - dOMHTMLMediaElementSetLoop , - - --- ** dOMHTMLMediaElementSetMediaGroup - dOMHTMLMediaElementSetMediaGroup , - - --- ** dOMHTMLMediaElementSetMuted - dOMHTMLMediaElementSetMuted , - - --- ** dOMHTMLMediaElementSetPlaybackRate - dOMHTMLMediaElementSetPlaybackRate , - - --- ** dOMHTMLMediaElementSetPreload - dOMHTMLMediaElementSetPreload , - - --- ** dOMHTMLMediaElementSetSrc - dOMHTMLMediaElementSetSrc , - - --- ** dOMHTMLMediaElementSetVolume - dOMHTMLMediaElementSetVolume , - - --- ** dOMHTMLMediaElementSetWebkitClosedCaptionsVisible - dOMHTMLMediaElementSetWebkitClosedCaptionsVisible, - - --- ** dOMHTMLMediaElementSetWebkitPreservesPitch - dOMHTMLMediaElementSetWebkitPreservesPitch, - - --- ** dOMHTMLMediaElementWebkitShowPlaybackTargetPicker - dOMHTMLMediaElementWebkitShowPlaybackTargetPicker, - - - - - -- * Properties --- ** AudioTracks - DOMHTMLMediaElementAudioTracksPropertyInfo, - getDOMHTMLMediaElementAudioTracks , - - --- ** Autoplay - DOMHTMLMediaElementAutoplayPropertyInfo , - constructDOMHTMLMediaElementAutoplay , - getDOMHTMLMediaElementAutoplay , - setDOMHTMLMediaElementAutoplay , - - --- ** Buffered - DOMHTMLMediaElementBufferedPropertyInfo , - getDOMHTMLMediaElementBuffered , - - --- ** Controller - DOMHTMLMediaElementControllerPropertyInfo, - getDOMHTMLMediaElementController , - - --- ** Controls - DOMHTMLMediaElementControlsPropertyInfo , - constructDOMHTMLMediaElementControls , - getDOMHTMLMediaElementControls , - setDOMHTMLMediaElementControls , - - --- ** CurrentSrc - DOMHTMLMediaElementCurrentSrcPropertyInfo, - getDOMHTMLMediaElementCurrentSrc , - - --- ** CurrentTime - DOMHTMLMediaElementCurrentTimePropertyInfo, - constructDOMHTMLMediaElementCurrentTime , - getDOMHTMLMediaElementCurrentTime , - setDOMHTMLMediaElementCurrentTime , - - --- ** DefaultMuted - DOMHTMLMediaElementDefaultMutedPropertyInfo, - constructDOMHTMLMediaElementDefaultMuted, - getDOMHTMLMediaElementDefaultMuted , - setDOMHTMLMediaElementDefaultMuted , - - --- ** DefaultPlaybackRate - DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo, - constructDOMHTMLMediaElementDefaultPlaybackRate, - getDOMHTMLMediaElementDefaultPlaybackRate, - setDOMHTMLMediaElementDefaultPlaybackRate, - - --- ** Duration - DOMHTMLMediaElementDurationPropertyInfo , - getDOMHTMLMediaElementDuration , - - --- ** Ended - DOMHTMLMediaElementEndedPropertyInfo , - getDOMHTMLMediaElementEnded , - - --- ** Error - DOMHTMLMediaElementErrorPropertyInfo , - getDOMHTMLMediaElementError , - - --- ** Loop - DOMHTMLMediaElementLoopPropertyInfo , - constructDOMHTMLMediaElementLoop , - getDOMHTMLMediaElementLoop , - setDOMHTMLMediaElementLoop , - - --- ** MediaGroup - DOMHTMLMediaElementMediaGroupPropertyInfo, - constructDOMHTMLMediaElementMediaGroup , - getDOMHTMLMediaElementMediaGroup , - setDOMHTMLMediaElementMediaGroup , - - --- ** Muted - DOMHTMLMediaElementMutedPropertyInfo , - constructDOMHTMLMediaElementMuted , - getDOMHTMLMediaElementMuted , - setDOMHTMLMediaElementMuted , - - --- ** NetworkState - DOMHTMLMediaElementNetworkStatePropertyInfo, - getDOMHTMLMediaElementNetworkState , - - --- ** Paused - DOMHTMLMediaElementPausedPropertyInfo , - getDOMHTMLMediaElementPaused , - - --- ** PlaybackRate - DOMHTMLMediaElementPlaybackRatePropertyInfo, - constructDOMHTMLMediaElementPlaybackRate, - getDOMHTMLMediaElementPlaybackRate , - setDOMHTMLMediaElementPlaybackRate , - - --- ** Played - DOMHTMLMediaElementPlayedPropertyInfo , - getDOMHTMLMediaElementPlayed , - - --- ** Preload - DOMHTMLMediaElementPreloadPropertyInfo , - constructDOMHTMLMediaElementPreload , - getDOMHTMLMediaElementPreload , - setDOMHTMLMediaElementPreload , - - --- ** ReadyState - DOMHTMLMediaElementReadyStatePropertyInfo, - getDOMHTMLMediaElementReadyState , - - --- ** Seekable - DOMHTMLMediaElementSeekablePropertyInfo , - getDOMHTMLMediaElementSeekable , - - --- ** Seeking - DOMHTMLMediaElementSeekingPropertyInfo , - getDOMHTMLMediaElementSeeking , - - --- ** Src - DOMHTMLMediaElementSrcPropertyInfo , - constructDOMHTMLMediaElementSrc , - getDOMHTMLMediaElementSrc , - setDOMHTMLMediaElementSrc , - - --- ** TextTracks - DOMHTMLMediaElementTextTracksPropertyInfo, - getDOMHTMLMediaElementTextTracks , - - --- ** VideoTracks - DOMHTMLMediaElementVideoTracksPropertyInfo, - getDOMHTMLMediaElementVideoTracks , - - --- ** Volume - DOMHTMLMediaElementVolumePropertyInfo , - constructDOMHTMLMediaElementVolume , - getDOMHTMLMediaElementVolume , - setDOMHTMLMediaElementVolume , - - --- ** WebkitAudioDecodedByteCount - DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo, - getDOMHTMLMediaElementWebkitAudioDecodedByteCount, - - --- ** WebkitClosedCaptionsVisible - DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo, - constructDOMHTMLMediaElementWebkitClosedCaptionsVisible, - getDOMHTMLMediaElementWebkitClosedCaptionsVisible, - setDOMHTMLMediaElementWebkitClosedCaptionsVisible, - - --- ** WebkitCurrentPlaybackTargetIsWireless - DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo, - getDOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWireless, - - --- ** WebkitHasClosedCaptions - DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo, - getDOMHTMLMediaElementWebkitHasClosedCaptions, - - --- ** WebkitPreservesPitch - DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo, - constructDOMHTMLMediaElementWebkitPreservesPitch, - getDOMHTMLMediaElementWebkitPreservesPitch, - setDOMHTMLMediaElementWebkitPreservesPitch, - - --- ** WebkitVideoDecodedByteCount - DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo, - getDOMHTMLMediaElementWebkitVideoDecodedByteCount, - - - - - ) where - -import Prelude () -import Data.GI.Base.ShortPrelude - -import qualified Data.Text as T -import qualified Data.ByteString.Char8 as B -import qualified Data.Map as Map - -import GI.WebKit.Types -import GI.WebKit.Callbacks -import qualified GI.GObject as GObject - -newtype DOMHTMLMediaElement = DOMHTMLMediaElement (ForeignPtr DOMHTMLMediaElement) -foreign import ccall "webkit_dom_html_media_element_get_type" - c_webkit_dom_html_media_element_get_type :: IO GType - -type instance ParentTypes DOMHTMLMediaElement = DOMHTMLMediaElementParentTypes -type DOMHTMLMediaElementParentTypes = '[DOMHTMLElement, DOMElement, DOMNode, DOMObject, GObject.Object, DOMEventTarget] - -instance GObject DOMHTMLMediaElement where - gobjectIsInitiallyUnowned _ = False - gobjectType _ = c_webkit_dom_html_media_element_get_type - - -class GObject o => DOMHTMLMediaElementK o -instance (GObject o, IsDescendantOf DOMHTMLMediaElement o) => DOMHTMLMediaElementK o - -toDOMHTMLMediaElement :: DOMHTMLMediaElementK o => o -> IO DOMHTMLMediaElement -toDOMHTMLMediaElement = unsafeCastTo DOMHTMLMediaElement - -noDOMHTMLMediaElement :: Maybe DOMHTMLMediaElement -noDOMHTMLMediaElement = Nothing - --- VVV Prop "audio-tracks" - -- Type: TInterface "WebKit" "DOMAudioTrackList" - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementAudioTracks :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMAudioTrackList -getDOMHTMLMediaElementAudioTracks obj = liftIO $ getObjectPropertyObject obj "audio-tracks" DOMAudioTrackList - -data DOMHTMLMediaElementAudioTracksPropertyInfo -instance AttrInfo DOMHTMLMediaElementAudioTracksPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementAudioTracksPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementAudioTracksPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementAudioTracksPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementAudioTracksPropertyInfo = DOMAudioTrackList - type AttrLabel DOMHTMLMediaElementAudioTracksPropertyInfo = "DOMHTMLMediaElement::audio-tracks" - attrGet _ = getDOMHTMLMediaElementAudioTracks - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "autoplay" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementAutoplay :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementAutoplay obj = liftIO $ getObjectPropertyBool obj "autoplay" - -setDOMHTMLMediaElementAutoplay :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () -setDOMHTMLMediaElementAutoplay obj val = liftIO $ setObjectPropertyBool obj "autoplay" val - -constructDOMHTMLMediaElementAutoplay :: Bool -> IO ([Char], GValue) -constructDOMHTMLMediaElementAutoplay val = constructObjectPropertyBool "autoplay" val - -data DOMHTMLMediaElementAutoplayPropertyInfo -instance AttrInfo DOMHTMLMediaElementAutoplayPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementAutoplayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementAutoplayPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLMediaElementAutoplayPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementAutoplayPropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementAutoplayPropertyInfo = "DOMHTMLMediaElement::autoplay" - attrGet _ = getDOMHTMLMediaElementAutoplay - attrSet _ = setDOMHTMLMediaElementAutoplay - attrConstruct _ = constructDOMHTMLMediaElementAutoplay - --- VVV Prop "buffered" - -- Type: TInterface "WebKit" "DOMTimeRanges" - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementBuffered :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTimeRanges -getDOMHTMLMediaElementBuffered obj = liftIO $ getObjectPropertyObject obj "buffered" DOMTimeRanges - -data DOMHTMLMediaElementBufferedPropertyInfo -instance AttrInfo DOMHTMLMediaElementBufferedPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementBufferedPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementBufferedPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementBufferedPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementBufferedPropertyInfo = DOMTimeRanges - type AttrLabel DOMHTMLMediaElementBufferedPropertyInfo = "DOMHTMLMediaElement::buffered" - attrGet _ = getDOMHTMLMediaElementBuffered - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "controller" - -- Type: TInterface "WebKit" "DOMMediaController" - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementController :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMMediaController -getDOMHTMLMediaElementController obj = liftIO $ getObjectPropertyObject obj "controller" DOMMediaController - -data DOMHTMLMediaElementControllerPropertyInfo -instance AttrInfo DOMHTMLMediaElementControllerPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementControllerPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementControllerPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementControllerPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementControllerPropertyInfo = DOMMediaController - type AttrLabel DOMHTMLMediaElementControllerPropertyInfo = "DOMHTMLMediaElement::controller" - attrGet _ = getDOMHTMLMediaElementController - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "controls" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementControls :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementControls obj = liftIO $ getObjectPropertyBool obj "controls" - -setDOMHTMLMediaElementControls :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () -setDOMHTMLMediaElementControls obj val = liftIO $ setObjectPropertyBool obj "controls" val - -constructDOMHTMLMediaElementControls :: Bool -> IO ([Char], GValue) -constructDOMHTMLMediaElementControls val = constructObjectPropertyBool "controls" val - -data DOMHTMLMediaElementControlsPropertyInfo -instance AttrInfo DOMHTMLMediaElementControlsPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementControlsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementControlsPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLMediaElementControlsPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementControlsPropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementControlsPropertyInfo = "DOMHTMLMediaElement::controls" - attrGet _ = getDOMHTMLMediaElementControls - attrSet _ = setDOMHTMLMediaElementControls - attrConstruct _ = constructDOMHTMLMediaElementControls - --- VVV Prop "current-src" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementCurrentSrc :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text -getDOMHTMLMediaElementCurrentSrc obj = liftIO $ getObjectPropertyString obj "current-src" - -data DOMHTMLMediaElementCurrentSrcPropertyInfo -instance AttrInfo DOMHTMLMediaElementCurrentSrcPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementCurrentSrcPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementCurrentSrcPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementCurrentSrcPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementCurrentSrcPropertyInfo = T.Text - type AttrLabel DOMHTMLMediaElementCurrentSrcPropertyInfo = "DOMHTMLMediaElement::current-src" - attrGet _ = getDOMHTMLMediaElementCurrentSrc - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "current-time" - -- Type: TBasicType TDouble - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementCurrentTime :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double -getDOMHTMLMediaElementCurrentTime obj = liftIO $ getObjectPropertyDouble obj "current-time" - -setDOMHTMLMediaElementCurrentTime :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m () -setDOMHTMLMediaElementCurrentTime obj val = liftIO $ setObjectPropertyDouble obj "current-time" val - -constructDOMHTMLMediaElementCurrentTime :: Double -> IO ([Char], GValue) -constructDOMHTMLMediaElementCurrentTime val = constructObjectPropertyDouble "current-time" val - -data DOMHTMLMediaElementCurrentTimePropertyInfo -instance AttrInfo DOMHTMLMediaElementCurrentTimePropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementCurrentTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementCurrentTimePropertyInfo = (~) Double - type AttrBaseTypeConstraint DOMHTMLMediaElementCurrentTimePropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementCurrentTimePropertyInfo = Double - type AttrLabel DOMHTMLMediaElementCurrentTimePropertyInfo = "DOMHTMLMediaElement::current-time" - attrGet _ = getDOMHTMLMediaElementCurrentTime - attrSet _ = setDOMHTMLMediaElementCurrentTime - attrConstruct _ = constructDOMHTMLMediaElementCurrentTime - --- VVV Prop "default-muted" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementDefaultMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementDefaultMuted obj = liftIO $ getObjectPropertyBool obj "default-muted" - -setDOMHTMLMediaElementDefaultMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () -setDOMHTMLMediaElementDefaultMuted obj val = liftIO $ setObjectPropertyBool obj "default-muted" val - -constructDOMHTMLMediaElementDefaultMuted :: Bool -> IO ([Char], GValue) -constructDOMHTMLMediaElementDefaultMuted val = constructObjectPropertyBool "default-muted" val - -data DOMHTMLMediaElementDefaultMutedPropertyInfo -instance AttrInfo DOMHTMLMediaElementDefaultMutedPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementDefaultMutedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementDefaultMutedPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLMediaElementDefaultMutedPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementDefaultMutedPropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementDefaultMutedPropertyInfo = "DOMHTMLMediaElement::default-muted" - attrGet _ = getDOMHTMLMediaElementDefaultMuted - attrSet _ = setDOMHTMLMediaElementDefaultMuted - attrConstruct _ = constructDOMHTMLMediaElementDefaultMuted - --- VVV Prop "default-playback-rate" - -- Type: TBasicType TDouble - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementDefaultPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double -getDOMHTMLMediaElementDefaultPlaybackRate obj = liftIO $ getObjectPropertyDouble obj "default-playback-rate" - -setDOMHTMLMediaElementDefaultPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m () -setDOMHTMLMediaElementDefaultPlaybackRate obj val = liftIO $ setObjectPropertyDouble obj "default-playback-rate" val - -constructDOMHTMLMediaElementDefaultPlaybackRate :: Double -> IO ([Char], GValue) -constructDOMHTMLMediaElementDefaultPlaybackRate val = constructObjectPropertyDouble "default-playback-rate" val - -data DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo -instance AttrInfo DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = (~) Double - type AttrBaseTypeConstraint DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = Double - type AttrLabel DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = "DOMHTMLMediaElement::default-playback-rate" - attrGet _ = getDOMHTMLMediaElementDefaultPlaybackRate - attrSet _ = setDOMHTMLMediaElementDefaultPlaybackRate - attrConstruct _ = constructDOMHTMLMediaElementDefaultPlaybackRate - --- VVV Prop "duration" - -- Type: TBasicType TDouble - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementDuration :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double -getDOMHTMLMediaElementDuration obj = liftIO $ getObjectPropertyDouble obj "duration" - -data DOMHTMLMediaElementDurationPropertyInfo -instance AttrInfo DOMHTMLMediaElementDurationPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementDurationPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementDurationPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementDurationPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementDurationPropertyInfo = Double - type AttrLabel DOMHTMLMediaElementDurationPropertyInfo = "DOMHTMLMediaElement::duration" - attrGet _ = getDOMHTMLMediaElementDuration - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "ended" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementEnded :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementEnded obj = liftIO $ getObjectPropertyBool obj "ended" - -data DOMHTMLMediaElementEndedPropertyInfo -instance AttrInfo DOMHTMLMediaElementEndedPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementEndedPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementEndedPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementEndedPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementEndedPropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementEndedPropertyInfo = "DOMHTMLMediaElement::ended" - attrGet _ = getDOMHTMLMediaElementEnded - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "error" - -- Type: TInterface "WebKit" "DOMMediaError" - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementError :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMMediaError -getDOMHTMLMediaElementError obj = liftIO $ getObjectPropertyObject obj "error" DOMMediaError - -data DOMHTMLMediaElementErrorPropertyInfo -instance AttrInfo DOMHTMLMediaElementErrorPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementErrorPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementErrorPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementErrorPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementErrorPropertyInfo = DOMMediaError - type AttrLabel DOMHTMLMediaElementErrorPropertyInfo = "DOMHTMLMediaElement::error" - attrGet _ = getDOMHTMLMediaElementError - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "loop" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementLoop :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementLoop obj = liftIO $ getObjectPropertyBool obj "loop" - -setDOMHTMLMediaElementLoop :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () -setDOMHTMLMediaElementLoop obj val = liftIO $ setObjectPropertyBool obj "loop" val - -constructDOMHTMLMediaElementLoop :: Bool -> IO ([Char], GValue) -constructDOMHTMLMediaElementLoop val = constructObjectPropertyBool "loop" val - -data DOMHTMLMediaElementLoopPropertyInfo -instance AttrInfo DOMHTMLMediaElementLoopPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementLoopPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementLoopPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLMediaElementLoopPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementLoopPropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementLoopPropertyInfo = "DOMHTMLMediaElement::loop" - attrGet _ = getDOMHTMLMediaElementLoop - attrSet _ = setDOMHTMLMediaElementLoop - attrConstruct _ = constructDOMHTMLMediaElementLoop - --- VVV Prop "media-group" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementMediaGroup :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text -getDOMHTMLMediaElementMediaGroup obj = liftIO $ getObjectPropertyString obj "media-group" - -setDOMHTMLMediaElementMediaGroup :: (MonadIO m, DOMHTMLMediaElementK o) => o -> T.Text -> m () -setDOMHTMLMediaElementMediaGroup obj val = liftIO $ setObjectPropertyString obj "media-group" val - -constructDOMHTMLMediaElementMediaGroup :: T.Text -> IO ([Char], GValue) -constructDOMHTMLMediaElementMediaGroup val = constructObjectPropertyString "media-group" val - -data DOMHTMLMediaElementMediaGroupPropertyInfo -instance AttrInfo DOMHTMLMediaElementMediaGroupPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementMediaGroupPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementMediaGroupPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLMediaElementMediaGroupPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementMediaGroupPropertyInfo = T.Text - type AttrLabel DOMHTMLMediaElementMediaGroupPropertyInfo = "DOMHTMLMediaElement::media-group" - attrGet _ = getDOMHTMLMediaElementMediaGroup - attrSet _ = setDOMHTMLMediaElementMediaGroup - attrConstruct _ = constructDOMHTMLMediaElementMediaGroup - --- VVV Prop "muted" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementMuted obj = liftIO $ getObjectPropertyBool obj "muted" - -setDOMHTMLMediaElementMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () -setDOMHTMLMediaElementMuted obj val = liftIO $ setObjectPropertyBool obj "muted" val - -constructDOMHTMLMediaElementMuted :: Bool -> IO ([Char], GValue) -constructDOMHTMLMediaElementMuted val = constructObjectPropertyBool "muted" val - -data DOMHTMLMediaElementMutedPropertyInfo -instance AttrInfo DOMHTMLMediaElementMutedPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementMutedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementMutedPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLMediaElementMutedPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementMutedPropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementMutedPropertyInfo = "DOMHTMLMediaElement::muted" - attrGet _ = getDOMHTMLMediaElementMuted - attrSet _ = setDOMHTMLMediaElementMuted - attrConstruct _ = constructDOMHTMLMediaElementMuted - --- VVV Prop "network-state" - -- Type: TBasicType TUInt32 - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementNetworkState :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word32 -getDOMHTMLMediaElementNetworkState obj = liftIO $ getObjectPropertyCUInt obj "network-state" - -data DOMHTMLMediaElementNetworkStatePropertyInfo -instance AttrInfo DOMHTMLMediaElementNetworkStatePropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementNetworkStatePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementNetworkStatePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementNetworkStatePropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementNetworkStatePropertyInfo = Word32 - type AttrLabel DOMHTMLMediaElementNetworkStatePropertyInfo = "DOMHTMLMediaElement::network-state" - attrGet _ = getDOMHTMLMediaElementNetworkState - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "paused" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementPaused :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementPaused obj = liftIO $ getObjectPropertyBool obj "paused" - -data DOMHTMLMediaElementPausedPropertyInfo -instance AttrInfo DOMHTMLMediaElementPausedPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementPausedPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementPausedPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementPausedPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementPausedPropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementPausedPropertyInfo = "DOMHTMLMediaElement::paused" - attrGet _ = getDOMHTMLMediaElementPaused - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "playback-rate" - -- Type: TBasicType TDouble - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double -getDOMHTMLMediaElementPlaybackRate obj = liftIO $ getObjectPropertyDouble obj "playback-rate" - -setDOMHTMLMediaElementPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m () -setDOMHTMLMediaElementPlaybackRate obj val = liftIO $ setObjectPropertyDouble obj "playback-rate" val - -constructDOMHTMLMediaElementPlaybackRate :: Double -> IO ([Char], GValue) -constructDOMHTMLMediaElementPlaybackRate val = constructObjectPropertyDouble "playback-rate" val - -data DOMHTMLMediaElementPlaybackRatePropertyInfo -instance AttrInfo DOMHTMLMediaElementPlaybackRatePropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementPlaybackRatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementPlaybackRatePropertyInfo = (~) Double - type AttrBaseTypeConstraint DOMHTMLMediaElementPlaybackRatePropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementPlaybackRatePropertyInfo = Double - type AttrLabel DOMHTMLMediaElementPlaybackRatePropertyInfo = "DOMHTMLMediaElement::playback-rate" - attrGet _ = getDOMHTMLMediaElementPlaybackRate - attrSet _ = setDOMHTMLMediaElementPlaybackRate - attrConstruct _ = constructDOMHTMLMediaElementPlaybackRate - --- VVV Prop "played" - -- Type: TInterface "WebKit" "DOMTimeRanges" - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementPlayed :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTimeRanges -getDOMHTMLMediaElementPlayed obj = liftIO $ getObjectPropertyObject obj "played" DOMTimeRanges - -data DOMHTMLMediaElementPlayedPropertyInfo -instance AttrInfo DOMHTMLMediaElementPlayedPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementPlayedPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementPlayedPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementPlayedPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementPlayedPropertyInfo = DOMTimeRanges - type AttrLabel DOMHTMLMediaElementPlayedPropertyInfo = "DOMHTMLMediaElement::played" - attrGet _ = getDOMHTMLMediaElementPlayed - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "preload" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementPreload :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text -getDOMHTMLMediaElementPreload obj = liftIO $ getObjectPropertyString obj "preload" - -setDOMHTMLMediaElementPreload :: (MonadIO m, DOMHTMLMediaElementK o) => o -> T.Text -> m () -setDOMHTMLMediaElementPreload obj val = liftIO $ setObjectPropertyString obj "preload" val - -constructDOMHTMLMediaElementPreload :: T.Text -> IO ([Char], GValue) -constructDOMHTMLMediaElementPreload val = constructObjectPropertyString "preload" val - -data DOMHTMLMediaElementPreloadPropertyInfo -instance AttrInfo DOMHTMLMediaElementPreloadPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementPreloadPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementPreloadPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLMediaElementPreloadPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementPreloadPropertyInfo = T.Text - type AttrLabel DOMHTMLMediaElementPreloadPropertyInfo = "DOMHTMLMediaElement::preload" - attrGet _ = getDOMHTMLMediaElementPreload - attrSet _ = setDOMHTMLMediaElementPreload - attrConstruct _ = constructDOMHTMLMediaElementPreload - --- VVV Prop "ready-state" - -- Type: TBasicType TUInt32 - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementReadyState :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word32 -getDOMHTMLMediaElementReadyState obj = liftIO $ getObjectPropertyCUInt obj "ready-state" - -data DOMHTMLMediaElementReadyStatePropertyInfo -instance AttrInfo DOMHTMLMediaElementReadyStatePropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementReadyStatePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementReadyStatePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementReadyStatePropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementReadyStatePropertyInfo = Word32 - type AttrLabel DOMHTMLMediaElementReadyStatePropertyInfo = "DOMHTMLMediaElement::ready-state" - attrGet _ = getDOMHTMLMediaElementReadyState - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "seekable" - -- Type: TInterface "WebKit" "DOMTimeRanges" - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementSeekable :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTimeRanges -getDOMHTMLMediaElementSeekable obj = liftIO $ getObjectPropertyObject obj "seekable" DOMTimeRanges - -data DOMHTMLMediaElementSeekablePropertyInfo -instance AttrInfo DOMHTMLMediaElementSeekablePropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementSeekablePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementSeekablePropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementSeekablePropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementSeekablePropertyInfo = DOMTimeRanges - type AttrLabel DOMHTMLMediaElementSeekablePropertyInfo = "DOMHTMLMediaElement::seekable" - attrGet _ = getDOMHTMLMediaElementSeekable - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "seeking" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementSeeking :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementSeeking obj = liftIO $ getObjectPropertyBool obj "seeking" - -data DOMHTMLMediaElementSeekingPropertyInfo -instance AttrInfo DOMHTMLMediaElementSeekingPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementSeekingPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementSeekingPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementSeekingPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementSeekingPropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementSeekingPropertyInfo = "DOMHTMLMediaElement::seeking" - attrGet _ = getDOMHTMLMediaElementSeeking - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "src" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementSrc :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text -getDOMHTMLMediaElementSrc obj = liftIO $ getObjectPropertyString obj "src" - -setDOMHTMLMediaElementSrc :: (MonadIO m, DOMHTMLMediaElementK o) => o -> T.Text -> m () -setDOMHTMLMediaElementSrc obj val = liftIO $ setObjectPropertyString obj "src" val - -constructDOMHTMLMediaElementSrc :: T.Text -> IO ([Char], GValue) -constructDOMHTMLMediaElementSrc val = constructObjectPropertyString "src" val - -data DOMHTMLMediaElementSrcPropertyInfo -instance AttrInfo DOMHTMLMediaElementSrcPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementSrcPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint DOMHTMLMediaElementSrcPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementSrcPropertyInfo = T.Text - type AttrLabel DOMHTMLMediaElementSrcPropertyInfo = "DOMHTMLMediaElement::src" - attrGet _ = getDOMHTMLMediaElementSrc - attrSet _ = setDOMHTMLMediaElementSrc - attrConstruct _ = constructDOMHTMLMediaElementSrc - --- VVV Prop "text-tracks" - -- Type: TInterface "WebKit" "DOMTextTrackList" - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementTextTracks :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTextTrackList -getDOMHTMLMediaElementTextTracks obj = liftIO $ getObjectPropertyObject obj "text-tracks" DOMTextTrackList - -data DOMHTMLMediaElementTextTracksPropertyInfo -instance AttrInfo DOMHTMLMediaElementTextTracksPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementTextTracksPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementTextTracksPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementTextTracksPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementTextTracksPropertyInfo = DOMTextTrackList - type AttrLabel DOMHTMLMediaElementTextTracksPropertyInfo = "DOMHTMLMediaElement::text-tracks" - attrGet _ = getDOMHTMLMediaElementTextTracks - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "video-tracks" - -- Type: TInterface "WebKit" "DOMVideoTrackList" - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementVideoTracks :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMVideoTrackList -getDOMHTMLMediaElementVideoTracks obj = liftIO $ getObjectPropertyObject obj "video-tracks" DOMVideoTrackList - -data DOMHTMLMediaElementVideoTracksPropertyInfo -instance AttrInfo DOMHTMLMediaElementVideoTracksPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementVideoTracksPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementVideoTracksPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementVideoTracksPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementVideoTracksPropertyInfo = DOMVideoTrackList - type AttrLabel DOMHTMLMediaElementVideoTracksPropertyInfo = "DOMHTMLMediaElement::video-tracks" - attrGet _ = getDOMHTMLMediaElementVideoTracks - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "volume" - -- Type: TBasicType TDouble - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementVolume :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double -getDOMHTMLMediaElementVolume obj = liftIO $ getObjectPropertyDouble obj "volume" - -setDOMHTMLMediaElementVolume :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m () -setDOMHTMLMediaElementVolume obj val = liftIO $ setObjectPropertyDouble obj "volume" val - -constructDOMHTMLMediaElementVolume :: Double -> IO ([Char], GValue) -constructDOMHTMLMediaElementVolume val = constructObjectPropertyDouble "volume" val - -data DOMHTMLMediaElementVolumePropertyInfo -instance AttrInfo DOMHTMLMediaElementVolumePropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementVolumePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementVolumePropertyInfo = (~) Double - type AttrBaseTypeConstraint DOMHTMLMediaElementVolumePropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementVolumePropertyInfo = Double - type AttrLabel DOMHTMLMediaElementVolumePropertyInfo = "DOMHTMLMediaElement::volume" - attrGet _ = getDOMHTMLMediaElementVolume - attrSet _ = setDOMHTMLMediaElementVolume - attrConstruct _ = constructDOMHTMLMediaElementVolume - --- VVV Prop "webkit-audio-decoded-byte-count" - -- Type: TBasicType TUInt64 - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementWebkitAudioDecodedByteCount :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word64 -getDOMHTMLMediaElementWebkitAudioDecodedByteCount obj = liftIO $ getObjectPropertyUInt64 obj "webkit-audio-decoded-byte-count" - -data DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo -instance AttrInfo DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = Word64 - type AttrLabel DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = "DOMHTMLMediaElement::webkit-audio-decoded-byte-count" - attrGet _ = getDOMHTMLMediaElementWebkitAudioDecodedByteCount - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "webkit-closed-captions-visible" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementWebkitClosedCaptionsVisible :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementWebkitClosedCaptionsVisible obj = liftIO $ getObjectPropertyBool obj "webkit-closed-captions-visible" - -setDOMHTMLMediaElementWebkitClosedCaptionsVisible :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () -setDOMHTMLMediaElementWebkitClosedCaptionsVisible obj val = liftIO $ setObjectPropertyBool obj "webkit-closed-captions-visible" val - -constructDOMHTMLMediaElementWebkitClosedCaptionsVisible :: Bool -> IO ([Char], GValue) -constructDOMHTMLMediaElementWebkitClosedCaptionsVisible val = constructObjectPropertyBool "webkit-closed-captions-visible" val - -data DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo -instance AttrInfo DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = "DOMHTMLMediaElement::webkit-closed-captions-visible" - attrGet _ = getDOMHTMLMediaElementWebkitClosedCaptionsVisible - attrSet _ = setDOMHTMLMediaElementWebkitClosedCaptionsVisible - attrConstruct _ = constructDOMHTMLMediaElementWebkitClosedCaptionsVisible - --- VVV Prop "webkit-current-playback-target-is-wireless" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWireless :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWireless obj = liftIO $ getObjectPropertyBool obj "webkit-current-playback-target-is-wireless" - -data DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo -instance AttrInfo DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = "DOMHTMLMediaElement::webkit-current-playback-target-is-wireless" - attrGet _ = getDOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWireless - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "webkit-has-closed-captions" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementWebkitHasClosedCaptions :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementWebkitHasClosedCaptions obj = liftIO $ getObjectPropertyBool obj "webkit-has-closed-captions" - -data DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo -instance AttrInfo DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = "DOMHTMLMediaElement::webkit-has-closed-captions" - attrGet _ = getDOMHTMLMediaElementWebkitHasClosedCaptions - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "webkit-preserves-pitch" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getDOMHTMLMediaElementWebkitPreservesPitch :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool -getDOMHTMLMediaElementWebkitPreservesPitch obj = liftIO $ getObjectPropertyBool obj "webkit-preserves-pitch" - -setDOMHTMLMediaElementWebkitPreservesPitch :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () -setDOMHTMLMediaElementWebkitPreservesPitch obj val = liftIO $ setObjectPropertyBool obj "webkit-preserves-pitch" val - -constructDOMHTMLMediaElementWebkitPreservesPitch :: Bool -> IO ([Char], GValue) -constructDOMHTMLMediaElementWebkitPreservesPitch val = constructObjectPropertyBool "webkit-preserves-pitch" val - -data DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo -instance AttrInfo DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = (~) Bool - type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = Bool - type AttrLabel DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = "DOMHTMLMediaElement::webkit-preserves-pitch" - attrGet _ = getDOMHTMLMediaElementWebkitPreservesPitch - attrSet _ = setDOMHTMLMediaElementWebkitPreservesPitch - attrConstruct _ = constructDOMHTMLMediaElementWebkitPreservesPitch - --- VVV Prop "webkit-video-decoded-byte-count" - -- Type: TBasicType TUInt64 - -- Flags: [PropertyReadable] - -getDOMHTMLMediaElementWebkitVideoDecodedByteCount :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word64 -getDOMHTMLMediaElementWebkitVideoDecodedByteCount obj = liftIO $ getObjectPropertyUInt64 obj "webkit-video-decoded-byte-count" - -data DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo -instance AttrInfo DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo where - type AttrAllowedOps DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = (~) () - type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = DOMHTMLMediaElementK - type AttrGetType DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = Word64 - type AttrLabel DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = "DOMHTMLMediaElement::webkit-video-decoded-byte-count" - attrGet _ = getDOMHTMLMediaElementWebkitVideoDecodedByteCount - attrSet _ = undefined - attrConstruct _ = undefined - -type instance AttributeList DOMHTMLMediaElement = DOMHTMLMediaElementAttributeList -type DOMHTMLMediaElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("audio-tracks", DOMHTMLMediaElementAudioTracksPropertyInfo), '("autoplay", DOMHTMLMediaElementAutoplayPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("buffered", DOMHTMLMediaElementBufferedPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("controller", DOMHTMLMediaElementControllerPropertyInfo), '("controls", DOMHTMLMediaElementControlsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-src", DOMHTMLMediaElementCurrentSrcPropertyInfo), '("current-time", DOMHTMLMediaElementCurrentTimePropertyInfo), '("default-muted", DOMHTMLMediaElementDefaultMutedPropertyInfo), '("default-playback-rate", DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("duration", DOMHTMLMediaElementDurationPropertyInfo), '("ended", DOMHTMLMediaElementEndedPropertyInfo), '("error", DOMHTMLMediaElementErrorPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMediaElementLoopPropertyInfo), '("media-group", DOMHTMLMediaElementMediaGroupPropertyInfo), '("muted", DOMHTMLMediaElementMutedPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("network-state", DOMHTMLMediaElementNetworkStatePropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("paused", DOMHTMLMediaElementPausedPropertyInfo), '("playback-rate", DOMHTMLMediaElementPlaybackRatePropertyInfo), '("played", DOMHTMLMediaElementPlayedPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("preload", DOMHTMLMediaElementPreloadPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("ready-state", DOMHTMLMediaElementReadyStatePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("seekable", DOMHTMLMediaElementSeekablePropertyInfo), '("seeking", DOMHTMLMediaElementSeekingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLMediaElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("text-tracks", DOMHTMLMediaElementTextTracksPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("video-tracks", DOMHTMLMediaElementVideoTracksPropertyInfo), '("volume", DOMHTMLMediaElementVolumePropertyInfo), '("webkit-audio-decoded-byte-count", DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo), '("webkit-closed-captions-visible", DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo), '("webkit-current-playback-target-is-wireless", DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo), '("webkit-has-closed-captions", DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo), '("webkit-preserves-pitch", DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkit-video-decoded-byte-count", DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) - -type instance SignalList DOMHTMLMediaElement = DOMHTMLMediaElementSignalList -type DOMHTMLMediaElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) - --- method DOMHTMLMediaElement::add_text_track --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "kind", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "label", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "language", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "kind", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "label", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "language", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMTextTrack" --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_add_text_track" webkit_dom_html_media_element_add_text_track :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CString -> -- kind : TBasicType TUTF8 - CString -> -- label : TBasicType TUTF8 - CString -> -- language : TBasicType TUTF8 - Ptr (Ptr GError) -> -- error - IO (Ptr DOMTextTrack) - - -dOMHTMLMediaElementAddTextTrack :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - T.Text -> -- kind - T.Text -> -- label - T.Text -> -- language - m DOMTextTrack -dOMHTMLMediaElementAddTextTrack _obj kind label language = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - kind' <- textToCString kind - label' <- textToCString label - language' <- textToCString language - onException (do - result <- propagateGError $ webkit_dom_html_media_element_add_text_track _obj' kind' label' language' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_add_text_track" result - result' <- (wrapObject DOMTextTrack) result - touchManagedPtr _obj - freeMem kind' - freeMem label' - freeMem language' - return result' - ) (do - freeMem kind' - freeMem label' - freeMem language' - ) - --- method DOMHTMLMediaElement::can_play_type --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_can_play_type" webkit_dom_html_media_element_can_play_type :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CString -> -- type : TBasicType TUTF8 - IO CString - - -dOMHTMLMediaElementCanPlayType :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - T.Text -> -- type - m T.Text -dOMHTMLMediaElementCanPlayType _obj type_ = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - type_' <- textToCString type_ - result <- webkit_dom_html_media_element_can_play_type _obj' type_' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_can_play_type" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - freeMem type_' - return result' - --- method DOMHTMLMediaElement::fast_seek --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "time", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "time", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_fast_seek" webkit_dom_html_media_element_fast_seek :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CDouble -> -- time : TBasicType TDouble - IO () - - -dOMHTMLMediaElementFastSeek :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Double -> -- time - m () -dOMHTMLMediaElementFastSeek _obj time = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let time' = realToFrac time - webkit_dom_html_media_element_fast_seek _obj' time' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::get_audio_tracks --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMAudioTrackList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_audio_tracks" webkit_dom_html_media_element_get_audio_tracks :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO (Ptr DOMAudioTrackList) - - -dOMHTMLMediaElementGetAudioTracks :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m DOMAudioTrackList -dOMHTMLMediaElementGetAudioTracks _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_audio_tracks _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_audio_tracks" result - result' <- (wrapObject DOMAudioTrackList) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_autoplay --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_autoplay" webkit_dom_html_media_element_get_autoplay :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetAutoplay :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetAutoplay _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_autoplay _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_buffered --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMTimeRanges" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_buffered" webkit_dom_html_media_element_get_buffered :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO (Ptr DOMTimeRanges) - - -dOMHTMLMediaElementGetBuffered :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m DOMTimeRanges -dOMHTMLMediaElementGetBuffered _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_buffered _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_buffered" result - result' <- (wrapObject DOMTimeRanges) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_controller --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMMediaController" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_controller" webkit_dom_html_media_element_get_controller :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO (Ptr DOMMediaController) - - -dOMHTMLMediaElementGetController :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m DOMMediaController -dOMHTMLMediaElementGetController _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_controller _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_controller" result - result' <- (wrapObject DOMMediaController) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_controls --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_controls" webkit_dom_html_media_element_get_controls :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetControls :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetControls _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_controls _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_current_src --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_current_src" webkit_dom_html_media_element_get_current_src :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CString - - -dOMHTMLMediaElementGetCurrentSrc :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m T.Text -dOMHTMLMediaElementGetCurrentSrc _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_current_src _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_current_src" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_current_time --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TDouble --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_current_time" webkit_dom_html_media_element_get_current_time :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CDouble - - -dOMHTMLMediaElementGetCurrentTime :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Double -dOMHTMLMediaElementGetCurrentTime _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_current_time _obj' - let result' = realToFrac result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_default_muted --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_default_muted" webkit_dom_html_media_element_get_default_muted :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetDefaultMuted :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetDefaultMuted _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_default_muted _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_default_playback_rate --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TDouble --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_default_playback_rate" webkit_dom_html_media_element_get_default_playback_rate :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CDouble - - -dOMHTMLMediaElementGetDefaultPlaybackRate :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Double -dOMHTMLMediaElementGetDefaultPlaybackRate _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_default_playback_rate _obj' - let result' = realToFrac result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_duration --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TDouble --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_duration" webkit_dom_html_media_element_get_duration :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CDouble - - -dOMHTMLMediaElementGetDuration :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Double -dOMHTMLMediaElementGetDuration _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_duration _obj' - let result' = realToFrac result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_ended --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_ended" webkit_dom_html_media_element_get_ended :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetEnded :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetEnded _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_ended _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_error --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMMediaError" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_error" webkit_dom_html_media_element_get_error :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO (Ptr DOMMediaError) - - -dOMHTMLMediaElementGetError :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m DOMMediaError -dOMHTMLMediaElementGetError _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_error _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_error" result - result' <- (wrapObject DOMMediaError) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_initial_time --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TDouble --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_initial_time" webkit_dom_html_media_element_get_initial_time :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CDouble - -{-# DEPRECATED dOMHTMLMediaElementGetInitialTime ["(Since version 2.2)"]#-} -dOMHTMLMediaElementGetInitialTime :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Double -dOMHTMLMediaElementGetInitialTime _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_initial_time _obj' - let result' = realToFrac result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_loop --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_loop" webkit_dom_html_media_element_get_loop :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetLoop :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetLoop _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_loop _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_media_group --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_media_group" webkit_dom_html_media_element_get_media_group :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CString - - -dOMHTMLMediaElementGetMediaGroup :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m T.Text -dOMHTMLMediaElementGetMediaGroup _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_media_group _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_media_group" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_muted --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_muted" webkit_dom_html_media_element_get_muted :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetMuted :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetMuted _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_muted _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_network_state --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUInt16 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_network_state" webkit_dom_html_media_element_get_network_state :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO Word16 - - -dOMHTMLMediaElementGetNetworkState :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Word16 -dOMHTMLMediaElementGetNetworkState _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_network_state _obj' - touchManagedPtr _obj - return result - --- method DOMHTMLMediaElement::get_paused --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_paused" webkit_dom_html_media_element_get_paused :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetPaused :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetPaused _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_paused _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_playback_rate --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TDouble --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_playback_rate" webkit_dom_html_media_element_get_playback_rate :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CDouble - - -dOMHTMLMediaElementGetPlaybackRate :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Double -dOMHTMLMediaElementGetPlaybackRate _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_playback_rate _obj' - let result' = realToFrac result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_played --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMTimeRanges" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_played" webkit_dom_html_media_element_get_played :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO (Ptr DOMTimeRanges) - - -dOMHTMLMediaElementGetPlayed :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m DOMTimeRanges -dOMHTMLMediaElementGetPlayed _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_played _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_played" result - result' <- (wrapObject DOMTimeRanges) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_preload --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_preload" webkit_dom_html_media_element_get_preload :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CString - - -dOMHTMLMediaElementGetPreload :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m T.Text -dOMHTMLMediaElementGetPreload _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_preload _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_preload" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_ready_state --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUInt16 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_ready_state" webkit_dom_html_media_element_get_ready_state :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO Word16 - - -dOMHTMLMediaElementGetReadyState :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Word16 -dOMHTMLMediaElementGetReadyState _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_ready_state _obj' - touchManagedPtr _obj - return result - --- method DOMHTMLMediaElement::get_seekable --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMTimeRanges" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_seekable" webkit_dom_html_media_element_get_seekable :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO (Ptr DOMTimeRanges) - - -dOMHTMLMediaElementGetSeekable :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m DOMTimeRanges -dOMHTMLMediaElementGetSeekable _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_seekable _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_seekable" result - result' <- (wrapObject DOMTimeRanges) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_seeking --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_seeking" webkit_dom_html_media_element_get_seeking :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetSeeking :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetSeeking _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_seeking _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_src --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_src" webkit_dom_html_media_element_get_src :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CString - - -dOMHTMLMediaElementGetSrc :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m T.Text -dOMHTMLMediaElementGetSrc _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_src _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_src" result - result' <- cstringToText result - freeMem result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_start_time --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TDouble --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_start_time" webkit_dom_html_media_element_get_start_time :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CDouble - -{-# DEPRECATED dOMHTMLMediaElementGetStartTime ["(Since version 2.2)"]#-} -dOMHTMLMediaElementGetStartTime :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Double -dOMHTMLMediaElementGetStartTime _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_start_time _obj' - let result' = realToFrac result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_text_tracks --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMTextTrackList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_text_tracks" webkit_dom_html_media_element_get_text_tracks :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO (Ptr DOMTextTrackList) - - -dOMHTMLMediaElementGetTextTracks :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m DOMTextTrackList -dOMHTMLMediaElementGetTextTracks _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_text_tracks _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_text_tracks" result - result' <- (newObject DOMTextTrackList) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_video_tracks --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMVideoTrackList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_video_tracks" webkit_dom_html_media_element_get_video_tracks :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO (Ptr DOMVideoTrackList) - - -dOMHTMLMediaElementGetVideoTracks :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m DOMVideoTrackList -dOMHTMLMediaElementGetVideoTracks _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_video_tracks _obj' - checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_video_tracks" result - result' <- (newObject DOMVideoTrackList) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_volume --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TDouble --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_volume" webkit_dom_html_media_element_get_volume :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CDouble - - -dOMHTMLMediaElementGetVolume :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Double -dOMHTMLMediaElementGetVolume _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_volume _obj' - let result' = realToFrac result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_webkit_audio_decoded_byte_count --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_webkit_audio_decoded_byte_count" webkit_dom_html_media_element_get_webkit_audio_decoded_byte_count :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO Word64 - - -dOMHTMLMediaElementGetWebkitAudioDecodedByteCount :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Word64 -dOMHTMLMediaElementGetWebkitAudioDecodedByteCount _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_webkit_audio_decoded_byte_count _obj' - touchManagedPtr _obj - return result - --- method DOMHTMLMediaElement::get_webkit_closed_captions_visible --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_webkit_closed_captions_visible" webkit_dom_html_media_element_get_webkit_closed_captions_visible :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetWebkitClosedCaptionsVisible :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetWebkitClosedCaptionsVisible _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_webkit_closed_captions_visible _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_webkit_current_playback_target_is_wireless --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_webkit_current_playback_target_is_wireless" webkit_dom_html_media_element_get_webkit_current_playback_target_is_wireless :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWireless :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWireless _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_webkit_current_playback_target_is_wireless _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_webkit_has_closed_captions --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_webkit_has_closed_captions" webkit_dom_html_media_element_get_webkit_has_closed_captions :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetWebkitHasClosedCaptions :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetWebkitHasClosedCaptions _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_webkit_has_closed_captions _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_webkit_preserves_pitch --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_webkit_preserves_pitch" webkit_dom_html_media_element_get_webkit_preserves_pitch :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO CInt - - -dOMHTMLMediaElementGetWebkitPreservesPitch :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Bool -dOMHTMLMediaElementGetWebkitPreservesPitch _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_webkit_preserves_pitch _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method DOMHTMLMediaElement::get_webkit_video_decoded_byte_count --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUInt64 --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_get_webkit_video_decoded_byte_count" webkit_dom_html_media_element_get_webkit_video_decoded_byte_count :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO Word64 - - -dOMHTMLMediaElementGetWebkitVideoDecodedByteCount :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m Word64 -dOMHTMLMediaElementGetWebkitVideoDecodedByteCount _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_dom_html_media_element_get_webkit_video_decoded_byte_count _obj' - touchManagedPtr _obj - return result - --- method DOMHTMLMediaElement::load --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_load" webkit_dom_html_media_element_load :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO () - - -dOMHTMLMediaElementLoad :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m () -dOMHTMLMediaElementLoad _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_html_media_element_load _obj' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::pause --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_pause" webkit_dom_html_media_element_pause :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO () - - -dOMHTMLMediaElementPause :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m () -dOMHTMLMediaElementPause _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_html_media_element_pause _obj' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::play --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_play" webkit_dom_html_media_element_play :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO () - - -dOMHTMLMediaElementPlay :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m () -dOMHTMLMediaElementPlay _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_html_media_element_play _obj' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::set_autoplay --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_autoplay" webkit_dom_html_media_element_set_autoplay :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLMediaElementSetAutoplay :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLMediaElementSetAutoplay _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_media_element_set_autoplay _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::set_controls --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_controls" webkit_dom_html_media_element_set_controls :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLMediaElementSetControls :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLMediaElementSetControls _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_media_element_set_controls _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::set_current_time --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_current_time" webkit_dom_html_media_element_set_current_time :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CDouble -> -- value : TBasicType TDouble - Ptr (Ptr GError) -> -- error - IO () - - -dOMHTMLMediaElementSetCurrentTime :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Double -> -- value - m () -dOMHTMLMediaElementSetCurrentTime _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = realToFrac value - onException (do - propagateGError $ webkit_dom_html_media_element_set_current_time _obj' value' - touchManagedPtr _obj - return () - ) (do - return () - ) - --- method DOMHTMLMediaElement::set_default_muted --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_default_muted" webkit_dom_html_media_element_set_default_muted :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLMediaElementSetDefaultMuted :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLMediaElementSetDefaultMuted _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_media_element_set_default_muted _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::set_default_playback_rate --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_default_playback_rate" webkit_dom_html_media_element_set_default_playback_rate :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CDouble -> -- value : TBasicType TDouble - IO () - - -dOMHTMLMediaElementSetDefaultPlaybackRate :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Double -> -- value - m () -dOMHTMLMediaElementSetDefaultPlaybackRate _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = realToFrac value - webkit_dom_html_media_element_set_default_playback_rate _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::set_loop --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_loop" webkit_dom_html_media_element_set_loop :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLMediaElementSetLoop :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLMediaElementSetLoop _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_media_element_set_loop _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::set_media_group --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_media_group" webkit_dom_html_media_element_set_media_group :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLMediaElementSetMediaGroup :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLMediaElementSetMediaGroup _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_media_element_set_media_group _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLMediaElement::set_muted --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_muted" webkit_dom_html_media_element_set_muted :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLMediaElementSetMuted :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLMediaElementSetMuted _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_media_element_set_muted _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::set_playback_rate --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_playback_rate" webkit_dom_html_media_element_set_playback_rate :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CDouble -> -- value : TBasicType TDouble - IO () - - -dOMHTMLMediaElementSetPlaybackRate :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Double -> -- value - m () -dOMHTMLMediaElementSetPlaybackRate _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = realToFrac value - webkit_dom_html_media_element_set_playback_rate _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::set_preload --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_preload" webkit_dom_html_media_element_set_preload :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLMediaElementSetPreload :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLMediaElementSetPreload _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_media_element_set_preload _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLMediaElement::set_src --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_src" webkit_dom_html_media_element_set_src :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CString -> -- value : TBasicType TUTF8 - IO () - - -dOMHTMLMediaElementSetSrc :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - T.Text -> -- value - m () -dOMHTMLMediaElementSetSrc _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - value' <- textToCString value - webkit_dom_html_media_element_set_src _obj' value' - touchManagedPtr _obj - freeMem value' - return () - --- method DOMHTMLMediaElement::set_volume --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : True --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_volume" webkit_dom_html_media_element_set_volume :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CDouble -> -- value : TBasicType TDouble - Ptr (Ptr GError) -> -- error - IO () - - -dOMHTMLMediaElementSetVolume :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Double -> -- value - m () -dOMHTMLMediaElementSetVolume _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = realToFrac value - onException (do - propagateGError $ webkit_dom_html_media_element_set_volume _obj' value' - touchManagedPtr _obj - return () - ) (do - return () - ) - --- method DOMHTMLMediaElement::set_webkit_closed_captions_visible --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_webkit_closed_captions_visible" webkit_dom_html_media_element_set_webkit_closed_captions_visible :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLMediaElementSetWebkitClosedCaptionsVisible :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLMediaElementSetWebkitClosedCaptionsVisible _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_media_element_set_webkit_closed_captions_visible _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::set_webkit_preserves_pitch --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_set_webkit_preserves_pitch" webkit_dom_html_media_element_set_webkit_preserves_pitch :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - CInt -> -- value : TBasicType TBoolean - IO () - - -dOMHTMLMediaElementSetWebkitPreservesPitch :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - Bool -> -- value - m () -dOMHTMLMediaElementSetWebkitPreservesPitch _obj value = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let value' = (fromIntegral . fromEnum) value - webkit_dom_html_media_element_set_webkit_preserves_pitch _obj' value' - touchManagedPtr _obj - return () - --- method DOMHTMLMediaElement::webkit_show_playback_target_picker --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_dom_html_media_element_webkit_show_playback_target_picker" webkit_dom_html_media_element_webkit_show_playback_target_picker :: - Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" - IO () - - -dOMHTMLMediaElementWebkitShowPlaybackTargetPicker :: - (MonadIO m, DOMHTMLMediaElementK a) => - a -> -- _obj - m () -dOMHTMLMediaElementWebkitShowPlaybackTargetPicker _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_dom_html_media_element_webkit_show_playback_target_picker _obj' - touchManagedPtr _obj - return () + +{- | +Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte +License : LGPL-2.1 +Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) +-} + +module GI.WebKit.Objects.DOMHTMLMediaElement + ( + +-- * Exported types + DOMHTMLMediaElement(..) , + DOMHTMLMediaElementK , + toDOMHTMLMediaElement , + noDOMHTMLMediaElement , + + + -- * Methods +-- ** dOMHTMLMediaElementAddTextTrack + DOMHTMLMediaElementAddTextTrackMethodInfo, + dOMHTMLMediaElementAddTextTrack , + + +-- ** dOMHTMLMediaElementCanPlayType + DOMHTMLMediaElementCanPlayTypeMethodInfo, + dOMHTMLMediaElementCanPlayType , + + +-- ** dOMHTMLMediaElementFastSeek + DOMHTMLMediaElementFastSeekMethodInfo , + dOMHTMLMediaElementFastSeek , + + +-- ** dOMHTMLMediaElementGetAudioTracks + DOMHTMLMediaElementGetAudioTracksMethodInfo, + dOMHTMLMediaElementGetAudioTracks , + + +-- ** dOMHTMLMediaElementGetAutoplay + DOMHTMLMediaElementGetAutoplayMethodInfo, + dOMHTMLMediaElementGetAutoplay , + + +-- ** dOMHTMLMediaElementGetBuffered + DOMHTMLMediaElementGetBufferedMethodInfo, + dOMHTMLMediaElementGetBuffered , + + +-- ** dOMHTMLMediaElementGetController + DOMHTMLMediaElementGetControllerMethodInfo, + dOMHTMLMediaElementGetController , + + +-- ** dOMHTMLMediaElementGetControls + DOMHTMLMediaElementGetControlsMethodInfo, + dOMHTMLMediaElementGetControls , + + +-- ** dOMHTMLMediaElementGetCurrentSrc + DOMHTMLMediaElementGetCurrentSrcMethodInfo, + dOMHTMLMediaElementGetCurrentSrc , + + +-- ** dOMHTMLMediaElementGetCurrentTime + DOMHTMLMediaElementGetCurrentTimeMethodInfo, + dOMHTMLMediaElementGetCurrentTime , + + +-- ** dOMHTMLMediaElementGetDefaultMuted + DOMHTMLMediaElementGetDefaultMutedMethodInfo, + dOMHTMLMediaElementGetDefaultMuted , + + +-- ** dOMHTMLMediaElementGetDefaultPlaybackRate + DOMHTMLMediaElementGetDefaultPlaybackRateMethodInfo, + dOMHTMLMediaElementGetDefaultPlaybackRate, + + +-- ** dOMHTMLMediaElementGetDuration + DOMHTMLMediaElementGetDurationMethodInfo, + dOMHTMLMediaElementGetDuration , + + +-- ** dOMHTMLMediaElementGetEnded + DOMHTMLMediaElementGetEndedMethodInfo , + dOMHTMLMediaElementGetEnded , + + +-- ** dOMHTMLMediaElementGetError + DOMHTMLMediaElementGetErrorMethodInfo , + dOMHTMLMediaElementGetError , + + +-- ** dOMHTMLMediaElementGetInitialTime + DOMHTMLMediaElementGetInitialTimeMethodInfo, + dOMHTMLMediaElementGetInitialTime , + + +-- ** dOMHTMLMediaElementGetLoop + DOMHTMLMediaElementGetLoopMethodInfo , + dOMHTMLMediaElementGetLoop , + + +-- ** dOMHTMLMediaElementGetMediaGroup + DOMHTMLMediaElementGetMediaGroupMethodInfo, + dOMHTMLMediaElementGetMediaGroup , + + +-- ** dOMHTMLMediaElementGetMuted + DOMHTMLMediaElementGetMutedMethodInfo , + dOMHTMLMediaElementGetMuted , + + +-- ** dOMHTMLMediaElementGetNetworkState + DOMHTMLMediaElementGetNetworkStateMethodInfo, + dOMHTMLMediaElementGetNetworkState , + + +-- ** dOMHTMLMediaElementGetPaused + DOMHTMLMediaElementGetPausedMethodInfo , + dOMHTMLMediaElementGetPaused , + + +-- ** dOMHTMLMediaElementGetPlaybackRate + DOMHTMLMediaElementGetPlaybackRateMethodInfo, + dOMHTMLMediaElementGetPlaybackRate , + + +-- ** dOMHTMLMediaElementGetPlayed + DOMHTMLMediaElementGetPlayedMethodInfo , + dOMHTMLMediaElementGetPlayed , + + +-- ** dOMHTMLMediaElementGetPreload + DOMHTMLMediaElementGetPreloadMethodInfo , + dOMHTMLMediaElementGetPreload , + + +-- ** dOMHTMLMediaElementGetReadyState + DOMHTMLMediaElementGetReadyStateMethodInfo, + dOMHTMLMediaElementGetReadyState , + + +-- ** dOMHTMLMediaElementGetSeekable + DOMHTMLMediaElementGetSeekableMethodInfo, + dOMHTMLMediaElementGetSeekable , + + +-- ** dOMHTMLMediaElementGetSeeking + DOMHTMLMediaElementGetSeekingMethodInfo , + dOMHTMLMediaElementGetSeeking , + + +-- ** dOMHTMLMediaElementGetSrc + DOMHTMLMediaElementGetSrcMethodInfo , + dOMHTMLMediaElementGetSrc , + + +-- ** dOMHTMLMediaElementGetStartTime + DOMHTMLMediaElementGetStartTimeMethodInfo, + dOMHTMLMediaElementGetStartTime , + + +-- ** dOMHTMLMediaElementGetTextTracks + DOMHTMLMediaElementGetTextTracksMethodInfo, + dOMHTMLMediaElementGetTextTracks , + + +-- ** dOMHTMLMediaElementGetVideoTracks + DOMHTMLMediaElementGetVideoTracksMethodInfo, + dOMHTMLMediaElementGetVideoTracks , + + +-- ** dOMHTMLMediaElementGetVolume + DOMHTMLMediaElementGetVolumeMethodInfo , + dOMHTMLMediaElementGetVolume , + + +-- ** dOMHTMLMediaElementGetWebkitAudioDecodedByteCount + DOMHTMLMediaElementGetWebkitAudioDecodedByteCountMethodInfo, + dOMHTMLMediaElementGetWebkitAudioDecodedByteCount, + + +-- ** dOMHTMLMediaElementGetWebkitClosedCaptionsVisible + DOMHTMLMediaElementGetWebkitClosedCaptionsVisibleMethodInfo, + dOMHTMLMediaElementGetWebkitClosedCaptionsVisible, + + +-- ** dOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWireless + DOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWirelessMethodInfo, + dOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWireless, + + +-- ** dOMHTMLMediaElementGetWebkitHasClosedCaptions + DOMHTMLMediaElementGetWebkitHasClosedCaptionsMethodInfo, + dOMHTMLMediaElementGetWebkitHasClosedCaptions, + + +-- ** dOMHTMLMediaElementGetWebkitPreservesPitch + DOMHTMLMediaElementGetWebkitPreservesPitchMethodInfo, + dOMHTMLMediaElementGetWebkitPreservesPitch, + + +-- ** dOMHTMLMediaElementGetWebkitVideoDecodedByteCount + DOMHTMLMediaElementGetWebkitVideoDecodedByteCountMethodInfo, + dOMHTMLMediaElementGetWebkitVideoDecodedByteCount, + + +-- ** dOMHTMLMediaElementLoad + DOMHTMLMediaElementLoadMethodInfo , + dOMHTMLMediaElementLoad , + + +-- ** dOMHTMLMediaElementPause + DOMHTMLMediaElementPauseMethodInfo , + dOMHTMLMediaElementPause , + + +-- ** dOMHTMLMediaElementPlay + DOMHTMLMediaElementPlayMethodInfo , + dOMHTMLMediaElementPlay , + + +-- ** dOMHTMLMediaElementSetAutoplay + DOMHTMLMediaElementSetAutoplayMethodInfo, + dOMHTMLMediaElementSetAutoplay , + + +-- ** dOMHTMLMediaElementSetControls + DOMHTMLMediaElementSetControlsMethodInfo, + dOMHTMLMediaElementSetControls , + + +-- ** dOMHTMLMediaElementSetCurrentTime + DOMHTMLMediaElementSetCurrentTimeMethodInfo, + dOMHTMLMediaElementSetCurrentTime , + + +-- ** dOMHTMLMediaElementSetDefaultMuted + DOMHTMLMediaElementSetDefaultMutedMethodInfo, + dOMHTMLMediaElementSetDefaultMuted , + + +-- ** dOMHTMLMediaElementSetDefaultPlaybackRate + DOMHTMLMediaElementSetDefaultPlaybackRateMethodInfo, + dOMHTMLMediaElementSetDefaultPlaybackRate, + + +-- ** dOMHTMLMediaElementSetLoop + DOMHTMLMediaElementSetLoopMethodInfo , + dOMHTMLMediaElementSetLoop , + + +-- ** dOMHTMLMediaElementSetMediaGroup + DOMHTMLMediaElementSetMediaGroupMethodInfo, + dOMHTMLMediaElementSetMediaGroup , + + +-- ** dOMHTMLMediaElementSetMuted + DOMHTMLMediaElementSetMutedMethodInfo , + dOMHTMLMediaElementSetMuted , + + +-- ** dOMHTMLMediaElementSetPlaybackRate + DOMHTMLMediaElementSetPlaybackRateMethodInfo, + dOMHTMLMediaElementSetPlaybackRate , + + +-- ** dOMHTMLMediaElementSetPreload + DOMHTMLMediaElementSetPreloadMethodInfo , + dOMHTMLMediaElementSetPreload , + + +-- ** dOMHTMLMediaElementSetSrc + DOMHTMLMediaElementSetSrcMethodInfo , + dOMHTMLMediaElementSetSrc , + + +-- ** dOMHTMLMediaElementSetVolume + DOMHTMLMediaElementSetVolumeMethodInfo , + dOMHTMLMediaElementSetVolume , + + +-- ** dOMHTMLMediaElementSetWebkitClosedCaptionsVisible + DOMHTMLMediaElementSetWebkitClosedCaptionsVisibleMethodInfo, + dOMHTMLMediaElementSetWebkitClosedCaptionsVisible, + + +-- ** dOMHTMLMediaElementSetWebkitPreservesPitch + DOMHTMLMediaElementSetWebkitPreservesPitchMethodInfo, + dOMHTMLMediaElementSetWebkitPreservesPitch, + + +-- ** dOMHTMLMediaElementWebkitShowPlaybackTargetPicker + DOMHTMLMediaElementWebkitShowPlaybackTargetPickerMethodInfo, + dOMHTMLMediaElementWebkitShowPlaybackTargetPicker, + + + + + -- * Properties +-- ** AudioTracks + DOMHTMLMediaElementAudioTracksPropertyInfo, + getDOMHTMLMediaElementAudioTracks , + + +-- ** Autoplay + DOMHTMLMediaElementAutoplayPropertyInfo , + constructDOMHTMLMediaElementAutoplay , + getDOMHTMLMediaElementAutoplay , + setDOMHTMLMediaElementAutoplay , + + +-- ** Buffered + DOMHTMLMediaElementBufferedPropertyInfo , + getDOMHTMLMediaElementBuffered , + + +-- ** Controller + DOMHTMLMediaElementControllerPropertyInfo, + getDOMHTMLMediaElementController , + + +-- ** Controls + DOMHTMLMediaElementControlsPropertyInfo , + constructDOMHTMLMediaElementControls , + getDOMHTMLMediaElementControls , + setDOMHTMLMediaElementControls , + + +-- ** CurrentSrc + DOMHTMLMediaElementCurrentSrcPropertyInfo, + getDOMHTMLMediaElementCurrentSrc , + + +-- ** CurrentTime + DOMHTMLMediaElementCurrentTimePropertyInfo, + constructDOMHTMLMediaElementCurrentTime , + getDOMHTMLMediaElementCurrentTime , + setDOMHTMLMediaElementCurrentTime , + + +-- ** DefaultMuted + DOMHTMLMediaElementDefaultMutedPropertyInfo, + constructDOMHTMLMediaElementDefaultMuted, + getDOMHTMLMediaElementDefaultMuted , + setDOMHTMLMediaElementDefaultMuted , + + +-- ** DefaultPlaybackRate + DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo, + constructDOMHTMLMediaElementDefaultPlaybackRate, + getDOMHTMLMediaElementDefaultPlaybackRate, + setDOMHTMLMediaElementDefaultPlaybackRate, + + +-- ** Duration + DOMHTMLMediaElementDurationPropertyInfo , + getDOMHTMLMediaElementDuration , + + +-- ** Ended + DOMHTMLMediaElementEndedPropertyInfo , + getDOMHTMLMediaElementEnded , + + +-- ** Error + DOMHTMLMediaElementErrorPropertyInfo , + getDOMHTMLMediaElementError , + + +-- ** Loop + DOMHTMLMediaElementLoopPropertyInfo , + constructDOMHTMLMediaElementLoop , + getDOMHTMLMediaElementLoop , + setDOMHTMLMediaElementLoop , + + +-- ** MediaGroup + DOMHTMLMediaElementMediaGroupPropertyInfo, + constructDOMHTMLMediaElementMediaGroup , + getDOMHTMLMediaElementMediaGroup , + setDOMHTMLMediaElementMediaGroup , + + +-- ** Muted + DOMHTMLMediaElementMutedPropertyInfo , + constructDOMHTMLMediaElementMuted , + getDOMHTMLMediaElementMuted , + setDOMHTMLMediaElementMuted , + + +-- ** NetworkState + DOMHTMLMediaElementNetworkStatePropertyInfo, + getDOMHTMLMediaElementNetworkState , + + +-- ** Paused + DOMHTMLMediaElementPausedPropertyInfo , + getDOMHTMLMediaElementPaused , + + +-- ** PlaybackRate + DOMHTMLMediaElementPlaybackRatePropertyInfo, + constructDOMHTMLMediaElementPlaybackRate, + getDOMHTMLMediaElementPlaybackRate , + setDOMHTMLMediaElementPlaybackRate , + + +-- ** Played + DOMHTMLMediaElementPlayedPropertyInfo , + getDOMHTMLMediaElementPlayed , + + +-- ** Preload + DOMHTMLMediaElementPreloadPropertyInfo , + constructDOMHTMLMediaElementPreload , + getDOMHTMLMediaElementPreload , + setDOMHTMLMediaElementPreload , + + +-- ** ReadyState + DOMHTMLMediaElementReadyStatePropertyInfo, + getDOMHTMLMediaElementReadyState , + + +-- ** Seekable + DOMHTMLMediaElementSeekablePropertyInfo , + getDOMHTMLMediaElementSeekable , + + +-- ** Seeking + DOMHTMLMediaElementSeekingPropertyInfo , + getDOMHTMLMediaElementSeeking , + + +-- ** Src + DOMHTMLMediaElementSrcPropertyInfo , + constructDOMHTMLMediaElementSrc , + getDOMHTMLMediaElementSrc , + setDOMHTMLMediaElementSrc , + + +-- ** TextTracks + DOMHTMLMediaElementTextTracksPropertyInfo, + getDOMHTMLMediaElementTextTracks , + + +-- ** VideoTracks + DOMHTMLMediaElementVideoTracksPropertyInfo, + getDOMHTMLMediaElementVideoTracks , + + +-- ** Volume + DOMHTMLMediaElementVolumePropertyInfo , + constructDOMHTMLMediaElementVolume , + getDOMHTMLMediaElementVolume , + setDOMHTMLMediaElementVolume , + + +-- ** WebkitAudioDecodedByteCount + DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo, + getDOMHTMLMediaElementWebkitAudioDecodedByteCount, + + +-- ** WebkitClosedCaptionsVisible + DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo, + constructDOMHTMLMediaElementWebkitClosedCaptionsVisible, + getDOMHTMLMediaElementWebkitClosedCaptionsVisible, + setDOMHTMLMediaElementWebkitClosedCaptionsVisible, + + +-- ** WebkitCurrentPlaybackTargetIsWireless + DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo, + getDOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWireless, + + +-- ** WebkitHasClosedCaptions + DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo, + getDOMHTMLMediaElementWebkitHasClosedCaptions, + + +-- ** WebkitPreservesPitch + DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo, + constructDOMHTMLMediaElementWebkitPreservesPitch, + getDOMHTMLMediaElementWebkitPreservesPitch, + setDOMHTMLMediaElementWebkitPreservesPitch, + + +-- ** WebkitVideoDecodedByteCount + DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo, + getDOMHTMLMediaElementWebkitVideoDecodedByteCount, + + + + + ) where + +import Prelude () +import Data.GI.Base.ShortPrelude + +import qualified Data.Text as T +import qualified Data.ByteString.Char8 as B +import qualified Data.Map as Map + +import GI.WebKit.Types +import GI.WebKit.Callbacks +import qualified GI.GObject as GObject + +newtype DOMHTMLMediaElement = DOMHTMLMediaElement (ForeignPtr DOMHTMLMediaElement) +foreign import ccall "webkit_dom_html_media_element_get_type" + c_webkit_dom_html_media_element_get_type :: IO GType + +type instance ParentTypes DOMHTMLMediaElement = DOMHTMLMediaElementParentTypes +type DOMHTMLMediaElementParentTypes = '[DOMHTMLElement, DOMElement, DOMNode, DOMObject, GObject.Object, DOMEventTarget] + +instance GObject DOMHTMLMediaElement where + gobjectIsInitiallyUnowned _ = False + gobjectType _ = c_webkit_dom_html_media_element_get_type + + +class GObject o => DOMHTMLMediaElementK o +instance (GObject o, IsDescendantOf DOMHTMLMediaElement o) => DOMHTMLMediaElementK o + +toDOMHTMLMediaElement :: DOMHTMLMediaElementK o => o -> IO DOMHTMLMediaElement +toDOMHTMLMediaElement = unsafeCastTo DOMHTMLMediaElement + +noDOMHTMLMediaElement :: Maybe DOMHTMLMediaElement +noDOMHTMLMediaElement = Nothing + +type family ResolveDOMHTMLMediaElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLMediaElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLMediaElementMethod "addTextTrack" o = DOMHTMLMediaElementAddTextTrackMethodInfo + ResolveDOMHTMLMediaElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLMediaElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLMediaElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLMediaElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLMediaElementMethod "canPlayType" o = DOMHTMLMediaElementCanPlayTypeMethodInfo + ResolveDOMHTMLMediaElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLMediaElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLMediaElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLMediaElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLMediaElementMethod "fastSeek" o = DOMHTMLMediaElementFastSeekMethodInfo + ResolveDOMHTMLMediaElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLMediaElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLMediaElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLMediaElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLMediaElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLMediaElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLMediaElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLMediaElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLMediaElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLMediaElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLMediaElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLMediaElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLMediaElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLMediaElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLMediaElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLMediaElementMethod "load" o = DOMHTMLMediaElementLoadMethodInfo + ResolveDOMHTMLMediaElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLMediaElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLMediaElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLMediaElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLMediaElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLMediaElementMethod "pause" o = DOMHTMLMediaElementPauseMethodInfo + ResolveDOMHTMLMediaElementMethod "play" o = DOMHTMLMediaElementPlayMethodInfo + ResolveDOMHTMLMediaElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLMediaElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLMediaElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLMediaElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLMediaElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLMediaElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLMediaElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLMediaElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLMediaElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLMediaElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLMediaElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLMediaElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLMediaElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLMediaElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLMediaElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLMediaElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLMediaElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLMediaElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLMediaElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLMediaElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLMediaElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLMediaElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLMediaElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLMediaElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLMediaElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLMediaElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLMediaElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLMediaElementMethod "webkitShowPlaybackTargetPicker" o = DOMHTMLMediaElementWebkitShowPlaybackTargetPickerMethodInfo + ResolveDOMHTMLMediaElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLMediaElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLMediaElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLMediaElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLMediaElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLMediaElementMethod "getAudioTracks" o = DOMHTMLMediaElementGetAudioTracksMethodInfo + ResolveDOMHTMLMediaElementMethod "getAutoplay" o = DOMHTMLMediaElementGetAutoplayMethodInfo + ResolveDOMHTMLMediaElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLMediaElementMethod "getBuffered" o = DOMHTMLMediaElementGetBufferedMethodInfo + ResolveDOMHTMLMediaElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLMediaElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLMediaElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLMediaElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLMediaElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLMediaElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLMediaElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLMediaElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLMediaElementMethod "getController" o = DOMHTMLMediaElementGetControllerMethodInfo + ResolveDOMHTMLMediaElementMethod "getControls" o = DOMHTMLMediaElementGetControlsMethodInfo + ResolveDOMHTMLMediaElementMethod "getCurrentSrc" o = DOMHTMLMediaElementGetCurrentSrcMethodInfo + ResolveDOMHTMLMediaElementMethod "getCurrentTime" o = DOMHTMLMediaElementGetCurrentTimeMethodInfo + ResolveDOMHTMLMediaElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLMediaElementMethod "getDefaultMuted" o = DOMHTMLMediaElementGetDefaultMutedMethodInfo + ResolveDOMHTMLMediaElementMethod "getDefaultPlaybackRate" o = DOMHTMLMediaElementGetDefaultPlaybackRateMethodInfo + ResolveDOMHTMLMediaElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLMediaElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLMediaElementMethod "getDuration" o = DOMHTMLMediaElementGetDurationMethodInfo + ResolveDOMHTMLMediaElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLMediaElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLMediaElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLMediaElementMethod "getEnded" o = DOMHTMLMediaElementGetEndedMethodInfo + ResolveDOMHTMLMediaElementMethod "getError" o = DOMHTMLMediaElementGetErrorMethodInfo + ResolveDOMHTMLMediaElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLMediaElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLMediaElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLMediaElementMethod "getInitialTime" o = DOMHTMLMediaElementGetInitialTimeMethodInfo + ResolveDOMHTMLMediaElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLMediaElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLMediaElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLMediaElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLMediaElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLMediaElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLMediaElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLMediaElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLMediaElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLMediaElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLMediaElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLMediaElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLMediaElementMethod "getLoop" o = DOMHTMLMediaElementGetLoopMethodInfo + ResolveDOMHTMLMediaElementMethod "getMediaGroup" o = DOMHTMLMediaElementGetMediaGroupMethodInfo + ResolveDOMHTMLMediaElementMethod "getMuted" o = DOMHTMLMediaElementGetMutedMethodInfo + ResolveDOMHTMLMediaElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLMediaElementMethod "getNetworkState" o = DOMHTMLMediaElementGetNetworkStateMethodInfo + ResolveDOMHTMLMediaElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLMediaElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLMediaElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLMediaElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLMediaElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLMediaElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLMediaElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLMediaElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLMediaElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLMediaElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLMediaElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLMediaElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLMediaElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLMediaElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLMediaElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLMediaElementMethod "getPaused" o = DOMHTMLMediaElementGetPausedMethodInfo + ResolveDOMHTMLMediaElementMethod "getPlaybackRate" o = DOMHTMLMediaElementGetPlaybackRateMethodInfo + ResolveDOMHTMLMediaElementMethod "getPlayed" o = DOMHTMLMediaElementGetPlayedMethodInfo + ResolveDOMHTMLMediaElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLMediaElementMethod "getPreload" o = DOMHTMLMediaElementGetPreloadMethodInfo + ResolveDOMHTMLMediaElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLMediaElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLMediaElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLMediaElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLMediaElementMethod "getReadyState" o = DOMHTMLMediaElementGetReadyStateMethodInfo + ResolveDOMHTMLMediaElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLMediaElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLMediaElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLMediaElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLMediaElementMethod "getSeekable" o = DOMHTMLMediaElementGetSeekableMethodInfo + ResolveDOMHTMLMediaElementMethod "getSeeking" o = DOMHTMLMediaElementGetSeekingMethodInfo + ResolveDOMHTMLMediaElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLMediaElementMethod "getSrc" o = DOMHTMLMediaElementGetSrcMethodInfo + ResolveDOMHTMLMediaElementMethod "getStartTime" o = DOMHTMLMediaElementGetStartTimeMethodInfo + ResolveDOMHTMLMediaElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLMediaElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLMediaElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLMediaElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLMediaElementMethod "getTextTracks" o = DOMHTMLMediaElementGetTextTracksMethodInfo + ResolveDOMHTMLMediaElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLMediaElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLMediaElementMethod "getVideoTracks" o = DOMHTMLMediaElementGetVideoTracksMethodInfo + ResolveDOMHTMLMediaElementMethod "getVolume" o = DOMHTMLMediaElementGetVolumeMethodInfo + ResolveDOMHTMLMediaElementMethod "getWebkitAudioDecodedByteCount" o = DOMHTMLMediaElementGetWebkitAudioDecodedByteCountMethodInfo + ResolveDOMHTMLMediaElementMethod "getWebkitClosedCaptionsVisible" o = DOMHTMLMediaElementGetWebkitClosedCaptionsVisibleMethodInfo + ResolveDOMHTMLMediaElementMethod "getWebkitCurrentPlaybackTargetIsWireless" o = DOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWirelessMethodInfo + ResolveDOMHTMLMediaElementMethod "getWebkitHasClosedCaptions" o = DOMHTMLMediaElementGetWebkitHasClosedCaptionsMethodInfo + ResolveDOMHTMLMediaElementMethod "getWebkitPreservesPitch" o = DOMHTMLMediaElementGetWebkitPreservesPitchMethodInfo + ResolveDOMHTMLMediaElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLMediaElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLMediaElementMethod "getWebkitVideoDecodedByteCount" o = DOMHTMLMediaElementGetWebkitVideoDecodedByteCountMethodInfo + ResolveDOMHTMLMediaElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLMediaElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLMediaElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLMediaElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLMediaElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLMediaElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLMediaElementMethod "setAutoplay" o = DOMHTMLMediaElementSetAutoplayMethodInfo + ResolveDOMHTMLMediaElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLMediaElementMethod "setControls" o = DOMHTMLMediaElementSetControlsMethodInfo + ResolveDOMHTMLMediaElementMethod "setCurrentTime" o = DOMHTMLMediaElementSetCurrentTimeMethodInfo + ResolveDOMHTMLMediaElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLMediaElementMethod "setDefaultMuted" o = DOMHTMLMediaElementSetDefaultMutedMethodInfo + ResolveDOMHTMLMediaElementMethod "setDefaultPlaybackRate" o = DOMHTMLMediaElementSetDefaultPlaybackRateMethodInfo + ResolveDOMHTMLMediaElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLMediaElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLMediaElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLMediaElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLMediaElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLMediaElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLMediaElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLMediaElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLMediaElementMethod "setLoop" o = DOMHTMLMediaElementSetLoopMethodInfo + ResolveDOMHTMLMediaElementMethod "setMediaGroup" o = DOMHTMLMediaElementSetMediaGroupMethodInfo + ResolveDOMHTMLMediaElementMethod "setMuted" o = DOMHTMLMediaElementSetMutedMethodInfo + ResolveDOMHTMLMediaElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLMediaElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLMediaElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLMediaElementMethod "setPlaybackRate" o = DOMHTMLMediaElementSetPlaybackRateMethodInfo + ResolveDOMHTMLMediaElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLMediaElementMethod "setPreload" o = DOMHTMLMediaElementSetPreloadMethodInfo + ResolveDOMHTMLMediaElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLMediaElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLMediaElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLMediaElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLMediaElementMethod "setSrc" o = DOMHTMLMediaElementSetSrcMethodInfo + ResolveDOMHTMLMediaElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLMediaElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLMediaElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLMediaElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLMediaElementMethod "setVolume" o = DOMHTMLMediaElementSetVolumeMethodInfo + ResolveDOMHTMLMediaElementMethod "setWebkitClosedCaptionsVisible" o = DOMHTMLMediaElementSetWebkitClosedCaptionsVisibleMethodInfo + ResolveDOMHTMLMediaElementMethod "setWebkitPreservesPitch" o = DOMHTMLMediaElementSetWebkitPreservesPitchMethodInfo + ResolveDOMHTMLMediaElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLMediaElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLMediaElementMethod t DOMHTMLMediaElement, MethodInfo info DOMHTMLMediaElement p) => IsLabelProxy t (DOMHTMLMediaElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLMediaElementMethod t DOMHTMLMediaElement, MethodInfo info DOMHTMLMediaElement p) => IsLabel t (DOMHTMLMediaElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + +-- VVV Prop "audio-tracks" + -- Type: TInterface "WebKit" "DOMAudioTrackList" + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementAudioTracks :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMAudioTrackList +getDOMHTMLMediaElementAudioTracks obj = liftIO $ getObjectPropertyObject obj "audio-tracks" DOMAudioTrackList + +data DOMHTMLMediaElementAudioTracksPropertyInfo +instance AttrInfo DOMHTMLMediaElementAudioTracksPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementAudioTracksPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementAudioTracksPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementAudioTracksPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementAudioTracksPropertyInfo = DOMAudioTrackList + type AttrLabel DOMHTMLMediaElementAudioTracksPropertyInfo = "audio-tracks" + attrGet _ = getDOMHTMLMediaElementAudioTracks + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "autoplay" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementAutoplay :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementAutoplay obj = liftIO $ getObjectPropertyBool obj "autoplay" + +setDOMHTMLMediaElementAutoplay :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () +setDOMHTMLMediaElementAutoplay obj val = liftIO $ setObjectPropertyBool obj "autoplay" val + +constructDOMHTMLMediaElementAutoplay :: Bool -> IO ([Char], GValue) +constructDOMHTMLMediaElementAutoplay val = constructObjectPropertyBool "autoplay" val + +data DOMHTMLMediaElementAutoplayPropertyInfo +instance AttrInfo DOMHTMLMediaElementAutoplayPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementAutoplayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementAutoplayPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLMediaElementAutoplayPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementAutoplayPropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementAutoplayPropertyInfo = "autoplay" + attrGet _ = getDOMHTMLMediaElementAutoplay + attrSet _ = setDOMHTMLMediaElementAutoplay + attrConstruct _ = constructDOMHTMLMediaElementAutoplay + +-- VVV Prop "buffered" + -- Type: TInterface "WebKit" "DOMTimeRanges" + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementBuffered :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTimeRanges +getDOMHTMLMediaElementBuffered obj = liftIO $ getObjectPropertyObject obj "buffered" DOMTimeRanges + +data DOMHTMLMediaElementBufferedPropertyInfo +instance AttrInfo DOMHTMLMediaElementBufferedPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementBufferedPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementBufferedPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementBufferedPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementBufferedPropertyInfo = DOMTimeRanges + type AttrLabel DOMHTMLMediaElementBufferedPropertyInfo = "buffered" + attrGet _ = getDOMHTMLMediaElementBuffered + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "controller" + -- Type: TInterface "WebKit" "DOMMediaController" + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementController :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMMediaController +getDOMHTMLMediaElementController obj = liftIO $ getObjectPropertyObject obj "controller" DOMMediaController + +data DOMHTMLMediaElementControllerPropertyInfo +instance AttrInfo DOMHTMLMediaElementControllerPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementControllerPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementControllerPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementControllerPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementControllerPropertyInfo = DOMMediaController + type AttrLabel DOMHTMLMediaElementControllerPropertyInfo = "controller" + attrGet _ = getDOMHTMLMediaElementController + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "controls" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementControls :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementControls obj = liftIO $ getObjectPropertyBool obj "controls" + +setDOMHTMLMediaElementControls :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () +setDOMHTMLMediaElementControls obj val = liftIO $ setObjectPropertyBool obj "controls" val + +constructDOMHTMLMediaElementControls :: Bool -> IO ([Char], GValue) +constructDOMHTMLMediaElementControls val = constructObjectPropertyBool "controls" val + +data DOMHTMLMediaElementControlsPropertyInfo +instance AttrInfo DOMHTMLMediaElementControlsPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementControlsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementControlsPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLMediaElementControlsPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementControlsPropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementControlsPropertyInfo = "controls" + attrGet _ = getDOMHTMLMediaElementControls + attrSet _ = setDOMHTMLMediaElementControls + attrConstruct _ = constructDOMHTMLMediaElementControls + +-- VVV Prop "current-src" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementCurrentSrc :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text +getDOMHTMLMediaElementCurrentSrc obj = liftIO $ getObjectPropertyString obj "current-src" + +data DOMHTMLMediaElementCurrentSrcPropertyInfo +instance AttrInfo DOMHTMLMediaElementCurrentSrcPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementCurrentSrcPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementCurrentSrcPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementCurrentSrcPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementCurrentSrcPropertyInfo = T.Text + type AttrLabel DOMHTMLMediaElementCurrentSrcPropertyInfo = "current-src" + attrGet _ = getDOMHTMLMediaElementCurrentSrc + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "current-time" + -- Type: TBasicType TDouble + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementCurrentTime :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double +getDOMHTMLMediaElementCurrentTime obj = liftIO $ getObjectPropertyDouble obj "current-time" + +setDOMHTMLMediaElementCurrentTime :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m () +setDOMHTMLMediaElementCurrentTime obj val = liftIO $ setObjectPropertyDouble obj "current-time" val + +constructDOMHTMLMediaElementCurrentTime :: Double -> IO ([Char], GValue) +constructDOMHTMLMediaElementCurrentTime val = constructObjectPropertyDouble "current-time" val + +data DOMHTMLMediaElementCurrentTimePropertyInfo +instance AttrInfo DOMHTMLMediaElementCurrentTimePropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementCurrentTimePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementCurrentTimePropertyInfo = (~) Double + type AttrBaseTypeConstraint DOMHTMLMediaElementCurrentTimePropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementCurrentTimePropertyInfo = Double + type AttrLabel DOMHTMLMediaElementCurrentTimePropertyInfo = "current-time" + attrGet _ = getDOMHTMLMediaElementCurrentTime + attrSet _ = setDOMHTMLMediaElementCurrentTime + attrConstruct _ = constructDOMHTMLMediaElementCurrentTime + +-- VVV Prop "default-muted" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementDefaultMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementDefaultMuted obj = liftIO $ getObjectPropertyBool obj "default-muted" + +setDOMHTMLMediaElementDefaultMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () +setDOMHTMLMediaElementDefaultMuted obj val = liftIO $ setObjectPropertyBool obj "default-muted" val + +constructDOMHTMLMediaElementDefaultMuted :: Bool -> IO ([Char], GValue) +constructDOMHTMLMediaElementDefaultMuted val = constructObjectPropertyBool "default-muted" val + +data DOMHTMLMediaElementDefaultMutedPropertyInfo +instance AttrInfo DOMHTMLMediaElementDefaultMutedPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementDefaultMutedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementDefaultMutedPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLMediaElementDefaultMutedPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementDefaultMutedPropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementDefaultMutedPropertyInfo = "default-muted" + attrGet _ = getDOMHTMLMediaElementDefaultMuted + attrSet _ = setDOMHTMLMediaElementDefaultMuted + attrConstruct _ = constructDOMHTMLMediaElementDefaultMuted + +-- VVV Prop "default-playback-rate" + -- Type: TBasicType TDouble + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementDefaultPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double +getDOMHTMLMediaElementDefaultPlaybackRate obj = liftIO $ getObjectPropertyDouble obj "default-playback-rate" + +setDOMHTMLMediaElementDefaultPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m () +setDOMHTMLMediaElementDefaultPlaybackRate obj val = liftIO $ setObjectPropertyDouble obj "default-playback-rate" val + +constructDOMHTMLMediaElementDefaultPlaybackRate :: Double -> IO ([Char], GValue) +constructDOMHTMLMediaElementDefaultPlaybackRate val = constructObjectPropertyDouble "default-playback-rate" val + +data DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo +instance AttrInfo DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = (~) Double + type AttrBaseTypeConstraint DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = Double + type AttrLabel DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo = "default-playback-rate" + attrGet _ = getDOMHTMLMediaElementDefaultPlaybackRate + attrSet _ = setDOMHTMLMediaElementDefaultPlaybackRate + attrConstruct _ = constructDOMHTMLMediaElementDefaultPlaybackRate + +-- VVV Prop "duration" + -- Type: TBasicType TDouble + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementDuration :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double +getDOMHTMLMediaElementDuration obj = liftIO $ getObjectPropertyDouble obj "duration" + +data DOMHTMLMediaElementDurationPropertyInfo +instance AttrInfo DOMHTMLMediaElementDurationPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementDurationPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementDurationPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementDurationPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementDurationPropertyInfo = Double + type AttrLabel DOMHTMLMediaElementDurationPropertyInfo = "duration" + attrGet _ = getDOMHTMLMediaElementDuration + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "ended" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementEnded :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementEnded obj = liftIO $ getObjectPropertyBool obj "ended" + +data DOMHTMLMediaElementEndedPropertyInfo +instance AttrInfo DOMHTMLMediaElementEndedPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementEndedPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementEndedPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementEndedPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementEndedPropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementEndedPropertyInfo = "ended" + attrGet _ = getDOMHTMLMediaElementEnded + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "error" + -- Type: TInterface "WebKit" "DOMMediaError" + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementError :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMMediaError +getDOMHTMLMediaElementError obj = liftIO $ getObjectPropertyObject obj "error" DOMMediaError + +data DOMHTMLMediaElementErrorPropertyInfo +instance AttrInfo DOMHTMLMediaElementErrorPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementErrorPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementErrorPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementErrorPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementErrorPropertyInfo = DOMMediaError + type AttrLabel DOMHTMLMediaElementErrorPropertyInfo = "error" + attrGet _ = getDOMHTMLMediaElementError + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "loop" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementLoop :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementLoop obj = liftIO $ getObjectPropertyBool obj "loop" + +setDOMHTMLMediaElementLoop :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () +setDOMHTMLMediaElementLoop obj val = liftIO $ setObjectPropertyBool obj "loop" val + +constructDOMHTMLMediaElementLoop :: Bool -> IO ([Char], GValue) +constructDOMHTMLMediaElementLoop val = constructObjectPropertyBool "loop" val + +data DOMHTMLMediaElementLoopPropertyInfo +instance AttrInfo DOMHTMLMediaElementLoopPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementLoopPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementLoopPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLMediaElementLoopPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementLoopPropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementLoopPropertyInfo = "loop" + attrGet _ = getDOMHTMLMediaElementLoop + attrSet _ = setDOMHTMLMediaElementLoop + attrConstruct _ = constructDOMHTMLMediaElementLoop + +-- VVV Prop "media-group" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementMediaGroup :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text +getDOMHTMLMediaElementMediaGroup obj = liftIO $ getObjectPropertyString obj "media-group" + +setDOMHTMLMediaElementMediaGroup :: (MonadIO m, DOMHTMLMediaElementK o) => o -> T.Text -> m () +setDOMHTMLMediaElementMediaGroup obj val = liftIO $ setObjectPropertyString obj "media-group" val + +constructDOMHTMLMediaElementMediaGroup :: T.Text -> IO ([Char], GValue) +constructDOMHTMLMediaElementMediaGroup val = constructObjectPropertyString "media-group" val + +data DOMHTMLMediaElementMediaGroupPropertyInfo +instance AttrInfo DOMHTMLMediaElementMediaGroupPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementMediaGroupPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementMediaGroupPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLMediaElementMediaGroupPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementMediaGroupPropertyInfo = T.Text + type AttrLabel DOMHTMLMediaElementMediaGroupPropertyInfo = "media-group" + attrGet _ = getDOMHTMLMediaElementMediaGroup + attrSet _ = setDOMHTMLMediaElementMediaGroup + attrConstruct _ = constructDOMHTMLMediaElementMediaGroup + +-- VVV Prop "muted" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementMuted obj = liftIO $ getObjectPropertyBool obj "muted" + +setDOMHTMLMediaElementMuted :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () +setDOMHTMLMediaElementMuted obj val = liftIO $ setObjectPropertyBool obj "muted" val + +constructDOMHTMLMediaElementMuted :: Bool -> IO ([Char], GValue) +constructDOMHTMLMediaElementMuted val = constructObjectPropertyBool "muted" val + +data DOMHTMLMediaElementMutedPropertyInfo +instance AttrInfo DOMHTMLMediaElementMutedPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementMutedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementMutedPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLMediaElementMutedPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementMutedPropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementMutedPropertyInfo = "muted" + attrGet _ = getDOMHTMLMediaElementMuted + attrSet _ = setDOMHTMLMediaElementMuted + attrConstruct _ = constructDOMHTMLMediaElementMuted + +-- VVV Prop "network-state" + -- Type: TBasicType TUInt32 + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementNetworkState :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word32 +getDOMHTMLMediaElementNetworkState obj = liftIO $ getObjectPropertyCUInt obj "network-state" + +data DOMHTMLMediaElementNetworkStatePropertyInfo +instance AttrInfo DOMHTMLMediaElementNetworkStatePropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementNetworkStatePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementNetworkStatePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementNetworkStatePropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementNetworkStatePropertyInfo = Word32 + type AttrLabel DOMHTMLMediaElementNetworkStatePropertyInfo = "network-state" + attrGet _ = getDOMHTMLMediaElementNetworkState + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "paused" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementPaused :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementPaused obj = liftIO $ getObjectPropertyBool obj "paused" + +data DOMHTMLMediaElementPausedPropertyInfo +instance AttrInfo DOMHTMLMediaElementPausedPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementPausedPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementPausedPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementPausedPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementPausedPropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementPausedPropertyInfo = "paused" + attrGet _ = getDOMHTMLMediaElementPaused + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "playback-rate" + -- Type: TBasicType TDouble + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double +getDOMHTMLMediaElementPlaybackRate obj = liftIO $ getObjectPropertyDouble obj "playback-rate" + +setDOMHTMLMediaElementPlaybackRate :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m () +setDOMHTMLMediaElementPlaybackRate obj val = liftIO $ setObjectPropertyDouble obj "playback-rate" val + +constructDOMHTMLMediaElementPlaybackRate :: Double -> IO ([Char], GValue) +constructDOMHTMLMediaElementPlaybackRate val = constructObjectPropertyDouble "playback-rate" val + +data DOMHTMLMediaElementPlaybackRatePropertyInfo +instance AttrInfo DOMHTMLMediaElementPlaybackRatePropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementPlaybackRatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementPlaybackRatePropertyInfo = (~) Double + type AttrBaseTypeConstraint DOMHTMLMediaElementPlaybackRatePropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementPlaybackRatePropertyInfo = Double + type AttrLabel DOMHTMLMediaElementPlaybackRatePropertyInfo = "playback-rate" + attrGet _ = getDOMHTMLMediaElementPlaybackRate + attrSet _ = setDOMHTMLMediaElementPlaybackRate + attrConstruct _ = constructDOMHTMLMediaElementPlaybackRate + +-- VVV Prop "played" + -- Type: TInterface "WebKit" "DOMTimeRanges" + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementPlayed :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTimeRanges +getDOMHTMLMediaElementPlayed obj = liftIO $ getObjectPropertyObject obj "played" DOMTimeRanges + +data DOMHTMLMediaElementPlayedPropertyInfo +instance AttrInfo DOMHTMLMediaElementPlayedPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementPlayedPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementPlayedPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementPlayedPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementPlayedPropertyInfo = DOMTimeRanges + type AttrLabel DOMHTMLMediaElementPlayedPropertyInfo = "played" + attrGet _ = getDOMHTMLMediaElementPlayed + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "preload" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementPreload :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text +getDOMHTMLMediaElementPreload obj = liftIO $ getObjectPropertyString obj "preload" + +setDOMHTMLMediaElementPreload :: (MonadIO m, DOMHTMLMediaElementK o) => o -> T.Text -> m () +setDOMHTMLMediaElementPreload obj val = liftIO $ setObjectPropertyString obj "preload" val + +constructDOMHTMLMediaElementPreload :: T.Text -> IO ([Char], GValue) +constructDOMHTMLMediaElementPreload val = constructObjectPropertyString "preload" val + +data DOMHTMLMediaElementPreloadPropertyInfo +instance AttrInfo DOMHTMLMediaElementPreloadPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementPreloadPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementPreloadPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLMediaElementPreloadPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementPreloadPropertyInfo = T.Text + type AttrLabel DOMHTMLMediaElementPreloadPropertyInfo = "preload" + attrGet _ = getDOMHTMLMediaElementPreload + attrSet _ = setDOMHTMLMediaElementPreload + attrConstruct _ = constructDOMHTMLMediaElementPreload + +-- VVV Prop "ready-state" + -- Type: TBasicType TUInt32 + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementReadyState :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word32 +getDOMHTMLMediaElementReadyState obj = liftIO $ getObjectPropertyCUInt obj "ready-state" + +data DOMHTMLMediaElementReadyStatePropertyInfo +instance AttrInfo DOMHTMLMediaElementReadyStatePropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementReadyStatePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementReadyStatePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementReadyStatePropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementReadyStatePropertyInfo = Word32 + type AttrLabel DOMHTMLMediaElementReadyStatePropertyInfo = "ready-state" + attrGet _ = getDOMHTMLMediaElementReadyState + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "seekable" + -- Type: TInterface "WebKit" "DOMTimeRanges" + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementSeekable :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTimeRanges +getDOMHTMLMediaElementSeekable obj = liftIO $ getObjectPropertyObject obj "seekable" DOMTimeRanges + +data DOMHTMLMediaElementSeekablePropertyInfo +instance AttrInfo DOMHTMLMediaElementSeekablePropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementSeekablePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementSeekablePropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementSeekablePropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementSeekablePropertyInfo = DOMTimeRanges + type AttrLabel DOMHTMLMediaElementSeekablePropertyInfo = "seekable" + attrGet _ = getDOMHTMLMediaElementSeekable + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "seeking" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementSeeking :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementSeeking obj = liftIO $ getObjectPropertyBool obj "seeking" + +data DOMHTMLMediaElementSeekingPropertyInfo +instance AttrInfo DOMHTMLMediaElementSeekingPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementSeekingPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementSeekingPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementSeekingPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementSeekingPropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementSeekingPropertyInfo = "seeking" + attrGet _ = getDOMHTMLMediaElementSeeking + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "src" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementSrc :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m T.Text +getDOMHTMLMediaElementSrc obj = liftIO $ getObjectPropertyString obj "src" + +setDOMHTMLMediaElementSrc :: (MonadIO m, DOMHTMLMediaElementK o) => o -> T.Text -> m () +setDOMHTMLMediaElementSrc obj val = liftIO $ setObjectPropertyString obj "src" val + +constructDOMHTMLMediaElementSrc :: T.Text -> IO ([Char], GValue) +constructDOMHTMLMediaElementSrc val = constructObjectPropertyString "src" val + +data DOMHTMLMediaElementSrcPropertyInfo +instance AttrInfo DOMHTMLMediaElementSrcPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementSrcPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementSrcPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint DOMHTMLMediaElementSrcPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementSrcPropertyInfo = T.Text + type AttrLabel DOMHTMLMediaElementSrcPropertyInfo = "src" + attrGet _ = getDOMHTMLMediaElementSrc + attrSet _ = setDOMHTMLMediaElementSrc + attrConstruct _ = constructDOMHTMLMediaElementSrc + +-- VVV Prop "text-tracks" + -- Type: TInterface "WebKit" "DOMTextTrackList" + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementTextTracks :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMTextTrackList +getDOMHTMLMediaElementTextTracks obj = liftIO $ getObjectPropertyObject obj "text-tracks" DOMTextTrackList + +data DOMHTMLMediaElementTextTracksPropertyInfo +instance AttrInfo DOMHTMLMediaElementTextTracksPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementTextTracksPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementTextTracksPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementTextTracksPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementTextTracksPropertyInfo = DOMTextTrackList + type AttrLabel DOMHTMLMediaElementTextTracksPropertyInfo = "text-tracks" + attrGet _ = getDOMHTMLMediaElementTextTracks + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "video-tracks" + -- Type: TInterface "WebKit" "DOMVideoTrackList" + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementVideoTracks :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m DOMVideoTrackList +getDOMHTMLMediaElementVideoTracks obj = liftIO $ getObjectPropertyObject obj "video-tracks" DOMVideoTrackList + +data DOMHTMLMediaElementVideoTracksPropertyInfo +instance AttrInfo DOMHTMLMediaElementVideoTracksPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementVideoTracksPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementVideoTracksPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementVideoTracksPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementVideoTracksPropertyInfo = DOMVideoTrackList + type AttrLabel DOMHTMLMediaElementVideoTracksPropertyInfo = "video-tracks" + attrGet _ = getDOMHTMLMediaElementVideoTracks + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "volume" + -- Type: TBasicType TDouble + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementVolume :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Double +getDOMHTMLMediaElementVolume obj = liftIO $ getObjectPropertyDouble obj "volume" + +setDOMHTMLMediaElementVolume :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Double -> m () +setDOMHTMLMediaElementVolume obj val = liftIO $ setObjectPropertyDouble obj "volume" val + +constructDOMHTMLMediaElementVolume :: Double -> IO ([Char], GValue) +constructDOMHTMLMediaElementVolume val = constructObjectPropertyDouble "volume" val + +data DOMHTMLMediaElementVolumePropertyInfo +instance AttrInfo DOMHTMLMediaElementVolumePropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementVolumePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementVolumePropertyInfo = (~) Double + type AttrBaseTypeConstraint DOMHTMLMediaElementVolumePropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementVolumePropertyInfo = Double + type AttrLabel DOMHTMLMediaElementVolumePropertyInfo = "volume" + attrGet _ = getDOMHTMLMediaElementVolume + attrSet _ = setDOMHTMLMediaElementVolume + attrConstruct _ = constructDOMHTMLMediaElementVolume + +-- VVV Prop "webkit-audio-decoded-byte-count" + -- Type: TBasicType TUInt64 + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementWebkitAudioDecodedByteCount :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word64 +getDOMHTMLMediaElementWebkitAudioDecodedByteCount obj = liftIO $ getObjectPropertyUInt64 obj "webkit-audio-decoded-byte-count" + +data DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo +instance AttrInfo DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = Word64 + type AttrLabel DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo = "webkit-audio-decoded-byte-count" + attrGet _ = getDOMHTMLMediaElementWebkitAudioDecodedByteCount + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "webkit-closed-captions-visible" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementWebkitClosedCaptionsVisible :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementWebkitClosedCaptionsVisible obj = liftIO $ getObjectPropertyBool obj "webkit-closed-captions-visible" + +setDOMHTMLMediaElementWebkitClosedCaptionsVisible :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () +setDOMHTMLMediaElementWebkitClosedCaptionsVisible obj val = liftIO $ setObjectPropertyBool obj "webkit-closed-captions-visible" val + +constructDOMHTMLMediaElementWebkitClosedCaptionsVisible :: Bool -> IO ([Char], GValue) +constructDOMHTMLMediaElementWebkitClosedCaptionsVisible val = constructObjectPropertyBool "webkit-closed-captions-visible" val + +data DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo +instance AttrInfo DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo = "webkit-closed-captions-visible" + attrGet _ = getDOMHTMLMediaElementWebkitClosedCaptionsVisible + attrSet _ = setDOMHTMLMediaElementWebkitClosedCaptionsVisible + attrConstruct _ = constructDOMHTMLMediaElementWebkitClosedCaptionsVisible + +-- VVV Prop "webkit-current-playback-target-is-wireless" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWireless :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWireless obj = liftIO $ getObjectPropertyBool obj "webkit-current-playback-target-is-wireless" + +data DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo +instance AttrInfo DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo = "webkit-current-playback-target-is-wireless" + attrGet _ = getDOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWireless + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "webkit-has-closed-captions" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementWebkitHasClosedCaptions :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementWebkitHasClosedCaptions obj = liftIO $ getObjectPropertyBool obj "webkit-has-closed-captions" + +data DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo +instance AttrInfo DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo = "webkit-has-closed-captions" + attrGet _ = getDOMHTMLMediaElementWebkitHasClosedCaptions + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "webkit-preserves-pitch" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getDOMHTMLMediaElementWebkitPreservesPitch :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Bool +getDOMHTMLMediaElementWebkitPreservesPitch obj = liftIO $ getObjectPropertyBool obj "webkit-preserves-pitch" + +setDOMHTMLMediaElementWebkitPreservesPitch :: (MonadIO m, DOMHTMLMediaElementK o) => o -> Bool -> m () +setDOMHTMLMediaElementWebkitPreservesPitch obj val = liftIO $ setObjectPropertyBool obj "webkit-preserves-pitch" val + +constructDOMHTMLMediaElementWebkitPreservesPitch :: Bool -> IO ([Char], GValue) +constructDOMHTMLMediaElementWebkitPreservesPitch val = constructObjectPropertyBool "webkit-preserves-pitch" val + +data DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo +instance AttrInfo DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = (~) Bool + type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = Bool + type AttrLabel DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo = "webkit-preserves-pitch" + attrGet _ = getDOMHTMLMediaElementWebkitPreservesPitch + attrSet _ = setDOMHTMLMediaElementWebkitPreservesPitch + attrConstruct _ = constructDOMHTMLMediaElementWebkitPreservesPitch + +-- VVV Prop "webkit-video-decoded-byte-count" + -- Type: TBasicType TUInt64 + -- Flags: [PropertyReadable] + +getDOMHTMLMediaElementWebkitVideoDecodedByteCount :: (MonadIO m, DOMHTMLMediaElementK o) => o -> m Word64 +getDOMHTMLMediaElementWebkitVideoDecodedByteCount obj = liftIO $ getObjectPropertyUInt64 obj "webkit-video-decoded-byte-count" + +data DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo +instance AttrInfo DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo where + type AttrAllowedOps DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = (~) () + type AttrBaseTypeConstraint DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = DOMHTMLMediaElementK + type AttrGetType DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = Word64 + type AttrLabel DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo = "webkit-video-decoded-byte-count" + attrGet _ = getDOMHTMLMediaElementWebkitVideoDecodedByteCount + attrSet _ = undefined + attrConstruct _ = undefined + +type instance AttributeList DOMHTMLMediaElement = DOMHTMLMediaElementAttributeList +type DOMHTMLMediaElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("audioTracks", DOMHTMLMediaElementAudioTracksPropertyInfo), '("autoplay", DOMHTMLMediaElementAutoplayPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("buffered", DOMHTMLMediaElementBufferedPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("controller", DOMHTMLMediaElementControllerPropertyInfo), '("controls", DOMHTMLMediaElementControlsPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentSrc", DOMHTMLMediaElementCurrentSrcPropertyInfo), '("currentTime", DOMHTMLMediaElementCurrentTimePropertyInfo), '("defaultMuted", DOMHTMLMediaElementDefaultMutedPropertyInfo), '("defaultPlaybackRate", DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("duration", DOMHTMLMediaElementDurationPropertyInfo), '("ended", DOMHTMLMediaElementEndedPropertyInfo), '("error", DOMHTMLMediaElementErrorPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMediaElementLoopPropertyInfo), '("mediaGroup", DOMHTMLMediaElementMediaGroupPropertyInfo), '("muted", DOMHTMLMediaElementMutedPropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("networkState", DOMHTMLMediaElementNetworkStatePropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("paused", DOMHTMLMediaElementPausedPropertyInfo), '("playbackRate", DOMHTMLMediaElementPlaybackRatePropertyInfo), '("played", DOMHTMLMediaElementPlayedPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("preload", DOMHTMLMediaElementPreloadPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("readyState", DOMHTMLMediaElementReadyStatePropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("seekable", DOMHTMLMediaElementSeekablePropertyInfo), '("seeking", DOMHTMLMediaElementSeekingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLMediaElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("textTracks", DOMHTMLMediaElementTextTracksPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("videoTracks", DOMHTMLMediaElementVideoTracksPropertyInfo), '("volume", DOMHTMLMediaElementVolumePropertyInfo), '("webkitAudioDecodedByteCount", DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo), '("webkitClosedCaptionsVisible", DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo), '("webkitCurrentPlaybackTargetIsWireless", DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo), '("webkitHasClosedCaptions", DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo), '("webkitPreservesPitch", DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitVideoDecodedByteCount", DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) + +type instance SignalList DOMHTMLMediaElement = DOMHTMLMediaElementSignalList +type DOMHTMLMediaElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) + +-- method DOMHTMLMediaElement::add_text_track +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "kind", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "label", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "language", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMTextTrack" +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_add_text_track" webkit_dom_html_media_element_add_text_track :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CString -> -- kind : TBasicType TUTF8 + CString -> -- label : TBasicType TUTF8 + CString -> -- language : TBasicType TUTF8 + Ptr (Ptr GError) -> -- error + IO (Ptr DOMTextTrack) + + +dOMHTMLMediaElementAddTextTrack :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> T.Text -- kind + -> T.Text -- label + -> T.Text -- language + -> m DOMTextTrack -- result +dOMHTMLMediaElementAddTextTrack _obj kind label language = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + kind' <- textToCString kind + label' <- textToCString label + language' <- textToCString language + onException (do + result <- propagateGError $ webkit_dom_html_media_element_add_text_track _obj' kind' label' language' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_add_text_track" result + result' <- (wrapObject DOMTextTrack) result + touchManagedPtr _obj + freeMem kind' + freeMem label' + freeMem language' + return result' + ) (do + freeMem kind' + freeMem label' + freeMem language' + ) + +data DOMHTMLMediaElementAddTextTrackMethodInfo +instance (signature ~ (T.Text -> T.Text -> T.Text -> m DOMTextTrack), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementAddTextTrackMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementAddTextTrack + +-- method DOMHTMLMediaElement::can_play_type +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_can_play_type" webkit_dom_html_media_element_can_play_type :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CString -> -- type : TBasicType TUTF8 + IO CString + + +dOMHTMLMediaElementCanPlayType :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> T.Text -- type_ + -> m T.Text -- result +dOMHTMLMediaElementCanPlayType _obj type_ = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + type_' <- textToCString type_ + result <- webkit_dom_html_media_element_can_play_type _obj' type_' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_can_play_type" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + freeMem type_' + return result' + +data DOMHTMLMediaElementCanPlayTypeMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementCanPlayTypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementCanPlayType + +-- method DOMHTMLMediaElement::fast_seek +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "time", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_fast_seek" webkit_dom_html_media_element_fast_seek :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CDouble -> -- time : TBasicType TDouble + IO () + + +dOMHTMLMediaElementFastSeek :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Double -- time + -> m () -- result +dOMHTMLMediaElementFastSeek _obj time = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let time' = realToFrac time + webkit_dom_html_media_element_fast_seek _obj' time' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementFastSeekMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementFastSeekMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementFastSeek + +-- method DOMHTMLMediaElement::get_audio_tracks +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMAudioTrackList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_audio_tracks" webkit_dom_html_media_element_get_audio_tracks :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO (Ptr DOMAudioTrackList) + + +dOMHTMLMediaElementGetAudioTracks :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m DOMAudioTrackList -- result +dOMHTMLMediaElementGetAudioTracks _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_audio_tracks _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_audio_tracks" result + result' <- (wrapObject DOMAudioTrackList) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetAudioTracksMethodInfo +instance (signature ~ (m DOMAudioTrackList), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetAudioTracksMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetAudioTracks + +-- method DOMHTMLMediaElement::get_autoplay +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_autoplay" webkit_dom_html_media_element_get_autoplay :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetAutoplay :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetAutoplay _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_autoplay _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetAutoplayMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetAutoplayMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetAutoplay + +-- method DOMHTMLMediaElement::get_buffered +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMTimeRanges" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_buffered" webkit_dom_html_media_element_get_buffered :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO (Ptr DOMTimeRanges) + + +dOMHTMLMediaElementGetBuffered :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m DOMTimeRanges -- result +dOMHTMLMediaElementGetBuffered _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_buffered _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_buffered" result + result' <- (wrapObject DOMTimeRanges) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetBufferedMethodInfo +instance (signature ~ (m DOMTimeRanges), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetBufferedMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetBuffered + +-- method DOMHTMLMediaElement::get_controller +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMMediaController" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_controller" webkit_dom_html_media_element_get_controller :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO (Ptr DOMMediaController) + + +dOMHTMLMediaElementGetController :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m DOMMediaController -- result +dOMHTMLMediaElementGetController _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_controller _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_controller" result + result' <- (wrapObject DOMMediaController) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetControllerMethodInfo +instance (signature ~ (m DOMMediaController), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetControllerMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetController + +-- method DOMHTMLMediaElement::get_controls +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_controls" webkit_dom_html_media_element_get_controls :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetControls :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetControls _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_controls _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetControlsMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetControlsMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetControls + +-- method DOMHTMLMediaElement::get_current_src +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_current_src" webkit_dom_html_media_element_get_current_src :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CString + + +dOMHTMLMediaElementGetCurrentSrc :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLMediaElementGetCurrentSrc _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_current_src _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_current_src" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetCurrentSrcMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetCurrentSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetCurrentSrc + +-- method DOMHTMLMediaElement::get_current_time +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TDouble +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_current_time" webkit_dom_html_media_element_get_current_time :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CDouble + + +dOMHTMLMediaElementGetCurrentTime :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Double -- result +dOMHTMLMediaElementGetCurrentTime _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_current_time _obj' + let result' = realToFrac result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetCurrentTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetCurrentTimeMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetCurrentTime + +-- method DOMHTMLMediaElement::get_default_muted +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_default_muted" webkit_dom_html_media_element_get_default_muted :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetDefaultMuted :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetDefaultMuted _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_default_muted _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetDefaultMutedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetDefaultMutedMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetDefaultMuted + +-- method DOMHTMLMediaElement::get_default_playback_rate +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TDouble +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_default_playback_rate" webkit_dom_html_media_element_get_default_playback_rate :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CDouble + + +dOMHTMLMediaElementGetDefaultPlaybackRate :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Double -- result +dOMHTMLMediaElementGetDefaultPlaybackRate _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_default_playback_rate _obj' + let result' = realToFrac result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetDefaultPlaybackRateMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetDefaultPlaybackRateMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetDefaultPlaybackRate + +-- method DOMHTMLMediaElement::get_duration +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TDouble +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_duration" webkit_dom_html_media_element_get_duration :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CDouble + + +dOMHTMLMediaElementGetDuration :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Double -- result +dOMHTMLMediaElementGetDuration _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_duration _obj' + let result' = realToFrac result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetDurationMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetDurationMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetDuration + +-- method DOMHTMLMediaElement::get_ended +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_ended" webkit_dom_html_media_element_get_ended :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetEnded :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetEnded _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_ended _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetEndedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetEndedMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetEnded + +-- method DOMHTMLMediaElement::get_error +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMMediaError" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_error" webkit_dom_html_media_element_get_error :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO (Ptr DOMMediaError) + + +dOMHTMLMediaElementGetError :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m DOMMediaError -- result +dOMHTMLMediaElementGetError _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_error _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_error" result + result' <- (wrapObject DOMMediaError) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetErrorMethodInfo +instance (signature ~ (m DOMMediaError), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetErrorMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetError + +-- method DOMHTMLMediaElement::get_initial_time +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TDouble +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_initial_time" webkit_dom_html_media_element_get_initial_time :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CDouble + +{-# DEPRECATED dOMHTMLMediaElementGetInitialTime ["(Since version 2.2)"]#-} +dOMHTMLMediaElementGetInitialTime :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Double -- result +dOMHTMLMediaElementGetInitialTime _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_initial_time _obj' + let result' = realToFrac result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetInitialTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetInitialTimeMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetInitialTime + +-- method DOMHTMLMediaElement::get_loop +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_loop" webkit_dom_html_media_element_get_loop :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetLoop :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetLoop _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_loop _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetLoopMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetLoopMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetLoop + +-- method DOMHTMLMediaElement::get_media_group +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_media_group" webkit_dom_html_media_element_get_media_group :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CString + + +dOMHTMLMediaElementGetMediaGroup :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLMediaElementGetMediaGroup _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_media_group _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_media_group" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetMediaGroupMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetMediaGroupMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetMediaGroup + +-- method DOMHTMLMediaElement::get_muted +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_muted" webkit_dom_html_media_element_get_muted :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetMuted :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetMuted _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_muted _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetMutedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetMutedMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetMuted + +-- method DOMHTMLMediaElement::get_network_state +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUInt16 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_network_state" webkit_dom_html_media_element_get_network_state :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO Word16 + + +dOMHTMLMediaElementGetNetworkState :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Word16 -- result +dOMHTMLMediaElementGetNetworkState _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_network_state _obj' + touchManagedPtr _obj + return result + +data DOMHTMLMediaElementGetNetworkStateMethodInfo +instance (signature ~ (m Word16), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetNetworkStateMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetNetworkState + +-- method DOMHTMLMediaElement::get_paused +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_paused" webkit_dom_html_media_element_get_paused :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetPaused :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetPaused _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_paused _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetPausedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetPausedMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetPaused + +-- method DOMHTMLMediaElement::get_playback_rate +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TDouble +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_playback_rate" webkit_dom_html_media_element_get_playback_rate :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CDouble + + +dOMHTMLMediaElementGetPlaybackRate :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Double -- result +dOMHTMLMediaElementGetPlaybackRate _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_playback_rate _obj' + let result' = realToFrac result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetPlaybackRateMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetPlaybackRateMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetPlaybackRate + +-- method DOMHTMLMediaElement::get_played +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMTimeRanges" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_played" webkit_dom_html_media_element_get_played :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO (Ptr DOMTimeRanges) + + +dOMHTMLMediaElementGetPlayed :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m DOMTimeRanges -- result +dOMHTMLMediaElementGetPlayed _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_played _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_played" result + result' <- (wrapObject DOMTimeRanges) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetPlayedMethodInfo +instance (signature ~ (m DOMTimeRanges), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetPlayedMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetPlayed + +-- method DOMHTMLMediaElement::get_preload +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_preload" webkit_dom_html_media_element_get_preload :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CString + + +dOMHTMLMediaElementGetPreload :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLMediaElementGetPreload _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_preload _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_preload" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetPreloadMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetPreloadMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetPreload + +-- method DOMHTMLMediaElement::get_ready_state +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUInt16 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_ready_state" webkit_dom_html_media_element_get_ready_state :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO Word16 + + +dOMHTMLMediaElementGetReadyState :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Word16 -- result +dOMHTMLMediaElementGetReadyState _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_ready_state _obj' + touchManagedPtr _obj + return result + +data DOMHTMLMediaElementGetReadyStateMethodInfo +instance (signature ~ (m Word16), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetReadyStateMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetReadyState + +-- method DOMHTMLMediaElement::get_seekable +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMTimeRanges" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_seekable" webkit_dom_html_media_element_get_seekable :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO (Ptr DOMTimeRanges) + + +dOMHTMLMediaElementGetSeekable :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m DOMTimeRanges -- result +dOMHTMLMediaElementGetSeekable _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_seekable _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_seekable" result + result' <- (wrapObject DOMTimeRanges) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetSeekableMethodInfo +instance (signature ~ (m DOMTimeRanges), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetSeekableMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetSeekable + +-- method DOMHTMLMediaElement::get_seeking +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_seeking" webkit_dom_html_media_element_get_seeking :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetSeeking :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetSeeking _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_seeking _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetSeekingMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetSeekingMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetSeeking + +-- method DOMHTMLMediaElement::get_src +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_src" webkit_dom_html_media_element_get_src :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CString + + +dOMHTMLMediaElementGetSrc :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m T.Text -- result +dOMHTMLMediaElementGetSrc _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_src _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_src" result + result' <- cstringToText result + freeMem result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetSrcMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetSrc + +-- method DOMHTMLMediaElement::get_start_time +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TDouble +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_start_time" webkit_dom_html_media_element_get_start_time :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CDouble + +{-# DEPRECATED dOMHTMLMediaElementGetStartTime ["(Since version 2.2)"]#-} +dOMHTMLMediaElementGetStartTime :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Double -- result +dOMHTMLMediaElementGetStartTime _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_start_time _obj' + let result' = realToFrac result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetStartTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetStartTimeMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetStartTime + +-- method DOMHTMLMediaElement::get_text_tracks +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMTextTrackList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_text_tracks" webkit_dom_html_media_element_get_text_tracks :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO (Ptr DOMTextTrackList) + + +dOMHTMLMediaElementGetTextTracks :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m DOMTextTrackList -- result +dOMHTMLMediaElementGetTextTracks _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_text_tracks _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_text_tracks" result + result' <- (newObject DOMTextTrackList) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetTextTracksMethodInfo +instance (signature ~ (m DOMTextTrackList), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetTextTracksMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetTextTracks + +-- method DOMHTMLMediaElement::get_video_tracks +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMVideoTrackList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_video_tracks" webkit_dom_html_media_element_get_video_tracks :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO (Ptr DOMVideoTrackList) + + +dOMHTMLMediaElementGetVideoTracks :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m DOMVideoTrackList -- result +dOMHTMLMediaElementGetVideoTracks _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_video_tracks _obj' + checkUnexpectedReturnNULL "webkit_dom_html_media_element_get_video_tracks" result + result' <- (newObject DOMVideoTrackList) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetVideoTracksMethodInfo +instance (signature ~ (m DOMVideoTrackList), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetVideoTracksMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetVideoTracks + +-- method DOMHTMLMediaElement::get_volume +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TDouble +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_volume" webkit_dom_html_media_element_get_volume :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CDouble + + +dOMHTMLMediaElementGetVolume :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Double -- result +dOMHTMLMediaElementGetVolume _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_volume _obj' + let result' = realToFrac result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetVolumeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetVolumeMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetVolume + +-- method DOMHTMLMediaElement::get_webkit_audio_decoded_byte_count +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_webkit_audio_decoded_byte_count" webkit_dom_html_media_element_get_webkit_audio_decoded_byte_count :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO Word64 + + +dOMHTMLMediaElementGetWebkitAudioDecodedByteCount :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Word64 -- result +dOMHTMLMediaElementGetWebkitAudioDecodedByteCount _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_webkit_audio_decoded_byte_count _obj' + touchManagedPtr _obj + return result + +data DOMHTMLMediaElementGetWebkitAudioDecodedByteCountMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetWebkitAudioDecodedByteCountMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetWebkitAudioDecodedByteCount + +-- method DOMHTMLMediaElement::get_webkit_closed_captions_visible +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_webkit_closed_captions_visible" webkit_dom_html_media_element_get_webkit_closed_captions_visible :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetWebkitClosedCaptionsVisible :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetWebkitClosedCaptionsVisible _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_webkit_closed_captions_visible _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetWebkitClosedCaptionsVisibleMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetWebkitClosedCaptionsVisibleMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetWebkitClosedCaptionsVisible + +-- method DOMHTMLMediaElement::get_webkit_current_playback_target_is_wireless +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_webkit_current_playback_target_is_wireless" webkit_dom_html_media_element_get_webkit_current_playback_target_is_wireless :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWireless :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWireless _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_webkit_current_playback_target_is_wireless _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWirelessMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWirelessMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWireless + +-- method DOMHTMLMediaElement::get_webkit_has_closed_captions +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_webkit_has_closed_captions" webkit_dom_html_media_element_get_webkit_has_closed_captions :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetWebkitHasClosedCaptions :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetWebkitHasClosedCaptions _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_webkit_has_closed_captions _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetWebkitHasClosedCaptionsMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetWebkitHasClosedCaptionsMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetWebkitHasClosedCaptions + +-- method DOMHTMLMediaElement::get_webkit_preserves_pitch +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_webkit_preserves_pitch" webkit_dom_html_media_element_get_webkit_preserves_pitch :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO CInt + + +dOMHTMLMediaElementGetWebkitPreservesPitch :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Bool -- result +dOMHTMLMediaElementGetWebkitPreservesPitch _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_webkit_preserves_pitch _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data DOMHTMLMediaElementGetWebkitPreservesPitchMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetWebkitPreservesPitchMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetWebkitPreservesPitch + +-- method DOMHTMLMediaElement::get_webkit_video_decoded_byte_count +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUInt64 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_get_webkit_video_decoded_byte_count" webkit_dom_html_media_element_get_webkit_video_decoded_byte_count :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO Word64 + + +dOMHTMLMediaElementGetWebkitVideoDecodedByteCount :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m Word64 -- result +dOMHTMLMediaElementGetWebkitVideoDecodedByteCount _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_dom_html_media_element_get_webkit_video_decoded_byte_count _obj' + touchManagedPtr _obj + return result + +data DOMHTMLMediaElementGetWebkitVideoDecodedByteCountMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementGetWebkitVideoDecodedByteCountMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementGetWebkitVideoDecodedByteCount + +-- method DOMHTMLMediaElement::load +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_load" webkit_dom_html_media_element_load :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO () + + +dOMHTMLMediaElementLoad :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m () -- result +dOMHTMLMediaElementLoad _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_html_media_element_load _obj' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementLoadMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementLoadMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementLoad + +-- method DOMHTMLMediaElement::pause +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_pause" webkit_dom_html_media_element_pause :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO () + + +dOMHTMLMediaElementPause :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m () -- result +dOMHTMLMediaElementPause _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_html_media_element_pause _obj' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementPauseMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementPauseMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementPause + +-- method DOMHTMLMediaElement::play +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_play" webkit_dom_html_media_element_play :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO () + + +dOMHTMLMediaElementPlay :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m () -- result +dOMHTMLMediaElementPlay _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_html_media_element_play _obj' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementPlayMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementPlayMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementPlay + +-- method DOMHTMLMediaElement::set_autoplay +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_autoplay" webkit_dom_html_media_element_set_autoplay :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLMediaElementSetAutoplay :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLMediaElementSetAutoplay _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_media_element_set_autoplay _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementSetAutoplayMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetAutoplayMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetAutoplay + +-- method DOMHTMLMediaElement::set_controls +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_controls" webkit_dom_html_media_element_set_controls :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLMediaElementSetControls :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLMediaElementSetControls _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_media_element_set_controls _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementSetControlsMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetControlsMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetControls + +-- method DOMHTMLMediaElement::set_current_time +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_current_time" webkit_dom_html_media_element_set_current_time :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CDouble -> -- value : TBasicType TDouble + Ptr (Ptr GError) -> -- error + IO () + + +dOMHTMLMediaElementSetCurrentTime :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Double -- value + -> m () -- result +dOMHTMLMediaElementSetCurrentTime _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = realToFrac value + onException (do + propagateGError $ webkit_dom_html_media_element_set_current_time _obj' value' + touchManagedPtr _obj + return () + ) (do + return () + ) + +data DOMHTMLMediaElementSetCurrentTimeMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetCurrentTimeMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetCurrentTime + +-- method DOMHTMLMediaElement::set_default_muted +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_default_muted" webkit_dom_html_media_element_set_default_muted :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLMediaElementSetDefaultMuted :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLMediaElementSetDefaultMuted _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_media_element_set_default_muted _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementSetDefaultMutedMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetDefaultMutedMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetDefaultMuted + +-- method DOMHTMLMediaElement::set_default_playback_rate +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_default_playback_rate" webkit_dom_html_media_element_set_default_playback_rate :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CDouble -> -- value : TBasicType TDouble + IO () + + +dOMHTMLMediaElementSetDefaultPlaybackRate :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Double -- value + -> m () -- result +dOMHTMLMediaElementSetDefaultPlaybackRate _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = realToFrac value + webkit_dom_html_media_element_set_default_playback_rate _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementSetDefaultPlaybackRateMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetDefaultPlaybackRateMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetDefaultPlaybackRate + +-- method DOMHTMLMediaElement::set_loop +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_loop" webkit_dom_html_media_element_set_loop :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLMediaElementSetLoop :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLMediaElementSetLoop _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_media_element_set_loop _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementSetLoopMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetLoopMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetLoop + +-- method DOMHTMLMediaElement::set_media_group +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_media_group" webkit_dom_html_media_element_set_media_group :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLMediaElementSetMediaGroup :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLMediaElementSetMediaGroup _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_media_element_set_media_group _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLMediaElementSetMediaGroupMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetMediaGroupMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetMediaGroup + +-- method DOMHTMLMediaElement::set_muted +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_muted" webkit_dom_html_media_element_set_muted :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLMediaElementSetMuted :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLMediaElementSetMuted _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_media_element_set_muted _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementSetMutedMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetMutedMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetMuted + +-- method DOMHTMLMediaElement::set_playback_rate +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_playback_rate" webkit_dom_html_media_element_set_playback_rate :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CDouble -> -- value : TBasicType TDouble + IO () + + +dOMHTMLMediaElementSetPlaybackRate :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Double -- value + -> m () -- result +dOMHTMLMediaElementSetPlaybackRate _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = realToFrac value + webkit_dom_html_media_element_set_playback_rate _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementSetPlaybackRateMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetPlaybackRateMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetPlaybackRate + +-- method DOMHTMLMediaElement::set_preload +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_preload" webkit_dom_html_media_element_set_preload :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLMediaElementSetPreload :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLMediaElementSetPreload _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_media_element_set_preload _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLMediaElementSetPreloadMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetPreloadMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetPreload + +-- method DOMHTMLMediaElement::set_src +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_src" webkit_dom_html_media_element_set_src :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CString -> -- value : TBasicType TUTF8 + IO () + + +dOMHTMLMediaElementSetSrc :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> T.Text -- value + -> m () -- result +dOMHTMLMediaElementSetSrc _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + value' <- textToCString value + webkit_dom_html_media_element_set_src _obj' value' + touchManagedPtr _obj + freeMem value' + return () + +data DOMHTMLMediaElementSetSrcMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetSrc + +-- method DOMHTMLMediaElement::set_volume +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : True +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_volume" webkit_dom_html_media_element_set_volume :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CDouble -> -- value : TBasicType TDouble + Ptr (Ptr GError) -> -- error + IO () + + +dOMHTMLMediaElementSetVolume :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Double -- value + -> m () -- result +dOMHTMLMediaElementSetVolume _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = realToFrac value + onException (do + propagateGError $ webkit_dom_html_media_element_set_volume _obj' value' + touchManagedPtr _obj + return () + ) (do + return () + ) + +data DOMHTMLMediaElementSetVolumeMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetVolumeMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetVolume + +-- method DOMHTMLMediaElement::set_webkit_closed_captions_visible +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_webkit_closed_captions_visible" webkit_dom_html_media_element_set_webkit_closed_captions_visible :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLMediaElementSetWebkitClosedCaptionsVisible :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLMediaElementSetWebkitClosedCaptionsVisible _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_media_element_set_webkit_closed_captions_visible _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementSetWebkitClosedCaptionsVisibleMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetWebkitClosedCaptionsVisibleMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetWebkitClosedCaptionsVisible + +-- method DOMHTMLMediaElement::set_webkit_preserves_pitch +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_set_webkit_preserves_pitch" webkit_dom_html_media_element_set_webkit_preserves_pitch :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + CInt -> -- value : TBasicType TBoolean + IO () + + +dOMHTMLMediaElementSetWebkitPreservesPitch :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> Bool -- value + -> m () -- result +dOMHTMLMediaElementSetWebkitPreservesPitch _obj value = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let value' = (fromIntegral . fromEnum) value + webkit_dom_html_media_element_set_webkit_preserves_pitch _obj' value' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementSetWebkitPreservesPitchMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementSetWebkitPreservesPitchMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementSetWebkitPreservesPitch + +-- method DOMHTMLMediaElement::webkit_show_playback_target_picker +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMediaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_dom_html_media_element_webkit_show_playback_target_picker" webkit_dom_html_media_element_webkit_show_playback_target_picker :: + Ptr DOMHTMLMediaElement -> -- _obj : TInterface "WebKit" "DOMHTMLMediaElement" + IO () + + +dOMHTMLMediaElementWebkitShowPlaybackTargetPicker :: + (MonadIO m, DOMHTMLMediaElementK a) => + a -- _obj + -> m () -- result +dOMHTMLMediaElementWebkitShowPlaybackTargetPicker _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_dom_html_media_element_webkit_show_playback_target_picker _obj' + touchManagedPtr _obj + return () + +data DOMHTMLMediaElementWebkitShowPlaybackTargetPickerMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLMediaElementK a) => MethodInfo DOMHTMLMediaElementWebkitShowPlaybackTargetPickerMethodInfo a signature where + overloadedMethod _ = dOMHTMLMediaElementWebkitShowPlaybackTargetPicker diff --git a/GI/WebKit/Objects/DOMHTMLMediaElement.hs-boot b/GI/WebKit/Objects/DOMHTMLMediaElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLMediaElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLMediaElement.hs-boot @@ -44,3 +44,59 @@ data DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo data DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo data DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo +data DOMHTMLMediaElementAddTextTrackMethodInfo +data DOMHTMLMediaElementCanPlayTypeMethodInfo +data DOMHTMLMediaElementFastSeekMethodInfo +data DOMHTMLMediaElementGetAudioTracksMethodInfo +data DOMHTMLMediaElementGetAutoplayMethodInfo +data DOMHTMLMediaElementGetBufferedMethodInfo +data DOMHTMLMediaElementGetControllerMethodInfo +data DOMHTMLMediaElementGetControlsMethodInfo +data DOMHTMLMediaElementGetCurrentSrcMethodInfo +data DOMHTMLMediaElementGetCurrentTimeMethodInfo +data DOMHTMLMediaElementGetDefaultMutedMethodInfo +data DOMHTMLMediaElementGetDefaultPlaybackRateMethodInfo +data DOMHTMLMediaElementGetDurationMethodInfo +data DOMHTMLMediaElementGetEndedMethodInfo +data DOMHTMLMediaElementGetErrorMethodInfo +data DOMHTMLMediaElementGetInitialTimeMethodInfo +data DOMHTMLMediaElementGetLoopMethodInfo +data DOMHTMLMediaElementGetMediaGroupMethodInfo +data DOMHTMLMediaElementGetMutedMethodInfo +data DOMHTMLMediaElementGetNetworkStateMethodInfo +data DOMHTMLMediaElementGetPausedMethodInfo +data DOMHTMLMediaElementGetPlaybackRateMethodInfo +data DOMHTMLMediaElementGetPlayedMethodInfo +data DOMHTMLMediaElementGetPreloadMethodInfo +data DOMHTMLMediaElementGetReadyStateMethodInfo +data DOMHTMLMediaElementGetSeekableMethodInfo +data DOMHTMLMediaElementGetSeekingMethodInfo +data DOMHTMLMediaElementGetSrcMethodInfo +data DOMHTMLMediaElementGetStartTimeMethodInfo +data DOMHTMLMediaElementGetTextTracksMethodInfo +data DOMHTMLMediaElementGetVideoTracksMethodInfo +data DOMHTMLMediaElementGetVolumeMethodInfo +data DOMHTMLMediaElementGetWebkitAudioDecodedByteCountMethodInfo +data DOMHTMLMediaElementGetWebkitClosedCaptionsVisibleMethodInfo +data DOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWirelessMethodInfo +data DOMHTMLMediaElementGetWebkitHasClosedCaptionsMethodInfo +data DOMHTMLMediaElementGetWebkitPreservesPitchMethodInfo +data DOMHTMLMediaElementGetWebkitVideoDecodedByteCountMethodInfo +data DOMHTMLMediaElementLoadMethodInfo +data DOMHTMLMediaElementPauseMethodInfo +data DOMHTMLMediaElementPlayMethodInfo +data DOMHTMLMediaElementSetAutoplayMethodInfo +data DOMHTMLMediaElementSetControlsMethodInfo +data DOMHTMLMediaElementSetCurrentTimeMethodInfo +data DOMHTMLMediaElementSetDefaultMutedMethodInfo +data DOMHTMLMediaElementSetDefaultPlaybackRateMethodInfo +data DOMHTMLMediaElementSetLoopMethodInfo +data DOMHTMLMediaElementSetMediaGroupMethodInfo +data DOMHTMLMediaElementSetMutedMethodInfo +data DOMHTMLMediaElementSetPlaybackRateMethodInfo +data DOMHTMLMediaElementSetPreloadMethodInfo +data DOMHTMLMediaElementSetSrcMethodInfo +data DOMHTMLMediaElementSetVolumeMethodInfo +data DOMHTMLMediaElementSetWebkitClosedCaptionsVisibleMethodInfo +data DOMHTMLMediaElementSetWebkitPreservesPitchMethodInfo +data DOMHTMLMediaElementWebkitShowPlaybackTargetPickerMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLMenuElement.hs b/GI/WebKit/Objects/DOMHTMLMenuElement.hs --- a/GI/WebKit/Objects/DOMHTMLMenuElement.hs +++ b/GI/WebKit/Objects/DOMHTMLMenuElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLMenuElementGetCompact + DOMHTMLMenuElementGetCompactMethodInfo , dOMHTMLMenuElementGetCompact , -- ** dOMHTMLMenuElementSetCompact + DOMHTMLMenuElementSetCompactMethodInfo , dOMHTMLMenuElementSetCompact , @@ -70,6 +73,173 @@ noDOMHTMLMenuElement :: Maybe DOMHTMLMenuElement noDOMHTMLMenuElement = Nothing +type family ResolveDOMHTMLMenuElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLMenuElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLMenuElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLMenuElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLMenuElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLMenuElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLMenuElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLMenuElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLMenuElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLMenuElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLMenuElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLMenuElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLMenuElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLMenuElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLMenuElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLMenuElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLMenuElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLMenuElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLMenuElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLMenuElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLMenuElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLMenuElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLMenuElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLMenuElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLMenuElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLMenuElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLMenuElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLMenuElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLMenuElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLMenuElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLMenuElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLMenuElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLMenuElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLMenuElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLMenuElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLMenuElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLMenuElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLMenuElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLMenuElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLMenuElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLMenuElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLMenuElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLMenuElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLMenuElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLMenuElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLMenuElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLMenuElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLMenuElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLMenuElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLMenuElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLMenuElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLMenuElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLMenuElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLMenuElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLMenuElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLMenuElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLMenuElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLMenuElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLMenuElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLMenuElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLMenuElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLMenuElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLMenuElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLMenuElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLMenuElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLMenuElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLMenuElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLMenuElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLMenuElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLMenuElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLMenuElementMethod "getCompact" o = DOMHTMLMenuElementGetCompactMethodInfo + ResolveDOMHTMLMenuElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLMenuElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLMenuElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLMenuElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLMenuElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLMenuElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLMenuElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLMenuElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLMenuElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLMenuElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLMenuElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLMenuElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLMenuElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLMenuElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLMenuElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLMenuElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLMenuElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLMenuElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLMenuElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLMenuElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLMenuElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLMenuElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLMenuElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLMenuElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLMenuElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLMenuElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLMenuElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLMenuElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLMenuElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLMenuElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLMenuElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLMenuElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLMenuElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLMenuElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLMenuElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLMenuElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLMenuElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLMenuElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLMenuElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLMenuElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLMenuElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLMenuElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLMenuElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLMenuElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLMenuElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLMenuElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLMenuElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLMenuElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLMenuElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLMenuElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLMenuElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLMenuElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLMenuElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLMenuElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLMenuElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLMenuElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLMenuElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLMenuElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLMenuElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLMenuElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLMenuElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLMenuElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLMenuElementMethod "setCompact" o = DOMHTMLMenuElementSetCompactMethodInfo + ResolveDOMHTMLMenuElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLMenuElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLMenuElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLMenuElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLMenuElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLMenuElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLMenuElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLMenuElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLMenuElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLMenuElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLMenuElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLMenuElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLMenuElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLMenuElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLMenuElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLMenuElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLMenuElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLMenuElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLMenuElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLMenuElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLMenuElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLMenuElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLMenuElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLMenuElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLMenuElementMethod t DOMHTMLMenuElement, MethodInfo info DOMHTMLMenuElement p) => IsLabelProxy t (DOMHTMLMenuElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLMenuElementMethod t DOMHTMLMenuElement, MethodInfo info DOMHTMLMenuElement p) => IsLabel t (DOMHTMLMenuElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "compact" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLMenuElementCompactPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLMenuElementCompactPropertyInfo = DOMHTMLMenuElementK type AttrGetType DOMHTMLMenuElementCompactPropertyInfo = Bool - type AttrLabel DOMHTMLMenuElementCompactPropertyInfo = "DOMHTMLMenuElement::compact" + type AttrLabel DOMHTMLMenuElementCompactPropertyInfo = "compact" attrGet _ = getDOMHTMLMenuElementCompact attrSet _ = setDOMHTMLMenuElementCompact attrConstruct _ = constructDOMHTMLMenuElementCompact type instance AttributeList DOMHTMLMenuElement = DOMHTMLMenuElementAttributeList -type DOMHTMLMenuElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLMenuElementCompactPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLMenuElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLMenuElementCompactPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLMenuElement = DOMHTMLMenuElementSignalList -type DOMHTMLMenuElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLMenuElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLMenuElement::get_compact -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMenuElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMenuElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMenuElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLMenuElementGetCompact :: (MonadIO m, DOMHTMLMenuElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLMenuElementGetCompact _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_menu_element_get_compact _obj' @@ -125,11 +294,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMenuElementGetCompactMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLMenuElementK a) => MethodInfo DOMHTMLMenuElementGetCompactMethodInfo a signature where + overloadedMethod _ = dOMHTMLMenuElementGetCompact + -- method DOMHTMLMenuElement::set_compact -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMenuElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMenuElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMenuElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -142,14 +314,18 @@ dOMHTMLMenuElementSetCompact :: (MonadIO m, DOMHTMLMenuElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLMenuElementSetCompact _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_html_menu_element_set_compact _obj' value' touchManagedPtr _obj return () + +data DOMHTMLMenuElementSetCompactMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLMenuElementK a) => MethodInfo DOMHTMLMenuElementSetCompactMethodInfo a signature where + overloadedMethod _ = dOMHTMLMenuElementSetCompact diff --git a/GI/WebKit/Objects/DOMHTMLMenuElement.hs-boot b/GI/WebKit/Objects/DOMHTMLMenuElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLMenuElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLMenuElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLMenuElementK o instance (GObject o, IsDescendantOf DOMHTMLMenuElement o) => DOMHTMLMenuElementK o data DOMHTMLMenuElementCompactPropertyInfo +data DOMHTMLMenuElementGetCompactMethodInfo +data DOMHTMLMenuElementSetCompactMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLMetaElement.hs b/GI/WebKit/Objects/DOMHTMLMetaElement.hs --- a/GI/WebKit/Objects/DOMHTMLMetaElement.hs +++ b/GI/WebKit/Objects/DOMHTMLMetaElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,34 +18,42 @@ -- * Methods -- ** dOMHTMLMetaElementGetContent + DOMHTMLMetaElementGetContentMethodInfo , dOMHTMLMetaElementGetContent , -- ** dOMHTMLMetaElementGetHttpEquiv + DOMHTMLMetaElementGetHttpEquivMethodInfo, dOMHTMLMetaElementGetHttpEquiv , -- ** dOMHTMLMetaElementGetName + DOMHTMLMetaElementGetNameMethodInfo , dOMHTMLMetaElementGetName , -- ** dOMHTMLMetaElementGetScheme + DOMHTMLMetaElementGetSchemeMethodInfo , dOMHTMLMetaElementGetScheme , -- ** dOMHTMLMetaElementSetContent + DOMHTMLMetaElementSetContentMethodInfo , dOMHTMLMetaElementSetContent , -- ** dOMHTMLMetaElementSetHttpEquiv + DOMHTMLMetaElementSetHttpEquivMethodInfo, dOMHTMLMetaElementSetHttpEquiv , -- ** dOMHTMLMetaElementSetName + DOMHTMLMetaElementSetNameMethodInfo , dOMHTMLMetaElementSetName , -- ** dOMHTMLMetaElementSetScheme + DOMHTMLMetaElementSetSchemeMethodInfo , dOMHTMLMetaElementSetScheme , @@ -115,6 +124,179 @@ noDOMHTMLMetaElement :: Maybe DOMHTMLMetaElement noDOMHTMLMetaElement = Nothing +type family ResolveDOMHTMLMetaElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLMetaElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLMetaElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLMetaElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLMetaElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLMetaElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLMetaElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLMetaElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLMetaElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLMetaElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLMetaElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLMetaElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLMetaElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLMetaElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLMetaElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLMetaElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLMetaElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLMetaElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLMetaElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLMetaElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLMetaElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLMetaElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLMetaElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLMetaElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLMetaElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLMetaElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLMetaElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLMetaElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLMetaElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLMetaElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLMetaElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLMetaElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLMetaElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLMetaElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLMetaElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLMetaElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLMetaElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLMetaElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLMetaElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLMetaElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLMetaElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLMetaElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLMetaElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLMetaElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLMetaElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLMetaElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLMetaElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLMetaElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLMetaElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLMetaElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLMetaElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLMetaElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLMetaElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLMetaElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLMetaElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLMetaElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLMetaElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLMetaElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLMetaElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLMetaElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLMetaElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLMetaElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLMetaElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLMetaElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLMetaElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLMetaElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLMetaElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLMetaElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLMetaElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLMetaElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLMetaElementMethod "getContent" o = DOMHTMLMetaElementGetContentMethodInfo + ResolveDOMHTMLMetaElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLMetaElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLMetaElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLMetaElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLMetaElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLMetaElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLMetaElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLMetaElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLMetaElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLMetaElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLMetaElementMethod "getHttpEquiv" o = DOMHTMLMetaElementGetHttpEquivMethodInfo + ResolveDOMHTMLMetaElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLMetaElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLMetaElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLMetaElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLMetaElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLMetaElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLMetaElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLMetaElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLMetaElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLMetaElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLMetaElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLMetaElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLMetaElementMethod "getName" o = DOMHTMLMetaElementGetNameMethodInfo + ResolveDOMHTMLMetaElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLMetaElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLMetaElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLMetaElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLMetaElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLMetaElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLMetaElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLMetaElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLMetaElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLMetaElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLMetaElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLMetaElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLMetaElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLMetaElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLMetaElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLMetaElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLMetaElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLMetaElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLMetaElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLMetaElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLMetaElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLMetaElementMethod "getScheme" o = DOMHTMLMetaElementGetSchemeMethodInfo + ResolveDOMHTMLMetaElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLMetaElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLMetaElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLMetaElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLMetaElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLMetaElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLMetaElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLMetaElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLMetaElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLMetaElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLMetaElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLMetaElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLMetaElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLMetaElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLMetaElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLMetaElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLMetaElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLMetaElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLMetaElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLMetaElementMethod "setContent" o = DOMHTMLMetaElementSetContentMethodInfo + ResolveDOMHTMLMetaElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLMetaElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLMetaElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLMetaElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLMetaElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLMetaElementMethod "setHttpEquiv" o = DOMHTMLMetaElementSetHttpEquivMethodInfo + ResolveDOMHTMLMetaElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLMetaElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLMetaElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLMetaElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLMetaElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLMetaElementMethod "setName" o = DOMHTMLMetaElementSetNameMethodInfo + ResolveDOMHTMLMetaElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLMetaElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLMetaElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLMetaElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLMetaElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLMetaElementMethod "setScheme" o = DOMHTMLMetaElementSetSchemeMethodInfo + ResolveDOMHTMLMetaElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLMetaElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLMetaElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLMetaElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLMetaElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLMetaElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLMetaElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLMetaElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLMetaElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLMetaElementMethod t DOMHTMLMetaElement, MethodInfo info DOMHTMLMetaElement p) => IsLabelProxy t (DOMHTMLMetaElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLMetaElementMethod t DOMHTMLMetaElement, MethodInfo info DOMHTMLMetaElement p) => IsLabel t (DOMHTMLMetaElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "content" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -134,7 +316,7 @@ type AttrSetTypeConstraint DOMHTMLMetaElementContentPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLMetaElementContentPropertyInfo = DOMHTMLMetaElementK type AttrGetType DOMHTMLMetaElementContentPropertyInfo = T.Text - type AttrLabel DOMHTMLMetaElementContentPropertyInfo = "DOMHTMLMetaElement::content" + type AttrLabel DOMHTMLMetaElementContentPropertyInfo = "content" attrGet _ = getDOMHTMLMetaElementContent attrSet _ = setDOMHTMLMetaElementContent attrConstruct _ = constructDOMHTMLMetaElementContent @@ -158,7 +340,7 @@ type AttrSetTypeConstraint DOMHTMLMetaElementHttpEquivPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLMetaElementHttpEquivPropertyInfo = DOMHTMLMetaElementK type AttrGetType DOMHTMLMetaElementHttpEquivPropertyInfo = T.Text - type AttrLabel DOMHTMLMetaElementHttpEquivPropertyInfo = "DOMHTMLMetaElement::http-equiv" + type AttrLabel DOMHTMLMetaElementHttpEquivPropertyInfo = "http-equiv" attrGet _ = getDOMHTMLMetaElementHttpEquiv attrSet _ = setDOMHTMLMetaElementHttpEquiv attrConstruct _ = constructDOMHTMLMetaElementHttpEquiv @@ -182,7 +364,7 @@ type AttrSetTypeConstraint DOMHTMLMetaElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLMetaElementNamePropertyInfo = DOMHTMLMetaElementK type AttrGetType DOMHTMLMetaElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLMetaElementNamePropertyInfo = "DOMHTMLMetaElement::name" + type AttrLabel DOMHTMLMetaElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLMetaElementName attrSet _ = setDOMHTMLMetaElementName attrConstruct _ = constructDOMHTMLMetaElementName @@ -206,22 +388,21 @@ type AttrSetTypeConstraint DOMHTMLMetaElementSchemePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLMetaElementSchemePropertyInfo = DOMHTMLMetaElementK type AttrGetType DOMHTMLMetaElementSchemePropertyInfo = T.Text - type AttrLabel DOMHTMLMetaElementSchemePropertyInfo = "DOMHTMLMetaElement::scheme" + type AttrLabel DOMHTMLMetaElementSchemePropertyInfo = "scheme" attrGet _ = getDOMHTMLMetaElementScheme attrSet _ = setDOMHTMLMetaElementScheme attrConstruct _ = constructDOMHTMLMetaElementScheme type instance AttributeList DOMHTMLMetaElement = DOMHTMLMetaElementAttributeList -type DOMHTMLMetaElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content", DOMHTMLMetaElementContentPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("http-equiv", DOMHTMLMetaElementHttpEquivPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLMetaElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scheme", DOMHTMLMetaElementSchemePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLMetaElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("content", DOMHTMLMetaElementContentPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("httpEquiv", DOMHTMLMetaElementHttpEquivPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLMetaElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scheme", DOMHTMLMetaElementSchemePropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLMetaElement = DOMHTMLMetaElementSignalList -type DOMHTMLMetaElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLMetaElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLMetaElement::get_content -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -233,8 +414,8 @@ dOMHTMLMetaElementGetContent :: (MonadIO m, DOMHTMLMetaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLMetaElementGetContent _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_meta_element_get_content _obj' @@ -244,11 +425,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMetaElementGetContentMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMetaElementK a) => MethodInfo DOMHTMLMetaElementGetContentMethodInfo a signature where + overloadedMethod _ = dOMHTMLMetaElementGetContent + -- method DOMHTMLMetaElement::get_http_equiv -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -260,8 +444,8 @@ dOMHTMLMetaElementGetHttpEquiv :: (MonadIO m, DOMHTMLMetaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLMetaElementGetHttpEquiv _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_meta_element_get_http_equiv _obj' @@ -271,11 +455,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMetaElementGetHttpEquivMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMetaElementK a) => MethodInfo DOMHTMLMetaElementGetHttpEquivMethodInfo a signature where + overloadedMethod _ = dOMHTMLMetaElementGetHttpEquiv + -- method DOMHTMLMetaElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -287,8 +474,8 @@ dOMHTMLMetaElementGetName :: (MonadIO m, DOMHTMLMetaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLMetaElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_meta_element_get_name _obj' @@ -298,11 +485,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMetaElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMetaElementK a) => MethodInfo DOMHTMLMetaElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLMetaElementGetName + -- method DOMHTMLMetaElement::get_scheme -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -314,8 +504,8 @@ dOMHTMLMetaElementGetScheme :: (MonadIO m, DOMHTMLMetaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLMetaElementGetScheme _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_meta_element_get_scheme _obj' @@ -325,11 +515,14 @@ touchManagedPtr _obj return result' +data DOMHTMLMetaElementGetSchemeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLMetaElementK a) => MethodInfo DOMHTMLMetaElementGetSchemeMethodInfo a signature where + overloadedMethod _ = dOMHTMLMetaElementGetScheme + -- method DOMHTMLMetaElement::set_content -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -342,9 +535,9 @@ dOMHTMLMetaElementSetContent :: (MonadIO m, DOMHTMLMetaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLMetaElementSetContent _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -353,11 +546,14 @@ freeMem value' return () +data DOMHTMLMetaElementSetContentMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMetaElementK a) => MethodInfo DOMHTMLMetaElementSetContentMethodInfo a signature where + overloadedMethod _ = dOMHTMLMetaElementSetContent + -- method DOMHTMLMetaElement::set_http_equiv -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -370,9 +566,9 @@ dOMHTMLMetaElementSetHttpEquiv :: (MonadIO m, DOMHTMLMetaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLMetaElementSetHttpEquiv _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -381,11 +577,14 @@ freeMem value' return () +data DOMHTMLMetaElementSetHttpEquivMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMetaElementK a) => MethodInfo DOMHTMLMetaElementSetHttpEquivMethodInfo a signature where + overloadedMethod _ = dOMHTMLMetaElementSetHttpEquiv + -- method DOMHTMLMetaElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -398,9 +597,9 @@ dOMHTMLMetaElementSetName :: (MonadIO m, DOMHTMLMetaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLMetaElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -409,11 +608,14 @@ freeMem value' return () +data DOMHTMLMetaElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMetaElementK a) => MethodInfo DOMHTMLMetaElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLMetaElementSetName + -- method DOMHTMLMetaElement::set_scheme -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLMetaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -426,9 +628,9 @@ dOMHTMLMetaElementSetScheme :: (MonadIO m, DOMHTMLMetaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLMetaElementSetScheme _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -436,5 +638,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLMetaElementSetSchemeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLMetaElementK a) => MethodInfo DOMHTMLMetaElementSetSchemeMethodInfo a signature where + overloadedMethod _ = dOMHTMLMetaElementSetScheme diff --git a/GI/WebKit/Objects/DOMHTMLMetaElement.hs-boot b/GI/WebKit/Objects/DOMHTMLMetaElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLMetaElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLMetaElement.hs-boot @@ -15,3 +15,11 @@ data DOMHTMLMetaElementHttpEquivPropertyInfo data DOMHTMLMetaElementNamePropertyInfo data DOMHTMLMetaElementSchemePropertyInfo +data DOMHTMLMetaElementGetContentMethodInfo +data DOMHTMLMetaElementGetHttpEquivMethodInfo +data DOMHTMLMetaElementGetNameMethodInfo +data DOMHTMLMetaElementGetSchemeMethodInfo +data DOMHTMLMetaElementSetContentMethodInfo +data DOMHTMLMetaElementSetHttpEquivMethodInfo +data DOMHTMLMetaElementSetNameMethodInfo +data DOMHTMLMetaElementSetSchemeMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLModElement.hs b/GI/WebKit/Objects/DOMHTMLModElement.hs --- a/GI/WebKit/Objects/DOMHTMLModElement.hs +++ b/GI/WebKit/Objects/DOMHTMLModElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMHTMLModElementGetCite + DOMHTMLModElementGetCiteMethodInfo , dOMHTMLModElementGetCite , -- ** dOMHTMLModElementGetDateTime + DOMHTMLModElementGetDateTimeMethodInfo , dOMHTMLModElementGetDateTime , -- ** dOMHTMLModElementSetCite + DOMHTMLModElementSetCiteMethodInfo , dOMHTMLModElementSetCite , -- ** dOMHTMLModElementSetDateTime + DOMHTMLModElementSetDateTimeMethodInfo , dOMHTMLModElementSetDateTime , @@ -85,6 +90,175 @@ noDOMHTMLModElement :: Maybe DOMHTMLModElement noDOMHTMLModElement = Nothing +type family ResolveDOMHTMLModElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLModElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLModElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLModElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLModElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLModElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLModElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLModElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLModElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLModElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLModElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLModElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLModElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLModElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLModElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLModElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLModElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLModElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLModElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLModElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLModElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLModElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLModElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLModElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLModElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLModElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLModElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLModElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLModElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLModElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLModElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLModElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLModElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLModElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLModElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLModElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLModElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLModElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLModElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLModElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLModElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLModElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLModElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLModElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLModElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLModElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLModElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLModElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLModElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLModElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLModElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLModElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLModElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLModElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLModElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLModElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLModElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLModElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLModElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLModElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLModElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLModElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLModElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLModElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLModElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLModElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLModElementMethod "getCite" o = DOMHTMLModElementGetCiteMethodInfo + ResolveDOMHTMLModElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLModElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLModElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLModElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLModElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLModElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLModElementMethod "getDateTime" o = DOMHTMLModElementGetDateTimeMethodInfo + ResolveDOMHTMLModElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLModElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLModElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLModElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLModElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLModElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLModElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLModElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLModElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLModElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLModElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLModElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLModElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLModElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLModElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLModElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLModElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLModElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLModElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLModElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLModElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLModElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLModElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLModElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLModElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLModElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLModElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLModElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLModElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLModElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLModElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLModElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLModElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLModElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLModElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLModElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLModElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLModElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLModElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLModElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLModElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLModElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLModElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLModElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLModElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLModElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLModElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLModElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLModElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLModElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLModElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLModElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLModElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLModElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLModElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLModElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLModElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLModElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLModElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLModElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLModElementMethod "setCite" o = DOMHTMLModElementSetCiteMethodInfo + ResolveDOMHTMLModElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLModElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLModElementMethod "setDateTime" o = DOMHTMLModElementSetDateTimeMethodInfo + ResolveDOMHTMLModElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLModElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLModElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLModElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLModElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLModElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLModElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLModElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLModElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLModElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLModElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLModElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLModElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLModElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLModElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLModElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLModElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLModElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLModElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLModElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLModElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLModElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLModElementMethod t DOMHTMLModElement, MethodInfo info DOMHTMLModElement p) => IsLabelProxy t (DOMHTMLModElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLModElementMethod t DOMHTMLModElement, MethodInfo info DOMHTMLModElement p) => IsLabel t (DOMHTMLModElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "cite" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -104,7 +278,7 @@ type AttrSetTypeConstraint DOMHTMLModElementCitePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLModElementCitePropertyInfo = DOMHTMLModElementK type AttrGetType DOMHTMLModElementCitePropertyInfo = T.Text - type AttrLabel DOMHTMLModElementCitePropertyInfo = "DOMHTMLModElement::cite" + type AttrLabel DOMHTMLModElementCitePropertyInfo = "cite" attrGet _ = getDOMHTMLModElementCite attrSet _ = setDOMHTMLModElementCite attrConstruct _ = constructDOMHTMLModElementCite @@ -128,22 +302,21 @@ type AttrSetTypeConstraint DOMHTMLModElementDateTimePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLModElementDateTimePropertyInfo = DOMHTMLModElementK type AttrGetType DOMHTMLModElementDateTimePropertyInfo = T.Text - type AttrLabel DOMHTMLModElementDateTimePropertyInfo = "DOMHTMLModElement::date-time" + type AttrLabel DOMHTMLModElementDateTimePropertyInfo = "date-time" attrGet _ = getDOMHTMLModElementDateTime attrSet _ = setDOMHTMLModElementDateTime attrConstruct _ = constructDOMHTMLModElementDateTime type instance AttributeList DOMHTMLModElement = DOMHTMLModElementAttributeList -type DOMHTMLModElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("cite", DOMHTMLModElementCitePropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("date-time", DOMHTMLModElementDateTimePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLModElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("cite", DOMHTMLModElementCitePropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dateTime", DOMHTMLModElementDateTimePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLModElement = DOMHTMLModElementSignalList -type DOMHTMLModElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLModElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLModElement::get_cite -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -155,8 +328,8 @@ dOMHTMLModElementGetCite :: (MonadIO m, DOMHTMLModElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLModElementGetCite _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_mod_element_get_cite _obj' @@ -166,11 +339,14 @@ touchManagedPtr _obj return result' +data DOMHTMLModElementGetCiteMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLModElementK a) => MethodInfo DOMHTMLModElementGetCiteMethodInfo a signature where + overloadedMethod _ = dOMHTMLModElementGetCite + -- method DOMHTMLModElement::get_date_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -182,8 +358,8 @@ dOMHTMLModElementGetDateTime :: (MonadIO m, DOMHTMLModElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLModElementGetDateTime _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_mod_element_get_date_time _obj' @@ -193,11 +369,14 @@ touchManagedPtr _obj return result' +data DOMHTMLModElementGetDateTimeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLModElementK a) => MethodInfo DOMHTMLModElementGetDateTimeMethodInfo a signature where + overloadedMethod _ = dOMHTMLModElementGetDateTime + -- method DOMHTMLModElement::set_cite -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -210,9 +389,9 @@ dOMHTMLModElementSetCite :: (MonadIO m, DOMHTMLModElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLModElementSetCite _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -221,11 +400,14 @@ freeMem value' return () +data DOMHTMLModElementSetCiteMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLModElementK a) => MethodInfo DOMHTMLModElementSetCiteMethodInfo a signature where + overloadedMethod _ = dOMHTMLModElementSetCite + -- method DOMHTMLModElement::set_date_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLModElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -238,9 +420,9 @@ dOMHTMLModElementSetDateTime :: (MonadIO m, DOMHTMLModElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLModElementSetDateTime _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -248,5 +430,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLModElementSetDateTimeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLModElementK a) => MethodInfo DOMHTMLModElementSetDateTimeMethodInfo a signature where + overloadedMethod _ = dOMHTMLModElementSetDateTime diff --git a/GI/WebKit/Objects/DOMHTMLModElement.hs-boot b/GI/WebKit/Objects/DOMHTMLModElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLModElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLModElement.hs-boot @@ -13,3 +13,7 @@ instance (GObject o, IsDescendantOf DOMHTMLModElement o) => DOMHTMLModElementK o data DOMHTMLModElementCitePropertyInfo data DOMHTMLModElementDateTimePropertyInfo +data DOMHTMLModElementGetCiteMethodInfo +data DOMHTMLModElementGetDateTimeMethodInfo +data DOMHTMLModElementSetCiteMethodInfo +data DOMHTMLModElementSetDateTimeMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLOListElement.hs b/GI/WebKit/Objects/DOMHTMLOListElement.hs --- a/GI/WebKit/Objects/DOMHTMLOListElement.hs +++ b/GI/WebKit/Objects/DOMHTMLOListElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** dOMHTMLOListElementGetCompact + DOMHTMLOListElementGetCompactMethodInfo , dOMHTMLOListElementGetCompact , -- ** dOMHTMLOListElementGetReversed + DOMHTMLOListElementGetReversedMethodInfo, dOMHTMLOListElementGetReversed , -- ** dOMHTMLOListElementGetStart + DOMHTMLOListElementGetStartMethodInfo , dOMHTMLOListElementGetStart , -- ** dOMHTMLOListElementSetCompact + DOMHTMLOListElementSetCompactMethodInfo , dOMHTMLOListElementSetCompact , -- ** dOMHTMLOListElementSetReversed + DOMHTMLOListElementSetReversedMethodInfo, dOMHTMLOListElementSetReversed , -- ** dOMHTMLOListElementSetStart + DOMHTMLOListElementSetStartMethodInfo , dOMHTMLOListElementSetStart , @@ -107,6 +114,177 @@ noDOMHTMLOListElement :: Maybe DOMHTMLOListElement noDOMHTMLOListElement = Nothing +type family ResolveDOMHTMLOListElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLOListElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLOListElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLOListElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLOListElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLOListElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLOListElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLOListElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLOListElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLOListElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLOListElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLOListElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLOListElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLOListElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLOListElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLOListElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLOListElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLOListElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLOListElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLOListElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLOListElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLOListElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLOListElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLOListElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLOListElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLOListElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLOListElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLOListElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLOListElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLOListElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLOListElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLOListElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLOListElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLOListElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLOListElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLOListElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLOListElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLOListElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLOListElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLOListElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLOListElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLOListElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLOListElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLOListElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLOListElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLOListElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLOListElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLOListElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLOListElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLOListElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLOListElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLOListElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLOListElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLOListElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLOListElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLOListElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLOListElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLOListElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLOListElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLOListElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLOListElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLOListElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLOListElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLOListElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLOListElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLOListElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLOListElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLOListElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLOListElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLOListElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLOListElementMethod "getCompact" o = DOMHTMLOListElementGetCompactMethodInfo + ResolveDOMHTMLOListElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLOListElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLOListElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLOListElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLOListElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLOListElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLOListElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLOListElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLOListElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLOListElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLOListElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLOListElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLOListElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLOListElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLOListElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLOListElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLOListElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLOListElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLOListElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLOListElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLOListElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLOListElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLOListElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLOListElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLOListElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLOListElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLOListElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLOListElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLOListElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLOListElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLOListElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLOListElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLOListElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLOListElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLOListElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLOListElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLOListElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLOListElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLOListElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLOListElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLOListElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLOListElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLOListElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLOListElementMethod "getReversed" o = DOMHTMLOListElementGetReversedMethodInfo + ResolveDOMHTMLOListElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLOListElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLOListElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLOListElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLOListElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLOListElementMethod "getStart" o = DOMHTMLOListElementGetStartMethodInfo + ResolveDOMHTMLOListElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLOListElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLOListElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLOListElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLOListElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLOListElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLOListElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLOListElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLOListElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLOListElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLOListElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLOListElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLOListElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLOListElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLOListElementMethod "setCompact" o = DOMHTMLOListElementSetCompactMethodInfo + ResolveDOMHTMLOListElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLOListElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLOListElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLOListElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLOListElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLOListElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLOListElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLOListElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLOListElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLOListElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLOListElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLOListElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLOListElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLOListElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLOListElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLOListElementMethod "setReversed" o = DOMHTMLOListElementSetReversedMethodInfo + ResolveDOMHTMLOListElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLOListElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLOListElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLOListElementMethod "setStart" o = DOMHTMLOListElementSetStartMethodInfo + ResolveDOMHTMLOListElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLOListElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLOListElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLOListElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLOListElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLOListElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLOListElementMethod t DOMHTMLOListElement, MethodInfo info DOMHTMLOListElement p) => IsLabelProxy t (DOMHTMLOListElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLOListElementMethod t DOMHTMLOListElement, MethodInfo info DOMHTMLOListElement p) => IsLabel t (DOMHTMLOListElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "compact" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -126,7 +304,7 @@ type AttrSetTypeConstraint DOMHTMLOListElementCompactPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLOListElementCompactPropertyInfo = DOMHTMLOListElementK type AttrGetType DOMHTMLOListElementCompactPropertyInfo = Bool - type AttrLabel DOMHTMLOListElementCompactPropertyInfo = "DOMHTMLOListElement::compact" + type AttrLabel DOMHTMLOListElementCompactPropertyInfo = "compact" attrGet _ = getDOMHTMLOListElementCompact attrSet _ = setDOMHTMLOListElementCompact attrConstruct _ = constructDOMHTMLOListElementCompact @@ -150,7 +328,7 @@ type AttrSetTypeConstraint DOMHTMLOListElementReversedPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLOListElementReversedPropertyInfo = DOMHTMLOListElementK type AttrGetType DOMHTMLOListElementReversedPropertyInfo = Bool - type AttrLabel DOMHTMLOListElementReversedPropertyInfo = "DOMHTMLOListElement::reversed" + type AttrLabel DOMHTMLOListElementReversedPropertyInfo = "reversed" attrGet _ = getDOMHTMLOListElementReversed attrSet _ = setDOMHTMLOListElementReversed attrConstruct _ = constructDOMHTMLOListElementReversed @@ -174,7 +352,7 @@ type AttrSetTypeConstraint DOMHTMLOListElementStartPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLOListElementStartPropertyInfo = DOMHTMLOListElementK type AttrGetType DOMHTMLOListElementStartPropertyInfo = Int64 - type AttrLabel DOMHTMLOListElementStartPropertyInfo = "DOMHTMLOListElement::start" + type AttrLabel DOMHTMLOListElementStartPropertyInfo = "start" attrGet _ = getDOMHTMLOListElementStart attrSet _ = setDOMHTMLOListElementStart attrConstruct _ = constructDOMHTMLOListElementStart @@ -198,22 +376,21 @@ type AttrSetTypeConstraint DOMHTMLOListElementTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLOListElementTypePropertyInfo = DOMHTMLOListElementK type AttrGetType DOMHTMLOListElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLOListElementTypePropertyInfo = "DOMHTMLOListElement::type" + type AttrLabel DOMHTMLOListElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLOListElementType attrSet _ = setDOMHTMLOListElementType attrConstruct _ = constructDOMHTMLOListElementType type instance AttributeList DOMHTMLOListElement = DOMHTMLOListElementAttributeList -type DOMHTMLOListElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLOListElementCompactPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("reversed", DOMHTMLOListElementReversedPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("start", DOMHTMLOListElementStartPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLOListElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLOListElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLOListElementCompactPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("reversed", DOMHTMLOListElementReversedPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("start", DOMHTMLOListElementStartPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLOListElementTypePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLOListElement = DOMHTMLOListElementSignalList -type DOMHTMLOListElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLOListElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLOListElement::get_compact -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -225,8 +402,8 @@ dOMHTMLOListElementGetCompact :: (MonadIO m, DOMHTMLOListElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLOListElementGetCompact _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_htmlo_list_element_get_compact _obj' @@ -234,11 +411,14 @@ touchManagedPtr _obj return result' +data DOMHTMLOListElementGetCompactMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLOListElementK a) => MethodInfo DOMHTMLOListElementGetCompactMethodInfo a signature where + overloadedMethod _ = dOMHTMLOListElementGetCompact + -- method DOMHTMLOListElement::get_reversed -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -250,8 +430,8 @@ dOMHTMLOListElementGetReversed :: (MonadIO m, DOMHTMLOListElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLOListElementGetReversed _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_htmlo_list_element_get_reversed _obj' @@ -259,11 +439,14 @@ touchManagedPtr _obj return result' +data DOMHTMLOListElementGetReversedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLOListElementK a) => MethodInfo DOMHTMLOListElementGetReversedMethodInfo a signature where + overloadedMethod _ = dOMHTMLOListElementGetReversed + -- method DOMHTMLOListElement::get_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -275,19 +458,22 @@ dOMHTMLOListElementGetStart :: (MonadIO m, DOMHTMLOListElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLOListElementGetStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_htmlo_list_element_get_start _obj' touchManagedPtr _obj return result +data DOMHTMLOListElementGetStartMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLOListElementK a) => MethodInfo DOMHTMLOListElementGetStartMethodInfo a signature where + overloadedMethod _ = dOMHTMLOListElementGetStart + -- method DOMHTMLOListElement::set_compact -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -300,9 +486,9 @@ dOMHTMLOListElementSetCompact :: (MonadIO m, DOMHTMLOListElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLOListElementSetCompact _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -310,11 +496,14 @@ touchManagedPtr _obj return () +data DOMHTMLOListElementSetCompactMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLOListElementK a) => MethodInfo DOMHTMLOListElementSetCompactMethodInfo a signature where + overloadedMethod _ = dOMHTMLOListElementSetCompact + -- method DOMHTMLOListElement::set_reversed -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -327,9 +516,9 @@ dOMHTMLOListElementSetReversed :: (MonadIO m, DOMHTMLOListElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLOListElementSetReversed _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -337,11 +526,14 @@ touchManagedPtr _obj return () +data DOMHTMLOListElementSetReversedMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLOListElementK a) => MethodInfo DOMHTMLOListElementSetReversedMethodInfo a signature where + overloadedMethod _ = dOMHTMLOListElementSetReversed + -- method DOMHTMLOListElement::set_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -354,13 +546,17 @@ dOMHTMLOListElementSetStart :: (MonadIO m, DOMHTMLOListElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLOListElementSetStart _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_htmlo_list_element_set_start _obj' value touchManagedPtr _obj return () + +data DOMHTMLOListElementSetStartMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLOListElementK a) => MethodInfo DOMHTMLOListElementSetStartMethodInfo a signature where + overloadedMethod _ = dOMHTMLOListElementSetStart diff --git a/GI/WebKit/Objects/DOMHTMLOListElement.hs-boot b/GI/WebKit/Objects/DOMHTMLOListElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLOListElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLOListElement.hs-boot @@ -15,3 +15,9 @@ data DOMHTMLOListElementReversedPropertyInfo data DOMHTMLOListElementStartPropertyInfo data DOMHTMLOListElementTypePropertyInfo +data DOMHTMLOListElementGetCompactMethodInfo +data DOMHTMLOListElementGetReversedMethodInfo +data DOMHTMLOListElementGetStartMethodInfo +data DOMHTMLOListElementSetCompactMethodInfo +data DOMHTMLOListElementSetReversedMethodInfo +data DOMHTMLOListElementSetStartMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLObjectElement.hs b/GI/WebKit/Objects/DOMHTMLObjectElement.hs --- a/GI/WebKit/Objects/DOMHTMLObjectElement.hs +++ b/GI/WebKit/Objects/DOMHTMLObjectElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,150 +18,187 @@ -- * Methods -- ** dOMHTMLObjectElementCheckValidity + DOMHTMLObjectElementCheckValidityMethodInfo, dOMHTMLObjectElementCheckValidity , -- ** dOMHTMLObjectElementGetAlign + DOMHTMLObjectElementGetAlignMethodInfo , dOMHTMLObjectElementGetAlign , -- ** dOMHTMLObjectElementGetArchive + DOMHTMLObjectElementGetArchiveMethodInfo, dOMHTMLObjectElementGetArchive , -- ** dOMHTMLObjectElementGetBorder + DOMHTMLObjectElementGetBorderMethodInfo , dOMHTMLObjectElementGetBorder , -- ** dOMHTMLObjectElementGetCode + DOMHTMLObjectElementGetCodeMethodInfo , dOMHTMLObjectElementGetCode , -- ** dOMHTMLObjectElementGetCodeBase + DOMHTMLObjectElementGetCodeBaseMethodInfo, dOMHTMLObjectElementGetCodeBase , -- ** dOMHTMLObjectElementGetCodeType + DOMHTMLObjectElementGetCodeTypeMethodInfo, dOMHTMLObjectElementGetCodeType , -- ** dOMHTMLObjectElementGetContentDocument + DOMHTMLObjectElementGetContentDocumentMethodInfo, dOMHTMLObjectElementGetContentDocument , -- ** dOMHTMLObjectElementGetData + DOMHTMLObjectElementGetDataMethodInfo , dOMHTMLObjectElementGetData , -- ** dOMHTMLObjectElementGetDeclare + DOMHTMLObjectElementGetDeclareMethodInfo, dOMHTMLObjectElementGetDeclare , -- ** dOMHTMLObjectElementGetForm + DOMHTMLObjectElementGetFormMethodInfo , dOMHTMLObjectElementGetForm , -- ** dOMHTMLObjectElementGetHeight + DOMHTMLObjectElementGetHeightMethodInfo , dOMHTMLObjectElementGetHeight , -- ** dOMHTMLObjectElementGetHspace + DOMHTMLObjectElementGetHspaceMethodInfo , dOMHTMLObjectElementGetHspace , -- ** dOMHTMLObjectElementGetName + DOMHTMLObjectElementGetNameMethodInfo , dOMHTMLObjectElementGetName , -- ** dOMHTMLObjectElementGetStandby + DOMHTMLObjectElementGetStandbyMethodInfo, dOMHTMLObjectElementGetStandby , -- ** dOMHTMLObjectElementGetUseMap + DOMHTMLObjectElementGetUseMapMethodInfo , dOMHTMLObjectElementGetUseMap , -- ** dOMHTMLObjectElementGetValidationMessage + DOMHTMLObjectElementGetValidationMessageMethodInfo, dOMHTMLObjectElementGetValidationMessage, -- ** dOMHTMLObjectElementGetValidity + DOMHTMLObjectElementGetValidityMethodInfo, dOMHTMLObjectElementGetValidity , -- ** dOMHTMLObjectElementGetVspace + DOMHTMLObjectElementGetVspaceMethodInfo , dOMHTMLObjectElementGetVspace , -- ** dOMHTMLObjectElementGetWidth + DOMHTMLObjectElementGetWidthMethodInfo , dOMHTMLObjectElementGetWidth , -- ** dOMHTMLObjectElementGetWillValidate + DOMHTMLObjectElementGetWillValidateMethodInfo, dOMHTMLObjectElementGetWillValidate , -- ** dOMHTMLObjectElementSetAlign + DOMHTMLObjectElementSetAlignMethodInfo , dOMHTMLObjectElementSetAlign , -- ** dOMHTMLObjectElementSetArchive + DOMHTMLObjectElementSetArchiveMethodInfo, dOMHTMLObjectElementSetArchive , -- ** dOMHTMLObjectElementSetBorder + DOMHTMLObjectElementSetBorderMethodInfo , dOMHTMLObjectElementSetBorder , -- ** dOMHTMLObjectElementSetCode + DOMHTMLObjectElementSetCodeMethodInfo , dOMHTMLObjectElementSetCode , -- ** dOMHTMLObjectElementSetCodeBase + DOMHTMLObjectElementSetCodeBaseMethodInfo, dOMHTMLObjectElementSetCodeBase , -- ** dOMHTMLObjectElementSetCodeType + DOMHTMLObjectElementSetCodeTypeMethodInfo, dOMHTMLObjectElementSetCodeType , -- ** dOMHTMLObjectElementSetCustomValidity + DOMHTMLObjectElementSetCustomValidityMethodInfo, dOMHTMLObjectElementSetCustomValidity , -- ** dOMHTMLObjectElementSetData + DOMHTMLObjectElementSetDataMethodInfo , dOMHTMLObjectElementSetData , -- ** dOMHTMLObjectElementSetDeclare + DOMHTMLObjectElementSetDeclareMethodInfo, dOMHTMLObjectElementSetDeclare , -- ** dOMHTMLObjectElementSetHeight + DOMHTMLObjectElementSetHeightMethodInfo , dOMHTMLObjectElementSetHeight , -- ** dOMHTMLObjectElementSetHspace + DOMHTMLObjectElementSetHspaceMethodInfo , dOMHTMLObjectElementSetHspace , -- ** dOMHTMLObjectElementSetName + DOMHTMLObjectElementSetNameMethodInfo , dOMHTMLObjectElementSetName , -- ** dOMHTMLObjectElementSetStandby + DOMHTMLObjectElementSetStandbyMethodInfo, dOMHTMLObjectElementSetStandby , -- ** dOMHTMLObjectElementSetUseMap + DOMHTMLObjectElementSetUseMapMethodInfo , dOMHTMLObjectElementSetUseMap , -- ** dOMHTMLObjectElementSetVspace + DOMHTMLObjectElementSetVspaceMethodInfo , dOMHTMLObjectElementSetVspace , -- ** dOMHTMLObjectElementSetWidth + DOMHTMLObjectElementSetWidthMethodInfo , dOMHTMLObjectElementSetWidth , @@ -340,6 +378,204 @@ noDOMHTMLObjectElement :: Maybe DOMHTMLObjectElement noDOMHTMLObjectElement = Nothing +type family ResolveDOMHTMLObjectElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLObjectElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLObjectElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLObjectElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLObjectElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLObjectElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLObjectElementMethod "checkValidity" o = DOMHTMLObjectElementCheckValidityMethodInfo + ResolveDOMHTMLObjectElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLObjectElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLObjectElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLObjectElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLObjectElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLObjectElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLObjectElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLObjectElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLObjectElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLObjectElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLObjectElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLObjectElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLObjectElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLObjectElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLObjectElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLObjectElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLObjectElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLObjectElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLObjectElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLObjectElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLObjectElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLObjectElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLObjectElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLObjectElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLObjectElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLObjectElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLObjectElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLObjectElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLObjectElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLObjectElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLObjectElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLObjectElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLObjectElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLObjectElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLObjectElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLObjectElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLObjectElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLObjectElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLObjectElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLObjectElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLObjectElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLObjectElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLObjectElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLObjectElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLObjectElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLObjectElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLObjectElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLObjectElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLObjectElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLObjectElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLObjectElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLObjectElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLObjectElementMethod "getAlign" o = DOMHTMLObjectElementGetAlignMethodInfo + ResolveDOMHTMLObjectElementMethod "getArchive" o = DOMHTMLObjectElementGetArchiveMethodInfo + ResolveDOMHTMLObjectElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLObjectElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLObjectElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLObjectElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLObjectElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLObjectElementMethod "getBorder" o = DOMHTMLObjectElementGetBorderMethodInfo + ResolveDOMHTMLObjectElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLObjectElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLObjectElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLObjectElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLObjectElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLObjectElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLObjectElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLObjectElementMethod "getCode" o = DOMHTMLObjectElementGetCodeMethodInfo + ResolveDOMHTMLObjectElementMethod "getCodeBase" o = DOMHTMLObjectElementGetCodeBaseMethodInfo + ResolveDOMHTMLObjectElementMethod "getCodeType" o = DOMHTMLObjectElementGetCodeTypeMethodInfo + ResolveDOMHTMLObjectElementMethod "getContentDocument" o = DOMHTMLObjectElementGetContentDocumentMethodInfo + ResolveDOMHTMLObjectElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLObjectElementMethod "getDeclare" o = DOMHTMLObjectElementGetDeclareMethodInfo + ResolveDOMHTMLObjectElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLObjectElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLObjectElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLObjectElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLObjectElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLObjectElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLObjectElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLObjectElementMethod "getForm" o = DOMHTMLObjectElementGetFormMethodInfo + ResolveDOMHTMLObjectElementMethod "getHeight" o = DOMHTMLObjectElementGetHeightMethodInfo + ResolveDOMHTMLObjectElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLObjectElementMethod "getHspace" o = DOMHTMLObjectElementGetHspaceMethodInfo + ResolveDOMHTMLObjectElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLObjectElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLObjectElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLObjectElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLObjectElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLObjectElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLObjectElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLObjectElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLObjectElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLObjectElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLObjectElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLObjectElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLObjectElementMethod "getName" o = DOMHTMLObjectElementGetNameMethodInfo + ResolveDOMHTMLObjectElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLObjectElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLObjectElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLObjectElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLObjectElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLObjectElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLObjectElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLObjectElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLObjectElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLObjectElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLObjectElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLObjectElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLObjectElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLObjectElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLObjectElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLObjectElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLObjectElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLObjectElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLObjectElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLObjectElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLObjectElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLObjectElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLObjectElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLObjectElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLObjectElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLObjectElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLObjectElementMethod "getStandby" o = DOMHTMLObjectElementGetStandbyMethodInfo + ResolveDOMHTMLObjectElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLObjectElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLObjectElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLObjectElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLObjectElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLObjectElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLObjectElementMethod "getUseMap" o = DOMHTMLObjectElementGetUseMapMethodInfo + ResolveDOMHTMLObjectElementMethod "getValidationMessage" o = DOMHTMLObjectElementGetValidationMessageMethodInfo + ResolveDOMHTMLObjectElementMethod "getValidity" o = DOMHTMLObjectElementGetValidityMethodInfo + ResolveDOMHTMLObjectElementMethod "getVspace" o = DOMHTMLObjectElementGetVspaceMethodInfo + ResolveDOMHTMLObjectElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLObjectElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLObjectElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLObjectElementMethod "getWidth" o = DOMHTMLObjectElementGetWidthMethodInfo + ResolveDOMHTMLObjectElementMethod "getWillValidate" o = DOMHTMLObjectElementGetWillValidateMethodInfo + ResolveDOMHTMLObjectElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLObjectElementMethod "setAlign" o = DOMHTMLObjectElementSetAlignMethodInfo + ResolveDOMHTMLObjectElementMethod "setArchive" o = DOMHTMLObjectElementSetArchiveMethodInfo + ResolveDOMHTMLObjectElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLObjectElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLObjectElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLObjectElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLObjectElementMethod "setBorder" o = DOMHTMLObjectElementSetBorderMethodInfo + ResolveDOMHTMLObjectElementMethod "setCode" o = DOMHTMLObjectElementSetCodeMethodInfo + ResolveDOMHTMLObjectElementMethod "setCodeBase" o = DOMHTMLObjectElementSetCodeBaseMethodInfo + ResolveDOMHTMLObjectElementMethod "setCodeType" o = DOMHTMLObjectElementSetCodeTypeMethodInfo + ResolveDOMHTMLObjectElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLObjectElementMethod "setCustomValidity" o = DOMHTMLObjectElementSetCustomValidityMethodInfo + ResolveDOMHTMLObjectElementMethod "setDeclare" o = DOMHTMLObjectElementSetDeclareMethodInfo + ResolveDOMHTMLObjectElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLObjectElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLObjectElementMethod "setHeight" o = DOMHTMLObjectElementSetHeightMethodInfo + ResolveDOMHTMLObjectElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLObjectElementMethod "setHspace" o = DOMHTMLObjectElementSetHspaceMethodInfo + ResolveDOMHTMLObjectElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLObjectElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLObjectElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLObjectElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLObjectElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLObjectElementMethod "setName" o = DOMHTMLObjectElementSetNameMethodInfo + ResolveDOMHTMLObjectElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLObjectElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLObjectElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLObjectElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLObjectElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLObjectElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLObjectElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLObjectElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLObjectElementMethod "setStandby" o = DOMHTMLObjectElementSetStandbyMethodInfo + ResolveDOMHTMLObjectElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLObjectElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLObjectElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLObjectElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLObjectElementMethod "setUseMap" o = DOMHTMLObjectElementSetUseMapMethodInfo + ResolveDOMHTMLObjectElementMethod "setVspace" o = DOMHTMLObjectElementSetVspaceMethodInfo + ResolveDOMHTMLObjectElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLObjectElementMethod "setWidth" o = DOMHTMLObjectElementSetWidthMethodInfo + ResolveDOMHTMLObjectElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLObjectElementMethod t DOMHTMLObjectElement, MethodInfo info DOMHTMLObjectElement p) => IsLabelProxy t (DOMHTMLObjectElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLObjectElementMethod t DOMHTMLObjectElement, MethodInfo info DOMHTMLObjectElement p) => IsLabel t (DOMHTMLObjectElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -359,7 +595,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementAlignPropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementAlignPropertyInfo = "DOMHTMLObjectElement::align" + type AttrLabel DOMHTMLObjectElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLObjectElementAlign attrSet _ = setDOMHTMLObjectElementAlign attrConstruct _ = constructDOMHTMLObjectElementAlign @@ -383,7 +619,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementArchivePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementArchivePropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementArchivePropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementArchivePropertyInfo = "DOMHTMLObjectElement::archive" + type AttrLabel DOMHTMLObjectElementArchivePropertyInfo = "archive" attrGet _ = getDOMHTMLObjectElementArchive attrSet _ = setDOMHTMLObjectElementArchive attrConstruct _ = constructDOMHTMLObjectElementArchive @@ -407,7 +643,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementBorderPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementBorderPropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementBorderPropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementBorderPropertyInfo = "DOMHTMLObjectElement::border" + type AttrLabel DOMHTMLObjectElementBorderPropertyInfo = "border" attrGet _ = getDOMHTMLObjectElementBorder attrSet _ = setDOMHTMLObjectElementBorder attrConstruct _ = constructDOMHTMLObjectElementBorder @@ -431,7 +667,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementCodePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementCodePropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementCodePropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementCodePropertyInfo = "DOMHTMLObjectElement::code" + type AttrLabel DOMHTMLObjectElementCodePropertyInfo = "code" attrGet _ = getDOMHTMLObjectElementCode attrSet _ = setDOMHTMLObjectElementCode attrConstruct _ = constructDOMHTMLObjectElementCode @@ -455,7 +691,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementCodeBasePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementCodeBasePropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementCodeBasePropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementCodeBasePropertyInfo = "DOMHTMLObjectElement::code-base" + type AttrLabel DOMHTMLObjectElementCodeBasePropertyInfo = "code-base" attrGet _ = getDOMHTMLObjectElementCodeBase attrSet _ = setDOMHTMLObjectElementCodeBase attrConstruct _ = constructDOMHTMLObjectElementCodeBase @@ -479,7 +715,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementCodeTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementCodeTypePropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementCodeTypePropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementCodeTypePropertyInfo = "DOMHTMLObjectElement::code-type" + type AttrLabel DOMHTMLObjectElementCodeTypePropertyInfo = "code-type" attrGet _ = getDOMHTMLObjectElementCodeType attrSet _ = setDOMHTMLObjectElementCodeType attrConstruct _ = constructDOMHTMLObjectElementCodeType @@ -497,7 +733,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementContentDocumentPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLObjectElementContentDocumentPropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementContentDocumentPropertyInfo = DOMDocument - type AttrLabel DOMHTMLObjectElementContentDocumentPropertyInfo = "DOMHTMLObjectElement::content-document" + type AttrLabel DOMHTMLObjectElementContentDocumentPropertyInfo = "content-document" attrGet _ = getDOMHTMLObjectElementContentDocument attrSet _ = undefined attrConstruct _ = undefined @@ -521,7 +757,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementDataPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementDataPropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementDataPropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementDataPropertyInfo = "DOMHTMLObjectElement::data" + type AttrLabel DOMHTMLObjectElementDataPropertyInfo = "data" attrGet _ = getDOMHTMLObjectElementData attrSet _ = setDOMHTMLObjectElementData attrConstruct _ = constructDOMHTMLObjectElementData @@ -545,7 +781,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementDeclarePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLObjectElementDeclarePropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementDeclarePropertyInfo = Bool - type AttrLabel DOMHTMLObjectElementDeclarePropertyInfo = "DOMHTMLObjectElement::declare" + type AttrLabel DOMHTMLObjectElementDeclarePropertyInfo = "declare" attrGet _ = getDOMHTMLObjectElementDeclare attrSet _ = setDOMHTMLObjectElementDeclare attrConstruct _ = constructDOMHTMLObjectElementDeclare @@ -563,7 +799,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementFormPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLObjectElementFormPropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementFormPropertyInfo = DOMHTMLFormElement - type AttrLabel DOMHTMLObjectElementFormPropertyInfo = "DOMHTMLObjectElement::form" + type AttrLabel DOMHTMLObjectElementFormPropertyInfo = "form" attrGet _ = getDOMHTMLObjectElementForm attrSet _ = undefined attrConstruct _ = undefined @@ -587,7 +823,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementHeightPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementHeightPropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementHeightPropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementHeightPropertyInfo = "DOMHTMLObjectElement::height" + type AttrLabel DOMHTMLObjectElementHeightPropertyInfo = "height" attrGet _ = getDOMHTMLObjectElementHeight attrSet _ = setDOMHTMLObjectElementHeight attrConstruct _ = constructDOMHTMLObjectElementHeight @@ -611,7 +847,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementHspacePropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLObjectElementHspacePropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementHspacePropertyInfo = Int64 - type AttrLabel DOMHTMLObjectElementHspacePropertyInfo = "DOMHTMLObjectElement::hspace" + type AttrLabel DOMHTMLObjectElementHspacePropertyInfo = "hspace" attrGet _ = getDOMHTMLObjectElementHspace attrSet _ = setDOMHTMLObjectElementHspace attrConstruct _ = constructDOMHTMLObjectElementHspace @@ -635,7 +871,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementNamePropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementNamePropertyInfo = "DOMHTMLObjectElement::name" + type AttrLabel DOMHTMLObjectElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLObjectElementName attrSet _ = setDOMHTMLObjectElementName attrConstruct _ = constructDOMHTMLObjectElementName @@ -659,7 +895,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementStandbyPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementStandbyPropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementStandbyPropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementStandbyPropertyInfo = "DOMHTMLObjectElement::standby" + type AttrLabel DOMHTMLObjectElementStandbyPropertyInfo = "standby" attrGet _ = getDOMHTMLObjectElementStandby attrSet _ = setDOMHTMLObjectElementStandby attrConstruct _ = constructDOMHTMLObjectElementStandby @@ -683,7 +919,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementTypePropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementTypePropertyInfo = "DOMHTMLObjectElement::type" + type AttrLabel DOMHTMLObjectElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLObjectElementType attrSet _ = setDOMHTMLObjectElementType attrConstruct _ = constructDOMHTMLObjectElementType @@ -707,7 +943,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementUseMapPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementUseMapPropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementUseMapPropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementUseMapPropertyInfo = "DOMHTMLObjectElement::use-map" + type AttrLabel DOMHTMLObjectElementUseMapPropertyInfo = "use-map" attrGet _ = getDOMHTMLObjectElementUseMap attrSet _ = setDOMHTMLObjectElementUseMap attrConstruct _ = constructDOMHTMLObjectElementUseMap @@ -725,7 +961,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementValidationMessagePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLObjectElementValidationMessagePropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementValidationMessagePropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementValidationMessagePropertyInfo = "DOMHTMLObjectElement::validation-message" + type AttrLabel DOMHTMLObjectElementValidationMessagePropertyInfo = "validation-message" attrGet _ = getDOMHTMLObjectElementValidationMessage attrSet _ = undefined attrConstruct _ = undefined @@ -743,7 +979,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementValidityPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLObjectElementValidityPropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementValidityPropertyInfo = DOMValidityState - type AttrLabel DOMHTMLObjectElementValidityPropertyInfo = "DOMHTMLObjectElement::validity" + type AttrLabel DOMHTMLObjectElementValidityPropertyInfo = "validity" attrGet _ = getDOMHTMLObjectElementValidity attrSet _ = undefined attrConstruct _ = undefined @@ -767,7 +1003,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementVspacePropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLObjectElementVspacePropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementVspacePropertyInfo = Int64 - type AttrLabel DOMHTMLObjectElementVspacePropertyInfo = "DOMHTMLObjectElement::vspace" + type AttrLabel DOMHTMLObjectElementVspacePropertyInfo = "vspace" attrGet _ = getDOMHTMLObjectElementVspace attrSet _ = setDOMHTMLObjectElementVspace attrConstruct _ = constructDOMHTMLObjectElementVspace @@ -791,7 +1027,7 @@ type AttrSetTypeConstraint DOMHTMLObjectElementWidthPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLObjectElementWidthPropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementWidthPropertyInfo = T.Text - type AttrLabel DOMHTMLObjectElementWidthPropertyInfo = "DOMHTMLObjectElement::width" + type AttrLabel DOMHTMLObjectElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLObjectElementWidth attrSet _ = setDOMHTMLObjectElementWidth attrConstruct _ = constructDOMHTMLObjectElementWidth @@ -809,22 +1045,21 @@ type AttrSetTypeConstraint DOMHTMLObjectElementWillValidatePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLObjectElementWillValidatePropertyInfo = DOMHTMLObjectElementK type AttrGetType DOMHTMLObjectElementWillValidatePropertyInfo = Bool - type AttrLabel DOMHTMLObjectElementWillValidatePropertyInfo = "DOMHTMLObjectElement::will-validate" + type AttrLabel DOMHTMLObjectElementWillValidatePropertyInfo = "will-validate" attrGet _ = getDOMHTMLObjectElementWillValidate attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHTMLObjectElement = DOMHTMLObjectElementAttributeList -type DOMHTMLObjectElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLObjectElementAlignPropertyInfo), '("archive", DOMHTMLObjectElementArchivePropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("border", DOMHTMLObjectElementBorderPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("code", DOMHTMLObjectElementCodePropertyInfo), '("code-base", DOMHTMLObjectElementCodeBasePropertyInfo), '("code-type", DOMHTMLObjectElementCodeTypePropertyInfo), '("content-document", DOMHTMLObjectElementContentDocumentPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMHTMLObjectElementDataPropertyInfo), '("declare", DOMHTMLObjectElementDeclarePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLObjectElementFormPropertyInfo), '("height", DOMHTMLObjectElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLObjectElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLObjectElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("standby", DOMHTMLObjectElementStandbyPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLObjectElementTypePropertyInfo), '("use-map", DOMHTMLObjectElementUseMapPropertyInfo), '("validation-message", DOMHTMLObjectElementValidationMessagePropertyInfo), '("validity", DOMHTMLObjectElementValidityPropertyInfo), '("vspace", DOMHTMLObjectElementVspacePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLObjectElementWidthPropertyInfo), '("will-validate", DOMHTMLObjectElementWillValidatePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLObjectElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLObjectElementAlignPropertyInfo), '("archive", DOMHTMLObjectElementArchivePropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("border", DOMHTMLObjectElementBorderPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("code", DOMHTMLObjectElementCodePropertyInfo), '("codeBase", DOMHTMLObjectElementCodeBasePropertyInfo), '("codeType", DOMHTMLObjectElementCodeTypePropertyInfo), '("contentDocument", DOMHTMLObjectElementContentDocumentPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("data", DOMHTMLObjectElementDataPropertyInfo), '("declare", DOMHTMLObjectElementDeclarePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLObjectElementFormPropertyInfo), '("height", DOMHTMLObjectElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("hspace", DOMHTMLObjectElementHspacePropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLObjectElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("standby", DOMHTMLObjectElementStandbyPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLObjectElementTypePropertyInfo), '("useMap", DOMHTMLObjectElementUseMapPropertyInfo), '("validationMessage", DOMHTMLObjectElementValidationMessagePropertyInfo), '("validity", DOMHTMLObjectElementValidityPropertyInfo), '("vspace", DOMHTMLObjectElementVspacePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLObjectElementWidthPropertyInfo), '("willValidate", DOMHTMLObjectElementWillValidatePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLObjectElement = DOMHTMLObjectElementSignalList -type DOMHTMLObjectElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLObjectElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLObjectElement::check_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -836,8 +1071,8 @@ dOMHTMLObjectElementCheckValidity :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLObjectElementCheckValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_check_validity _obj' @@ -845,11 +1080,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementCheckValidityMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementCheckValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementCheckValidity + -- method DOMHTMLObjectElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -861,8 +1099,8 @@ dOMHTMLObjectElementGetAlign :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_align _obj' @@ -872,11 +1110,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetAlign + -- method DOMHTMLObjectElement::get_archive -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -888,8 +1129,8 @@ dOMHTMLObjectElementGetArchive :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetArchive _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_archive _obj' @@ -899,11 +1140,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetArchiveMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetArchiveMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetArchive + -- method DOMHTMLObjectElement::get_border -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -915,8 +1159,8 @@ dOMHTMLObjectElementGetBorder :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetBorder _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_border _obj' @@ -926,11 +1170,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetBorderMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetBorderMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetBorder + -- method DOMHTMLObjectElement::get_code -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -942,8 +1189,8 @@ dOMHTMLObjectElementGetCode :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetCode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_code _obj' @@ -953,11 +1200,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetCodeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetCodeMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetCode + -- method DOMHTMLObjectElement::get_code_base -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -969,8 +1219,8 @@ dOMHTMLObjectElementGetCodeBase :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetCodeBase _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_code_base _obj' @@ -980,11 +1230,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetCodeBaseMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetCodeBaseMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetCodeBase + -- method DOMHTMLObjectElement::get_code_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -996,8 +1249,8 @@ dOMHTMLObjectElementGetCodeType :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetCodeType _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_code_type _obj' @@ -1007,11 +1260,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetCodeTypeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetCodeTypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetCodeType + -- method DOMHTMLObjectElement::get_content_document -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDocument" -- throws : False -- Skip return : False @@ -1023,8 +1279,8 @@ dOMHTMLObjectElementGetContentDocument :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m DOMDocument + a -- _obj + -> m DOMDocument -- result dOMHTMLObjectElementGetContentDocument _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_content_document _obj' @@ -1033,11 +1289,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetContentDocumentMethodInfo +instance (signature ~ (m DOMDocument), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetContentDocumentMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetContentDocument + -- method DOMHTMLObjectElement::get_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1049,8 +1308,8 @@ dOMHTMLObjectElementGetData :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetData _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_data _obj' @@ -1060,11 +1319,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetDataMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetDataMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetData + -- method DOMHTMLObjectElement::get_declare -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1076,8 +1338,8 @@ dOMHTMLObjectElementGetDeclare :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLObjectElementGetDeclare _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_declare _obj' @@ -1085,11 +1347,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetDeclareMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetDeclareMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetDeclare + -- method DOMHTMLObjectElement::get_form -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLFormElement" -- throws : False -- Skip return : False @@ -1101,8 +1366,8 @@ dOMHTMLObjectElementGetForm :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m DOMHTMLFormElement + a -- _obj + -> m DOMHTMLFormElement -- result dOMHTMLObjectElementGetForm _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_form _obj' @@ -1111,11 +1376,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetFormMethodInfo +instance (signature ~ (m DOMHTMLFormElement), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetFormMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetForm + -- method DOMHTMLObjectElement::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1127,8 +1395,8 @@ dOMHTMLObjectElementGetHeight :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_height _obj' @@ -1138,11 +1406,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetHeightMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetHeight + -- method DOMHTMLObjectElement::get_hspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1154,19 +1425,22 @@ dOMHTMLObjectElementGetHspace :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLObjectElementGetHspace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_hspace _obj' touchManagedPtr _obj return result +data DOMHTMLObjectElementGetHspaceMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetHspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetHspace + -- method DOMHTMLObjectElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1178,8 +1452,8 @@ dOMHTMLObjectElementGetName :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_name _obj' @@ -1189,11 +1463,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetName + -- method DOMHTMLObjectElement::get_standby -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1205,8 +1482,8 @@ dOMHTMLObjectElementGetStandby :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetStandby _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_standby _obj' @@ -1216,11 +1493,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetStandbyMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetStandbyMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetStandby + -- method DOMHTMLObjectElement::get_use_map -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1232,8 +1512,8 @@ dOMHTMLObjectElementGetUseMap :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetUseMap _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_use_map _obj' @@ -1243,11 +1523,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetUseMapMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetUseMapMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetUseMap + -- method DOMHTMLObjectElement::get_validation_message -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1259,8 +1542,8 @@ dOMHTMLObjectElementGetValidationMessage :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetValidationMessage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_validation_message _obj' @@ -1270,11 +1553,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetValidationMessageMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetValidationMessageMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetValidationMessage + -- method DOMHTMLObjectElement::get_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMValidityState" -- throws : False -- Skip return : False @@ -1286,8 +1572,8 @@ dOMHTMLObjectElementGetValidity :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m DOMValidityState + a -- _obj + -> m DOMValidityState -- result dOMHTMLObjectElementGetValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_validity _obj' @@ -1296,11 +1582,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetValidityMethodInfo +instance (signature ~ (m DOMValidityState), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetValidity + -- method DOMHTMLObjectElement::get_vspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1312,19 +1601,22 @@ dOMHTMLObjectElementGetVspace :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLObjectElementGetVspace _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_vspace _obj' touchManagedPtr _obj return result +data DOMHTMLObjectElementGetVspaceMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetVspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetVspace + -- method DOMHTMLObjectElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1336,8 +1628,8 @@ dOMHTMLObjectElementGetWidth :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLObjectElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_width _obj' @@ -1347,11 +1639,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetWidthMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetWidth + -- method DOMHTMLObjectElement::get_will_validate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1363,8 +1658,8 @@ dOMHTMLObjectElementGetWillValidate :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLObjectElementGetWillValidate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_object_element_get_will_validate _obj' @@ -1372,11 +1667,14 @@ touchManagedPtr _obj return result' +data DOMHTMLObjectElementGetWillValidateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementGetWillValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementGetWillValidate + -- method DOMHTMLObjectElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1389,9 +1687,9 @@ dOMHTMLObjectElementSetAlign :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1400,11 +1698,14 @@ freeMem value' return () +data DOMHTMLObjectElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetAlign + -- method DOMHTMLObjectElement::set_archive -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1417,9 +1718,9 @@ dOMHTMLObjectElementSetArchive :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetArchive _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1428,11 +1729,14 @@ freeMem value' return () +data DOMHTMLObjectElementSetArchiveMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetArchiveMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetArchive + -- method DOMHTMLObjectElement::set_border -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1445,9 +1749,9 @@ dOMHTMLObjectElementSetBorder :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetBorder _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1456,11 +1760,14 @@ freeMem value' return () +data DOMHTMLObjectElementSetBorderMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetBorderMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetBorder + -- method DOMHTMLObjectElement::set_code -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1473,9 +1780,9 @@ dOMHTMLObjectElementSetCode :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetCode _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1484,11 +1791,14 @@ freeMem value' return () +data DOMHTMLObjectElementSetCodeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetCodeMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetCode + -- method DOMHTMLObjectElement::set_code_base -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1501,9 +1811,9 @@ dOMHTMLObjectElementSetCodeBase :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetCodeBase _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1512,11 +1822,14 @@ freeMem value' return () +data DOMHTMLObjectElementSetCodeBaseMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetCodeBaseMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetCodeBase + -- method DOMHTMLObjectElement::set_code_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1529,9 +1842,9 @@ dOMHTMLObjectElementSetCodeType :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetCodeType _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1540,11 +1853,14 @@ freeMem value' return () +data DOMHTMLObjectElementSetCodeTypeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetCodeTypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetCodeType + -- method DOMHTMLObjectElement::set_custom_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1557,9 +1873,9 @@ dOMHTMLObjectElementSetCustomValidity :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- error - m () + a -- _obj + -> T.Text -- error_ + -> m () -- result dOMHTMLObjectElementSetCustomValidity _obj error_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj error_' <- textToCString error_ @@ -1568,11 +1884,14 @@ freeMem error_' return () +data DOMHTMLObjectElementSetCustomValidityMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetCustomValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetCustomValidity + -- method DOMHTMLObjectElement::set_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1585,9 +1904,9 @@ dOMHTMLObjectElementSetData :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetData _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1596,11 +1915,14 @@ freeMem value' return () +data DOMHTMLObjectElementSetDataMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetDataMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetData + -- method DOMHTMLObjectElement::set_declare -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1613,9 +1935,9 @@ dOMHTMLObjectElementSetDeclare :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLObjectElementSetDeclare _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1623,11 +1945,14 @@ touchManagedPtr _obj return () +data DOMHTMLObjectElementSetDeclareMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetDeclareMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetDeclare + -- method DOMHTMLObjectElement::set_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1640,9 +1965,9 @@ dOMHTMLObjectElementSetHeight :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1651,11 +1976,14 @@ freeMem value' return () +data DOMHTMLObjectElementSetHeightMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetHeight + -- method DOMHTMLObjectElement::set_hspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1668,20 +1996,23 @@ dOMHTMLObjectElementSetHspace :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLObjectElementSetHspace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_object_element_set_hspace _obj' value touchManagedPtr _obj return () +data DOMHTMLObjectElementSetHspaceMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetHspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetHspace + -- method DOMHTMLObjectElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1694,9 +2025,9 @@ dOMHTMLObjectElementSetName :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1705,11 +2036,14 @@ freeMem value' return () +data DOMHTMLObjectElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetName + -- method DOMHTMLObjectElement::set_standby -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1722,9 +2056,9 @@ dOMHTMLObjectElementSetStandby :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetStandby _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1733,11 +2067,14 @@ freeMem value' return () +data DOMHTMLObjectElementSetStandbyMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetStandbyMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetStandby + -- method DOMHTMLObjectElement::set_use_map -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1750,9 +2087,9 @@ dOMHTMLObjectElementSetUseMap :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetUseMap _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1761,11 +2098,14 @@ freeMem value' return () +data DOMHTMLObjectElementSetUseMapMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetUseMapMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetUseMap + -- method DOMHTMLObjectElement::set_vspace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1778,20 +2118,23 @@ dOMHTMLObjectElementSetVspace :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLObjectElementSetVspace _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_object_element_set_vspace _obj' value touchManagedPtr _obj return () +data DOMHTMLObjectElementSetVspaceMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetVspaceMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetVspace + -- method DOMHTMLObjectElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLObjectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1804,9 +2147,9 @@ dOMHTMLObjectElementSetWidth :: (MonadIO m, DOMHTMLObjectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLObjectElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1814,5 +2157,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLObjectElementSetWidthMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLObjectElementK a) => MethodInfo DOMHTMLObjectElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLObjectElementSetWidth diff --git a/GI/WebKit/Objects/DOMHTMLObjectElement.hs-boot b/GI/WebKit/Objects/DOMHTMLObjectElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLObjectElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLObjectElement.hs-boot @@ -32,3 +32,40 @@ data DOMHTMLObjectElementVspacePropertyInfo data DOMHTMLObjectElementWidthPropertyInfo data DOMHTMLObjectElementWillValidatePropertyInfo +data DOMHTMLObjectElementCheckValidityMethodInfo +data DOMHTMLObjectElementGetAlignMethodInfo +data DOMHTMLObjectElementGetArchiveMethodInfo +data DOMHTMLObjectElementGetBorderMethodInfo +data DOMHTMLObjectElementGetCodeMethodInfo +data DOMHTMLObjectElementGetCodeBaseMethodInfo +data DOMHTMLObjectElementGetCodeTypeMethodInfo +data DOMHTMLObjectElementGetContentDocumentMethodInfo +data DOMHTMLObjectElementGetDataMethodInfo +data DOMHTMLObjectElementGetDeclareMethodInfo +data DOMHTMLObjectElementGetFormMethodInfo +data DOMHTMLObjectElementGetHeightMethodInfo +data DOMHTMLObjectElementGetHspaceMethodInfo +data DOMHTMLObjectElementGetNameMethodInfo +data DOMHTMLObjectElementGetStandbyMethodInfo +data DOMHTMLObjectElementGetUseMapMethodInfo +data DOMHTMLObjectElementGetValidationMessageMethodInfo +data DOMHTMLObjectElementGetValidityMethodInfo +data DOMHTMLObjectElementGetVspaceMethodInfo +data DOMHTMLObjectElementGetWidthMethodInfo +data DOMHTMLObjectElementGetWillValidateMethodInfo +data DOMHTMLObjectElementSetAlignMethodInfo +data DOMHTMLObjectElementSetArchiveMethodInfo +data DOMHTMLObjectElementSetBorderMethodInfo +data DOMHTMLObjectElementSetCodeMethodInfo +data DOMHTMLObjectElementSetCodeBaseMethodInfo +data DOMHTMLObjectElementSetCodeTypeMethodInfo +data DOMHTMLObjectElementSetCustomValidityMethodInfo +data DOMHTMLObjectElementSetDataMethodInfo +data DOMHTMLObjectElementSetDeclareMethodInfo +data DOMHTMLObjectElementSetHeightMethodInfo +data DOMHTMLObjectElementSetHspaceMethodInfo +data DOMHTMLObjectElementSetNameMethodInfo +data DOMHTMLObjectElementSetStandbyMethodInfo +data DOMHTMLObjectElementSetUseMapMethodInfo +data DOMHTMLObjectElementSetVspaceMethodInfo +data DOMHTMLObjectElementSetWidthMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLOptGroupElement.hs b/GI/WebKit/Objects/DOMHTMLOptGroupElement.hs --- a/GI/WebKit/Objects/DOMHTMLOptGroupElement.hs +++ b/GI/WebKit/Objects/DOMHTMLOptGroupElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMHTMLOptGroupElementGetDisabled + DOMHTMLOptGroupElementGetDisabledMethodInfo, dOMHTMLOptGroupElementGetDisabled , -- ** dOMHTMLOptGroupElementGetLabel + DOMHTMLOptGroupElementGetLabelMethodInfo, dOMHTMLOptGroupElementGetLabel , -- ** dOMHTMLOptGroupElementSetDisabled + DOMHTMLOptGroupElementSetDisabledMethodInfo, dOMHTMLOptGroupElementSetDisabled , -- ** dOMHTMLOptGroupElementSetLabel + DOMHTMLOptGroupElementSetLabelMethodInfo, dOMHTMLOptGroupElementSetLabel , @@ -85,6 +90,175 @@ noDOMHTMLOptGroupElement :: Maybe DOMHTMLOptGroupElement noDOMHTMLOptGroupElement = Nothing +type family ResolveDOMHTMLOptGroupElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLOptGroupElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLOptGroupElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLOptGroupElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLOptGroupElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLOptGroupElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLOptGroupElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLOptGroupElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLOptGroupElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLOptGroupElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLOptGroupElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLOptGroupElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLOptGroupElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLOptGroupElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLOptGroupElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLOptGroupElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLOptGroupElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLOptGroupElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLOptGroupElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLOptGroupElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLOptGroupElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLOptGroupElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLOptGroupElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLOptGroupElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLOptGroupElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLOptGroupElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLOptGroupElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLOptGroupElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLOptGroupElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLOptGroupElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLOptGroupElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLOptGroupElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLOptGroupElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLOptGroupElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLOptGroupElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLOptGroupElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLOptGroupElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLOptGroupElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLOptGroupElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLOptGroupElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLOptGroupElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLOptGroupElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLOptGroupElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLOptGroupElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLOptGroupElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLOptGroupElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLOptGroupElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLOptGroupElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getDisabled" o = DOMHTMLOptGroupElementGetDisabledMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getLabel" o = DOMHTMLOptGroupElementGetLabelMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLOptGroupElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setDisabled" o = DOMHTMLOptGroupElementSetDisabledMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setLabel" o = DOMHTMLOptGroupElementSetLabelMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLOptGroupElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLOptGroupElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLOptGroupElementMethod t DOMHTMLOptGroupElement, MethodInfo info DOMHTMLOptGroupElement p) => IsLabelProxy t (DOMHTMLOptGroupElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLOptGroupElementMethod t DOMHTMLOptGroupElement, MethodInfo info DOMHTMLOptGroupElement p) => IsLabel t (DOMHTMLOptGroupElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "disabled" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -104,7 +278,7 @@ type AttrSetTypeConstraint DOMHTMLOptGroupElementDisabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLOptGroupElementDisabledPropertyInfo = DOMHTMLOptGroupElementK type AttrGetType DOMHTMLOptGroupElementDisabledPropertyInfo = Bool - type AttrLabel DOMHTMLOptGroupElementDisabledPropertyInfo = "DOMHTMLOptGroupElement::disabled" + type AttrLabel DOMHTMLOptGroupElementDisabledPropertyInfo = "disabled" attrGet _ = getDOMHTMLOptGroupElementDisabled attrSet _ = setDOMHTMLOptGroupElementDisabled attrConstruct _ = constructDOMHTMLOptGroupElementDisabled @@ -128,22 +302,21 @@ type AttrSetTypeConstraint DOMHTMLOptGroupElementLabelPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLOptGroupElementLabelPropertyInfo = DOMHTMLOptGroupElementK type AttrGetType DOMHTMLOptGroupElementLabelPropertyInfo = T.Text - type AttrLabel DOMHTMLOptGroupElementLabelPropertyInfo = "DOMHTMLOptGroupElement::label" + type AttrLabel DOMHTMLOptGroupElementLabelPropertyInfo = "label" attrGet _ = getDOMHTMLOptGroupElementLabel attrSet _ = setDOMHTMLOptGroupElementLabel attrConstruct _ = constructDOMHTMLOptGroupElementLabel type instance AttributeList DOMHTMLOptGroupElement = DOMHTMLOptGroupElementAttributeList -type DOMHTMLOptGroupElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLOptGroupElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("label", DOMHTMLOptGroupElementLabelPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLOptGroupElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLOptGroupElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("label", DOMHTMLOptGroupElementLabelPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLOptGroupElement = DOMHTMLOptGroupElementSignalList -type DOMHTMLOptGroupElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLOptGroupElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLOptGroupElement::get_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -155,8 +328,8 @@ dOMHTMLOptGroupElementGetDisabled :: (MonadIO m, DOMHTMLOptGroupElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLOptGroupElementGetDisabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_opt_group_element_get_disabled _obj' @@ -164,11 +337,14 @@ touchManagedPtr _obj return result' +data DOMHTMLOptGroupElementGetDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLOptGroupElementK a) => MethodInfo DOMHTMLOptGroupElementGetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptGroupElementGetDisabled + -- method DOMHTMLOptGroupElement::get_label -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -180,8 +356,8 @@ dOMHTMLOptGroupElementGetLabel :: (MonadIO m, DOMHTMLOptGroupElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLOptGroupElementGetLabel _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_opt_group_element_get_label _obj' @@ -191,11 +367,14 @@ touchManagedPtr _obj return result' +data DOMHTMLOptGroupElementGetLabelMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLOptGroupElementK a) => MethodInfo DOMHTMLOptGroupElementGetLabelMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptGroupElementGetLabel + -- method DOMHTMLOptGroupElement::set_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -208,9 +387,9 @@ dOMHTMLOptGroupElementSetDisabled :: (MonadIO m, DOMHTMLOptGroupElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLOptGroupElementSetDisabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -218,11 +397,14 @@ touchManagedPtr _obj return () +data DOMHTMLOptGroupElementSetDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLOptGroupElementK a) => MethodInfo DOMHTMLOptGroupElementSetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptGroupElementSetDisabled + -- method DOMHTMLOptGroupElement::set_label -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptGroupElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -235,9 +417,9 @@ dOMHTMLOptGroupElementSetLabel :: (MonadIO m, DOMHTMLOptGroupElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLOptGroupElementSetLabel _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -245,5 +427,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLOptGroupElementSetLabelMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLOptGroupElementK a) => MethodInfo DOMHTMLOptGroupElementSetLabelMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptGroupElementSetLabel diff --git a/GI/WebKit/Objects/DOMHTMLOptGroupElement.hs-boot b/GI/WebKit/Objects/DOMHTMLOptGroupElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLOptGroupElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLOptGroupElement.hs-boot @@ -13,3 +13,7 @@ instance (GObject o, IsDescendantOf DOMHTMLOptGroupElement o) => DOMHTMLOptGroupElementK o data DOMHTMLOptGroupElementDisabledPropertyInfo data DOMHTMLOptGroupElementLabelPropertyInfo +data DOMHTMLOptGroupElementGetDisabledMethodInfo +data DOMHTMLOptGroupElementGetLabelMethodInfo +data DOMHTMLOptGroupElementSetDisabledMethodInfo +data DOMHTMLOptGroupElementSetLabelMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLOptionElement.hs b/GI/WebKit/Objects/DOMHTMLOptionElement.hs --- a/GI/WebKit/Objects/DOMHTMLOptionElement.hs +++ b/GI/WebKit/Objects/DOMHTMLOptionElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,54 +18,67 @@ -- * Methods -- ** dOMHTMLOptionElementGetDefaultSelected + DOMHTMLOptionElementGetDefaultSelectedMethodInfo, dOMHTMLOptionElementGetDefaultSelected , -- ** dOMHTMLOptionElementGetDisabled + DOMHTMLOptionElementGetDisabledMethodInfo, dOMHTMLOptionElementGetDisabled , -- ** dOMHTMLOptionElementGetForm + DOMHTMLOptionElementGetFormMethodInfo , dOMHTMLOptionElementGetForm , -- ** dOMHTMLOptionElementGetIndex + DOMHTMLOptionElementGetIndexMethodInfo , dOMHTMLOptionElementGetIndex , -- ** dOMHTMLOptionElementGetLabel + DOMHTMLOptionElementGetLabelMethodInfo , dOMHTMLOptionElementGetLabel , -- ** dOMHTMLOptionElementGetSelected + DOMHTMLOptionElementGetSelectedMethodInfo, dOMHTMLOptionElementGetSelected , -- ** dOMHTMLOptionElementGetText + DOMHTMLOptionElementGetTextMethodInfo , dOMHTMLOptionElementGetText , -- ** dOMHTMLOptionElementGetValue + DOMHTMLOptionElementGetValueMethodInfo , dOMHTMLOptionElementGetValue , -- ** dOMHTMLOptionElementSetDefaultSelected + DOMHTMLOptionElementSetDefaultSelectedMethodInfo, dOMHTMLOptionElementSetDefaultSelected , -- ** dOMHTMLOptionElementSetDisabled + DOMHTMLOptionElementSetDisabledMethodInfo, dOMHTMLOptionElementSetDisabled , -- ** dOMHTMLOptionElementSetLabel + DOMHTMLOptionElementSetLabelMethodInfo , dOMHTMLOptionElementSetLabel , -- ** dOMHTMLOptionElementSetSelected + DOMHTMLOptionElementSetSelectedMethodInfo, dOMHTMLOptionElementSetSelected , -- ** dOMHTMLOptionElementSetValue + DOMHTMLOptionElementSetValueMethodInfo , dOMHTMLOptionElementSetValue , @@ -157,6 +171,184 @@ noDOMHTMLOptionElement :: Maybe DOMHTMLOptionElement noDOMHTMLOptionElement = Nothing +type family ResolveDOMHTMLOptionElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLOptionElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLOptionElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLOptionElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLOptionElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLOptionElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLOptionElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLOptionElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLOptionElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLOptionElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLOptionElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLOptionElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLOptionElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLOptionElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLOptionElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLOptionElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLOptionElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLOptionElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLOptionElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLOptionElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLOptionElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLOptionElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLOptionElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLOptionElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLOptionElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLOptionElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLOptionElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLOptionElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLOptionElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLOptionElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLOptionElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLOptionElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLOptionElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLOptionElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLOptionElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLOptionElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLOptionElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLOptionElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLOptionElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLOptionElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLOptionElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLOptionElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLOptionElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLOptionElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLOptionElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLOptionElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLOptionElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLOptionElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLOptionElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLOptionElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLOptionElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLOptionElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLOptionElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLOptionElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLOptionElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLOptionElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLOptionElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLOptionElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLOptionElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLOptionElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLOptionElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLOptionElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLOptionElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLOptionElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLOptionElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLOptionElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLOptionElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLOptionElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLOptionElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLOptionElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLOptionElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLOptionElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLOptionElementMethod "getDefaultSelected" o = DOMHTMLOptionElementGetDefaultSelectedMethodInfo + ResolveDOMHTMLOptionElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLOptionElementMethod "getDisabled" o = DOMHTMLOptionElementGetDisabledMethodInfo + ResolveDOMHTMLOptionElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLOptionElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLOptionElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLOptionElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLOptionElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLOptionElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLOptionElementMethod "getForm" o = DOMHTMLOptionElementGetFormMethodInfo + ResolveDOMHTMLOptionElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLOptionElementMethod "getIndex" o = DOMHTMLOptionElementGetIndexMethodInfo + ResolveDOMHTMLOptionElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLOptionElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLOptionElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLOptionElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLOptionElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLOptionElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLOptionElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLOptionElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLOptionElementMethod "getLabel" o = DOMHTMLOptionElementGetLabelMethodInfo + ResolveDOMHTMLOptionElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLOptionElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLOptionElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLOptionElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLOptionElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLOptionElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLOptionElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLOptionElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLOptionElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLOptionElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLOptionElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLOptionElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLOptionElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLOptionElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLOptionElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLOptionElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLOptionElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLOptionElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLOptionElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLOptionElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLOptionElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLOptionElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLOptionElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLOptionElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLOptionElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLOptionElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLOptionElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLOptionElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLOptionElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLOptionElementMethod "getSelected" o = DOMHTMLOptionElementGetSelectedMethodInfo + ResolveDOMHTMLOptionElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLOptionElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLOptionElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLOptionElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLOptionElementMethod "getText" o = DOMHTMLOptionElementGetTextMethodInfo + ResolveDOMHTMLOptionElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLOptionElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLOptionElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLOptionElementMethod "getValue" o = DOMHTMLOptionElementGetValueMethodInfo + ResolveDOMHTMLOptionElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLOptionElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLOptionElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLOptionElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLOptionElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLOptionElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLOptionElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLOptionElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLOptionElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLOptionElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLOptionElementMethod "setDefaultSelected" o = DOMHTMLOptionElementSetDefaultSelectedMethodInfo + ResolveDOMHTMLOptionElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLOptionElementMethod "setDisabled" o = DOMHTMLOptionElementSetDisabledMethodInfo + ResolveDOMHTMLOptionElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLOptionElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLOptionElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLOptionElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLOptionElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLOptionElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLOptionElementMethod "setLabel" o = DOMHTMLOptionElementSetLabelMethodInfo + ResolveDOMHTMLOptionElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLOptionElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLOptionElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLOptionElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLOptionElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLOptionElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLOptionElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLOptionElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLOptionElementMethod "setSelected" o = DOMHTMLOptionElementSetSelectedMethodInfo + ResolveDOMHTMLOptionElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLOptionElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLOptionElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLOptionElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLOptionElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLOptionElementMethod "setValue" o = DOMHTMLOptionElementSetValueMethodInfo + ResolveDOMHTMLOptionElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLOptionElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLOptionElementMethod t DOMHTMLOptionElement, MethodInfo info DOMHTMLOptionElement p) => IsLabelProxy t (DOMHTMLOptionElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLOptionElementMethod t DOMHTMLOptionElement, MethodInfo info DOMHTMLOptionElement p) => IsLabel t (DOMHTMLOptionElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "default-selected" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -176,7 +368,7 @@ type AttrSetTypeConstraint DOMHTMLOptionElementDefaultSelectedPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLOptionElementDefaultSelectedPropertyInfo = DOMHTMLOptionElementK type AttrGetType DOMHTMLOptionElementDefaultSelectedPropertyInfo = Bool - type AttrLabel DOMHTMLOptionElementDefaultSelectedPropertyInfo = "DOMHTMLOptionElement::default-selected" + type AttrLabel DOMHTMLOptionElementDefaultSelectedPropertyInfo = "default-selected" attrGet _ = getDOMHTMLOptionElementDefaultSelected attrSet _ = setDOMHTMLOptionElementDefaultSelected attrConstruct _ = constructDOMHTMLOptionElementDefaultSelected @@ -200,7 +392,7 @@ type AttrSetTypeConstraint DOMHTMLOptionElementDisabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLOptionElementDisabledPropertyInfo = DOMHTMLOptionElementK type AttrGetType DOMHTMLOptionElementDisabledPropertyInfo = Bool - type AttrLabel DOMHTMLOptionElementDisabledPropertyInfo = "DOMHTMLOptionElement::disabled" + type AttrLabel DOMHTMLOptionElementDisabledPropertyInfo = "disabled" attrGet _ = getDOMHTMLOptionElementDisabled attrSet _ = setDOMHTMLOptionElementDisabled attrConstruct _ = constructDOMHTMLOptionElementDisabled @@ -218,7 +410,7 @@ type AttrSetTypeConstraint DOMHTMLOptionElementFormPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLOptionElementFormPropertyInfo = DOMHTMLOptionElementK type AttrGetType DOMHTMLOptionElementFormPropertyInfo = DOMHTMLFormElement - type AttrLabel DOMHTMLOptionElementFormPropertyInfo = "DOMHTMLOptionElement::form" + type AttrLabel DOMHTMLOptionElementFormPropertyInfo = "form" attrGet _ = getDOMHTMLOptionElementForm attrSet _ = undefined attrConstruct _ = undefined @@ -236,7 +428,7 @@ type AttrSetTypeConstraint DOMHTMLOptionElementIndexPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLOptionElementIndexPropertyInfo = DOMHTMLOptionElementK type AttrGetType DOMHTMLOptionElementIndexPropertyInfo = Int64 - type AttrLabel DOMHTMLOptionElementIndexPropertyInfo = "DOMHTMLOptionElement::index" + type AttrLabel DOMHTMLOptionElementIndexPropertyInfo = "index" attrGet _ = getDOMHTMLOptionElementIndex attrSet _ = undefined attrConstruct _ = undefined @@ -260,7 +452,7 @@ type AttrSetTypeConstraint DOMHTMLOptionElementLabelPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLOptionElementLabelPropertyInfo = DOMHTMLOptionElementK type AttrGetType DOMHTMLOptionElementLabelPropertyInfo = T.Text - type AttrLabel DOMHTMLOptionElementLabelPropertyInfo = "DOMHTMLOptionElement::label" + type AttrLabel DOMHTMLOptionElementLabelPropertyInfo = "label" attrGet _ = getDOMHTMLOptionElementLabel attrSet _ = setDOMHTMLOptionElementLabel attrConstruct _ = constructDOMHTMLOptionElementLabel @@ -284,7 +476,7 @@ type AttrSetTypeConstraint DOMHTMLOptionElementSelectedPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLOptionElementSelectedPropertyInfo = DOMHTMLOptionElementK type AttrGetType DOMHTMLOptionElementSelectedPropertyInfo = Bool - type AttrLabel DOMHTMLOptionElementSelectedPropertyInfo = "DOMHTMLOptionElement::selected" + type AttrLabel DOMHTMLOptionElementSelectedPropertyInfo = "selected" attrGet _ = getDOMHTMLOptionElementSelected attrSet _ = setDOMHTMLOptionElementSelected attrConstruct _ = constructDOMHTMLOptionElementSelected @@ -302,7 +494,7 @@ type AttrSetTypeConstraint DOMHTMLOptionElementTextPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLOptionElementTextPropertyInfo = DOMHTMLOptionElementK type AttrGetType DOMHTMLOptionElementTextPropertyInfo = T.Text - type AttrLabel DOMHTMLOptionElementTextPropertyInfo = "DOMHTMLOptionElement::text" + type AttrLabel DOMHTMLOptionElementTextPropertyInfo = "text" attrGet _ = getDOMHTMLOptionElementText attrSet _ = undefined attrConstruct _ = undefined @@ -326,22 +518,21 @@ type AttrSetTypeConstraint DOMHTMLOptionElementValuePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLOptionElementValuePropertyInfo = DOMHTMLOptionElementK type AttrGetType DOMHTMLOptionElementValuePropertyInfo = T.Text - type AttrLabel DOMHTMLOptionElementValuePropertyInfo = "DOMHTMLOptionElement::value" + type AttrLabel DOMHTMLOptionElementValuePropertyInfo = "value" attrGet _ = getDOMHTMLOptionElementValue attrSet _ = setDOMHTMLOptionElementValue attrConstruct _ = constructDOMHTMLOptionElementValue type instance AttributeList DOMHTMLOptionElement = DOMHTMLOptionElementAttributeList -type DOMHTMLOptionElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("default-selected", DOMHTMLOptionElementDefaultSelectedPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLOptionElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLOptionElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("index", DOMHTMLOptionElementIndexPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("label", DOMHTMLOptionElementLabelPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("selected", DOMHTMLOptionElementSelectedPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text", DOMHTMLOptionElementTextPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("value", DOMHTMLOptionElementValuePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLOptionElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("defaultSelected", DOMHTMLOptionElementDefaultSelectedPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLOptionElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLOptionElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("index", DOMHTMLOptionElementIndexPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("label", DOMHTMLOptionElementLabelPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("selected", DOMHTMLOptionElementSelectedPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("text", DOMHTMLOptionElementTextPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("value", DOMHTMLOptionElementValuePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLOptionElement = DOMHTMLOptionElementSignalList -type DOMHTMLOptionElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLOptionElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLOptionElement::get_default_selected -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -353,8 +544,8 @@ dOMHTMLOptionElementGetDefaultSelected :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLOptionElementGetDefaultSelected _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_option_element_get_default_selected _obj' @@ -362,11 +553,14 @@ touchManagedPtr _obj return result' +data DOMHTMLOptionElementGetDefaultSelectedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementGetDefaultSelectedMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementGetDefaultSelected + -- method DOMHTMLOptionElement::get_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -378,8 +572,8 @@ dOMHTMLOptionElementGetDisabled :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLOptionElementGetDisabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_option_element_get_disabled _obj' @@ -387,11 +581,14 @@ touchManagedPtr _obj return result' +data DOMHTMLOptionElementGetDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementGetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementGetDisabled + -- method DOMHTMLOptionElement::get_form -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLFormElement" -- throws : False -- Skip return : False @@ -403,8 +600,8 @@ dOMHTMLOptionElementGetForm :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - m DOMHTMLFormElement + a -- _obj + -> m DOMHTMLFormElement -- result dOMHTMLOptionElementGetForm _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_option_element_get_form _obj' @@ -413,11 +610,14 @@ touchManagedPtr _obj return result' +data DOMHTMLOptionElementGetFormMethodInfo +instance (signature ~ (m DOMHTMLFormElement), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementGetFormMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementGetForm + -- method DOMHTMLOptionElement::get_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -429,19 +629,22 @@ dOMHTMLOptionElementGetIndex :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLOptionElementGetIndex _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_option_element_get_index _obj' touchManagedPtr _obj return result +data DOMHTMLOptionElementGetIndexMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementGetIndexMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementGetIndex + -- method DOMHTMLOptionElement::get_label -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -453,8 +656,8 @@ dOMHTMLOptionElementGetLabel :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLOptionElementGetLabel _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_option_element_get_label _obj' @@ -464,11 +667,14 @@ touchManagedPtr _obj return result' +data DOMHTMLOptionElementGetLabelMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementGetLabelMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementGetLabel + -- method DOMHTMLOptionElement::get_selected -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -480,8 +686,8 @@ dOMHTMLOptionElementGetSelected :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLOptionElementGetSelected _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_option_element_get_selected _obj' @@ -489,11 +695,14 @@ touchManagedPtr _obj return result' +data DOMHTMLOptionElementGetSelectedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementGetSelectedMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementGetSelected + -- method DOMHTMLOptionElement::get_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -505,8 +714,8 @@ dOMHTMLOptionElementGetText :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLOptionElementGetText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_option_element_get_text _obj' @@ -516,11 +725,14 @@ touchManagedPtr _obj return result' +data DOMHTMLOptionElementGetTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementGetTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementGetText + -- method DOMHTMLOptionElement::get_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -532,8 +744,8 @@ dOMHTMLOptionElementGetValue :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLOptionElementGetValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_option_element_get_value _obj' @@ -543,11 +755,14 @@ touchManagedPtr _obj return result' +data DOMHTMLOptionElementGetValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementGetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementGetValue + -- method DOMHTMLOptionElement::set_default_selected -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -560,9 +775,9 @@ dOMHTMLOptionElementSetDefaultSelected :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLOptionElementSetDefaultSelected _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -570,11 +785,14 @@ touchManagedPtr _obj return () +data DOMHTMLOptionElementSetDefaultSelectedMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementSetDefaultSelectedMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementSetDefaultSelected + -- method DOMHTMLOptionElement::set_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -587,9 +805,9 @@ dOMHTMLOptionElementSetDisabled :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLOptionElementSetDisabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -597,11 +815,14 @@ touchManagedPtr _obj return () +data DOMHTMLOptionElementSetDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementSetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementSetDisabled + -- method DOMHTMLOptionElement::set_label -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -614,9 +835,9 @@ dOMHTMLOptionElementSetLabel :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLOptionElementSetLabel _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -625,11 +846,14 @@ freeMem value' return () +data DOMHTMLOptionElementSetLabelMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementSetLabelMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementSetLabel + -- method DOMHTMLOptionElement::set_selected -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -642,9 +866,9 @@ dOMHTMLOptionElementSetSelected :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLOptionElementSetSelected _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -652,11 +876,14 @@ touchManagedPtr _obj return () +data DOMHTMLOptionElementSetSelectedMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementSetSelectedMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementSetSelected + -- method DOMHTMLOptionElement::set_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -669,9 +896,9 @@ dOMHTMLOptionElementSetValue :: (MonadIO m, DOMHTMLOptionElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLOptionElementSetValue _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -679,5 +906,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLOptionElementSetValueMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLOptionElementK a) => MethodInfo DOMHTMLOptionElementSetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionElementSetValue diff --git a/GI/WebKit/Objects/DOMHTMLOptionElement.hs-boot b/GI/WebKit/Objects/DOMHTMLOptionElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLOptionElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLOptionElement.hs-boot @@ -19,3 +19,16 @@ data DOMHTMLOptionElementSelectedPropertyInfo data DOMHTMLOptionElementTextPropertyInfo data DOMHTMLOptionElementValuePropertyInfo +data DOMHTMLOptionElementGetDefaultSelectedMethodInfo +data DOMHTMLOptionElementGetDisabledMethodInfo +data DOMHTMLOptionElementGetFormMethodInfo +data DOMHTMLOptionElementGetIndexMethodInfo +data DOMHTMLOptionElementGetLabelMethodInfo +data DOMHTMLOptionElementGetSelectedMethodInfo +data DOMHTMLOptionElementGetTextMethodInfo +data DOMHTMLOptionElementGetValueMethodInfo +data DOMHTMLOptionElementSetDefaultSelectedMethodInfo +data DOMHTMLOptionElementSetDisabledMethodInfo +data DOMHTMLOptionElementSetLabelMethodInfo +data DOMHTMLOptionElementSetSelectedMethodInfo +data DOMHTMLOptionElementSetValueMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLOptionsCollection.hs b/GI/WebKit/Objects/DOMHTMLOptionsCollection.hs --- a/GI/WebKit/Objects/DOMHTMLOptionsCollection.hs +++ b/GI/WebKit/Objects/DOMHTMLOptionsCollection.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMHTMLOptionsCollectionGetLength + DOMHTMLOptionsCollectionGetLengthMethodInfo, dOMHTMLOptionsCollectionGetLength , -- ** dOMHTMLOptionsCollectionGetSelectedIndex + DOMHTMLOptionsCollectionGetSelectedIndexMethodInfo, dOMHTMLOptionsCollectionGetSelectedIndex, -- ** dOMHTMLOptionsCollectionNamedItem + DOMHTMLOptionsCollectionNamedItemMethodInfo, dOMHTMLOptionsCollectionNamedItem , -- ** dOMHTMLOptionsCollectionSetSelectedIndex + DOMHTMLOptionsCollectionSetSelectedIndexMethodInfo, dOMHTMLOptionsCollectionSetSelectedIndex, @@ -83,6 +88,42 @@ noDOMHTMLOptionsCollection :: Maybe DOMHTMLOptionsCollection noDOMHTMLOptionsCollection = Nothing +type family ResolveDOMHTMLOptionsCollectionMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLOptionsCollectionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "item" o = DOMHTMLCollectionItemMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "getSelectedIndex" o = DOMHTMLOptionsCollectionGetSelectedIndexMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLOptionsCollectionMethod "setSelectedIndex" o = DOMHTMLOptionsCollectionSetSelectedIndexMethodInfo + ResolveDOMHTMLOptionsCollectionMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLOptionsCollectionMethod t DOMHTMLOptionsCollection, MethodInfo info DOMHTMLOptionsCollection p) => IsLabelProxy t (DOMHTMLOptionsCollection -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLOptionsCollectionMethod t DOMHTMLOptionsCollection, MethodInfo info DOMHTMLOptionsCollection p) => IsLabel t (DOMHTMLOptionsCollection -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -96,7 +137,7 @@ type AttrSetTypeConstraint DOMHTMLOptionsCollectionLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLOptionsCollectionLengthPropertyInfo = DOMHTMLOptionsCollectionK type AttrGetType DOMHTMLOptionsCollectionLengthPropertyInfo = Word64 - type AttrLabel DOMHTMLOptionsCollectionLengthPropertyInfo = "DOMHTMLOptionsCollection::length" + type AttrLabel DOMHTMLOptionsCollectionLengthPropertyInfo = "length" attrGet _ = getDOMHTMLOptionsCollectionLength attrSet _ = undefined attrConstruct _ = undefined @@ -120,22 +161,21 @@ type AttrSetTypeConstraint DOMHTMLOptionsCollectionSelectedIndexPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLOptionsCollectionSelectedIndexPropertyInfo = DOMHTMLOptionsCollectionK type AttrGetType DOMHTMLOptionsCollectionSelectedIndexPropertyInfo = Int64 - type AttrLabel DOMHTMLOptionsCollectionSelectedIndexPropertyInfo = "DOMHTMLOptionsCollection::selected-index" + type AttrLabel DOMHTMLOptionsCollectionSelectedIndexPropertyInfo = "selected-index" attrGet _ = getDOMHTMLOptionsCollectionSelectedIndex attrSet _ = setDOMHTMLOptionsCollectionSelectedIndex attrConstruct _ = constructDOMHTMLOptionsCollectionSelectedIndex type instance AttributeList DOMHTMLOptionsCollection = DOMHTMLOptionsCollectionAttributeList -type DOMHTMLOptionsCollectionAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMHTMLOptionsCollectionLengthPropertyInfo), '("selected-index", DOMHTMLOptionsCollectionSelectedIndexPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLOptionsCollectionAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMHTMLOptionsCollectionLengthPropertyInfo), '("selectedIndex", DOMHTMLOptionsCollectionSelectedIndexPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLOptionsCollection = DOMHTMLOptionsCollectionSignalList -type DOMHTMLOptionsCollectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLOptionsCollectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLOptionsCollection::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -147,19 +187,22 @@ dOMHTMLOptionsCollectionGetLength :: (MonadIO m, DOMHTMLOptionsCollectionK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLOptionsCollectionGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_options_collection_get_length _obj' touchManagedPtr _obj return result +data DOMHTMLOptionsCollectionGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLOptionsCollectionK a) => MethodInfo DOMHTMLOptionsCollectionGetLengthMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionsCollectionGetLength + -- method DOMHTMLOptionsCollection::get_selected_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -171,19 +214,22 @@ dOMHTMLOptionsCollectionGetSelectedIndex :: (MonadIO m, DOMHTMLOptionsCollectionK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLOptionsCollectionGetSelectedIndex _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_options_collection_get_selected_index _obj' touchManagedPtr _obj return result +data DOMHTMLOptionsCollectionGetSelectedIndexMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLOptionsCollectionK a) => MethodInfo DOMHTMLOptionsCollectionGetSelectedIndexMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionsCollectionGetSelectedIndex + -- method DOMHTMLOptionsCollection::named_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -196,9 +242,9 @@ dOMHTMLOptionsCollectionNamedItem :: (MonadIO m, DOMHTMLOptionsCollectionK a) => - a -> -- _obj - T.Text -> -- name - m DOMNode + a -- _obj + -> T.Text -- name + -> m DOMNode -- result dOMHTMLOptionsCollectionNamedItem _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -209,11 +255,14 @@ freeMem name' return result' +data DOMHTMLOptionsCollectionNamedItemMethodInfo +instance (signature ~ (T.Text -> m DOMNode), MonadIO m, DOMHTMLOptionsCollectionK a) => MethodInfo DOMHTMLOptionsCollectionNamedItemMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionsCollectionNamedItem + -- method DOMHTMLOptionsCollection::set_selected_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLOptionsCollection", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -226,13 +275,17 @@ dOMHTMLOptionsCollectionSetSelectedIndex :: (MonadIO m, DOMHTMLOptionsCollectionK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLOptionsCollectionSetSelectedIndex _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_options_collection_set_selected_index _obj' value touchManagedPtr _obj return () + +data DOMHTMLOptionsCollectionSetSelectedIndexMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLOptionsCollectionK a) => MethodInfo DOMHTMLOptionsCollectionSetSelectedIndexMethodInfo a signature where + overloadedMethod _ = dOMHTMLOptionsCollectionSetSelectedIndex diff --git a/GI/WebKit/Objects/DOMHTMLOptionsCollection.hs-boot b/GI/WebKit/Objects/DOMHTMLOptionsCollection.hs-boot --- a/GI/WebKit/Objects/DOMHTMLOptionsCollection.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLOptionsCollection.hs-boot @@ -13,3 +13,7 @@ instance (GObject o, IsDescendantOf DOMHTMLOptionsCollection o) => DOMHTMLOptionsCollectionK o data DOMHTMLOptionsCollectionLengthPropertyInfo data DOMHTMLOptionsCollectionSelectedIndexPropertyInfo +data DOMHTMLOptionsCollectionGetLengthMethodInfo +data DOMHTMLOptionsCollectionGetSelectedIndexMethodInfo +data DOMHTMLOptionsCollectionNamedItemMethodInfo +data DOMHTMLOptionsCollectionSetSelectedIndexMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLParagraphElement.hs b/GI/WebKit/Objects/DOMHTMLParagraphElement.hs --- a/GI/WebKit/Objects/DOMHTMLParagraphElement.hs +++ b/GI/WebKit/Objects/DOMHTMLParagraphElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLParagraphElementGetAlign + DOMHTMLParagraphElementGetAlignMethodInfo, dOMHTMLParagraphElementGetAlign , -- ** dOMHTMLParagraphElementSetAlign + DOMHTMLParagraphElementSetAlignMethodInfo, dOMHTMLParagraphElementSetAlign , @@ -70,6 +73,173 @@ noDOMHTMLParagraphElement :: Maybe DOMHTMLParagraphElement noDOMHTMLParagraphElement = Nothing +type family ResolveDOMHTMLParagraphElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLParagraphElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLParagraphElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLParagraphElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLParagraphElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLParagraphElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLParagraphElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLParagraphElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLParagraphElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLParagraphElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLParagraphElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLParagraphElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLParagraphElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLParagraphElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLParagraphElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLParagraphElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLParagraphElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLParagraphElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLParagraphElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLParagraphElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLParagraphElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLParagraphElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLParagraphElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLParagraphElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLParagraphElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLParagraphElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLParagraphElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLParagraphElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLParagraphElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLParagraphElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLParagraphElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLParagraphElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLParagraphElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLParagraphElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLParagraphElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLParagraphElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLParagraphElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLParagraphElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLParagraphElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLParagraphElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLParagraphElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLParagraphElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLParagraphElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLParagraphElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLParagraphElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLParagraphElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLParagraphElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLParagraphElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLParagraphElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLParagraphElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLParagraphElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLParagraphElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLParagraphElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLParagraphElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLParagraphElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLParagraphElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLParagraphElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLParagraphElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLParagraphElementMethod "getAlign" o = DOMHTMLParagraphElementGetAlignMethodInfo + ResolveDOMHTMLParagraphElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLParagraphElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLParagraphElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLParagraphElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLParagraphElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLParagraphElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLParagraphElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLParagraphElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLParagraphElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLParagraphElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLParagraphElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLParagraphElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLParagraphElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLParagraphElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLParagraphElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLParagraphElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLParagraphElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLParagraphElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLParagraphElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLParagraphElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLParagraphElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLParagraphElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLParagraphElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLParagraphElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLParagraphElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLParagraphElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLParagraphElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLParagraphElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLParagraphElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLParagraphElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLParagraphElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLParagraphElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLParagraphElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLParagraphElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLParagraphElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLParagraphElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLParagraphElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLParagraphElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLParagraphElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLParagraphElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLParagraphElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLParagraphElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLParagraphElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLParagraphElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLParagraphElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLParagraphElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLParagraphElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLParagraphElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLParagraphElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLParagraphElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLParagraphElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLParagraphElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLParagraphElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLParagraphElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLParagraphElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLParagraphElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLParagraphElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLParagraphElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLParagraphElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLParagraphElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLParagraphElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLParagraphElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLParagraphElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLParagraphElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLParagraphElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLParagraphElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLParagraphElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLParagraphElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLParagraphElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLParagraphElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLParagraphElementMethod "setAlign" o = DOMHTMLParagraphElementSetAlignMethodInfo + ResolveDOMHTMLParagraphElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLParagraphElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLParagraphElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLParagraphElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLParagraphElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLParagraphElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLParagraphElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLParagraphElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLParagraphElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLParagraphElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLParagraphElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLParagraphElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLParagraphElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLParagraphElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLParagraphElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLParagraphElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLParagraphElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLParagraphElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLParagraphElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLParagraphElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLParagraphElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLParagraphElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLParagraphElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLParagraphElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLParagraphElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLParagraphElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLParagraphElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLParagraphElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLParagraphElementMethod t DOMHTMLParagraphElement, MethodInfo info DOMHTMLParagraphElement p) => IsLabelProxy t (DOMHTMLParagraphElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLParagraphElementMethod t DOMHTMLParagraphElement, MethodInfo info DOMHTMLParagraphElement p) => IsLabel t (DOMHTMLParagraphElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLParagraphElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLParagraphElementAlignPropertyInfo = DOMHTMLParagraphElementK type AttrGetType DOMHTMLParagraphElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLParagraphElementAlignPropertyInfo = "DOMHTMLParagraphElement::align" + type AttrLabel DOMHTMLParagraphElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLParagraphElementAlign attrSet _ = setDOMHTMLParagraphElementAlign attrConstruct _ = constructDOMHTMLParagraphElementAlign type instance AttributeList DOMHTMLParagraphElement = DOMHTMLParagraphElementAttributeList -type DOMHTMLParagraphElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLParagraphElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLParagraphElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLParagraphElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLParagraphElement = DOMHTMLParagraphElementSignalList -type DOMHTMLParagraphElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLParagraphElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLParagraphElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParagraphElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLParagraphElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParagraphElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLParagraphElementGetAlign :: (MonadIO m, DOMHTMLParagraphElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLParagraphElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_paragraph_element_get_align _obj' @@ -127,11 +296,14 @@ touchManagedPtr _obj return result' +data DOMHTMLParagraphElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLParagraphElementK a) => MethodInfo DOMHTMLParagraphElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLParagraphElementGetAlign + -- method DOMHTMLParagraphElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParagraphElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLParagraphElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParagraphElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -144,9 +316,9 @@ dOMHTMLParagraphElementSetAlign :: (MonadIO m, DOMHTMLParagraphElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLParagraphElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -154,5 +326,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLParagraphElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLParagraphElementK a) => MethodInfo DOMHTMLParagraphElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLParagraphElementSetAlign diff --git a/GI/WebKit/Objects/DOMHTMLParagraphElement.hs-boot b/GI/WebKit/Objects/DOMHTMLParagraphElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLParagraphElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLParagraphElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLParagraphElementK o instance (GObject o, IsDescendantOf DOMHTMLParagraphElement o) => DOMHTMLParagraphElementK o data DOMHTMLParagraphElementAlignPropertyInfo +data DOMHTMLParagraphElementGetAlignMethodInfo +data DOMHTMLParagraphElementSetAlignMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLParamElement.hs b/GI/WebKit/Objects/DOMHTMLParamElement.hs --- a/GI/WebKit/Objects/DOMHTMLParamElement.hs +++ b/GI/WebKit/Objects/DOMHTMLParamElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** dOMHTMLParamElementGetName + DOMHTMLParamElementGetNameMethodInfo , dOMHTMLParamElementGetName , -- ** dOMHTMLParamElementGetValue + DOMHTMLParamElementGetValueMethodInfo , dOMHTMLParamElementGetValue , -- ** dOMHTMLParamElementGetValueType + DOMHTMLParamElementGetValueTypeMethodInfo, dOMHTMLParamElementGetValueType , -- ** dOMHTMLParamElementSetName + DOMHTMLParamElementSetNameMethodInfo , dOMHTMLParamElementSetName , -- ** dOMHTMLParamElementSetValue + DOMHTMLParamElementSetValueMethodInfo , dOMHTMLParamElementSetValue , -- ** dOMHTMLParamElementSetValueType + DOMHTMLParamElementSetValueTypeMethodInfo, dOMHTMLParamElementSetValueType , @@ -107,6 +114,177 @@ noDOMHTMLParamElement :: Maybe DOMHTMLParamElement noDOMHTMLParamElement = Nothing +type family ResolveDOMHTMLParamElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLParamElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLParamElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLParamElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLParamElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLParamElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLParamElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLParamElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLParamElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLParamElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLParamElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLParamElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLParamElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLParamElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLParamElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLParamElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLParamElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLParamElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLParamElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLParamElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLParamElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLParamElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLParamElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLParamElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLParamElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLParamElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLParamElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLParamElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLParamElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLParamElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLParamElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLParamElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLParamElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLParamElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLParamElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLParamElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLParamElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLParamElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLParamElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLParamElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLParamElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLParamElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLParamElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLParamElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLParamElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLParamElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLParamElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLParamElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLParamElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLParamElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLParamElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLParamElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLParamElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLParamElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLParamElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLParamElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLParamElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLParamElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLParamElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLParamElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLParamElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLParamElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLParamElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLParamElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLParamElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLParamElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLParamElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLParamElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLParamElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLParamElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLParamElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLParamElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLParamElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLParamElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLParamElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLParamElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLParamElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLParamElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLParamElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLParamElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLParamElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLParamElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLParamElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLParamElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLParamElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLParamElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLParamElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLParamElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLParamElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLParamElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLParamElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLParamElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLParamElementMethod "getName" o = DOMHTMLParamElementGetNameMethodInfo + ResolveDOMHTMLParamElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLParamElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLParamElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLParamElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLParamElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLParamElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLParamElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLParamElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLParamElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLParamElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLParamElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLParamElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLParamElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLParamElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLParamElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLParamElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLParamElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLParamElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLParamElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLParamElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLParamElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLParamElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLParamElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLParamElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLParamElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLParamElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLParamElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLParamElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLParamElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLParamElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLParamElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLParamElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLParamElementMethod "getValue" o = DOMHTMLParamElementGetValueMethodInfo + ResolveDOMHTMLParamElementMethod "getValueType" o = DOMHTMLParamElementGetValueTypeMethodInfo + ResolveDOMHTMLParamElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLParamElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLParamElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLParamElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLParamElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLParamElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLParamElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLParamElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLParamElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLParamElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLParamElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLParamElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLParamElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLParamElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLParamElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLParamElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLParamElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLParamElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLParamElementMethod "setName" o = DOMHTMLParamElementSetNameMethodInfo + ResolveDOMHTMLParamElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLParamElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLParamElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLParamElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLParamElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLParamElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLParamElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLParamElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLParamElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLParamElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLParamElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLParamElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLParamElementMethod "setValue" o = DOMHTMLParamElementSetValueMethodInfo + ResolveDOMHTMLParamElementMethod "setValueType" o = DOMHTMLParamElementSetValueTypeMethodInfo + ResolveDOMHTMLParamElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLParamElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLParamElementMethod t DOMHTMLParamElement, MethodInfo info DOMHTMLParamElement p) => IsLabelProxy t (DOMHTMLParamElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLParamElementMethod t DOMHTMLParamElement, MethodInfo info DOMHTMLParamElement p) => IsLabel t (DOMHTMLParamElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "name" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -126,7 +304,7 @@ type AttrSetTypeConstraint DOMHTMLParamElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLParamElementNamePropertyInfo = DOMHTMLParamElementK type AttrGetType DOMHTMLParamElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLParamElementNamePropertyInfo = "DOMHTMLParamElement::name" + type AttrLabel DOMHTMLParamElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLParamElementName attrSet _ = setDOMHTMLParamElementName attrConstruct _ = constructDOMHTMLParamElementName @@ -150,7 +328,7 @@ type AttrSetTypeConstraint DOMHTMLParamElementTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLParamElementTypePropertyInfo = DOMHTMLParamElementK type AttrGetType DOMHTMLParamElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLParamElementTypePropertyInfo = "DOMHTMLParamElement::type" + type AttrLabel DOMHTMLParamElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLParamElementType attrSet _ = setDOMHTMLParamElementType attrConstruct _ = constructDOMHTMLParamElementType @@ -174,7 +352,7 @@ type AttrSetTypeConstraint DOMHTMLParamElementValuePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLParamElementValuePropertyInfo = DOMHTMLParamElementK type AttrGetType DOMHTMLParamElementValuePropertyInfo = T.Text - type AttrLabel DOMHTMLParamElementValuePropertyInfo = "DOMHTMLParamElement::value" + type AttrLabel DOMHTMLParamElementValuePropertyInfo = "value" attrGet _ = getDOMHTMLParamElementValue attrSet _ = setDOMHTMLParamElementValue attrConstruct _ = constructDOMHTMLParamElementValue @@ -198,22 +376,21 @@ type AttrSetTypeConstraint DOMHTMLParamElementValueTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLParamElementValueTypePropertyInfo = DOMHTMLParamElementK type AttrGetType DOMHTMLParamElementValueTypePropertyInfo = T.Text - type AttrLabel DOMHTMLParamElementValueTypePropertyInfo = "DOMHTMLParamElement::value-type" + type AttrLabel DOMHTMLParamElementValueTypePropertyInfo = "value-type" attrGet _ = getDOMHTMLParamElementValueType attrSet _ = setDOMHTMLParamElementValueType attrConstruct _ = constructDOMHTMLParamElementValueType type instance AttributeList DOMHTMLParamElement = DOMHTMLParamElementAttributeList -type DOMHTMLParamElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLParamElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLParamElementTypePropertyInfo), '("value", DOMHTMLParamElementValuePropertyInfo), '("value-type", DOMHTMLParamElementValueTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLParamElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("name", DOMHTMLParamElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLParamElementTypePropertyInfo), '("value", DOMHTMLParamElementValuePropertyInfo), '("valueType", DOMHTMLParamElementValueTypePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLParamElement = DOMHTMLParamElementSignalList -type DOMHTMLParamElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLParamElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLParamElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -225,8 +402,8 @@ dOMHTMLParamElementGetName :: (MonadIO m, DOMHTMLParamElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLParamElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_param_element_get_name _obj' @@ -236,11 +413,14 @@ touchManagedPtr _obj return result' +data DOMHTMLParamElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLParamElementK a) => MethodInfo DOMHTMLParamElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLParamElementGetName + -- method DOMHTMLParamElement::get_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -252,8 +432,8 @@ dOMHTMLParamElementGetValue :: (MonadIO m, DOMHTMLParamElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLParamElementGetValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_param_element_get_value _obj' @@ -263,11 +443,14 @@ touchManagedPtr _obj return result' +data DOMHTMLParamElementGetValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLParamElementK a) => MethodInfo DOMHTMLParamElementGetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLParamElementGetValue + -- method DOMHTMLParamElement::get_value_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -279,8 +462,8 @@ dOMHTMLParamElementGetValueType :: (MonadIO m, DOMHTMLParamElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLParamElementGetValueType _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_param_element_get_value_type _obj' @@ -290,11 +473,14 @@ touchManagedPtr _obj return result' +data DOMHTMLParamElementGetValueTypeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLParamElementK a) => MethodInfo DOMHTMLParamElementGetValueTypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLParamElementGetValueType + -- method DOMHTMLParamElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -307,9 +493,9 @@ dOMHTMLParamElementSetName :: (MonadIO m, DOMHTMLParamElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLParamElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -318,11 +504,14 @@ freeMem value' return () +data DOMHTMLParamElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLParamElementK a) => MethodInfo DOMHTMLParamElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLParamElementSetName + -- method DOMHTMLParamElement::set_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -335,9 +524,9 @@ dOMHTMLParamElementSetValue :: (MonadIO m, DOMHTMLParamElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLParamElementSetValue _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -346,11 +535,14 @@ freeMem value' return () +data DOMHTMLParamElementSetValueMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLParamElementK a) => MethodInfo DOMHTMLParamElementSetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLParamElementSetValue + -- method DOMHTMLParamElement::set_value_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLParamElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -363,9 +555,9 @@ dOMHTMLParamElementSetValueType :: (MonadIO m, DOMHTMLParamElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLParamElementSetValueType _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -373,5 +565,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLParamElementSetValueTypeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLParamElementK a) => MethodInfo DOMHTMLParamElementSetValueTypeMethodInfo a signature where + overloadedMethod _ = dOMHTMLParamElementSetValueType diff --git a/GI/WebKit/Objects/DOMHTMLParamElement.hs-boot b/GI/WebKit/Objects/DOMHTMLParamElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLParamElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLParamElement.hs-boot @@ -15,3 +15,9 @@ data DOMHTMLParamElementTypePropertyInfo data DOMHTMLParamElementValuePropertyInfo data DOMHTMLParamElementValueTypePropertyInfo +data DOMHTMLParamElementGetNameMethodInfo +data DOMHTMLParamElementGetValueMethodInfo +data DOMHTMLParamElementGetValueTypeMethodInfo +data DOMHTMLParamElementSetNameMethodInfo +data DOMHTMLParamElementSetValueMethodInfo +data DOMHTMLParamElementSetValueTypeMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLPreElement.hs b/GI/WebKit/Objects/DOMHTMLPreElement.hs --- a/GI/WebKit/Objects/DOMHTMLPreElement.hs +++ b/GI/WebKit/Objects/DOMHTMLPreElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMHTMLPreElementGetWidth + DOMHTMLPreElementGetWidthMethodInfo , dOMHTMLPreElementGetWidth , -- ** dOMHTMLPreElementGetWrap + DOMHTMLPreElementGetWrapMethodInfo , dOMHTMLPreElementGetWrap , -- ** dOMHTMLPreElementSetWidth + DOMHTMLPreElementSetWidthMethodInfo , dOMHTMLPreElementSetWidth , -- ** dOMHTMLPreElementSetWrap + DOMHTMLPreElementSetWrapMethodInfo , dOMHTMLPreElementSetWrap , @@ -85,6 +90,175 @@ noDOMHTMLPreElement :: Maybe DOMHTMLPreElement noDOMHTMLPreElement = Nothing +type family ResolveDOMHTMLPreElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLPreElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLPreElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLPreElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLPreElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLPreElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLPreElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLPreElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLPreElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLPreElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLPreElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLPreElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLPreElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLPreElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLPreElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLPreElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLPreElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLPreElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLPreElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLPreElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLPreElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLPreElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLPreElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLPreElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLPreElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLPreElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLPreElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLPreElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLPreElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLPreElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLPreElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLPreElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLPreElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLPreElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLPreElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLPreElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLPreElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLPreElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLPreElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLPreElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLPreElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLPreElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLPreElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLPreElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLPreElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLPreElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLPreElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLPreElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLPreElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLPreElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLPreElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLPreElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLPreElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLPreElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLPreElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLPreElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLPreElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLPreElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLPreElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLPreElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLPreElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLPreElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLPreElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLPreElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLPreElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLPreElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLPreElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLPreElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLPreElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLPreElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLPreElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLPreElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLPreElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLPreElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLPreElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLPreElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLPreElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLPreElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLPreElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLPreElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLPreElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLPreElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLPreElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLPreElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLPreElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLPreElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLPreElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLPreElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLPreElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLPreElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLPreElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLPreElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLPreElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLPreElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLPreElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLPreElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLPreElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLPreElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLPreElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLPreElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLPreElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLPreElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLPreElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLPreElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLPreElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLPreElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLPreElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLPreElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLPreElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLPreElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLPreElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLPreElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLPreElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLPreElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLPreElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLPreElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLPreElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLPreElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLPreElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLPreElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLPreElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLPreElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLPreElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLPreElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLPreElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLPreElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLPreElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLPreElementMethod "getWidth" o = DOMHTMLPreElementGetWidthMethodInfo + ResolveDOMHTMLPreElementMethod "getWrap" o = DOMHTMLPreElementGetWrapMethodInfo + ResolveDOMHTMLPreElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLPreElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLPreElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLPreElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLPreElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLPreElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLPreElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLPreElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLPreElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLPreElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLPreElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLPreElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLPreElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLPreElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLPreElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLPreElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLPreElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLPreElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLPreElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLPreElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLPreElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLPreElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLPreElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLPreElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLPreElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLPreElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLPreElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLPreElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLPreElementMethod "setWidth" o = DOMHTMLPreElementSetWidthMethodInfo + ResolveDOMHTMLPreElementMethod "setWrap" o = DOMHTMLPreElementSetWrapMethodInfo + ResolveDOMHTMLPreElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLPreElementMethod t DOMHTMLPreElement, MethodInfo info DOMHTMLPreElement p) => IsLabelProxy t (DOMHTMLPreElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLPreElementMethod t DOMHTMLPreElement, MethodInfo info DOMHTMLPreElement p) => IsLabel t (DOMHTMLPreElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "width" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable,PropertyWritable] @@ -104,7 +278,7 @@ type AttrSetTypeConstraint DOMHTMLPreElementWidthPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLPreElementWidthPropertyInfo = DOMHTMLPreElementK type AttrGetType DOMHTMLPreElementWidthPropertyInfo = Int64 - type AttrLabel DOMHTMLPreElementWidthPropertyInfo = "DOMHTMLPreElement::width" + type AttrLabel DOMHTMLPreElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLPreElementWidth attrSet _ = setDOMHTMLPreElementWidth attrConstruct _ = constructDOMHTMLPreElementWidth @@ -128,22 +302,21 @@ type AttrSetTypeConstraint DOMHTMLPreElementWrapPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLPreElementWrapPropertyInfo = DOMHTMLPreElementK type AttrGetType DOMHTMLPreElementWrapPropertyInfo = Bool - type AttrLabel DOMHTMLPreElementWrapPropertyInfo = "DOMHTMLPreElement::wrap" + type AttrLabel DOMHTMLPreElementWrapPropertyInfo = "wrap" attrGet _ = getDOMHTMLPreElementWrap attrSet _ = setDOMHTMLPreElementWrap attrConstruct _ = constructDOMHTMLPreElementWrap type instance AttributeList DOMHTMLPreElement = DOMHTMLPreElementAttributeList -type DOMHTMLPreElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLPreElementWidthPropertyInfo), '("wrap", DOMHTMLPreElementWrapPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLPreElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLPreElementWidthPropertyInfo), '("wrap", DOMHTMLPreElementWrapPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLPreElement = DOMHTMLPreElementSignalList -type DOMHTMLPreElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLPreElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLPreElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -155,19 +328,22 @@ dOMHTMLPreElementGetWidth :: (MonadIO m, DOMHTMLPreElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLPreElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_pre_element_get_width _obj' touchManagedPtr _obj return result +data DOMHTMLPreElementGetWidthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLPreElementK a) => MethodInfo DOMHTMLPreElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLPreElementGetWidth + -- method DOMHTMLPreElement::get_wrap -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -179,8 +355,8 @@ dOMHTMLPreElementGetWrap :: (MonadIO m, DOMHTMLPreElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLPreElementGetWrap _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_pre_element_get_wrap _obj' @@ -188,11 +364,14 @@ touchManagedPtr _obj return result' +data DOMHTMLPreElementGetWrapMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLPreElementK a) => MethodInfo DOMHTMLPreElementGetWrapMethodInfo a signature where + overloadedMethod _ = dOMHTMLPreElementGetWrap + -- method DOMHTMLPreElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -205,20 +384,23 @@ dOMHTMLPreElementSetWidth :: (MonadIO m, DOMHTMLPreElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLPreElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_pre_element_set_width _obj' value touchManagedPtr _obj return () +data DOMHTMLPreElementSetWidthMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLPreElementK a) => MethodInfo DOMHTMLPreElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLPreElementSetWidth + -- method DOMHTMLPreElement::set_wrap -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLPreElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -231,14 +413,18 @@ dOMHTMLPreElementSetWrap :: (MonadIO m, DOMHTMLPreElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLPreElementSetWrap _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_html_pre_element_set_wrap _obj' value' touchManagedPtr _obj return () + +data DOMHTMLPreElementSetWrapMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLPreElementK a) => MethodInfo DOMHTMLPreElementSetWrapMethodInfo a signature where + overloadedMethod _ = dOMHTMLPreElementSetWrap diff --git a/GI/WebKit/Objects/DOMHTMLPreElement.hs-boot b/GI/WebKit/Objects/DOMHTMLPreElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLPreElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLPreElement.hs-boot @@ -13,3 +13,7 @@ instance (GObject o, IsDescendantOf DOMHTMLPreElement o) => DOMHTMLPreElementK o data DOMHTMLPreElementWidthPropertyInfo data DOMHTMLPreElementWrapPropertyInfo +data DOMHTMLPreElementGetWidthMethodInfo +data DOMHTMLPreElementGetWrapMethodInfo +data DOMHTMLPreElementSetWidthMethodInfo +data DOMHTMLPreElementSetWrapMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLPropertiesCollection.hs b/GI/WebKit/Objects/DOMHTMLPropertiesCollection.hs --- a/GI/WebKit/Objects/DOMHTMLPropertiesCollection.hs +++ b/GI/WebKit/Objects/DOMHTMLPropertiesCollection.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -81,6 +82,39 @@ noDOMHTMLPropertiesCollection :: Maybe DOMHTMLPropertiesCollection noDOMHTMLPropertiesCollection = Nothing +type family ResolveDOMHTMLPropertiesCollectionMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLPropertiesCollectionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLPropertiesCollectionMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLPropertiesCollectionMethod t DOMHTMLPropertiesCollection, MethodInfo info DOMHTMLPropertiesCollection p) => IsLabelProxy t (DOMHTMLPropertiesCollection -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLPropertiesCollectionMethod t DOMHTMLPropertiesCollection, MethodInfo info DOMHTMLPropertiesCollection p) => IsLabel t (DOMHTMLPropertiesCollection -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -94,7 +128,7 @@ type AttrSetTypeConstraint DOMHTMLPropertiesCollectionLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLPropertiesCollectionLengthPropertyInfo = DOMHTMLPropertiesCollectionK type AttrGetType DOMHTMLPropertiesCollectionLengthPropertyInfo = Word64 - type AttrLabel DOMHTMLPropertiesCollectionLengthPropertyInfo = "DOMHTMLPropertiesCollection::length" + type AttrLabel DOMHTMLPropertiesCollectionLengthPropertyInfo = "length" attrGet _ = getDOMHTMLPropertiesCollectionLength attrSet _ = undefined attrConstruct _ = undefined @@ -112,22 +146,21 @@ type AttrSetTypeConstraint DOMHTMLPropertiesCollectionNamesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLPropertiesCollectionNamesPropertyInfo = DOMHTMLPropertiesCollectionK type AttrGetType DOMHTMLPropertiesCollectionNamesPropertyInfo = DOMDOMStringList - type AttrLabel DOMHTMLPropertiesCollectionNamesPropertyInfo = "DOMHTMLPropertiesCollection::names" + type AttrLabel DOMHTMLPropertiesCollectionNamesPropertyInfo = "names" attrGet _ = getDOMHTMLPropertiesCollectionNames attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHTMLPropertiesCollection = DOMHTMLPropertiesCollectionAttributeList -type DOMHTMLPropertiesCollectionAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMHTMLPropertiesCollectionLengthPropertyInfo), '("names", DOMHTMLPropertiesCollectionNamesPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLPropertiesCollectionAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMHTMLPropertiesCollectionLengthPropertyInfo), '("names", DOMHTMLPropertiesCollectionNamesPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLPropertiesCollection = DOMHTMLPropertiesCollectionSignalList -type DOMHTMLPropertiesCollectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLPropertiesCollectionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLPropertiesCollection::get_length -- method type : MemberFunction --- Args : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -139,17 +172,16 @@ {-# DEPRECATED dOMHTMLPropertiesCollectionGetLength ["(Since version 2.2)"]#-} dOMHTMLPropertiesCollectionGetLength :: (MonadIO m) => - Ptr () -> -- self - m Word64 + Ptr () -- self + -> m Word64 -- result dOMHTMLPropertiesCollectionGetLength self = liftIO $ do result <- webkit_dom_html_properties_collection_get_length self return result -- method DOMHTMLPropertiesCollection::get_names -- method type : MemberFunction --- Args : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMStringList" -- throws : False -- Skip return : False @@ -161,8 +193,8 @@ {-# DEPRECATED dOMHTMLPropertiesCollectionGetNames ["(Since version 2.2)"]#-} dOMHTMLPropertiesCollectionGetNames :: (MonadIO m) => - Ptr () -> -- self - m DOMDOMStringList + Ptr () -- self + -> m DOMDOMStringList -- result dOMHTMLPropertiesCollectionGetNames self = liftIO $ do result <- webkit_dom_html_properties_collection_get_names self checkUnexpectedReturnNULL "webkit_dom_html_properties_collection_get_names" result @@ -171,9 +203,8 @@ -- method DOMHTMLPropertiesCollection::item -- method type : MemberFunction --- Args : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -186,9 +217,9 @@ {-# DEPRECATED dOMHTMLPropertiesCollectionItem ["(Since version 2.2)"]#-} dOMHTMLPropertiesCollectionItem :: (MonadIO m) => - Ptr () -> -- self - Word64 -> -- index - m DOMNode + Ptr () -- self + -> Word64 -- index + -> m DOMNode -- result dOMHTMLPropertiesCollectionItem self index = liftIO $ do result <- webkit_dom_html_properties_collection_item self index checkUnexpectedReturnNULL "webkit_dom_html_properties_collection_item" result @@ -197,9 +228,8 @@ -- method DOMHTMLPropertiesCollection::named_item -- method type : MemberFunction --- Args : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -212,9 +242,9 @@ {-# DEPRECATED dOMHTMLPropertiesCollectionNamedItem ["(Since version 2.2)"]#-} dOMHTMLPropertiesCollectionNamedItem :: (MonadIO m) => - Ptr () -> -- self - T.Text -> -- name - m () + Ptr () -- self + -> T.Text -- name + -> m () -- result dOMHTMLPropertiesCollectionNamedItem self name = liftIO $ do name' <- textToCString name webkit_dom_html_properties_collection_named_item self name' diff --git a/GI/WebKit/Objects/DOMHTMLQuoteElement.hs b/GI/WebKit/Objects/DOMHTMLQuoteElement.hs --- a/GI/WebKit/Objects/DOMHTMLQuoteElement.hs +++ b/GI/WebKit/Objects/DOMHTMLQuoteElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLQuoteElementGetCite + DOMHTMLQuoteElementGetCiteMethodInfo , dOMHTMLQuoteElementGetCite , -- ** dOMHTMLQuoteElementSetCite + DOMHTMLQuoteElementSetCiteMethodInfo , dOMHTMLQuoteElementSetCite , @@ -70,6 +73,173 @@ noDOMHTMLQuoteElement :: Maybe DOMHTMLQuoteElement noDOMHTMLQuoteElement = Nothing +type family ResolveDOMHTMLQuoteElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLQuoteElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLQuoteElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLQuoteElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLQuoteElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLQuoteElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLQuoteElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLQuoteElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLQuoteElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLQuoteElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLQuoteElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLQuoteElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLQuoteElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLQuoteElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLQuoteElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLQuoteElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLQuoteElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLQuoteElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLQuoteElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLQuoteElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLQuoteElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLQuoteElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLQuoteElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLQuoteElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLQuoteElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLQuoteElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLQuoteElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLQuoteElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLQuoteElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLQuoteElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLQuoteElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLQuoteElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLQuoteElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLQuoteElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLQuoteElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLQuoteElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLQuoteElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLQuoteElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLQuoteElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLQuoteElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLQuoteElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLQuoteElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLQuoteElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLQuoteElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLQuoteElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLQuoteElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLQuoteElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLQuoteElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLQuoteElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLQuoteElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLQuoteElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLQuoteElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLQuoteElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLQuoteElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLQuoteElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLQuoteElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLQuoteElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLQuoteElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLQuoteElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLQuoteElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLQuoteElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLQuoteElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLQuoteElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLQuoteElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLQuoteElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLQuoteElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLQuoteElementMethod "getCite" o = DOMHTMLQuoteElementGetCiteMethodInfo + ResolveDOMHTMLQuoteElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLQuoteElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLQuoteElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLQuoteElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLQuoteElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLQuoteElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLQuoteElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLQuoteElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLQuoteElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLQuoteElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLQuoteElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLQuoteElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLQuoteElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLQuoteElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLQuoteElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLQuoteElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLQuoteElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLQuoteElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLQuoteElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLQuoteElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLQuoteElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLQuoteElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLQuoteElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLQuoteElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLQuoteElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLQuoteElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLQuoteElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLQuoteElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLQuoteElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLQuoteElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLQuoteElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLQuoteElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLQuoteElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLQuoteElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLQuoteElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLQuoteElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLQuoteElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLQuoteElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLQuoteElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLQuoteElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLQuoteElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLQuoteElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLQuoteElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLQuoteElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLQuoteElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLQuoteElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLQuoteElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLQuoteElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLQuoteElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLQuoteElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLQuoteElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLQuoteElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLQuoteElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLQuoteElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLQuoteElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLQuoteElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLQuoteElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLQuoteElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLQuoteElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLQuoteElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLQuoteElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLQuoteElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLQuoteElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLQuoteElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLQuoteElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLQuoteElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLQuoteElementMethod "setCite" o = DOMHTMLQuoteElementSetCiteMethodInfo + ResolveDOMHTMLQuoteElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLQuoteElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLQuoteElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLQuoteElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLQuoteElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLQuoteElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLQuoteElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLQuoteElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLQuoteElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLQuoteElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLQuoteElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLQuoteElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLQuoteElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLQuoteElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLQuoteElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLQuoteElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLQuoteElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLQuoteElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLQuoteElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLQuoteElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLQuoteElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLQuoteElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLQuoteElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLQuoteElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLQuoteElementMethod t DOMHTMLQuoteElement, MethodInfo info DOMHTMLQuoteElement p) => IsLabelProxy t (DOMHTMLQuoteElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLQuoteElementMethod t DOMHTMLQuoteElement, MethodInfo info DOMHTMLQuoteElement p) => IsLabel t (DOMHTMLQuoteElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "cite" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLQuoteElementCitePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLQuoteElementCitePropertyInfo = DOMHTMLQuoteElementK type AttrGetType DOMHTMLQuoteElementCitePropertyInfo = T.Text - type AttrLabel DOMHTMLQuoteElementCitePropertyInfo = "DOMHTMLQuoteElement::cite" + type AttrLabel DOMHTMLQuoteElementCitePropertyInfo = "cite" attrGet _ = getDOMHTMLQuoteElementCite attrSet _ = setDOMHTMLQuoteElementCite attrConstruct _ = constructDOMHTMLQuoteElementCite type instance AttributeList DOMHTMLQuoteElement = DOMHTMLQuoteElementAttributeList -type DOMHTMLQuoteElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("cite", DOMHTMLQuoteElementCitePropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLQuoteElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("cite", DOMHTMLQuoteElementCitePropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLQuoteElement = DOMHTMLQuoteElementSignalList -type DOMHTMLQuoteElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLQuoteElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLQuoteElement::get_cite -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLQuoteElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLQuoteElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLQuoteElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLQuoteElementGetCite :: (MonadIO m, DOMHTMLQuoteElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLQuoteElementGetCite _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_quote_element_get_cite _obj' @@ -127,11 +296,14 @@ touchManagedPtr _obj return result' +data DOMHTMLQuoteElementGetCiteMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLQuoteElementK a) => MethodInfo DOMHTMLQuoteElementGetCiteMethodInfo a signature where + overloadedMethod _ = dOMHTMLQuoteElementGetCite + -- method DOMHTMLQuoteElement::set_cite -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLQuoteElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLQuoteElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLQuoteElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -144,9 +316,9 @@ dOMHTMLQuoteElementSetCite :: (MonadIO m, DOMHTMLQuoteElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLQuoteElementSetCite _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -154,5 +326,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLQuoteElementSetCiteMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLQuoteElementK a) => MethodInfo DOMHTMLQuoteElementSetCiteMethodInfo a signature where + overloadedMethod _ = dOMHTMLQuoteElementSetCite diff --git a/GI/WebKit/Objects/DOMHTMLQuoteElement.hs-boot b/GI/WebKit/Objects/DOMHTMLQuoteElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLQuoteElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLQuoteElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLQuoteElementK o instance (GObject o, IsDescendantOf DOMHTMLQuoteElement o) => DOMHTMLQuoteElementK o data DOMHTMLQuoteElementCitePropertyInfo +data DOMHTMLQuoteElementGetCiteMethodInfo +data DOMHTMLQuoteElementSetCiteMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLScriptElement.hs b/GI/WebKit/Objects/DOMHTMLScriptElement.hs --- a/GI/WebKit/Objects/DOMHTMLScriptElement.hs +++ b/GI/WebKit/Objects/DOMHTMLScriptElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,74 +18,92 @@ -- * Methods -- ** dOMHTMLScriptElementGetAsync + DOMHTMLScriptElementGetAsyncMethodInfo , dOMHTMLScriptElementGetAsync , -- ** dOMHTMLScriptElementGetCharset + DOMHTMLScriptElementGetCharsetMethodInfo, dOMHTMLScriptElementGetCharset , -- ** dOMHTMLScriptElementGetCrossOrigin + DOMHTMLScriptElementGetCrossOriginMethodInfo, dOMHTMLScriptElementGetCrossOrigin , -- ** dOMHTMLScriptElementGetDefer + DOMHTMLScriptElementGetDeferMethodInfo , dOMHTMLScriptElementGetDefer , -- ** dOMHTMLScriptElementGetEvent + DOMHTMLScriptElementGetEventMethodInfo , dOMHTMLScriptElementGetEvent , -- ** dOMHTMLScriptElementGetHtmlFor + DOMHTMLScriptElementGetHtmlForMethodInfo, dOMHTMLScriptElementGetHtmlFor , -- ** dOMHTMLScriptElementGetNonce + DOMHTMLScriptElementGetNonceMethodInfo , dOMHTMLScriptElementGetNonce , -- ** dOMHTMLScriptElementGetSrc + DOMHTMLScriptElementGetSrcMethodInfo , dOMHTMLScriptElementGetSrc , -- ** dOMHTMLScriptElementGetText + DOMHTMLScriptElementGetTextMethodInfo , dOMHTMLScriptElementGetText , -- ** dOMHTMLScriptElementSetAsync + DOMHTMLScriptElementSetAsyncMethodInfo , dOMHTMLScriptElementSetAsync , -- ** dOMHTMLScriptElementSetCharset + DOMHTMLScriptElementSetCharsetMethodInfo, dOMHTMLScriptElementSetCharset , -- ** dOMHTMLScriptElementSetCrossOrigin + DOMHTMLScriptElementSetCrossOriginMethodInfo, dOMHTMLScriptElementSetCrossOrigin , -- ** dOMHTMLScriptElementSetDefer + DOMHTMLScriptElementSetDeferMethodInfo , dOMHTMLScriptElementSetDefer , -- ** dOMHTMLScriptElementSetEvent + DOMHTMLScriptElementSetEventMethodInfo , dOMHTMLScriptElementSetEvent , -- ** dOMHTMLScriptElementSetHtmlFor + DOMHTMLScriptElementSetHtmlForMethodInfo, dOMHTMLScriptElementSetHtmlFor , -- ** dOMHTMLScriptElementSetNonce + DOMHTMLScriptElementSetNonceMethodInfo , dOMHTMLScriptElementSetNonce , -- ** dOMHTMLScriptElementSetSrc + DOMHTMLScriptElementSetSrcMethodInfo , dOMHTMLScriptElementSetSrc , -- ** dOMHTMLScriptElementSetText + DOMHTMLScriptElementSetTextMethodInfo , dOMHTMLScriptElementSetText , @@ -197,6 +216,189 @@ noDOMHTMLScriptElement :: Maybe DOMHTMLScriptElement noDOMHTMLScriptElement = Nothing +type family ResolveDOMHTMLScriptElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLScriptElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLScriptElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLScriptElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLScriptElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLScriptElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLScriptElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLScriptElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLScriptElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLScriptElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLScriptElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLScriptElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLScriptElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLScriptElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLScriptElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLScriptElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLScriptElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLScriptElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLScriptElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLScriptElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLScriptElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLScriptElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLScriptElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLScriptElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLScriptElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLScriptElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLScriptElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLScriptElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLScriptElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLScriptElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLScriptElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLScriptElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLScriptElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLScriptElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLScriptElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLScriptElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLScriptElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLScriptElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLScriptElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLScriptElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLScriptElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLScriptElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLScriptElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLScriptElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLScriptElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLScriptElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLScriptElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLScriptElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLScriptElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLScriptElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLScriptElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLScriptElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLScriptElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLScriptElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLScriptElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLScriptElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLScriptElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLScriptElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLScriptElementMethod "getAsync" o = DOMHTMLScriptElementGetAsyncMethodInfo + ResolveDOMHTMLScriptElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLScriptElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLScriptElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLScriptElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLScriptElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLScriptElementMethod "getCharset" o = DOMHTMLScriptElementGetCharsetMethodInfo + ResolveDOMHTMLScriptElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLScriptElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLScriptElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLScriptElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLScriptElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLScriptElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLScriptElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLScriptElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLScriptElementMethod "getCrossOrigin" o = DOMHTMLScriptElementGetCrossOriginMethodInfo + ResolveDOMHTMLScriptElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLScriptElementMethod "getDefer" o = DOMHTMLScriptElementGetDeferMethodInfo + ResolveDOMHTMLScriptElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLScriptElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLScriptElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLScriptElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLScriptElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLScriptElementMethod "getEvent" o = DOMHTMLScriptElementGetEventMethodInfo + ResolveDOMHTMLScriptElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLScriptElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLScriptElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLScriptElementMethod "getHtmlFor" o = DOMHTMLScriptElementGetHtmlForMethodInfo + ResolveDOMHTMLScriptElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLScriptElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLScriptElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLScriptElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLScriptElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLScriptElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLScriptElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLScriptElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLScriptElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLScriptElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLScriptElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLScriptElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLScriptElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLScriptElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLScriptElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLScriptElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLScriptElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLScriptElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLScriptElementMethod "getNonce" o = DOMHTMLScriptElementGetNonceMethodInfo + ResolveDOMHTMLScriptElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLScriptElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLScriptElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLScriptElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLScriptElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLScriptElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLScriptElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLScriptElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLScriptElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLScriptElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLScriptElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLScriptElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLScriptElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLScriptElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLScriptElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLScriptElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLScriptElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLScriptElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLScriptElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLScriptElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLScriptElementMethod "getSrc" o = DOMHTMLScriptElementGetSrcMethodInfo + ResolveDOMHTMLScriptElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLScriptElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLScriptElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLScriptElementMethod "getText" o = DOMHTMLScriptElementGetTextMethodInfo + ResolveDOMHTMLScriptElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLScriptElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLScriptElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLScriptElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLScriptElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLScriptElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLScriptElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLScriptElementMethod "setAsync" o = DOMHTMLScriptElementSetAsyncMethodInfo + ResolveDOMHTMLScriptElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLScriptElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLScriptElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLScriptElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLScriptElementMethod "setCharset" o = DOMHTMLScriptElementSetCharsetMethodInfo + ResolveDOMHTMLScriptElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLScriptElementMethod "setCrossOrigin" o = DOMHTMLScriptElementSetCrossOriginMethodInfo + ResolveDOMHTMLScriptElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLScriptElementMethod "setDefer" o = DOMHTMLScriptElementSetDeferMethodInfo + ResolveDOMHTMLScriptElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLScriptElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLScriptElementMethod "setEvent" o = DOMHTMLScriptElementSetEventMethodInfo + ResolveDOMHTMLScriptElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLScriptElementMethod "setHtmlFor" o = DOMHTMLScriptElementSetHtmlForMethodInfo + ResolveDOMHTMLScriptElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLScriptElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLScriptElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLScriptElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLScriptElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLScriptElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLScriptElementMethod "setNonce" o = DOMHTMLScriptElementSetNonceMethodInfo + ResolveDOMHTMLScriptElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLScriptElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLScriptElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLScriptElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLScriptElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLScriptElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLScriptElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLScriptElementMethod "setSrc" o = DOMHTMLScriptElementSetSrcMethodInfo + ResolveDOMHTMLScriptElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLScriptElementMethod "setText" o = DOMHTMLScriptElementSetTextMethodInfo + ResolveDOMHTMLScriptElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLScriptElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLScriptElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLScriptElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLScriptElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLScriptElementMethod t DOMHTMLScriptElement, MethodInfo info DOMHTMLScriptElement p) => IsLabelProxy t (DOMHTMLScriptElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLScriptElementMethod t DOMHTMLScriptElement, MethodInfo info DOMHTMLScriptElement p) => IsLabel t (DOMHTMLScriptElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "async" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -216,7 +418,7 @@ type AttrSetTypeConstraint DOMHTMLScriptElementAsyncPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLScriptElementAsyncPropertyInfo = DOMHTMLScriptElementK type AttrGetType DOMHTMLScriptElementAsyncPropertyInfo = Bool - type AttrLabel DOMHTMLScriptElementAsyncPropertyInfo = "DOMHTMLScriptElement::async" + type AttrLabel DOMHTMLScriptElementAsyncPropertyInfo = "async" attrGet _ = getDOMHTMLScriptElementAsync attrSet _ = setDOMHTMLScriptElementAsync attrConstruct _ = constructDOMHTMLScriptElementAsync @@ -240,7 +442,7 @@ type AttrSetTypeConstraint DOMHTMLScriptElementCharsetPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLScriptElementCharsetPropertyInfo = DOMHTMLScriptElementK type AttrGetType DOMHTMLScriptElementCharsetPropertyInfo = T.Text - type AttrLabel DOMHTMLScriptElementCharsetPropertyInfo = "DOMHTMLScriptElement::charset" + type AttrLabel DOMHTMLScriptElementCharsetPropertyInfo = "charset" attrGet _ = getDOMHTMLScriptElementCharset attrSet _ = setDOMHTMLScriptElementCharset attrConstruct _ = constructDOMHTMLScriptElementCharset @@ -264,7 +466,7 @@ type AttrSetTypeConstraint DOMHTMLScriptElementCrossOriginPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLScriptElementCrossOriginPropertyInfo = DOMHTMLScriptElementK type AttrGetType DOMHTMLScriptElementCrossOriginPropertyInfo = T.Text - type AttrLabel DOMHTMLScriptElementCrossOriginPropertyInfo = "DOMHTMLScriptElement::cross-origin" + type AttrLabel DOMHTMLScriptElementCrossOriginPropertyInfo = "cross-origin" attrGet _ = getDOMHTMLScriptElementCrossOrigin attrSet _ = setDOMHTMLScriptElementCrossOrigin attrConstruct _ = constructDOMHTMLScriptElementCrossOrigin @@ -288,7 +490,7 @@ type AttrSetTypeConstraint DOMHTMLScriptElementDeferPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLScriptElementDeferPropertyInfo = DOMHTMLScriptElementK type AttrGetType DOMHTMLScriptElementDeferPropertyInfo = Bool - type AttrLabel DOMHTMLScriptElementDeferPropertyInfo = "DOMHTMLScriptElement::defer" + type AttrLabel DOMHTMLScriptElementDeferPropertyInfo = "defer" attrGet _ = getDOMHTMLScriptElementDefer attrSet _ = setDOMHTMLScriptElementDefer attrConstruct _ = constructDOMHTMLScriptElementDefer @@ -312,7 +514,7 @@ type AttrSetTypeConstraint DOMHTMLScriptElementEventPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLScriptElementEventPropertyInfo = DOMHTMLScriptElementK type AttrGetType DOMHTMLScriptElementEventPropertyInfo = T.Text - type AttrLabel DOMHTMLScriptElementEventPropertyInfo = "DOMHTMLScriptElement::event" + type AttrLabel DOMHTMLScriptElementEventPropertyInfo = "event" attrGet _ = getDOMHTMLScriptElementEvent attrSet _ = setDOMHTMLScriptElementEvent attrConstruct _ = constructDOMHTMLScriptElementEvent @@ -336,7 +538,7 @@ type AttrSetTypeConstraint DOMHTMLScriptElementHtmlForPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLScriptElementHtmlForPropertyInfo = DOMHTMLScriptElementK type AttrGetType DOMHTMLScriptElementHtmlForPropertyInfo = T.Text - type AttrLabel DOMHTMLScriptElementHtmlForPropertyInfo = "DOMHTMLScriptElement::html-for" + type AttrLabel DOMHTMLScriptElementHtmlForPropertyInfo = "html-for" attrGet _ = getDOMHTMLScriptElementHtmlFor attrSet _ = setDOMHTMLScriptElementHtmlFor attrConstruct _ = constructDOMHTMLScriptElementHtmlFor @@ -360,7 +562,7 @@ type AttrSetTypeConstraint DOMHTMLScriptElementNoncePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLScriptElementNoncePropertyInfo = DOMHTMLScriptElementK type AttrGetType DOMHTMLScriptElementNoncePropertyInfo = T.Text - type AttrLabel DOMHTMLScriptElementNoncePropertyInfo = "DOMHTMLScriptElement::nonce" + type AttrLabel DOMHTMLScriptElementNoncePropertyInfo = "nonce" attrGet _ = getDOMHTMLScriptElementNonce attrSet _ = setDOMHTMLScriptElementNonce attrConstruct _ = constructDOMHTMLScriptElementNonce @@ -384,7 +586,7 @@ type AttrSetTypeConstraint DOMHTMLScriptElementSrcPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLScriptElementSrcPropertyInfo = DOMHTMLScriptElementK type AttrGetType DOMHTMLScriptElementSrcPropertyInfo = T.Text - type AttrLabel DOMHTMLScriptElementSrcPropertyInfo = "DOMHTMLScriptElement::src" + type AttrLabel DOMHTMLScriptElementSrcPropertyInfo = "src" attrGet _ = getDOMHTMLScriptElementSrc attrSet _ = setDOMHTMLScriptElementSrc attrConstruct _ = constructDOMHTMLScriptElementSrc @@ -408,7 +610,7 @@ type AttrSetTypeConstraint DOMHTMLScriptElementTextPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLScriptElementTextPropertyInfo = DOMHTMLScriptElementK type AttrGetType DOMHTMLScriptElementTextPropertyInfo = T.Text - type AttrLabel DOMHTMLScriptElementTextPropertyInfo = "DOMHTMLScriptElement::text" + type AttrLabel DOMHTMLScriptElementTextPropertyInfo = "text" attrGet _ = getDOMHTMLScriptElementText attrSet _ = setDOMHTMLScriptElementText attrConstruct _ = constructDOMHTMLScriptElementText @@ -432,22 +634,21 @@ type AttrSetTypeConstraint DOMHTMLScriptElementTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLScriptElementTypePropertyInfo = DOMHTMLScriptElementK type AttrGetType DOMHTMLScriptElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLScriptElementTypePropertyInfo = "DOMHTMLScriptElement::type" + type AttrLabel DOMHTMLScriptElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLScriptElementType attrSet _ = setDOMHTMLScriptElementType attrConstruct _ = constructDOMHTMLScriptElementType type instance AttributeList DOMHTMLScriptElement = DOMHTMLScriptElementAttributeList -type DOMHTMLScriptElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("async", DOMHTMLScriptElementAsyncPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("charset", DOMHTMLScriptElementCharsetPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("cross-origin", DOMHTMLScriptElementCrossOriginPropertyInfo), '("defer", DOMHTMLScriptElementDeferPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("event", DOMHTMLScriptElementEventPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("html-for", DOMHTMLScriptElementHtmlForPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("nonce", DOMHTMLScriptElementNoncePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLScriptElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text", DOMHTMLScriptElementTextPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLScriptElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLScriptElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("async", DOMHTMLScriptElementAsyncPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("charset", DOMHTMLScriptElementCharsetPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("crossOrigin", DOMHTMLScriptElementCrossOriginPropertyInfo), '("defer", DOMHTMLScriptElementDeferPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("event", DOMHTMLScriptElementEventPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("htmlFor", DOMHTMLScriptElementHtmlForPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("nonce", DOMHTMLScriptElementNoncePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLScriptElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("text", DOMHTMLScriptElementTextPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLScriptElementTypePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLScriptElement = DOMHTMLScriptElementSignalList -type DOMHTMLScriptElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLScriptElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLScriptElement::get_async -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -459,8 +660,8 @@ dOMHTMLScriptElementGetAsync :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLScriptElementGetAsync _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_script_element_get_async _obj' @@ -468,11 +669,14 @@ touchManagedPtr _obj return result' +data DOMHTMLScriptElementGetAsyncMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementGetAsyncMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementGetAsync + -- method DOMHTMLScriptElement::get_charset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -484,8 +688,8 @@ dOMHTMLScriptElementGetCharset :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLScriptElementGetCharset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_script_element_get_charset _obj' @@ -495,11 +699,14 @@ touchManagedPtr _obj return result' +data DOMHTMLScriptElementGetCharsetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementGetCharsetMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementGetCharset + -- method DOMHTMLScriptElement::get_cross_origin -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -511,8 +718,8 @@ dOMHTMLScriptElementGetCrossOrigin :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLScriptElementGetCrossOrigin _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_script_element_get_cross_origin _obj' @@ -522,11 +729,14 @@ touchManagedPtr _obj return result' +data DOMHTMLScriptElementGetCrossOriginMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementGetCrossOriginMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementGetCrossOrigin + -- method DOMHTMLScriptElement::get_defer -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -538,8 +748,8 @@ dOMHTMLScriptElementGetDefer :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLScriptElementGetDefer _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_script_element_get_defer _obj' @@ -547,11 +757,14 @@ touchManagedPtr _obj return result' +data DOMHTMLScriptElementGetDeferMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementGetDeferMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementGetDefer + -- method DOMHTMLScriptElement::get_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -563,8 +776,8 @@ dOMHTMLScriptElementGetEvent :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLScriptElementGetEvent _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_script_element_get_event _obj' @@ -574,11 +787,14 @@ touchManagedPtr _obj return result' +data DOMHTMLScriptElementGetEventMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementGetEventMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementGetEvent + -- method DOMHTMLScriptElement::get_html_for -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -590,8 +806,8 @@ dOMHTMLScriptElementGetHtmlFor :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLScriptElementGetHtmlFor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_script_element_get_html_for _obj' @@ -601,11 +817,14 @@ touchManagedPtr _obj return result' +data DOMHTMLScriptElementGetHtmlForMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementGetHtmlForMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementGetHtmlFor + -- method DOMHTMLScriptElement::get_nonce -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -617,8 +836,8 @@ dOMHTMLScriptElementGetNonce :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLScriptElementGetNonce _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_script_element_get_nonce _obj' @@ -628,11 +847,14 @@ touchManagedPtr _obj return result' +data DOMHTMLScriptElementGetNonceMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementGetNonceMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementGetNonce + -- method DOMHTMLScriptElement::get_src -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -644,8 +866,8 @@ dOMHTMLScriptElementGetSrc :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLScriptElementGetSrc _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_script_element_get_src _obj' @@ -655,11 +877,14 @@ touchManagedPtr _obj return result' +data DOMHTMLScriptElementGetSrcMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementGetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementGetSrc + -- method DOMHTMLScriptElement::get_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -671,8 +896,8 @@ dOMHTMLScriptElementGetText :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLScriptElementGetText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_script_element_get_text _obj' @@ -682,11 +907,14 @@ touchManagedPtr _obj return result' +data DOMHTMLScriptElementGetTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementGetTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementGetText + -- method DOMHTMLScriptElement::set_async -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -699,9 +927,9 @@ dOMHTMLScriptElementSetAsync :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLScriptElementSetAsync _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -709,11 +937,14 @@ touchManagedPtr _obj return () +data DOMHTMLScriptElementSetAsyncMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementSetAsyncMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementSetAsync + -- method DOMHTMLScriptElement::set_charset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -726,9 +957,9 @@ dOMHTMLScriptElementSetCharset :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLScriptElementSetCharset _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -737,11 +968,14 @@ freeMem value' return () +data DOMHTMLScriptElementSetCharsetMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementSetCharsetMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementSetCharset + -- method DOMHTMLScriptElement::set_cross_origin -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -754,9 +988,9 @@ dOMHTMLScriptElementSetCrossOrigin :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLScriptElementSetCrossOrigin _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -765,11 +999,14 @@ freeMem value' return () +data DOMHTMLScriptElementSetCrossOriginMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementSetCrossOriginMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementSetCrossOrigin + -- method DOMHTMLScriptElement::set_defer -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -782,9 +1019,9 @@ dOMHTMLScriptElementSetDefer :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLScriptElementSetDefer _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -792,11 +1029,14 @@ touchManagedPtr _obj return () +data DOMHTMLScriptElementSetDeferMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementSetDeferMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementSetDefer + -- method DOMHTMLScriptElement::set_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -809,9 +1049,9 @@ dOMHTMLScriptElementSetEvent :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLScriptElementSetEvent _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -820,11 +1060,14 @@ freeMem value' return () +data DOMHTMLScriptElementSetEventMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementSetEventMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementSetEvent + -- method DOMHTMLScriptElement::set_html_for -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -837,9 +1080,9 @@ dOMHTMLScriptElementSetHtmlFor :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLScriptElementSetHtmlFor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -848,11 +1091,14 @@ freeMem value' return () +data DOMHTMLScriptElementSetHtmlForMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementSetHtmlForMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementSetHtmlFor + -- method DOMHTMLScriptElement::set_nonce -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -865,9 +1111,9 @@ dOMHTMLScriptElementSetNonce :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLScriptElementSetNonce _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -876,11 +1122,14 @@ freeMem value' return () +data DOMHTMLScriptElementSetNonceMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementSetNonceMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementSetNonce + -- method DOMHTMLScriptElement::set_src -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -893,9 +1142,9 @@ dOMHTMLScriptElementSetSrc :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLScriptElementSetSrc _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -904,11 +1153,14 @@ freeMem value' return () +data DOMHTMLScriptElementSetSrcMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementSetSrcMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementSetSrc + -- method DOMHTMLScriptElement::set_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLScriptElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -921,9 +1173,9 @@ dOMHTMLScriptElementSetText :: (MonadIO m, DOMHTMLScriptElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLScriptElementSetText _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -931,5 +1183,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLScriptElementSetTextMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLScriptElementK a) => MethodInfo DOMHTMLScriptElementSetTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLScriptElementSetText diff --git a/GI/WebKit/Objects/DOMHTMLScriptElement.hs-boot b/GI/WebKit/Objects/DOMHTMLScriptElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLScriptElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLScriptElement.hs-boot @@ -21,3 +21,21 @@ data DOMHTMLScriptElementSrcPropertyInfo data DOMHTMLScriptElementTextPropertyInfo data DOMHTMLScriptElementTypePropertyInfo +data DOMHTMLScriptElementGetAsyncMethodInfo +data DOMHTMLScriptElementGetCharsetMethodInfo +data DOMHTMLScriptElementGetCrossOriginMethodInfo +data DOMHTMLScriptElementGetDeferMethodInfo +data DOMHTMLScriptElementGetEventMethodInfo +data DOMHTMLScriptElementGetHtmlForMethodInfo +data DOMHTMLScriptElementGetNonceMethodInfo +data DOMHTMLScriptElementGetSrcMethodInfo +data DOMHTMLScriptElementGetTextMethodInfo +data DOMHTMLScriptElementSetAsyncMethodInfo +data DOMHTMLScriptElementSetCharsetMethodInfo +data DOMHTMLScriptElementSetCrossOriginMethodInfo +data DOMHTMLScriptElementSetDeferMethodInfo +data DOMHTMLScriptElementSetEventMethodInfo +data DOMHTMLScriptElementSetHtmlForMethodInfo +data DOMHTMLScriptElementSetNonceMethodInfo +data DOMHTMLScriptElementSetSrcMethodInfo +data DOMHTMLScriptElementSetTextMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLSelectElement.hs b/GI/WebKit/Objects/DOMHTMLSelectElement.hs --- a/GI/WebKit/Objects/DOMHTMLSelectElement.hs +++ b/GI/WebKit/Objects/DOMHTMLSelectElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,126 +18,157 @@ -- * Methods -- ** dOMHTMLSelectElementAdd + DOMHTMLSelectElementAddMethodInfo , dOMHTMLSelectElementAdd , -- ** dOMHTMLSelectElementCheckValidity + DOMHTMLSelectElementCheckValidityMethodInfo, dOMHTMLSelectElementCheckValidity , -- ** dOMHTMLSelectElementGetAutofocus + DOMHTMLSelectElementGetAutofocusMethodInfo, dOMHTMLSelectElementGetAutofocus , -- ** dOMHTMLSelectElementGetDisabled + DOMHTMLSelectElementGetDisabledMethodInfo, dOMHTMLSelectElementGetDisabled , -- ** dOMHTMLSelectElementGetForm + DOMHTMLSelectElementGetFormMethodInfo , dOMHTMLSelectElementGetForm , -- ** dOMHTMLSelectElementGetLabels + DOMHTMLSelectElementGetLabelsMethodInfo , dOMHTMLSelectElementGetLabels , -- ** dOMHTMLSelectElementGetLength + DOMHTMLSelectElementGetLengthMethodInfo , dOMHTMLSelectElementGetLength , -- ** dOMHTMLSelectElementGetMultiple + DOMHTMLSelectElementGetMultipleMethodInfo, dOMHTMLSelectElementGetMultiple , -- ** dOMHTMLSelectElementGetName + DOMHTMLSelectElementGetNameMethodInfo , dOMHTMLSelectElementGetName , -- ** dOMHTMLSelectElementGetOptions + DOMHTMLSelectElementGetOptionsMethodInfo, dOMHTMLSelectElementGetOptions , -- ** dOMHTMLSelectElementGetRequired + DOMHTMLSelectElementGetRequiredMethodInfo, dOMHTMLSelectElementGetRequired , -- ** dOMHTMLSelectElementGetSelectedIndex + DOMHTMLSelectElementGetSelectedIndexMethodInfo, dOMHTMLSelectElementGetSelectedIndex , -- ** dOMHTMLSelectElementGetSelectedOptions + DOMHTMLSelectElementGetSelectedOptionsMethodInfo, dOMHTMLSelectElementGetSelectedOptions , -- ** dOMHTMLSelectElementGetSize + DOMHTMLSelectElementGetSizeMethodInfo , dOMHTMLSelectElementGetSize , -- ** dOMHTMLSelectElementGetValidationMessage + DOMHTMLSelectElementGetValidationMessageMethodInfo, dOMHTMLSelectElementGetValidationMessage, -- ** dOMHTMLSelectElementGetValidity + DOMHTMLSelectElementGetValidityMethodInfo, dOMHTMLSelectElementGetValidity , -- ** dOMHTMLSelectElementGetValue + DOMHTMLSelectElementGetValueMethodInfo , dOMHTMLSelectElementGetValue , -- ** dOMHTMLSelectElementGetWillValidate + DOMHTMLSelectElementGetWillValidateMethodInfo, dOMHTMLSelectElementGetWillValidate , -- ** dOMHTMLSelectElementItem + DOMHTMLSelectElementItemMethodInfo , dOMHTMLSelectElementItem , -- ** dOMHTMLSelectElementNamedItem + DOMHTMLSelectElementNamedItemMethodInfo , dOMHTMLSelectElementNamedItem , -- ** dOMHTMLSelectElementRemove + DOMHTMLSelectElementRemoveMethodInfo , dOMHTMLSelectElementRemove , -- ** dOMHTMLSelectElementSetAutofocus + DOMHTMLSelectElementSetAutofocusMethodInfo, dOMHTMLSelectElementSetAutofocus , -- ** dOMHTMLSelectElementSetCustomValidity + DOMHTMLSelectElementSetCustomValidityMethodInfo, dOMHTMLSelectElementSetCustomValidity , -- ** dOMHTMLSelectElementSetDisabled + DOMHTMLSelectElementSetDisabledMethodInfo, dOMHTMLSelectElementSetDisabled , -- ** dOMHTMLSelectElementSetLength + DOMHTMLSelectElementSetLengthMethodInfo , dOMHTMLSelectElementSetLength , -- ** dOMHTMLSelectElementSetMultiple + DOMHTMLSelectElementSetMultipleMethodInfo, dOMHTMLSelectElementSetMultiple , -- ** dOMHTMLSelectElementSetName + DOMHTMLSelectElementSetNameMethodInfo , dOMHTMLSelectElementSetName , -- ** dOMHTMLSelectElementSetRequired + DOMHTMLSelectElementSetRequiredMethodInfo, dOMHTMLSelectElementSetRequired , -- ** dOMHTMLSelectElementSetSelectedIndex + DOMHTMLSelectElementSetSelectedIndexMethodInfo, dOMHTMLSelectElementSetSelectedIndex , -- ** dOMHTMLSelectElementSetSize + DOMHTMLSelectElementSetSizeMethodInfo , dOMHTMLSelectElementSetSize , -- ** dOMHTMLSelectElementSetValue + DOMHTMLSelectElementSetValueMethodInfo , dOMHTMLSelectElementSetValue , @@ -282,6 +314,200 @@ noDOMHTMLSelectElement :: Maybe DOMHTMLSelectElement noDOMHTMLSelectElement = Nothing +type family ResolveDOMHTMLSelectElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLSelectElementMethod "add" o = DOMHTMLSelectElementAddMethodInfo + ResolveDOMHTMLSelectElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLSelectElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLSelectElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLSelectElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLSelectElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLSelectElementMethod "checkValidity" o = DOMHTMLSelectElementCheckValidityMethodInfo + ResolveDOMHTMLSelectElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLSelectElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLSelectElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLSelectElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLSelectElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLSelectElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLSelectElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLSelectElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLSelectElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLSelectElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLSelectElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLSelectElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLSelectElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLSelectElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLSelectElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLSelectElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLSelectElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLSelectElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLSelectElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLSelectElementMethod "item" o = DOMHTMLSelectElementItemMethodInfo + ResolveDOMHTMLSelectElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLSelectElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLSelectElementMethod "namedItem" o = DOMHTMLSelectElementNamedItemMethodInfo + ResolveDOMHTMLSelectElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLSelectElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLSelectElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLSelectElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLSelectElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLSelectElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLSelectElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLSelectElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLSelectElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLSelectElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLSelectElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLSelectElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLSelectElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLSelectElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLSelectElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLSelectElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLSelectElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLSelectElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLSelectElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLSelectElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLSelectElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLSelectElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLSelectElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLSelectElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLSelectElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLSelectElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLSelectElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLSelectElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLSelectElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLSelectElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLSelectElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLSelectElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLSelectElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLSelectElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLSelectElementMethod "getAutofocus" o = DOMHTMLSelectElementGetAutofocusMethodInfo + ResolveDOMHTMLSelectElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLSelectElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLSelectElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLSelectElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLSelectElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLSelectElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLSelectElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLSelectElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLSelectElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLSelectElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLSelectElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLSelectElementMethod "getDisabled" o = DOMHTMLSelectElementGetDisabledMethodInfo + ResolveDOMHTMLSelectElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLSelectElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLSelectElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLSelectElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLSelectElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLSelectElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLSelectElementMethod "getForm" o = DOMHTMLSelectElementGetFormMethodInfo + ResolveDOMHTMLSelectElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLSelectElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLSelectElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLSelectElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLSelectElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLSelectElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLSelectElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLSelectElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLSelectElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLSelectElementMethod "getLabels" o = DOMHTMLSelectElementGetLabelsMethodInfo + ResolveDOMHTMLSelectElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLSelectElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLSelectElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLSelectElementMethod "getLength" o = DOMHTMLSelectElementGetLengthMethodInfo + ResolveDOMHTMLSelectElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLSelectElementMethod "getMultiple" o = DOMHTMLSelectElementGetMultipleMethodInfo + ResolveDOMHTMLSelectElementMethod "getName" o = DOMHTMLSelectElementGetNameMethodInfo + ResolveDOMHTMLSelectElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLSelectElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLSelectElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLSelectElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLSelectElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLSelectElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLSelectElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLSelectElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLSelectElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLSelectElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLSelectElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLSelectElementMethod "getOptions" o = DOMHTMLSelectElementGetOptionsMethodInfo + ResolveDOMHTMLSelectElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLSelectElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLSelectElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLSelectElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLSelectElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLSelectElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLSelectElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLSelectElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLSelectElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLSelectElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLSelectElementMethod "getRequired" o = DOMHTMLSelectElementGetRequiredMethodInfo + ResolveDOMHTMLSelectElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLSelectElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLSelectElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLSelectElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLSelectElementMethod "getSelectedIndex" o = DOMHTMLSelectElementGetSelectedIndexMethodInfo + ResolveDOMHTMLSelectElementMethod "getSelectedOptions" o = DOMHTMLSelectElementGetSelectedOptionsMethodInfo + ResolveDOMHTMLSelectElementMethod "getSize" o = DOMHTMLSelectElementGetSizeMethodInfo + ResolveDOMHTMLSelectElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLSelectElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLSelectElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLSelectElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLSelectElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLSelectElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLSelectElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLSelectElementMethod "getValidationMessage" o = DOMHTMLSelectElementGetValidationMessageMethodInfo + ResolveDOMHTMLSelectElementMethod "getValidity" o = DOMHTMLSelectElementGetValidityMethodInfo + ResolveDOMHTMLSelectElementMethod "getValue" o = DOMHTMLSelectElementGetValueMethodInfo + ResolveDOMHTMLSelectElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLSelectElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLSelectElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLSelectElementMethod "getWillValidate" o = DOMHTMLSelectElementGetWillValidateMethodInfo + ResolveDOMHTMLSelectElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLSelectElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLSelectElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLSelectElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLSelectElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLSelectElementMethod "setAutofocus" o = DOMHTMLSelectElementSetAutofocusMethodInfo + ResolveDOMHTMLSelectElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLSelectElementMethod "setCustomValidity" o = DOMHTMLSelectElementSetCustomValidityMethodInfo + ResolveDOMHTMLSelectElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLSelectElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLSelectElementMethod "setDisabled" o = DOMHTMLSelectElementSetDisabledMethodInfo + ResolveDOMHTMLSelectElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLSelectElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLSelectElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLSelectElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLSelectElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLSelectElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLSelectElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLSelectElementMethod "setLength" o = DOMHTMLSelectElementSetLengthMethodInfo + ResolveDOMHTMLSelectElementMethod "setMultiple" o = DOMHTMLSelectElementSetMultipleMethodInfo + ResolveDOMHTMLSelectElementMethod "setName" o = DOMHTMLSelectElementSetNameMethodInfo + ResolveDOMHTMLSelectElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLSelectElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLSelectElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLSelectElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLSelectElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLSelectElementMethod "setRequired" o = DOMHTMLSelectElementSetRequiredMethodInfo + ResolveDOMHTMLSelectElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLSelectElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLSelectElementMethod "setSelectedIndex" o = DOMHTMLSelectElementSetSelectedIndexMethodInfo + ResolveDOMHTMLSelectElementMethod "setSize" o = DOMHTMLSelectElementSetSizeMethodInfo + ResolveDOMHTMLSelectElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLSelectElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLSelectElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLSelectElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLSelectElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLSelectElementMethod "setValue" o = DOMHTMLSelectElementSetValueMethodInfo + ResolveDOMHTMLSelectElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLSelectElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLSelectElementMethod t DOMHTMLSelectElement, MethodInfo info DOMHTMLSelectElement p) => IsLabelProxy t (DOMHTMLSelectElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLSelectElementMethod t DOMHTMLSelectElement, MethodInfo info DOMHTMLSelectElement p) => IsLabel t (DOMHTMLSelectElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "autofocus" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -301,7 +527,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementAutofocusPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLSelectElementAutofocusPropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementAutofocusPropertyInfo = Bool - type AttrLabel DOMHTMLSelectElementAutofocusPropertyInfo = "DOMHTMLSelectElement::autofocus" + type AttrLabel DOMHTMLSelectElementAutofocusPropertyInfo = "autofocus" attrGet _ = getDOMHTMLSelectElementAutofocus attrSet _ = setDOMHTMLSelectElementAutofocus attrConstruct _ = constructDOMHTMLSelectElementAutofocus @@ -325,7 +551,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementDisabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLSelectElementDisabledPropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementDisabledPropertyInfo = Bool - type AttrLabel DOMHTMLSelectElementDisabledPropertyInfo = "DOMHTMLSelectElement::disabled" + type AttrLabel DOMHTMLSelectElementDisabledPropertyInfo = "disabled" attrGet _ = getDOMHTMLSelectElementDisabled attrSet _ = setDOMHTMLSelectElementDisabled attrConstruct _ = constructDOMHTMLSelectElementDisabled @@ -343,7 +569,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementFormPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLSelectElementFormPropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementFormPropertyInfo = DOMHTMLFormElement - type AttrLabel DOMHTMLSelectElementFormPropertyInfo = "DOMHTMLSelectElement::form" + type AttrLabel DOMHTMLSelectElementFormPropertyInfo = "form" attrGet _ = getDOMHTMLSelectElementForm attrSet _ = undefined attrConstruct _ = undefined @@ -361,7 +587,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementLabelsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLSelectElementLabelsPropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementLabelsPropertyInfo = DOMNodeList - type AttrLabel DOMHTMLSelectElementLabelsPropertyInfo = "DOMHTMLSelectElement::labels" + type AttrLabel DOMHTMLSelectElementLabelsPropertyInfo = "labels" attrGet _ = getDOMHTMLSelectElementLabels attrSet _ = undefined attrConstruct _ = undefined @@ -385,7 +611,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementLengthPropertyInfo = (~) Word64 type AttrBaseTypeConstraint DOMHTMLSelectElementLengthPropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementLengthPropertyInfo = Word64 - type AttrLabel DOMHTMLSelectElementLengthPropertyInfo = "DOMHTMLSelectElement::length" + type AttrLabel DOMHTMLSelectElementLengthPropertyInfo = "length" attrGet _ = getDOMHTMLSelectElementLength attrSet _ = setDOMHTMLSelectElementLength attrConstruct _ = constructDOMHTMLSelectElementLength @@ -409,7 +635,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementMultiplePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLSelectElementMultiplePropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementMultiplePropertyInfo = Bool - type AttrLabel DOMHTMLSelectElementMultiplePropertyInfo = "DOMHTMLSelectElement::multiple" + type AttrLabel DOMHTMLSelectElementMultiplePropertyInfo = "multiple" attrGet _ = getDOMHTMLSelectElementMultiple attrSet _ = setDOMHTMLSelectElementMultiple attrConstruct _ = constructDOMHTMLSelectElementMultiple @@ -433,7 +659,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLSelectElementNamePropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLSelectElementNamePropertyInfo = "DOMHTMLSelectElement::name" + type AttrLabel DOMHTMLSelectElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLSelectElementName attrSet _ = setDOMHTMLSelectElementName attrConstruct _ = constructDOMHTMLSelectElementName @@ -451,7 +677,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementOptionsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLSelectElementOptionsPropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementOptionsPropertyInfo = DOMHTMLOptionsCollection - type AttrLabel DOMHTMLSelectElementOptionsPropertyInfo = "DOMHTMLSelectElement::options" + type AttrLabel DOMHTMLSelectElementOptionsPropertyInfo = "options" attrGet _ = getDOMHTMLSelectElementOptions attrSet _ = undefined attrConstruct _ = undefined @@ -475,7 +701,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementRequiredPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLSelectElementRequiredPropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementRequiredPropertyInfo = Bool - type AttrLabel DOMHTMLSelectElementRequiredPropertyInfo = "DOMHTMLSelectElement::required" + type AttrLabel DOMHTMLSelectElementRequiredPropertyInfo = "required" attrGet _ = getDOMHTMLSelectElementRequired attrSet _ = setDOMHTMLSelectElementRequired attrConstruct _ = constructDOMHTMLSelectElementRequired @@ -499,7 +725,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementSelectedIndexPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLSelectElementSelectedIndexPropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementSelectedIndexPropertyInfo = Int64 - type AttrLabel DOMHTMLSelectElementSelectedIndexPropertyInfo = "DOMHTMLSelectElement::selected-index" + type AttrLabel DOMHTMLSelectElementSelectedIndexPropertyInfo = "selected-index" attrGet _ = getDOMHTMLSelectElementSelectedIndex attrSet _ = setDOMHTMLSelectElementSelectedIndex attrConstruct _ = constructDOMHTMLSelectElementSelectedIndex @@ -517,7 +743,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementSelectedOptionsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLSelectElementSelectedOptionsPropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementSelectedOptionsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLSelectElementSelectedOptionsPropertyInfo = "DOMHTMLSelectElement::selected-options" + type AttrLabel DOMHTMLSelectElementSelectedOptionsPropertyInfo = "selected-options" attrGet _ = getDOMHTMLSelectElementSelectedOptions attrSet _ = undefined attrConstruct _ = undefined @@ -541,7 +767,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementSizePropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLSelectElementSizePropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementSizePropertyInfo = Int64 - type AttrLabel DOMHTMLSelectElementSizePropertyInfo = "DOMHTMLSelectElement::size" + type AttrLabel DOMHTMLSelectElementSizePropertyInfo = "size" attrGet _ = getDOMHTMLSelectElementSize attrSet _ = setDOMHTMLSelectElementSize attrConstruct _ = constructDOMHTMLSelectElementSize @@ -559,7 +785,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLSelectElementTypePropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLSelectElementTypePropertyInfo = "DOMHTMLSelectElement::type" + type AttrLabel DOMHTMLSelectElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLSelectElementType attrSet _ = undefined attrConstruct _ = undefined @@ -577,7 +803,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementValidationMessagePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLSelectElementValidationMessagePropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementValidationMessagePropertyInfo = T.Text - type AttrLabel DOMHTMLSelectElementValidationMessagePropertyInfo = "DOMHTMLSelectElement::validation-message" + type AttrLabel DOMHTMLSelectElementValidationMessagePropertyInfo = "validation-message" attrGet _ = getDOMHTMLSelectElementValidationMessage attrSet _ = undefined attrConstruct _ = undefined @@ -595,7 +821,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementValidityPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLSelectElementValidityPropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementValidityPropertyInfo = DOMValidityState - type AttrLabel DOMHTMLSelectElementValidityPropertyInfo = "DOMHTMLSelectElement::validity" + type AttrLabel DOMHTMLSelectElementValidityPropertyInfo = "validity" attrGet _ = getDOMHTMLSelectElementValidity attrSet _ = undefined attrConstruct _ = undefined @@ -619,7 +845,7 @@ type AttrSetTypeConstraint DOMHTMLSelectElementValuePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLSelectElementValuePropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementValuePropertyInfo = T.Text - type AttrLabel DOMHTMLSelectElementValuePropertyInfo = "DOMHTMLSelectElement::value" + type AttrLabel DOMHTMLSelectElementValuePropertyInfo = "value" attrGet _ = getDOMHTMLSelectElementValue attrSet _ = setDOMHTMLSelectElementValue attrConstruct _ = constructDOMHTMLSelectElementValue @@ -637,22 +863,21 @@ type AttrSetTypeConstraint DOMHTMLSelectElementWillValidatePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLSelectElementWillValidatePropertyInfo = DOMHTMLSelectElementK type AttrGetType DOMHTMLSelectElementWillValidatePropertyInfo = Bool - type AttrLabel DOMHTMLSelectElementWillValidatePropertyInfo = "DOMHTMLSelectElement::will-validate" + type AttrLabel DOMHTMLSelectElementWillValidatePropertyInfo = "will-validate" attrGet _ = getDOMHTMLSelectElementWillValidate attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHTMLSelectElement = DOMHTMLSelectElementAttributeList -type DOMHTMLSelectElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autofocus", DOMHTMLSelectElementAutofocusPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLSelectElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLSelectElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLSelectElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("length", DOMHTMLSelectElementLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("multiple", DOMHTMLSelectElementMultiplePropertyInfo), '("name", DOMHTMLSelectElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("options", DOMHTMLSelectElementOptionsPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("required", DOMHTMLSelectElementRequiredPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("selected-index", DOMHTMLSelectElementSelectedIndexPropertyInfo), '("selected-options", DOMHTMLSelectElementSelectedOptionsPropertyInfo), '("size", DOMHTMLSelectElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLSelectElementTypePropertyInfo), '("validation-message", DOMHTMLSelectElementValidationMessagePropertyInfo), '("validity", DOMHTMLSelectElementValidityPropertyInfo), '("value", DOMHTMLSelectElementValuePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("will-validate", DOMHTMLSelectElementWillValidatePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLSelectElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autofocus", DOMHTMLSelectElementAutofocusPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLSelectElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLSelectElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLSelectElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("length", DOMHTMLSelectElementLengthPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("multiple", DOMHTMLSelectElementMultiplePropertyInfo), '("name", DOMHTMLSelectElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("options", DOMHTMLSelectElementOptionsPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("required", DOMHTMLSelectElementRequiredPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("selectedIndex", DOMHTMLSelectElementSelectedIndexPropertyInfo), '("selectedOptions", DOMHTMLSelectElementSelectedOptionsPropertyInfo), '("size", DOMHTMLSelectElementSizePropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLSelectElementTypePropertyInfo), '("validationMessage", DOMHTMLSelectElementValidationMessagePropertyInfo), '("validity", DOMHTMLSelectElementValidityPropertyInfo), '("value", DOMHTMLSelectElementValuePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("willValidate", DOMHTMLSelectElementWillValidatePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLSelectElement = DOMHTMLSelectElementSignalList -type DOMHTMLSelectElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLSelectElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLSelectElement::add -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "element", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "before", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "element", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "before", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "element", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "before", argType = TInterface "WebKit" "DOMHTMLElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -667,10 +892,10 @@ dOMHTMLSelectElementAdd :: (MonadIO m, DOMHTMLSelectElementK a, DOMHTMLElementK b, DOMHTMLElementK c) => - a -> -- _obj - b -> -- element - c -> -- before - m () + a -- _obj + -> b -- element + -> c -- before + -> m () -- result dOMHTMLSelectElementAdd _obj element before = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let element' = unsafeManagedPtrCastPtr element @@ -685,11 +910,14 @@ return () ) +data DOMHTMLSelectElementAddMethodInfo +instance (signature ~ (b -> c -> m ()), MonadIO m, DOMHTMLSelectElementK a, DOMHTMLElementK b, DOMHTMLElementK c) => MethodInfo DOMHTMLSelectElementAddMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementAdd + -- method DOMHTMLSelectElement::check_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -701,8 +929,8 @@ dOMHTMLSelectElementCheckValidity :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLSelectElementCheckValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_check_validity _obj' @@ -710,11 +938,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementCheckValidityMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementCheckValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementCheckValidity + -- method DOMHTMLSelectElement::get_autofocus -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -726,8 +957,8 @@ dOMHTMLSelectElementGetAutofocus :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLSelectElementGetAutofocus _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_autofocus _obj' @@ -735,11 +966,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetAutofocusMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetAutofocusMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetAutofocus + -- method DOMHTMLSelectElement::get_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -751,8 +985,8 @@ dOMHTMLSelectElementGetDisabled :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLSelectElementGetDisabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_disabled _obj' @@ -760,11 +994,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetDisabled + -- method DOMHTMLSelectElement::get_form -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLFormElement" -- throws : False -- Skip return : False @@ -776,8 +1013,8 @@ dOMHTMLSelectElementGetForm :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m DOMHTMLFormElement + a -- _obj + -> m DOMHTMLFormElement -- result dOMHTMLSelectElementGetForm _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_form _obj' @@ -786,11 +1023,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetFormMethodInfo +instance (signature ~ (m DOMHTMLFormElement), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetFormMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetForm + -- method DOMHTMLSelectElement::get_labels -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -802,8 +1042,8 @@ dOMHTMLSelectElementGetLabels :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m DOMNodeList + a -- _obj + -> m DOMNodeList -- result dOMHTMLSelectElementGetLabels _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_labels _obj' @@ -812,11 +1052,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetLabelsMethodInfo +instance (signature ~ (m DOMNodeList), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetLabelsMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetLabels + -- method DOMHTMLSelectElement::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -828,19 +1071,22 @@ dOMHTMLSelectElementGetLength :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLSelectElementGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_length _obj' touchManagedPtr _obj return result +data DOMHTMLSelectElementGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetLengthMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetLength + -- method DOMHTMLSelectElement::get_multiple -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -852,8 +1098,8 @@ dOMHTMLSelectElementGetMultiple :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLSelectElementGetMultiple _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_multiple _obj' @@ -861,11 +1107,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetMultipleMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetMultipleMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetMultiple + -- method DOMHTMLSelectElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -877,8 +1126,8 @@ dOMHTMLSelectElementGetName :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLSelectElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_name _obj' @@ -888,11 +1137,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetName + -- method DOMHTMLSelectElement::get_options -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLOptionsCollection" -- throws : False -- Skip return : False @@ -904,8 +1156,8 @@ dOMHTMLSelectElementGetOptions :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m DOMHTMLOptionsCollection + a -- _obj + -> m DOMHTMLOptionsCollection -- result dOMHTMLSelectElementGetOptions _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_options _obj' @@ -914,11 +1166,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetOptionsMethodInfo +instance (signature ~ (m DOMHTMLOptionsCollection), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetOptionsMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetOptions + -- method DOMHTMLSelectElement::get_required -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -930,8 +1185,8 @@ dOMHTMLSelectElementGetRequired :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLSelectElementGetRequired _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_required _obj' @@ -939,11 +1194,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetRequiredMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetRequiredMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetRequired + -- method DOMHTMLSelectElement::get_selected_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -955,19 +1213,22 @@ dOMHTMLSelectElementGetSelectedIndex :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLSelectElementGetSelectedIndex _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_selected_index _obj' touchManagedPtr _obj return result +data DOMHTMLSelectElementGetSelectedIndexMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetSelectedIndexMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetSelectedIndex + -- method DOMHTMLSelectElement::get_selected_options -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -979,8 +1240,8 @@ dOMHTMLSelectElementGetSelectedOptions :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLSelectElementGetSelectedOptions _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_selected_options _obj' @@ -989,11 +1250,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetSelectedOptionsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetSelectedOptionsMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetSelectedOptions + -- method DOMHTMLSelectElement::get_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1005,19 +1269,22 @@ dOMHTMLSelectElementGetSize :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLSelectElementGetSize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_size _obj' touchManagedPtr _obj return result +data DOMHTMLSelectElementGetSizeMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetSizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetSize + -- method DOMHTMLSelectElement::get_validation_message -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1029,8 +1296,8 @@ dOMHTMLSelectElementGetValidationMessage :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLSelectElementGetValidationMessage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_validation_message _obj' @@ -1040,11 +1307,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetValidationMessageMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetValidationMessageMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetValidationMessage + -- method DOMHTMLSelectElement::get_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMValidityState" -- throws : False -- Skip return : False @@ -1056,8 +1326,8 @@ dOMHTMLSelectElementGetValidity :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m DOMValidityState + a -- _obj + -> m DOMValidityState -- result dOMHTMLSelectElementGetValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_validity _obj' @@ -1066,11 +1336,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetValidityMethodInfo +instance (signature ~ (m DOMValidityState), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetValidity + -- method DOMHTMLSelectElement::get_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1082,8 +1355,8 @@ dOMHTMLSelectElementGetValue :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLSelectElementGetValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_value _obj' @@ -1093,11 +1366,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetValue + -- method DOMHTMLSelectElement::get_will_validate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1109,8 +1385,8 @@ dOMHTMLSelectElementGetWillValidate :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLSelectElementGetWillValidate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_get_will_validate _obj' @@ -1118,11 +1394,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementGetWillValidateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementGetWillValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementGetWillValidate + -- method DOMHTMLSelectElement::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -1135,9 +1414,9 @@ dOMHTMLSelectElementItem :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - Word64 -> -- index - m DOMNode + a -- _obj + -> Word64 -- index + -> m DOMNode -- result dOMHTMLSelectElementItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_select_element_item _obj' index @@ -1146,11 +1425,14 @@ touchManagedPtr _obj return result' +data DOMHTMLSelectElementItemMethodInfo +instance (signature ~ (Word64 -> m DOMNode), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementItemMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementItem + -- method DOMHTMLSelectElement::named_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -1163,9 +1445,9 @@ dOMHTMLSelectElementNamedItem :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - T.Text -> -- name - m DOMNode + a -- _obj + -> T.Text -- name + -> m DOMNode -- result dOMHTMLSelectElementNamedItem _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -1176,11 +1458,14 @@ freeMem name' return result' +data DOMHTMLSelectElementNamedItemMethodInfo +instance (signature ~ (T.Text -> m DOMNode), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementNamedItemMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementNamedItem + -- method DOMHTMLSelectElement::remove -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1193,20 +1478,23 @@ dOMHTMLSelectElementRemove :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - Int64 -> -- index - m () + a -- _obj + -> Int64 -- index + -> m () -- result dOMHTMLSelectElementRemove _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_select_element_remove _obj' index touchManagedPtr _obj return () +data DOMHTMLSelectElementRemoveMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementRemoveMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementRemove + -- method DOMHTMLSelectElement::set_autofocus -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1219,9 +1507,9 @@ dOMHTMLSelectElementSetAutofocus :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLSelectElementSetAutofocus _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1229,11 +1517,14 @@ touchManagedPtr _obj return () +data DOMHTMLSelectElementSetAutofocusMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementSetAutofocusMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementSetAutofocus + -- method DOMHTMLSelectElement::set_custom_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1246,9 +1537,9 @@ dOMHTMLSelectElementSetCustomValidity :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - T.Text -> -- error - m () + a -- _obj + -> T.Text -- error_ + -> m () -- result dOMHTMLSelectElementSetCustomValidity _obj error_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj error_' <- textToCString error_ @@ -1257,11 +1548,14 @@ freeMem error_' return () +data DOMHTMLSelectElementSetCustomValidityMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementSetCustomValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementSetCustomValidity + -- method DOMHTMLSelectElement::set_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1274,9 +1568,9 @@ dOMHTMLSelectElementSetDisabled :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLSelectElementSetDisabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1284,11 +1578,14 @@ touchManagedPtr _obj return () +data DOMHTMLSelectElementSetDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementSetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementSetDisabled + -- method DOMHTMLSelectElement::set_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1302,9 +1599,9 @@ dOMHTMLSelectElementSetLength :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - Word64 -> -- value - m () + a -- _obj + -> Word64 -- value + -> m () -- result dOMHTMLSelectElementSetLength _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -1315,11 +1612,14 @@ return () ) +data DOMHTMLSelectElementSetLengthMethodInfo +instance (signature ~ (Word64 -> m ()), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementSetLengthMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementSetLength + -- method DOMHTMLSelectElement::set_multiple -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1332,9 +1632,9 @@ dOMHTMLSelectElementSetMultiple :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLSelectElementSetMultiple _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1342,11 +1642,14 @@ touchManagedPtr _obj return () +data DOMHTMLSelectElementSetMultipleMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementSetMultipleMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementSetMultiple + -- method DOMHTMLSelectElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1359,9 +1662,9 @@ dOMHTMLSelectElementSetName :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLSelectElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1370,11 +1673,14 @@ freeMem value' return () +data DOMHTMLSelectElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementSetName + -- method DOMHTMLSelectElement::set_required -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1387,9 +1693,9 @@ dOMHTMLSelectElementSetRequired :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLSelectElementSetRequired _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1397,11 +1703,14 @@ touchManagedPtr _obj return () +data DOMHTMLSelectElementSetRequiredMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementSetRequiredMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementSetRequired + -- method DOMHTMLSelectElement::set_selected_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1414,20 +1723,23 @@ dOMHTMLSelectElementSetSelectedIndex :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLSelectElementSetSelectedIndex _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_select_element_set_selected_index _obj' value touchManagedPtr _obj return () +data DOMHTMLSelectElementSetSelectedIndexMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementSetSelectedIndexMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementSetSelectedIndex + -- method DOMHTMLSelectElement::set_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1440,20 +1752,23 @@ dOMHTMLSelectElementSetSize :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLSelectElementSetSize _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_select_element_set_size _obj' value touchManagedPtr _obj return () +data DOMHTMLSelectElementSetSizeMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementSetSizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementSetSize + -- method DOMHTMLSelectElement::set_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLSelectElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1466,9 +1781,9 @@ dOMHTMLSelectElementSetValue :: (MonadIO m, DOMHTMLSelectElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLSelectElementSetValue _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1476,5 +1791,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLSelectElementSetValueMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLSelectElementK a) => MethodInfo DOMHTMLSelectElementSetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLSelectElementSetValue diff --git a/GI/WebKit/Objects/DOMHTMLSelectElement.hs-boot b/GI/WebKit/Objects/DOMHTMLSelectElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLSelectElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLSelectElement.hs-boot @@ -28,3 +28,34 @@ data DOMHTMLSelectElementValidityPropertyInfo data DOMHTMLSelectElementValuePropertyInfo data DOMHTMLSelectElementWillValidatePropertyInfo +data DOMHTMLSelectElementAddMethodInfo +data DOMHTMLSelectElementCheckValidityMethodInfo +data DOMHTMLSelectElementGetAutofocusMethodInfo +data DOMHTMLSelectElementGetDisabledMethodInfo +data DOMHTMLSelectElementGetFormMethodInfo +data DOMHTMLSelectElementGetLabelsMethodInfo +data DOMHTMLSelectElementGetLengthMethodInfo +data DOMHTMLSelectElementGetMultipleMethodInfo +data DOMHTMLSelectElementGetNameMethodInfo +data DOMHTMLSelectElementGetOptionsMethodInfo +data DOMHTMLSelectElementGetRequiredMethodInfo +data DOMHTMLSelectElementGetSelectedIndexMethodInfo +data DOMHTMLSelectElementGetSelectedOptionsMethodInfo +data DOMHTMLSelectElementGetSizeMethodInfo +data DOMHTMLSelectElementGetValidationMessageMethodInfo +data DOMHTMLSelectElementGetValidityMethodInfo +data DOMHTMLSelectElementGetValueMethodInfo +data DOMHTMLSelectElementGetWillValidateMethodInfo +data DOMHTMLSelectElementItemMethodInfo +data DOMHTMLSelectElementNamedItemMethodInfo +data DOMHTMLSelectElementRemoveMethodInfo +data DOMHTMLSelectElementSetAutofocusMethodInfo +data DOMHTMLSelectElementSetCustomValidityMethodInfo +data DOMHTMLSelectElementSetDisabledMethodInfo +data DOMHTMLSelectElementSetLengthMethodInfo +data DOMHTMLSelectElementSetMultipleMethodInfo +data DOMHTMLSelectElementSetNameMethodInfo +data DOMHTMLSelectElementSetRequiredMethodInfo +data DOMHTMLSelectElementSetSelectedIndexMethodInfo +data DOMHTMLSelectElementSetSizeMethodInfo +data DOMHTMLSelectElementSetValueMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLStyleElement.hs b/GI/WebKit/Objects/DOMHTMLStyleElement.hs --- a/GI/WebKit/Objects/DOMHTMLStyleElement.hs +++ b/GI/WebKit/Objects/DOMHTMLStyleElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,30 +18,37 @@ -- * Methods -- ** dOMHTMLStyleElementGetDisabled + DOMHTMLStyleElementGetDisabledMethodInfo, dOMHTMLStyleElementGetDisabled , -- ** dOMHTMLStyleElementGetMedia + DOMHTMLStyleElementGetMediaMethodInfo , dOMHTMLStyleElementGetMedia , -- ** dOMHTMLStyleElementGetScoped + DOMHTMLStyleElementGetScopedMethodInfo , dOMHTMLStyleElementGetScoped , -- ** dOMHTMLStyleElementGetSheet + DOMHTMLStyleElementGetSheetMethodInfo , dOMHTMLStyleElementGetSheet , -- ** dOMHTMLStyleElementSetDisabled + DOMHTMLStyleElementSetDisabledMethodInfo, dOMHTMLStyleElementSetDisabled , -- ** dOMHTMLStyleElementSetMedia + DOMHTMLStyleElementSetMediaMethodInfo , dOMHTMLStyleElementSetMedia , -- ** dOMHTMLStyleElementSetScoped + DOMHTMLStyleElementSetScopedMethodInfo , dOMHTMLStyleElementSetScoped , @@ -109,6 +117,178 @@ noDOMHTMLStyleElement :: Maybe DOMHTMLStyleElement noDOMHTMLStyleElement = Nothing +type family ResolveDOMHTMLStyleElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLStyleElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLStyleElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLStyleElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLStyleElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLStyleElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLStyleElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLStyleElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLStyleElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLStyleElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLStyleElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLStyleElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLStyleElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLStyleElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLStyleElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLStyleElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLStyleElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLStyleElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLStyleElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLStyleElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLStyleElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLStyleElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLStyleElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLStyleElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLStyleElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLStyleElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLStyleElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLStyleElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLStyleElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLStyleElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLStyleElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLStyleElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLStyleElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLStyleElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLStyleElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLStyleElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLStyleElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLStyleElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLStyleElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLStyleElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLStyleElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLStyleElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLStyleElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLStyleElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLStyleElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLStyleElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLStyleElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLStyleElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLStyleElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLStyleElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLStyleElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLStyleElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLStyleElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLStyleElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLStyleElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLStyleElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLStyleElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLStyleElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLStyleElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLStyleElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLStyleElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLStyleElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLStyleElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLStyleElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLStyleElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLStyleElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLStyleElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLStyleElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLStyleElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLStyleElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLStyleElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLStyleElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLStyleElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLStyleElementMethod "getDisabled" o = DOMHTMLStyleElementGetDisabledMethodInfo + ResolveDOMHTMLStyleElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLStyleElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLStyleElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLStyleElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLStyleElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLStyleElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLStyleElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLStyleElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLStyleElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLStyleElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLStyleElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLStyleElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLStyleElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLStyleElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLStyleElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLStyleElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLStyleElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLStyleElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLStyleElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLStyleElementMethod "getMedia" o = DOMHTMLStyleElementGetMediaMethodInfo + ResolveDOMHTMLStyleElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLStyleElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLStyleElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLStyleElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLStyleElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLStyleElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLStyleElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLStyleElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLStyleElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLStyleElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLStyleElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLStyleElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLStyleElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLStyleElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLStyleElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLStyleElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLStyleElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLStyleElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLStyleElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLStyleElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLStyleElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLStyleElementMethod "getScoped" o = DOMHTMLStyleElementGetScopedMethodInfo + ResolveDOMHTMLStyleElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLStyleElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLStyleElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLStyleElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLStyleElementMethod "getSheet" o = DOMHTMLStyleElementGetSheetMethodInfo + ResolveDOMHTMLStyleElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLStyleElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLStyleElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLStyleElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLStyleElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLStyleElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLStyleElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLStyleElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLStyleElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLStyleElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLStyleElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLStyleElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLStyleElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLStyleElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLStyleElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLStyleElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLStyleElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLStyleElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLStyleElementMethod "setDisabled" o = DOMHTMLStyleElementSetDisabledMethodInfo + ResolveDOMHTMLStyleElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLStyleElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLStyleElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLStyleElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLStyleElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLStyleElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLStyleElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLStyleElementMethod "setMedia" o = DOMHTMLStyleElementSetMediaMethodInfo + ResolveDOMHTMLStyleElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLStyleElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLStyleElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLStyleElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLStyleElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLStyleElementMethod "setScoped" o = DOMHTMLStyleElementSetScopedMethodInfo + ResolveDOMHTMLStyleElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLStyleElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLStyleElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLStyleElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLStyleElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLStyleElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLStyleElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLStyleElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLStyleElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLStyleElementMethod t DOMHTMLStyleElement, MethodInfo info DOMHTMLStyleElement p) => IsLabelProxy t (DOMHTMLStyleElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLStyleElementMethod t DOMHTMLStyleElement, MethodInfo info DOMHTMLStyleElement p) => IsLabel t (DOMHTMLStyleElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "disabled" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -128,7 +308,7 @@ type AttrSetTypeConstraint DOMHTMLStyleElementDisabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLStyleElementDisabledPropertyInfo = DOMHTMLStyleElementK type AttrGetType DOMHTMLStyleElementDisabledPropertyInfo = Bool - type AttrLabel DOMHTMLStyleElementDisabledPropertyInfo = "DOMHTMLStyleElement::disabled" + type AttrLabel DOMHTMLStyleElementDisabledPropertyInfo = "disabled" attrGet _ = getDOMHTMLStyleElementDisabled attrSet _ = setDOMHTMLStyleElementDisabled attrConstruct _ = constructDOMHTMLStyleElementDisabled @@ -152,7 +332,7 @@ type AttrSetTypeConstraint DOMHTMLStyleElementMediaPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLStyleElementMediaPropertyInfo = DOMHTMLStyleElementK type AttrGetType DOMHTMLStyleElementMediaPropertyInfo = T.Text - type AttrLabel DOMHTMLStyleElementMediaPropertyInfo = "DOMHTMLStyleElement::media" + type AttrLabel DOMHTMLStyleElementMediaPropertyInfo = "media" attrGet _ = getDOMHTMLStyleElementMedia attrSet _ = setDOMHTMLStyleElementMedia attrConstruct _ = constructDOMHTMLStyleElementMedia @@ -170,7 +350,7 @@ type AttrSetTypeConstraint DOMHTMLStyleElementSheetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLStyleElementSheetPropertyInfo = DOMHTMLStyleElementK type AttrGetType DOMHTMLStyleElementSheetPropertyInfo = DOMStyleSheet - type AttrLabel DOMHTMLStyleElementSheetPropertyInfo = "DOMHTMLStyleElement::sheet" + type AttrLabel DOMHTMLStyleElementSheetPropertyInfo = "sheet" attrGet _ = getDOMHTMLStyleElementSheet attrSet _ = undefined attrConstruct _ = undefined @@ -194,22 +374,21 @@ type AttrSetTypeConstraint DOMHTMLStyleElementTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLStyleElementTypePropertyInfo = DOMHTMLStyleElementK type AttrGetType DOMHTMLStyleElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLStyleElementTypePropertyInfo = "DOMHTMLStyleElement::type" + type AttrLabel DOMHTMLStyleElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLStyleElementType attrSet _ = setDOMHTMLStyleElementType attrConstruct _ = constructDOMHTMLStyleElementType type instance AttributeList DOMHTMLStyleElement = DOMHTMLStyleElementAttributeList -type DOMHTMLStyleElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLStyleElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("media", DOMHTMLStyleElementMediaPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("sheet", DOMHTMLStyleElementSheetPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLStyleElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLStyleElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("disabled", DOMHTMLStyleElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("media", DOMHTMLStyleElementMediaPropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("sheet", DOMHTMLStyleElementSheetPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLStyleElementTypePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLStyleElement = DOMHTMLStyleElementSignalList -type DOMHTMLStyleElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLStyleElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLStyleElement::get_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -221,8 +400,8 @@ dOMHTMLStyleElementGetDisabled :: (MonadIO m, DOMHTMLStyleElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLStyleElementGetDisabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_style_element_get_disabled _obj' @@ -230,11 +409,14 @@ touchManagedPtr _obj return result' +data DOMHTMLStyleElementGetDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLStyleElementK a) => MethodInfo DOMHTMLStyleElementGetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLStyleElementGetDisabled + -- method DOMHTMLStyleElement::get_media -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -246,8 +428,8 @@ dOMHTMLStyleElementGetMedia :: (MonadIO m, DOMHTMLStyleElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLStyleElementGetMedia _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_style_element_get_media _obj' @@ -257,11 +439,14 @@ touchManagedPtr _obj return result' +data DOMHTMLStyleElementGetMediaMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLStyleElementK a) => MethodInfo DOMHTMLStyleElementGetMediaMethodInfo a signature where + overloadedMethod _ = dOMHTMLStyleElementGetMedia + -- method DOMHTMLStyleElement::get_scoped -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -273,8 +458,8 @@ {-# DEPRECATED dOMHTMLStyleElementGetScoped ["(Since version 2.2)"]#-} dOMHTMLStyleElementGetScoped :: (MonadIO m, DOMHTMLStyleElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLStyleElementGetScoped _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_style_element_get_scoped _obj' @@ -282,11 +467,14 @@ touchManagedPtr _obj return result' +data DOMHTMLStyleElementGetScopedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLStyleElementK a) => MethodInfo DOMHTMLStyleElementGetScopedMethodInfo a signature where + overloadedMethod _ = dOMHTMLStyleElementGetScoped + -- method DOMHTMLStyleElement::get_sheet -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMStyleSheet" -- throws : False -- Skip return : False @@ -298,8 +486,8 @@ dOMHTMLStyleElementGetSheet :: (MonadIO m, DOMHTMLStyleElementK a) => - a -> -- _obj - m DOMStyleSheet + a -- _obj + -> m DOMStyleSheet -- result dOMHTMLStyleElementGetSheet _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_style_element_get_sheet _obj' @@ -308,11 +496,14 @@ touchManagedPtr _obj return result' +data DOMHTMLStyleElementGetSheetMethodInfo +instance (signature ~ (m DOMStyleSheet), MonadIO m, DOMHTMLStyleElementK a) => MethodInfo DOMHTMLStyleElementGetSheetMethodInfo a signature where + overloadedMethod _ = dOMHTMLStyleElementGetSheet + -- method DOMHTMLStyleElement::set_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -325,9 +516,9 @@ dOMHTMLStyleElementSetDisabled :: (MonadIO m, DOMHTMLStyleElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLStyleElementSetDisabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -335,11 +526,14 @@ touchManagedPtr _obj return () +data DOMHTMLStyleElementSetDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLStyleElementK a) => MethodInfo DOMHTMLStyleElementSetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLStyleElementSetDisabled + -- method DOMHTMLStyleElement::set_media -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -352,9 +546,9 @@ dOMHTMLStyleElementSetMedia :: (MonadIO m, DOMHTMLStyleElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLStyleElementSetMedia _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -363,11 +557,14 @@ freeMem value' return () +data DOMHTMLStyleElementSetMediaMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLStyleElementK a) => MethodInfo DOMHTMLStyleElementSetMediaMethodInfo a signature where + overloadedMethod _ = dOMHTMLStyleElementSetMedia + -- method DOMHTMLStyleElement::set_scoped -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLStyleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -380,14 +577,18 @@ {-# DEPRECATED dOMHTMLStyleElementSetScoped ["(Since version 2.2)"]#-} dOMHTMLStyleElementSetScoped :: (MonadIO m, DOMHTMLStyleElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLStyleElementSetScoped _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_html_style_element_set_scoped _obj' value' touchManagedPtr _obj return () + +data DOMHTMLStyleElementSetScopedMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLStyleElementK a) => MethodInfo DOMHTMLStyleElementSetScopedMethodInfo a signature where + overloadedMethod _ = dOMHTMLStyleElementSetScoped diff --git a/GI/WebKit/Objects/DOMHTMLStyleElement.hs-boot b/GI/WebKit/Objects/DOMHTMLStyleElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLStyleElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLStyleElement.hs-boot @@ -15,3 +15,10 @@ data DOMHTMLStyleElementMediaPropertyInfo data DOMHTMLStyleElementSheetPropertyInfo data DOMHTMLStyleElementTypePropertyInfo +data DOMHTMLStyleElementGetDisabledMethodInfo +data DOMHTMLStyleElementGetMediaMethodInfo +data DOMHTMLStyleElementGetScopedMethodInfo +data DOMHTMLStyleElementGetSheetMethodInfo +data DOMHTMLStyleElementSetDisabledMethodInfo +data DOMHTMLStyleElementSetMediaMethodInfo +data DOMHTMLStyleElementSetScopedMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLTableCaptionElement.hs b/GI/WebKit/Objects/DOMHTMLTableCaptionElement.hs --- a/GI/WebKit/Objects/DOMHTMLTableCaptionElement.hs +++ b/GI/WebKit/Objects/DOMHTMLTableCaptionElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLTableCaptionElementGetAlign + DOMHTMLTableCaptionElementGetAlignMethodInfo, dOMHTMLTableCaptionElementGetAlign , -- ** dOMHTMLTableCaptionElementSetAlign + DOMHTMLTableCaptionElementSetAlignMethodInfo, dOMHTMLTableCaptionElementSetAlign , @@ -70,6 +73,173 @@ noDOMHTMLTableCaptionElement :: Maybe DOMHTMLTableCaptionElement noDOMHTMLTableCaptionElement = Nothing +type family ResolveDOMHTMLTableCaptionElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLTableCaptionElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getAlign" o = DOMHTMLTableCaptionElementGetAlignMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setAlign" o = DOMHTMLTableCaptionElementSetAlignMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLTableCaptionElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableCaptionElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLTableCaptionElementMethod t DOMHTMLTableCaptionElement, MethodInfo info DOMHTMLTableCaptionElement p) => IsLabelProxy t (DOMHTMLTableCaptionElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLTableCaptionElementMethod t DOMHTMLTableCaptionElement, MethodInfo info DOMHTMLTableCaptionElement p) => IsLabel t (DOMHTMLTableCaptionElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLTableCaptionElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCaptionElementAlignPropertyInfo = DOMHTMLTableCaptionElementK type AttrGetType DOMHTMLTableCaptionElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLTableCaptionElementAlignPropertyInfo = "DOMHTMLTableCaptionElement::align" + type AttrLabel DOMHTMLTableCaptionElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLTableCaptionElementAlign attrSet _ = setDOMHTMLTableCaptionElementAlign attrConstruct _ = constructDOMHTMLTableCaptionElementAlign type instance AttributeList DOMHTMLTableCaptionElement = DOMHTMLTableCaptionElementAttributeList -type DOMHTMLTableCaptionElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableCaptionElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLTableCaptionElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableCaptionElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLTableCaptionElement = DOMHTMLTableCaptionElementSignalList -type DOMHTMLTableCaptionElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLTableCaptionElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLTableCaptionElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCaptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCaptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCaptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLTableCaptionElementGetAlign :: (MonadIO m, DOMHTMLTableCaptionElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCaptionElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_caption_element_get_align _obj' @@ -127,11 +296,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCaptionElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCaptionElementK a) => MethodInfo DOMHTMLTableCaptionElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCaptionElementGetAlign + -- method DOMHTMLTableCaptionElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCaptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCaptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCaptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -144,9 +316,9 @@ dOMHTMLTableCaptionElementSetAlign :: (MonadIO m, DOMHTMLTableCaptionElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCaptionElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -154,5 +326,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLTableCaptionElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCaptionElementK a) => MethodInfo DOMHTMLTableCaptionElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCaptionElementSetAlign diff --git a/GI/WebKit/Objects/DOMHTMLTableCaptionElement.hs-boot b/GI/WebKit/Objects/DOMHTMLTableCaptionElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLTableCaptionElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLTableCaptionElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLTableCaptionElementK o instance (GObject o, IsDescendantOf DOMHTMLTableCaptionElement o) => DOMHTMLTableCaptionElementK o data DOMHTMLTableCaptionElementAlignPropertyInfo +data DOMHTMLTableCaptionElementGetAlignMethodInfo +data DOMHTMLTableCaptionElementSetAlignMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLTableCellElement.hs b/GI/WebKit/Objects/DOMHTMLTableCellElement.hs --- a/GI/WebKit/Objects/DOMHTMLTableCellElement.hs +++ b/GI/WebKit/Objects/DOMHTMLTableCellElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,118 +18,147 @@ -- * Methods -- ** dOMHTMLTableCellElementGetAbbr + DOMHTMLTableCellElementGetAbbrMethodInfo, dOMHTMLTableCellElementGetAbbr , -- ** dOMHTMLTableCellElementGetAlign + DOMHTMLTableCellElementGetAlignMethodInfo, dOMHTMLTableCellElementGetAlign , -- ** dOMHTMLTableCellElementGetAxis + DOMHTMLTableCellElementGetAxisMethodInfo, dOMHTMLTableCellElementGetAxis , -- ** dOMHTMLTableCellElementGetBgColor + DOMHTMLTableCellElementGetBgColorMethodInfo, dOMHTMLTableCellElementGetBgColor , -- ** dOMHTMLTableCellElementGetCellIndex + DOMHTMLTableCellElementGetCellIndexMethodInfo, dOMHTMLTableCellElementGetCellIndex , -- ** dOMHTMLTableCellElementGetCh + DOMHTMLTableCellElementGetChMethodInfo , dOMHTMLTableCellElementGetCh , -- ** dOMHTMLTableCellElementGetChOff + DOMHTMLTableCellElementGetChOffMethodInfo, dOMHTMLTableCellElementGetChOff , -- ** dOMHTMLTableCellElementGetColSpan + DOMHTMLTableCellElementGetColSpanMethodInfo, dOMHTMLTableCellElementGetColSpan , -- ** dOMHTMLTableCellElementGetHeaders + DOMHTMLTableCellElementGetHeadersMethodInfo, dOMHTMLTableCellElementGetHeaders , -- ** dOMHTMLTableCellElementGetHeight + DOMHTMLTableCellElementGetHeightMethodInfo, dOMHTMLTableCellElementGetHeight , -- ** dOMHTMLTableCellElementGetNoWrap + DOMHTMLTableCellElementGetNoWrapMethodInfo, dOMHTMLTableCellElementGetNoWrap , -- ** dOMHTMLTableCellElementGetRowSpan + DOMHTMLTableCellElementGetRowSpanMethodInfo, dOMHTMLTableCellElementGetRowSpan , -- ** dOMHTMLTableCellElementGetScope + DOMHTMLTableCellElementGetScopeMethodInfo, dOMHTMLTableCellElementGetScope , -- ** dOMHTMLTableCellElementGetVAlign + DOMHTMLTableCellElementGetVAlignMethodInfo, dOMHTMLTableCellElementGetVAlign , -- ** dOMHTMLTableCellElementGetWidth + DOMHTMLTableCellElementGetWidthMethodInfo, dOMHTMLTableCellElementGetWidth , -- ** dOMHTMLTableCellElementSetAbbr + DOMHTMLTableCellElementSetAbbrMethodInfo, dOMHTMLTableCellElementSetAbbr , -- ** dOMHTMLTableCellElementSetAlign + DOMHTMLTableCellElementSetAlignMethodInfo, dOMHTMLTableCellElementSetAlign , -- ** dOMHTMLTableCellElementSetAxis + DOMHTMLTableCellElementSetAxisMethodInfo, dOMHTMLTableCellElementSetAxis , -- ** dOMHTMLTableCellElementSetBgColor + DOMHTMLTableCellElementSetBgColorMethodInfo, dOMHTMLTableCellElementSetBgColor , -- ** dOMHTMLTableCellElementSetCh + DOMHTMLTableCellElementSetChMethodInfo , dOMHTMLTableCellElementSetCh , -- ** dOMHTMLTableCellElementSetChOff + DOMHTMLTableCellElementSetChOffMethodInfo, dOMHTMLTableCellElementSetChOff , -- ** dOMHTMLTableCellElementSetColSpan + DOMHTMLTableCellElementSetColSpanMethodInfo, dOMHTMLTableCellElementSetColSpan , -- ** dOMHTMLTableCellElementSetHeaders + DOMHTMLTableCellElementSetHeadersMethodInfo, dOMHTMLTableCellElementSetHeaders , -- ** dOMHTMLTableCellElementSetHeight + DOMHTMLTableCellElementSetHeightMethodInfo, dOMHTMLTableCellElementSetHeight , -- ** dOMHTMLTableCellElementSetNoWrap + DOMHTMLTableCellElementSetNoWrapMethodInfo, dOMHTMLTableCellElementSetNoWrap , -- ** dOMHTMLTableCellElementSetRowSpan + DOMHTMLTableCellElementSetRowSpanMethodInfo, dOMHTMLTableCellElementSetRowSpan , -- ** dOMHTMLTableCellElementSetScope + DOMHTMLTableCellElementSetScopeMethodInfo, dOMHTMLTableCellElementSetScope , -- ** dOMHTMLTableCellElementSetVAlign + DOMHTMLTableCellElementSetVAlignMethodInfo, dOMHTMLTableCellElementSetVAlign , -- ** dOMHTMLTableCellElementSetWidth + DOMHTMLTableCellElementSetWidthMethodInfo, dOMHTMLTableCellElementSetWidth , @@ -274,6 +304,200 @@ noDOMHTMLTableCellElement :: Maybe DOMHTMLTableCellElement noDOMHTMLTableCellElement = Nothing +type family ResolveDOMHTMLTableCellElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLTableCellElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLTableCellElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLTableCellElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLTableCellElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLTableCellElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLTableCellElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLTableCellElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLTableCellElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLTableCellElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLTableCellElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLTableCellElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLTableCellElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLTableCellElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLTableCellElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLTableCellElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLTableCellElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLTableCellElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLTableCellElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLTableCellElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLTableCellElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLTableCellElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLTableCellElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLTableCellElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLTableCellElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLTableCellElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLTableCellElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLTableCellElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLTableCellElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLTableCellElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLTableCellElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLTableCellElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLTableCellElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLTableCellElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLTableCellElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLTableCellElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLTableCellElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLTableCellElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLTableCellElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLTableCellElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLTableCellElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLTableCellElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLTableCellElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLTableCellElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLTableCellElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLTableCellElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLTableCellElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLTableCellElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLTableCellElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLTableCellElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLTableCellElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLTableCellElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLTableCellElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLTableCellElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLTableCellElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLTableCellElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLTableCellElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLTableCellElementMethod "getAbbr" o = DOMHTMLTableCellElementGetAbbrMethodInfo + ResolveDOMHTMLTableCellElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLTableCellElementMethod "getAlign" o = DOMHTMLTableCellElementGetAlignMethodInfo + ResolveDOMHTMLTableCellElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLTableCellElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLTableCellElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableCellElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLTableCellElementMethod "getAxis" o = DOMHTMLTableCellElementGetAxisMethodInfo + ResolveDOMHTMLTableCellElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLTableCellElementMethod "getBgColor" o = DOMHTMLTableCellElementGetBgColorMethodInfo + ResolveDOMHTMLTableCellElementMethod "getCellIndex" o = DOMHTMLTableCellElementGetCellIndexMethodInfo + ResolveDOMHTMLTableCellElementMethod "getCh" o = DOMHTMLTableCellElementGetChMethodInfo + ResolveDOMHTMLTableCellElementMethod "getChOff" o = DOMHTMLTableCellElementGetChOffMethodInfo + ResolveDOMHTMLTableCellElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLTableCellElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLTableCellElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLTableCellElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLTableCellElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLTableCellElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLTableCellElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLTableCellElementMethod "getColSpan" o = DOMHTMLTableCellElementGetColSpanMethodInfo + ResolveDOMHTMLTableCellElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLTableCellElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLTableCellElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLTableCellElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLTableCellElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLTableCellElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLTableCellElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLTableCellElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLTableCellElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLTableCellElementMethod "getHeaders" o = DOMHTMLTableCellElementGetHeadersMethodInfo + ResolveDOMHTMLTableCellElementMethod "getHeight" o = DOMHTMLTableCellElementGetHeightMethodInfo + ResolveDOMHTMLTableCellElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLTableCellElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLTableCellElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLTableCellElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLTableCellElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLTableCellElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLTableCellElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLTableCellElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLTableCellElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLTableCellElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLTableCellElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLTableCellElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLTableCellElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLTableCellElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLTableCellElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLTableCellElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLTableCellElementMethod "getNoWrap" o = DOMHTMLTableCellElementGetNoWrapMethodInfo + ResolveDOMHTMLTableCellElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLTableCellElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLTableCellElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLTableCellElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLTableCellElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLTableCellElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLTableCellElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLTableCellElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLTableCellElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLTableCellElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLTableCellElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLTableCellElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLTableCellElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLTableCellElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLTableCellElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLTableCellElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLTableCellElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLTableCellElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLTableCellElementMethod "getRowSpan" o = DOMHTMLTableCellElementGetRowSpanMethodInfo + ResolveDOMHTMLTableCellElementMethod "getScope" o = DOMHTMLTableCellElementGetScopeMethodInfo + ResolveDOMHTMLTableCellElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLTableCellElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLTableCellElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLTableCellElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLTableCellElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLTableCellElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLTableCellElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLTableCellElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLTableCellElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLTableCellElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLTableCellElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLTableCellElementMethod "getVAlign" o = DOMHTMLTableCellElementGetVAlignMethodInfo + ResolveDOMHTMLTableCellElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLTableCellElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLTableCellElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableCellElementMethod "getWidth" o = DOMHTMLTableCellElementGetWidthMethodInfo + ResolveDOMHTMLTableCellElementMethod "setAbbr" o = DOMHTMLTableCellElementSetAbbrMethodInfo + ResolveDOMHTMLTableCellElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLTableCellElementMethod "setAlign" o = DOMHTMLTableCellElementSetAlignMethodInfo + ResolveDOMHTMLTableCellElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLTableCellElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLTableCellElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableCellElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLTableCellElementMethod "setAxis" o = DOMHTMLTableCellElementSetAxisMethodInfo + ResolveDOMHTMLTableCellElementMethod "setBgColor" o = DOMHTMLTableCellElementSetBgColorMethodInfo + ResolveDOMHTMLTableCellElementMethod "setCh" o = DOMHTMLTableCellElementSetChMethodInfo + ResolveDOMHTMLTableCellElementMethod "setChOff" o = DOMHTMLTableCellElementSetChOffMethodInfo + ResolveDOMHTMLTableCellElementMethod "setColSpan" o = DOMHTMLTableCellElementSetColSpanMethodInfo + ResolveDOMHTMLTableCellElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLTableCellElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLTableCellElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLTableCellElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLTableCellElementMethod "setHeaders" o = DOMHTMLTableCellElementSetHeadersMethodInfo + ResolveDOMHTMLTableCellElementMethod "setHeight" o = DOMHTMLTableCellElementSetHeightMethodInfo + ResolveDOMHTMLTableCellElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLTableCellElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLTableCellElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLTableCellElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLTableCellElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLTableCellElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLTableCellElementMethod "setNoWrap" o = DOMHTMLTableCellElementSetNoWrapMethodInfo + ResolveDOMHTMLTableCellElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLTableCellElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLTableCellElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLTableCellElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLTableCellElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLTableCellElementMethod "setRowSpan" o = DOMHTMLTableCellElementSetRowSpanMethodInfo + ResolveDOMHTMLTableCellElementMethod "setScope" o = DOMHTMLTableCellElementSetScopeMethodInfo + ResolveDOMHTMLTableCellElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLTableCellElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLTableCellElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLTableCellElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLTableCellElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLTableCellElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLTableCellElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLTableCellElementMethod "setVAlign" o = DOMHTMLTableCellElementSetVAlignMethodInfo + ResolveDOMHTMLTableCellElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableCellElementMethod "setWidth" o = DOMHTMLTableCellElementSetWidthMethodInfo + ResolveDOMHTMLTableCellElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLTableCellElementMethod t DOMHTMLTableCellElement, MethodInfo info DOMHTMLTableCellElement p) => IsLabelProxy t (DOMHTMLTableCellElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLTableCellElementMethod t DOMHTMLTableCellElement, MethodInfo info DOMHTMLTableCellElement p) => IsLabel t (DOMHTMLTableCellElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "abbr" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -293,7 +517,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementAbbrPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCellElementAbbrPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementAbbrPropertyInfo = T.Text - type AttrLabel DOMHTMLTableCellElementAbbrPropertyInfo = "DOMHTMLTableCellElement::abbr" + type AttrLabel DOMHTMLTableCellElementAbbrPropertyInfo = "abbr" attrGet _ = getDOMHTMLTableCellElementAbbr attrSet _ = setDOMHTMLTableCellElementAbbr attrConstruct _ = constructDOMHTMLTableCellElementAbbr @@ -317,7 +541,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCellElementAlignPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLTableCellElementAlignPropertyInfo = "DOMHTMLTableCellElement::align" + type AttrLabel DOMHTMLTableCellElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLTableCellElementAlign attrSet _ = setDOMHTMLTableCellElementAlign attrConstruct _ = constructDOMHTMLTableCellElementAlign @@ -341,7 +565,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementAxisPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCellElementAxisPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementAxisPropertyInfo = T.Text - type AttrLabel DOMHTMLTableCellElementAxisPropertyInfo = "DOMHTMLTableCellElement::axis" + type AttrLabel DOMHTMLTableCellElementAxisPropertyInfo = "axis" attrGet _ = getDOMHTMLTableCellElementAxis attrSet _ = setDOMHTMLTableCellElementAxis attrConstruct _ = constructDOMHTMLTableCellElementAxis @@ -365,7 +589,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementBgColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCellElementBgColorPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementBgColorPropertyInfo = T.Text - type AttrLabel DOMHTMLTableCellElementBgColorPropertyInfo = "DOMHTMLTableCellElement::bg-color" + type AttrLabel DOMHTMLTableCellElementBgColorPropertyInfo = "bg-color" attrGet _ = getDOMHTMLTableCellElementBgColor attrSet _ = setDOMHTMLTableCellElementBgColor attrConstruct _ = constructDOMHTMLTableCellElementBgColor @@ -383,7 +607,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementCellIndexPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTableCellElementCellIndexPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementCellIndexPropertyInfo = Int64 - type AttrLabel DOMHTMLTableCellElementCellIndexPropertyInfo = "DOMHTMLTableCellElement::cell-index" + type AttrLabel DOMHTMLTableCellElementCellIndexPropertyInfo = "cell-index" attrGet _ = getDOMHTMLTableCellElementCellIndex attrSet _ = undefined attrConstruct _ = undefined @@ -407,7 +631,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementChPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCellElementChPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementChPropertyInfo = T.Text - type AttrLabel DOMHTMLTableCellElementChPropertyInfo = "DOMHTMLTableCellElement::ch" + type AttrLabel DOMHTMLTableCellElementChPropertyInfo = "ch" attrGet _ = getDOMHTMLTableCellElementCh attrSet _ = setDOMHTMLTableCellElementCh attrConstruct _ = constructDOMHTMLTableCellElementCh @@ -431,7 +655,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementChOffPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCellElementChOffPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementChOffPropertyInfo = T.Text - type AttrLabel DOMHTMLTableCellElementChOffPropertyInfo = "DOMHTMLTableCellElement::ch-off" + type AttrLabel DOMHTMLTableCellElementChOffPropertyInfo = "ch-off" attrGet _ = getDOMHTMLTableCellElementChOff attrSet _ = setDOMHTMLTableCellElementChOff attrConstruct _ = constructDOMHTMLTableCellElementChOff @@ -455,7 +679,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementColSpanPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLTableCellElementColSpanPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementColSpanPropertyInfo = Int64 - type AttrLabel DOMHTMLTableCellElementColSpanPropertyInfo = "DOMHTMLTableCellElement::col-span" + type AttrLabel DOMHTMLTableCellElementColSpanPropertyInfo = "col-span" attrGet _ = getDOMHTMLTableCellElementColSpan attrSet _ = setDOMHTMLTableCellElementColSpan attrConstruct _ = constructDOMHTMLTableCellElementColSpan @@ -479,7 +703,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementHeadersPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCellElementHeadersPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementHeadersPropertyInfo = T.Text - type AttrLabel DOMHTMLTableCellElementHeadersPropertyInfo = "DOMHTMLTableCellElement::headers" + type AttrLabel DOMHTMLTableCellElementHeadersPropertyInfo = "headers" attrGet _ = getDOMHTMLTableCellElementHeaders attrSet _ = setDOMHTMLTableCellElementHeaders attrConstruct _ = constructDOMHTMLTableCellElementHeaders @@ -503,7 +727,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementHeightPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCellElementHeightPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementHeightPropertyInfo = T.Text - type AttrLabel DOMHTMLTableCellElementHeightPropertyInfo = "DOMHTMLTableCellElement::height" + type AttrLabel DOMHTMLTableCellElementHeightPropertyInfo = "height" attrGet _ = getDOMHTMLTableCellElementHeight attrSet _ = setDOMHTMLTableCellElementHeight attrConstruct _ = constructDOMHTMLTableCellElementHeight @@ -527,7 +751,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementNoWrapPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLTableCellElementNoWrapPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementNoWrapPropertyInfo = Bool - type AttrLabel DOMHTMLTableCellElementNoWrapPropertyInfo = "DOMHTMLTableCellElement::no-wrap" + type AttrLabel DOMHTMLTableCellElementNoWrapPropertyInfo = "no-wrap" attrGet _ = getDOMHTMLTableCellElementNoWrap attrSet _ = setDOMHTMLTableCellElementNoWrap attrConstruct _ = constructDOMHTMLTableCellElementNoWrap @@ -551,7 +775,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementRowSpanPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLTableCellElementRowSpanPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementRowSpanPropertyInfo = Int64 - type AttrLabel DOMHTMLTableCellElementRowSpanPropertyInfo = "DOMHTMLTableCellElement::row-span" + type AttrLabel DOMHTMLTableCellElementRowSpanPropertyInfo = "row-span" attrGet _ = getDOMHTMLTableCellElementRowSpan attrSet _ = setDOMHTMLTableCellElementRowSpan attrConstruct _ = constructDOMHTMLTableCellElementRowSpan @@ -575,7 +799,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementScopePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCellElementScopePropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementScopePropertyInfo = T.Text - type AttrLabel DOMHTMLTableCellElementScopePropertyInfo = "DOMHTMLTableCellElement::scope" + type AttrLabel DOMHTMLTableCellElementScopePropertyInfo = "scope" attrGet _ = getDOMHTMLTableCellElementScope attrSet _ = setDOMHTMLTableCellElementScope attrConstruct _ = constructDOMHTMLTableCellElementScope @@ -599,7 +823,7 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementVAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCellElementVAlignPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementVAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLTableCellElementVAlignPropertyInfo = "DOMHTMLTableCellElement::v-align" + type AttrLabel DOMHTMLTableCellElementVAlignPropertyInfo = "v-align" attrGet _ = getDOMHTMLTableCellElementVAlign attrSet _ = setDOMHTMLTableCellElementVAlign attrConstruct _ = constructDOMHTMLTableCellElementVAlign @@ -623,22 +847,21 @@ type AttrSetTypeConstraint DOMHTMLTableCellElementWidthPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableCellElementWidthPropertyInfo = DOMHTMLTableCellElementK type AttrGetType DOMHTMLTableCellElementWidthPropertyInfo = T.Text - type AttrLabel DOMHTMLTableCellElementWidthPropertyInfo = "DOMHTMLTableCellElement::width" + type AttrLabel DOMHTMLTableCellElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLTableCellElementWidth attrSet _ = setDOMHTMLTableCellElementWidth attrConstruct _ = constructDOMHTMLTableCellElementWidth type instance AttributeList DOMHTMLTableCellElement = DOMHTMLTableCellElementAttributeList -type DOMHTMLTableCellElementAttributeList = ('[ '("abbr", DOMHTMLTableCellElementAbbrPropertyInfo), '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableCellElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("axis", DOMHTMLTableCellElementAxisPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("bg-color", DOMHTMLTableCellElementBgColorPropertyInfo), '("cell-index", DOMHTMLTableCellElementCellIndexPropertyInfo), '("ch", DOMHTMLTableCellElementChPropertyInfo), '("ch-off", DOMHTMLTableCellElementChOffPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("col-span", DOMHTMLTableCellElementColSpanPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("headers", DOMHTMLTableCellElementHeadersPropertyInfo), '("height", DOMHTMLTableCellElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("no-wrap", DOMHTMLTableCellElementNoWrapPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("row-span", DOMHTMLTableCellElementRowSpanPropertyInfo), '("scope", DOMHTMLTableCellElementScopePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("v-align", DOMHTMLTableCellElementVAlignPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLTableCellElementWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLTableCellElementAttributeList = ('[ '("abbr", DOMHTMLTableCellElementAbbrPropertyInfo), '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableCellElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("axis", DOMHTMLTableCellElementAxisPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("bgColor", DOMHTMLTableCellElementBgColorPropertyInfo), '("cellIndex", DOMHTMLTableCellElementCellIndexPropertyInfo), '("ch", DOMHTMLTableCellElementChPropertyInfo), '("chOff", DOMHTMLTableCellElementChOffPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("colSpan", DOMHTMLTableCellElementColSpanPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("headers", DOMHTMLTableCellElementHeadersPropertyInfo), '("height", DOMHTMLTableCellElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("noWrap", DOMHTMLTableCellElementNoWrapPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("rowSpan", DOMHTMLTableCellElementRowSpanPropertyInfo), '("scope", DOMHTMLTableCellElementScopePropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("vAlign", DOMHTMLTableCellElementVAlignPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLTableCellElementWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLTableCellElement = DOMHTMLTableCellElementSignalList -type DOMHTMLTableCellElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLTableCellElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLTableCellElement::get_abbr -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -650,8 +873,8 @@ dOMHTMLTableCellElementGetAbbr :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCellElementGetAbbr _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_abbr _obj' @@ -661,11 +884,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetAbbrMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetAbbrMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetAbbr + -- method DOMHTMLTableCellElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -677,8 +903,8 @@ dOMHTMLTableCellElementGetAlign :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCellElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_align _obj' @@ -688,11 +914,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetAlign + -- method DOMHTMLTableCellElement::get_axis -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -704,8 +933,8 @@ dOMHTMLTableCellElementGetAxis :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCellElementGetAxis _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_axis _obj' @@ -715,11 +944,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetAxisMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetAxisMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetAxis + -- method DOMHTMLTableCellElement::get_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -731,8 +963,8 @@ dOMHTMLTableCellElementGetBgColor :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCellElementGetBgColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_bg_color _obj' @@ -742,11 +974,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetBgColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetBgColor + -- method DOMHTMLTableCellElement::get_cell_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -758,19 +993,22 @@ dOMHTMLTableCellElementGetCellIndex :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLTableCellElementGetCellIndex _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_cell_index _obj' touchManagedPtr _obj return result +data DOMHTMLTableCellElementGetCellIndexMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetCellIndexMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetCellIndex + -- method DOMHTMLTableCellElement::get_ch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -782,8 +1020,8 @@ dOMHTMLTableCellElementGetCh :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCellElementGetCh _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_ch _obj' @@ -793,11 +1031,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetChMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetChMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetCh + -- method DOMHTMLTableCellElement::get_ch_off -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -809,8 +1050,8 @@ dOMHTMLTableCellElementGetChOff :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCellElementGetChOff _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_ch_off _obj' @@ -820,11 +1061,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetChOffMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetChOffMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetChOff + -- method DOMHTMLTableCellElement::get_col_span -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -836,19 +1080,22 @@ dOMHTMLTableCellElementGetColSpan :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLTableCellElementGetColSpan _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_col_span _obj' touchManagedPtr _obj return result +data DOMHTMLTableCellElementGetColSpanMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetColSpanMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetColSpan + -- method DOMHTMLTableCellElement::get_headers -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -860,8 +1107,8 @@ dOMHTMLTableCellElementGetHeaders :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCellElementGetHeaders _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_headers _obj' @@ -871,11 +1118,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetHeadersMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetHeadersMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetHeaders + -- method DOMHTMLTableCellElement::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -887,8 +1137,8 @@ dOMHTMLTableCellElementGetHeight :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCellElementGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_height _obj' @@ -898,11 +1148,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetHeightMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetHeight + -- method DOMHTMLTableCellElement::get_no_wrap -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -914,8 +1167,8 @@ dOMHTMLTableCellElementGetNoWrap :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLTableCellElementGetNoWrap _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_no_wrap _obj' @@ -923,11 +1176,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetNoWrapMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetNoWrapMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetNoWrap + -- method DOMHTMLTableCellElement::get_row_span -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -939,19 +1195,22 @@ dOMHTMLTableCellElementGetRowSpan :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLTableCellElementGetRowSpan _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_row_span _obj' touchManagedPtr _obj return result +data DOMHTMLTableCellElementGetRowSpanMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetRowSpanMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetRowSpan + -- method DOMHTMLTableCellElement::get_scope -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -963,8 +1222,8 @@ dOMHTMLTableCellElementGetScope :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCellElementGetScope _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_scope _obj' @@ -974,11 +1233,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetScopeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetScopeMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetScope + -- method DOMHTMLTableCellElement::get_v_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -990,8 +1252,8 @@ dOMHTMLTableCellElementGetVAlign :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCellElementGetVAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_v_align _obj' @@ -1001,11 +1263,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetVAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetVAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetVAlign + -- method DOMHTMLTableCellElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1017,8 +1282,8 @@ dOMHTMLTableCellElementGetWidth :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableCellElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_cell_element_get_width _obj' @@ -1028,11 +1293,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableCellElementGetWidthMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementGetWidth + -- method DOMHTMLTableCellElement::set_abbr -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1045,9 +1313,9 @@ dOMHTMLTableCellElementSetAbbr :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCellElementSetAbbr _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1056,11 +1324,14 @@ freeMem value' return () +data DOMHTMLTableCellElementSetAbbrMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetAbbrMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetAbbr + -- method DOMHTMLTableCellElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1073,9 +1344,9 @@ dOMHTMLTableCellElementSetAlign :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCellElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1084,11 +1355,14 @@ freeMem value' return () +data DOMHTMLTableCellElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetAlign + -- method DOMHTMLTableCellElement::set_axis -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1101,9 +1375,9 @@ dOMHTMLTableCellElementSetAxis :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCellElementSetAxis _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1112,11 +1386,14 @@ freeMem value' return () +data DOMHTMLTableCellElementSetAxisMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetAxisMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetAxis + -- method DOMHTMLTableCellElement::set_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1129,9 +1406,9 @@ dOMHTMLTableCellElementSetBgColor :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCellElementSetBgColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1140,11 +1417,14 @@ freeMem value' return () +data DOMHTMLTableCellElementSetBgColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetBgColor + -- method DOMHTMLTableCellElement::set_ch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1157,9 +1437,9 @@ dOMHTMLTableCellElementSetCh :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCellElementSetCh _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1168,11 +1448,14 @@ freeMem value' return () +data DOMHTMLTableCellElementSetChMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetChMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetCh + -- method DOMHTMLTableCellElement::set_ch_off -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1185,9 +1468,9 @@ dOMHTMLTableCellElementSetChOff :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCellElementSetChOff _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1196,11 +1479,14 @@ freeMem value' return () +data DOMHTMLTableCellElementSetChOffMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetChOffMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetChOff + -- method DOMHTMLTableCellElement::set_col_span -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1213,20 +1499,23 @@ dOMHTMLTableCellElementSetColSpan :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLTableCellElementSetColSpan _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_table_cell_element_set_col_span _obj' value touchManagedPtr _obj return () +data DOMHTMLTableCellElementSetColSpanMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetColSpanMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetColSpan + -- method DOMHTMLTableCellElement::set_headers -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1239,9 +1528,9 @@ dOMHTMLTableCellElementSetHeaders :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCellElementSetHeaders _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1250,11 +1539,14 @@ freeMem value' return () +data DOMHTMLTableCellElementSetHeadersMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetHeadersMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetHeaders + -- method DOMHTMLTableCellElement::set_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1267,9 +1559,9 @@ dOMHTMLTableCellElementSetHeight :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCellElementSetHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1278,11 +1570,14 @@ freeMem value' return () +data DOMHTMLTableCellElementSetHeightMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetHeight + -- method DOMHTMLTableCellElement::set_no_wrap -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1295,9 +1590,9 @@ dOMHTMLTableCellElementSetNoWrap :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLTableCellElementSetNoWrap _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1305,11 +1600,14 @@ touchManagedPtr _obj return () +data DOMHTMLTableCellElementSetNoWrapMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetNoWrapMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetNoWrap + -- method DOMHTMLTableCellElement::set_row_span -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1322,20 +1620,23 @@ dOMHTMLTableCellElementSetRowSpan :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLTableCellElementSetRowSpan _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_table_cell_element_set_row_span _obj' value touchManagedPtr _obj return () +data DOMHTMLTableCellElementSetRowSpanMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetRowSpanMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetRowSpan + -- method DOMHTMLTableCellElement::set_scope -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1348,9 +1649,9 @@ dOMHTMLTableCellElementSetScope :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCellElementSetScope _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1359,11 +1660,14 @@ freeMem value' return () +data DOMHTMLTableCellElementSetScopeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetScopeMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetScope + -- method DOMHTMLTableCellElement::set_v_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1376,9 +1680,9 @@ dOMHTMLTableCellElementSetVAlign :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCellElementSetVAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1387,11 +1691,14 @@ freeMem value' return () +data DOMHTMLTableCellElementSetVAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetVAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetVAlign + -- method DOMHTMLTableCellElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableCellElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1404,9 +1711,9 @@ dOMHTMLTableCellElementSetWidth :: (MonadIO m, DOMHTMLTableCellElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableCellElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1414,5 +1721,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLTableCellElementSetWidthMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableCellElementK a) => MethodInfo DOMHTMLTableCellElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableCellElementSetWidth diff --git a/GI/WebKit/Objects/DOMHTMLTableCellElement.hs-boot b/GI/WebKit/Objects/DOMHTMLTableCellElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLTableCellElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLTableCellElement.hs-boot @@ -26,3 +26,32 @@ data DOMHTMLTableCellElementScopePropertyInfo data DOMHTMLTableCellElementVAlignPropertyInfo data DOMHTMLTableCellElementWidthPropertyInfo +data DOMHTMLTableCellElementGetAbbrMethodInfo +data DOMHTMLTableCellElementGetAlignMethodInfo +data DOMHTMLTableCellElementGetAxisMethodInfo +data DOMHTMLTableCellElementGetBgColorMethodInfo +data DOMHTMLTableCellElementGetCellIndexMethodInfo +data DOMHTMLTableCellElementGetChMethodInfo +data DOMHTMLTableCellElementGetChOffMethodInfo +data DOMHTMLTableCellElementGetColSpanMethodInfo +data DOMHTMLTableCellElementGetHeadersMethodInfo +data DOMHTMLTableCellElementGetHeightMethodInfo +data DOMHTMLTableCellElementGetNoWrapMethodInfo +data DOMHTMLTableCellElementGetRowSpanMethodInfo +data DOMHTMLTableCellElementGetScopeMethodInfo +data DOMHTMLTableCellElementGetVAlignMethodInfo +data DOMHTMLTableCellElementGetWidthMethodInfo +data DOMHTMLTableCellElementSetAbbrMethodInfo +data DOMHTMLTableCellElementSetAlignMethodInfo +data DOMHTMLTableCellElementSetAxisMethodInfo +data DOMHTMLTableCellElementSetBgColorMethodInfo +data DOMHTMLTableCellElementSetChMethodInfo +data DOMHTMLTableCellElementSetChOffMethodInfo +data DOMHTMLTableCellElementSetColSpanMethodInfo +data DOMHTMLTableCellElementSetHeadersMethodInfo +data DOMHTMLTableCellElementSetHeightMethodInfo +data DOMHTMLTableCellElementSetNoWrapMethodInfo +data DOMHTMLTableCellElementSetRowSpanMethodInfo +data DOMHTMLTableCellElementSetScopeMethodInfo +data DOMHTMLTableCellElementSetVAlignMethodInfo +data DOMHTMLTableCellElementSetWidthMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLTableColElement.hs b/GI/WebKit/Objects/DOMHTMLTableColElement.hs --- a/GI/WebKit/Objects/DOMHTMLTableColElement.hs +++ b/GI/WebKit/Objects/DOMHTMLTableColElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,50 +18,62 @@ -- * Methods -- ** dOMHTMLTableColElementGetAlign + DOMHTMLTableColElementGetAlignMethodInfo, dOMHTMLTableColElementGetAlign , -- ** dOMHTMLTableColElementGetCh + DOMHTMLTableColElementGetChMethodInfo , dOMHTMLTableColElementGetCh , -- ** dOMHTMLTableColElementGetChOff + DOMHTMLTableColElementGetChOffMethodInfo, dOMHTMLTableColElementGetChOff , -- ** dOMHTMLTableColElementGetSpan + DOMHTMLTableColElementGetSpanMethodInfo , dOMHTMLTableColElementGetSpan , -- ** dOMHTMLTableColElementGetVAlign + DOMHTMLTableColElementGetVAlignMethodInfo, dOMHTMLTableColElementGetVAlign , -- ** dOMHTMLTableColElementGetWidth + DOMHTMLTableColElementGetWidthMethodInfo, dOMHTMLTableColElementGetWidth , -- ** dOMHTMLTableColElementSetAlign + DOMHTMLTableColElementSetAlignMethodInfo, dOMHTMLTableColElementSetAlign , -- ** dOMHTMLTableColElementSetCh + DOMHTMLTableColElementSetChMethodInfo , dOMHTMLTableColElementSetCh , -- ** dOMHTMLTableColElementSetChOff + DOMHTMLTableColElementSetChOffMethodInfo, dOMHTMLTableColElementSetChOff , -- ** dOMHTMLTableColElementSetSpan + DOMHTMLTableColElementSetSpanMethodInfo , dOMHTMLTableColElementSetSpan , -- ** dOMHTMLTableColElementSetVAlign + DOMHTMLTableColElementSetVAlignMethodInfo, dOMHTMLTableColElementSetVAlign , -- ** dOMHTMLTableColElementSetWidth + DOMHTMLTableColElementSetWidthMethodInfo, dOMHTMLTableColElementSetWidth , @@ -145,6 +158,183 @@ noDOMHTMLTableColElement :: Maybe DOMHTMLTableColElement noDOMHTMLTableColElement = Nothing +type family ResolveDOMHTMLTableColElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLTableColElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLTableColElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLTableColElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLTableColElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLTableColElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLTableColElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLTableColElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLTableColElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLTableColElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLTableColElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLTableColElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLTableColElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLTableColElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLTableColElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLTableColElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLTableColElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLTableColElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLTableColElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLTableColElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLTableColElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLTableColElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLTableColElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLTableColElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLTableColElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLTableColElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLTableColElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLTableColElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLTableColElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLTableColElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLTableColElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLTableColElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLTableColElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLTableColElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLTableColElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLTableColElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLTableColElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLTableColElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLTableColElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLTableColElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLTableColElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLTableColElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLTableColElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLTableColElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLTableColElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLTableColElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLTableColElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLTableColElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLTableColElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLTableColElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLTableColElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLTableColElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLTableColElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLTableColElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLTableColElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLTableColElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLTableColElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLTableColElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLTableColElementMethod "getAlign" o = DOMHTMLTableColElementGetAlignMethodInfo + ResolveDOMHTMLTableColElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLTableColElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLTableColElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableColElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLTableColElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLTableColElementMethod "getCh" o = DOMHTMLTableColElementGetChMethodInfo + ResolveDOMHTMLTableColElementMethod "getChOff" o = DOMHTMLTableColElementGetChOffMethodInfo + ResolveDOMHTMLTableColElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLTableColElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLTableColElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLTableColElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLTableColElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLTableColElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLTableColElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLTableColElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLTableColElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLTableColElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLTableColElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLTableColElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLTableColElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLTableColElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLTableColElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLTableColElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLTableColElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLTableColElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLTableColElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLTableColElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLTableColElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLTableColElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLTableColElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLTableColElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLTableColElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLTableColElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLTableColElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLTableColElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLTableColElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLTableColElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLTableColElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLTableColElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLTableColElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLTableColElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLTableColElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLTableColElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLTableColElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLTableColElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLTableColElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLTableColElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLTableColElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLTableColElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLTableColElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLTableColElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLTableColElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLTableColElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLTableColElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLTableColElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLTableColElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLTableColElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLTableColElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLTableColElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLTableColElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLTableColElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLTableColElementMethod "getSpan" o = DOMHTMLTableColElementGetSpanMethodInfo + ResolveDOMHTMLTableColElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLTableColElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLTableColElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLTableColElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLTableColElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLTableColElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLTableColElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLTableColElementMethod "getVAlign" o = DOMHTMLTableColElementGetVAlignMethodInfo + ResolveDOMHTMLTableColElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLTableColElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLTableColElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableColElementMethod "getWidth" o = DOMHTMLTableColElementGetWidthMethodInfo + ResolveDOMHTMLTableColElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLTableColElementMethod "setAlign" o = DOMHTMLTableColElementSetAlignMethodInfo + ResolveDOMHTMLTableColElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLTableColElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLTableColElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableColElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLTableColElementMethod "setCh" o = DOMHTMLTableColElementSetChMethodInfo + ResolveDOMHTMLTableColElementMethod "setChOff" o = DOMHTMLTableColElementSetChOffMethodInfo + ResolveDOMHTMLTableColElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLTableColElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLTableColElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLTableColElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLTableColElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLTableColElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLTableColElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLTableColElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLTableColElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLTableColElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLTableColElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLTableColElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLTableColElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLTableColElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLTableColElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLTableColElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLTableColElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLTableColElementMethod "setSpan" o = DOMHTMLTableColElementSetSpanMethodInfo + ResolveDOMHTMLTableColElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLTableColElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLTableColElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLTableColElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLTableColElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLTableColElementMethod "setVAlign" o = DOMHTMLTableColElementSetVAlignMethodInfo + ResolveDOMHTMLTableColElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableColElementMethod "setWidth" o = DOMHTMLTableColElementSetWidthMethodInfo + ResolveDOMHTMLTableColElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLTableColElementMethod t DOMHTMLTableColElement, MethodInfo info DOMHTMLTableColElement p) => IsLabelProxy t (DOMHTMLTableColElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLTableColElementMethod t DOMHTMLTableColElement, MethodInfo info DOMHTMLTableColElement p) => IsLabel t (DOMHTMLTableColElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -164,7 +354,7 @@ type AttrSetTypeConstraint DOMHTMLTableColElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableColElementAlignPropertyInfo = DOMHTMLTableColElementK type AttrGetType DOMHTMLTableColElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLTableColElementAlignPropertyInfo = "DOMHTMLTableColElement::align" + type AttrLabel DOMHTMLTableColElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLTableColElementAlign attrSet _ = setDOMHTMLTableColElementAlign attrConstruct _ = constructDOMHTMLTableColElementAlign @@ -188,7 +378,7 @@ type AttrSetTypeConstraint DOMHTMLTableColElementChPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableColElementChPropertyInfo = DOMHTMLTableColElementK type AttrGetType DOMHTMLTableColElementChPropertyInfo = T.Text - type AttrLabel DOMHTMLTableColElementChPropertyInfo = "DOMHTMLTableColElement::ch" + type AttrLabel DOMHTMLTableColElementChPropertyInfo = "ch" attrGet _ = getDOMHTMLTableColElementCh attrSet _ = setDOMHTMLTableColElementCh attrConstruct _ = constructDOMHTMLTableColElementCh @@ -212,7 +402,7 @@ type AttrSetTypeConstraint DOMHTMLTableColElementChOffPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableColElementChOffPropertyInfo = DOMHTMLTableColElementK type AttrGetType DOMHTMLTableColElementChOffPropertyInfo = T.Text - type AttrLabel DOMHTMLTableColElementChOffPropertyInfo = "DOMHTMLTableColElement::ch-off" + type AttrLabel DOMHTMLTableColElementChOffPropertyInfo = "ch-off" attrGet _ = getDOMHTMLTableColElementChOff attrSet _ = setDOMHTMLTableColElementChOff attrConstruct _ = constructDOMHTMLTableColElementChOff @@ -236,7 +426,7 @@ type AttrSetTypeConstraint DOMHTMLTableColElementSpanPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLTableColElementSpanPropertyInfo = DOMHTMLTableColElementK type AttrGetType DOMHTMLTableColElementSpanPropertyInfo = Int64 - type AttrLabel DOMHTMLTableColElementSpanPropertyInfo = "DOMHTMLTableColElement::span" + type AttrLabel DOMHTMLTableColElementSpanPropertyInfo = "span" attrGet _ = getDOMHTMLTableColElementSpan attrSet _ = setDOMHTMLTableColElementSpan attrConstruct _ = constructDOMHTMLTableColElementSpan @@ -260,7 +450,7 @@ type AttrSetTypeConstraint DOMHTMLTableColElementVAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableColElementVAlignPropertyInfo = DOMHTMLTableColElementK type AttrGetType DOMHTMLTableColElementVAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLTableColElementVAlignPropertyInfo = "DOMHTMLTableColElement::v-align" + type AttrLabel DOMHTMLTableColElementVAlignPropertyInfo = "v-align" attrGet _ = getDOMHTMLTableColElementVAlign attrSet _ = setDOMHTMLTableColElementVAlign attrConstruct _ = constructDOMHTMLTableColElementVAlign @@ -284,22 +474,21 @@ type AttrSetTypeConstraint DOMHTMLTableColElementWidthPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableColElementWidthPropertyInfo = DOMHTMLTableColElementK type AttrGetType DOMHTMLTableColElementWidthPropertyInfo = T.Text - type AttrLabel DOMHTMLTableColElementWidthPropertyInfo = "DOMHTMLTableColElement::width" + type AttrLabel DOMHTMLTableColElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLTableColElementWidth attrSet _ = setDOMHTMLTableColElementWidth attrConstruct _ = constructDOMHTMLTableColElementWidth type instance AttributeList DOMHTMLTableColElement = DOMHTMLTableColElementAttributeList -type DOMHTMLTableColElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableColElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("ch", DOMHTMLTableColElementChPropertyInfo), '("ch-off", DOMHTMLTableColElementChOffPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("span", DOMHTMLTableColElementSpanPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("v-align", DOMHTMLTableColElementVAlignPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLTableColElementWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLTableColElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableColElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("ch", DOMHTMLTableColElementChPropertyInfo), '("chOff", DOMHTMLTableColElementChOffPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("span", DOMHTMLTableColElementSpanPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("vAlign", DOMHTMLTableColElementVAlignPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLTableColElementWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLTableColElement = DOMHTMLTableColElementSignalList -type DOMHTMLTableColElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLTableColElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLTableColElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -311,8 +500,8 @@ dOMHTMLTableColElementGetAlign :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableColElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_col_element_get_align _obj' @@ -322,11 +511,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableColElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementGetAlign + -- method DOMHTMLTableColElement::get_ch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -338,8 +530,8 @@ dOMHTMLTableColElementGetCh :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableColElementGetCh _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_col_element_get_ch _obj' @@ -349,11 +541,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableColElementGetChMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementGetChMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementGetCh + -- method DOMHTMLTableColElement::get_ch_off -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -365,8 +560,8 @@ dOMHTMLTableColElementGetChOff :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableColElementGetChOff _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_col_element_get_ch_off _obj' @@ -376,11 +571,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableColElementGetChOffMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementGetChOffMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementGetChOff + -- method DOMHTMLTableColElement::get_span -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -392,19 +590,22 @@ dOMHTMLTableColElementGetSpan :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLTableColElementGetSpan _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_col_element_get_span _obj' touchManagedPtr _obj return result +data DOMHTMLTableColElementGetSpanMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementGetSpanMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementGetSpan + -- method DOMHTMLTableColElement::get_v_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -416,8 +617,8 @@ dOMHTMLTableColElementGetVAlign :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableColElementGetVAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_col_element_get_v_align _obj' @@ -427,11 +628,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableColElementGetVAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementGetVAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementGetVAlign + -- method DOMHTMLTableColElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -443,8 +647,8 @@ dOMHTMLTableColElementGetWidth :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableColElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_col_element_get_width _obj' @@ -454,11 +658,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableColElementGetWidthMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementGetWidth + -- method DOMHTMLTableColElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -471,9 +678,9 @@ dOMHTMLTableColElementSetAlign :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableColElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -482,11 +689,14 @@ freeMem value' return () +data DOMHTMLTableColElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementSetAlign + -- method DOMHTMLTableColElement::set_ch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -499,9 +709,9 @@ dOMHTMLTableColElementSetCh :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableColElementSetCh _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -510,11 +720,14 @@ freeMem value' return () +data DOMHTMLTableColElementSetChMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementSetChMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementSetCh + -- method DOMHTMLTableColElement::set_ch_off -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -527,9 +740,9 @@ dOMHTMLTableColElementSetChOff :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableColElementSetChOff _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -538,11 +751,14 @@ freeMem value' return () +data DOMHTMLTableColElementSetChOffMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementSetChOffMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementSetChOff + -- method DOMHTMLTableColElement::set_span -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -555,20 +771,23 @@ dOMHTMLTableColElementSetSpan :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLTableColElementSetSpan _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_table_col_element_set_span _obj' value touchManagedPtr _obj return () +data DOMHTMLTableColElementSetSpanMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementSetSpanMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementSetSpan + -- method DOMHTMLTableColElement::set_v_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -581,9 +800,9 @@ dOMHTMLTableColElementSetVAlign :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableColElementSetVAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -592,11 +811,14 @@ freeMem value' return () +data DOMHTMLTableColElementSetVAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementSetVAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementSetVAlign + -- method DOMHTMLTableColElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableColElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -609,9 +831,9 @@ dOMHTMLTableColElementSetWidth :: (MonadIO m, DOMHTMLTableColElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableColElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -619,5 +841,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLTableColElementSetWidthMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableColElementK a) => MethodInfo DOMHTMLTableColElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableColElementSetWidth diff --git a/GI/WebKit/Objects/DOMHTMLTableColElement.hs-boot b/GI/WebKit/Objects/DOMHTMLTableColElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLTableColElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLTableColElement.hs-boot @@ -17,3 +17,15 @@ data DOMHTMLTableColElementSpanPropertyInfo data DOMHTMLTableColElementVAlignPropertyInfo data DOMHTMLTableColElementWidthPropertyInfo +data DOMHTMLTableColElementGetAlignMethodInfo +data DOMHTMLTableColElementGetChMethodInfo +data DOMHTMLTableColElementGetChOffMethodInfo +data DOMHTMLTableColElementGetSpanMethodInfo +data DOMHTMLTableColElementGetVAlignMethodInfo +data DOMHTMLTableColElementGetWidthMethodInfo +data DOMHTMLTableColElementSetAlignMethodInfo +data DOMHTMLTableColElementSetChMethodInfo +data DOMHTMLTableColElementSetChOffMethodInfo +data DOMHTMLTableColElementSetSpanMethodInfo +data DOMHTMLTableColElementSetVAlignMethodInfo +data DOMHTMLTableColElementSetWidthMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLTableElement.hs b/GI/WebKit/Objects/DOMHTMLTableElement.hs --- a/GI/WebKit/Objects/DOMHTMLTableElement.hs +++ b/GI/WebKit/Objects/DOMHTMLTableElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,142 +18,177 @@ -- * Methods -- ** dOMHTMLTableElementCreateCaption + DOMHTMLTableElementCreateCaptionMethodInfo, dOMHTMLTableElementCreateCaption , -- ** dOMHTMLTableElementCreateTBody + DOMHTMLTableElementCreateTBodyMethodInfo, dOMHTMLTableElementCreateTBody , -- ** dOMHTMLTableElementCreateTFoot + DOMHTMLTableElementCreateTFootMethodInfo, dOMHTMLTableElementCreateTFoot , -- ** dOMHTMLTableElementCreateTHead + DOMHTMLTableElementCreateTHeadMethodInfo, dOMHTMLTableElementCreateTHead , -- ** dOMHTMLTableElementDeleteCaption + DOMHTMLTableElementDeleteCaptionMethodInfo, dOMHTMLTableElementDeleteCaption , -- ** dOMHTMLTableElementDeleteRow + DOMHTMLTableElementDeleteRowMethodInfo , dOMHTMLTableElementDeleteRow , -- ** dOMHTMLTableElementDeleteTFoot + DOMHTMLTableElementDeleteTFootMethodInfo, dOMHTMLTableElementDeleteTFoot , -- ** dOMHTMLTableElementDeleteTHead + DOMHTMLTableElementDeleteTHeadMethodInfo, dOMHTMLTableElementDeleteTHead , -- ** dOMHTMLTableElementGetAlign + DOMHTMLTableElementGetAlignMethodInfo , dOMHTMLTableElementGetAlign , -- ** dOMHTMLTableElementGetBgColor + DOMHTMLTableElementGetBgColorMethodInfo , dOMHTMLTableElementGetBgColor , -- ** dOMHTMLTableElementGetBorder + DOMHTMLTableElementGetBorderMethodInfo , dOMHTMLTableElementGetBorder , -- ** dOMHTMLTableElementGetCaption + DOMHTMLTableElementGetCaptionMethodInfo , dOMHTMLTableElementGetCaption , -- ** dOMHTMLTableElementGetCellPadding + DOMHTMLTableElementGetCellPaddingMethodInfo, dOMHTMLTableElementGetCellPadding , -- ** dOMHTMLTableElementGetCellSpacing + DOMHTMLTableElementGetCellSpacingMethodInfo, dOMHTMLTableElementGetCellSpacing , -- ** dOMHTMLTableElementGetFrame + DOMHTMLTableElementGetFrameMethodInfo , dOMHTMLTableElementGetFrame , -- ** dOMHTMLTableElementGetRows + DOMHTMLTableElementGetRowsMethodInfo , dOMHTMLTableElementGetRows , -- ** dOMHTMLTableElementGetRules + DOMHTMLTableElementGetRulesMethodInfo , dOMHTMLTableElementGetRules , -- ** dOMHTMLTableElementGetSummary + DOMHTMLTableElementGetSummaryMethodInfo , dOMHTMLTableElementGetSummary , -- ** dOMHTMLTableElementGetTBodies + DOMHTMLTableElementGetTBodiesMethodInfo , dOMHTMLTableElementGetTBodies , -- ** dOMHTMLTableElementGetTFoot + DOMHTMLTableElementGetTFootMethodInfo , dOMHTMLTableElementGetTFoot , -- ** dOMHTMLTableElementGetTHead + DOMHTMLTableElementGetTHeadMethodInfo , dOMHTMLTableElementGetTHead , -- ** dOMHTMLTableElementGetWidth + DOMHTMLTableElementGetWidthMethodInfo , dOMHTMLTableElementGetWidth , -- ** dOMHTMLTableElementInsertRow + DOMHTMLTableElementInsertRowMethodInfo , dOMHTMLTableElementInsertRow , -- ** dOMHTMLTableElementSetAlign + DOMHTMLTableElementSetAlignMethodInfo , dOMHTMLTableElementSetAlign , -- ** dOMHTMLTableElementSetBgColor + DOMHTMLTableElementSetBgColorMethodInfo , dOMHTMLTableElementSetBgColor , -- ** dOMHTMLTableElementSetBorder + DOMHTMLTableElementSetBorderMethodInfo , dOMHTMLTableElementSetBorder , -- ** dOMHTMLTableElementSetCaption + DOMHTMLTableElementSetCaptionMethodInfo , dOMHTMLTableElementSetCaption , -- ** dOMHTMLTableElementSetCellPadding + DOMHTMLTableElementSetCellPaddingMethodInfo, dOMHTMLTableElementSetCellPadding , -- ** dOMHTMLTableElementSetCellSpacing + DOMHTMLTableElementSetCellSpacingMethodInfo, dOMHTMLTableElementSetCellSpacing , -- ** dOMHTMLTableElementSetFrame + DOMHTMLTableElementSetFrameMethodInfo , dOMHTMLTableElementSetFrame , -- ** dOMHTMLTableElementSetRules + DOMHTMLTableElementSetRulesMethodInfo , dOMHTMLTableElementSetRules , -- ** dOMHTMLTableElementSetSummary + DOMHTMLTableElementSetSummaryMethodInfo , dOMHTMLTableElementSetSummary , -- ** dOMHTMLTableElementSetTFoot + DOMHTMLTableElementSetTFootMethodInfo , dOMHTMLTableElementSetTFoot , -- ** dOMHTMLTableElementSetTHead + DOMHTMLTableElementSetTHeadMethodInfo , dOMHTMLTableElementSetTHead , -- ** dOMHTMLTableElementSetWidth + DOMHTMLTableElementSetWidthMethodInfo , dOMHTMLTableElementSetWidth , @@ -283,6 +319,206 @@ noDOMHTMLTableElement :: Maybe DOMHTMLTableElement noDOMHTMLTableElement = Nothing +type family ResolveDOMHTMLTableElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLTableElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLTableElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLTableElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLTableElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLTableElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLTableElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLTableElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLTableElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLTableElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLTableElementMethod "createCaption" o = DOMHTMLTableElementCreateCaptionMethodInfo + ResolveDOMHTMLTableElementMethod "createTBody" o = DOMHTMLTableElementCreateTBodyMethodInfo + ResolveDOMHTMLTableElementMethod "createTFoot" o = DOMHTMLTableElementCreateTFootMethodInfo + ResolveDOMHTMLTableElementMethod "createTHead" o = DOMHTMLTableElementCreateTHeadMethodInfo + ResolveDOMHTMLTableElementMethod "deleteCaption" o = DOMHTMLTableElementDeleteCaptionMethodInfo + ResolveDOMHTMLTableElementMethod "deleteRow" o = DOMHTMLTableElementDeleteRowMethodInfo + ResolveDOMHTMLTableElementMethod "deleteTFoot" o = DOMHTMLTableElementDeleteTFootMethodInfo + ResolveDOMHTMLTableElementMethod "deleteTHead" o = DOMHTMLTableElementDeleteTHeadMethodInfo + ResolveDOMHTMLTableElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLTableElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLTableElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLTableElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLTableElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLTableElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLTableElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLTableElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLTableElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLTableElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLTableElementMethod "insertRow" o = DOMHTMLTableElementInsertRowMethodInfo + ResolveDOMHTMLTableElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLTableElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLTableElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLTableElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLTableElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLTableElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLTableElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLTableElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLTableElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLTableElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLTableElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLTableElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLTableElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLTableElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLTableElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLTableElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLTableElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLTableElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLTableElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLTableElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLTableElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLTableElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLTableElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLTableElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLTableElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLTableElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLTableElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLTableElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLTableElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLTableElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLTableElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLTableElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLTableElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLTableElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLTableElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLTableElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLTableElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLTableElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLTableElementMethod "getAlign" o = DOMHTMLTableElementGetAlignMethodInfo + ResolveDOMHTMLTableElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLTableElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLTableElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLTableElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLTableElementMethod "getBgColor" o = DOMHTMLTableElementGetBgColorMethodInfo + ResolveDOMHTMLTableElementMethod "getBorder" o = DOMHTMLTableElementGetBorderMethodInfo + ResolveDOMHTMLTableElementMethod "getCaption" o = DOMHTMLTableElementGetCaptionMethodInfo + ResolveDOMHTMLTableElementMethod "getCellPadding" o = DOMHTMLTableElementGetCellPaddingMethodInfo + ResolveDOMHTMLTableElementMethod "getCellSpacing" o = DOMHTMLTableElementGetCellSpacingMethodInfo + ResolveDOMHTMLTableElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLTableElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLTableElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLTableElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLTableElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLTableElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLTableElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLTableElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLTableElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLTableElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLTableElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLTableElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLTableElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLTableElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLTableElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLTableElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLTableElementMethod "getFrame" o = DOMHTMLTableElementGetFrameMethodInfo + ResolveDOMHTMLTableElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLTableElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLTableElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLTableElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLTableElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLTableElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLTableElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLTableElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLTableElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLTableElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLTableElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLTableElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLTableElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLTableElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLTableElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLTableElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLTableElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLTableElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLTableElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLTableElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLTableElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLTableElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLTableElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLTableElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLTableElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLTableElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLTableElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLTableElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLTableElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLTableElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLTableElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLTableElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLTableElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLTableElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLTableElementMethod "getRows" o = DOMHTMLTableElementGetRowsMethodInfo + ResolveDOMHTMLTableElementMethod "getRules" o = DOMHTMLTableElementGetRulesMethodInfo + ResolveDOMHTMLTableElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLTableElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLTableElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLTableElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLTableElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLTableElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLTableElementMethod "getSummary" o = DOMHTMLTableElementGetSummaryMethodInfo + ResolveDOMHTMLTableElementMethod "getTBodies" o = DOMHTMLTableElementGetTBodiesMethodInfo + ResolveDOMHTMLTableElementMethod "getTFoot" o = DOMHTMLTableElementGetTFootMethodInfo + ResolveDOMHTMLTableElementMethod "getTHead" o = DOMHTMLTableElementGetTHeadMethodInfo + ResolveDOMHTMLTableElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLTableElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLTableElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLTableElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLTableElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLTableElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLTableElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLTableElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableElementMethod "getWidth" o = DOMHTMLTableElementGetWidthMethodInfo + ResolveDOMHTMLTableElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLTableElementMethod "setAlign" o = DOMHTMLTableElementSetAlignMethodInfo + ResolveDOMHTMLTableElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLTableElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLTableElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLTableElementMethod "setBgColor" o = DOMHTMLTableElementSetBgColorMethodInfo + ResolveDOMHTMLTableElementMethod "setBorder" o = DOMHTMLTableElementSetBorderMethodInfo + ResolveDOMHTMLTableElementMethod "setCaption" o = DOMHTMLTableElementSetCaptionMethodInfo + ResolveDOMHTMLTableElementMethod "setCellPadding" o = DOMHTMLTableElementSetCellPaddingMethodInfo + ResolveDOMHTMLTableElementMethod "setCellSpacing" o = DOMHTMLTableElementSetCellSpacingMethodInfo + ResolveDOMHTMLTableElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLTableElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLTableElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLTableElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLTableElementMethod "setFrame" o = DOMHTMLTableElementSetFrameMethodInfo + ResolveDOMHTMLTableElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLTableElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLTableElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLTableElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLTableElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLTableElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLTableElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLTableElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLTableElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLTableElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLTableElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLTableElementMethod "setRules" o = DOMHTMLTableElementSetRulesMethodInfo + ResolveDOMHTMLTableElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLTableElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLTableElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLTableElementMethod "setSummary" o = DOMHTMLTableElementSetSummaryMethodInfo + ResolveDOMHTMLTableElementMethod "setTFoot" o = DOMHTMLTableElementSetTFootMethodInfo + ResolveDOMHTMLTableElementMethod "setTHead" o = DOMHTMLTableElementSetTHeadMethodInfo + ResolveDOMHTMLTableElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLTableElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLTableElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLTableElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLTableElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableElementMethod "setWidth" o = DOMHTMLTableElementSetWidthMethodInfo + ResolveDOMHTMLTableElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLTableElementMethod t DOMHTMLTableElement, MethodInfo info DOMHTMLTableElement p) => IsLabelProxy t (DOMHTMLTableElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLTableElementMethod t DOMHTMLTableElement, MethodInfo info DOMHTMLTableElement p) => IsLabel t (DOMHTMLTableElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -302,7 +538,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableElementAlignPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLTableElementAlignPropertyInfo = "DOMHTMLTableElement::align" + type AttrLabel DOMHTMLTableElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLTableElementAlign attrSet _ = setDOMHTMLTableElementAlign attrConstruct _ = constructDOMHTMLTableElementAlign @@ -326,7 +562,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementBgColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableElementBgColorPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementBgColorPropertyInfo = T.Text - type AttrLabel DOMHTMLTableElementBgColorPropertyInfo = "DOMHTMLTableElement::bg-color" + type AttrLabel DOMHTMLTableElementBgColorPropertyInfo = "bg-color" attrGet _ = getDOMHTMLTableElementBgColor attrSet _ = setDOMHTMLTableElementBgColor attrConstruct _ = constructDOMHTMLTableElementBgColor @@ -350,7 +586,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementBorderPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableElementBorderPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementBorderPropertyInfo = T.Text - type AttrLabel DOMHTMLTableElementBorderPropertyInfo = "DOMHTMLTableElement::border" + type AttrLabel DOMHTMLTableElementBorderPropertyInfo = "border" attrGet _ = getDOMHTMLTableElementBorder attrSet _ = setDOMHTMLTableElementBorder attrConstruct _ = constructDOMHTMLTableElementBorder @@ -368,7 +604,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementCaptionPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTableElementCaptionPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementCaptionPropertyInfo = DOMHTMLTableCaptionElement - type AttrLabel DOMHTMLTableElementCaptionPropertyInfo = "DOMHTMLTableElement::caption" + type AttrLabel DOMHTMLTableElementCaptionPropertyInfo = "caption" attrGet _ = getDOMHTMLTableElementCaption attrSet _ = undefined attrConstruct _ = undefined @@ -392,7 +628,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementCellPaddingPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableElementCellPaddingPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementCellPaddingPropertyInfo = T.Text - type AttrLabel DOMHTMLTableElementCellPaddingPropertyInfo = "DOMHTMLTableElement::cell-padding" + type AttrLabel DOMHTMLTableElementCellPaddingPropertyInfo = "cell-padding" attrGet _ = getDOMHTMLTableElementCellPadding attrSet _ = setDOMHTMLTableElementCellPadding attrConstruct _ = constructDOMHTMLTableElementCellPadding @@ -416,7 +652,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementCellSpacingPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableElementCellSpacingPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementCellSpacingPropertyInfo = T.Text - type AttrLabel DOMHTMLTableElementCellSpacingPropertyInfo = "DOMHTMLTableElement::cell-spacing" + type AttrLabel DOMHTMLTableElementCellSpacingPropertyInfo = "cell-spacing" attrGet _ = getDOMHTMLTableElementCellSpacing attrSet _ = setDOMHTMLTableElementCellSpacing attrConstruct _ = constructDOMHTMLTableElementCellSpacing @@ -440,7 +676,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementFramePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableElementFramePropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementFramePropertyInfo = T.Text - type AttrLabel DOMHTMLTableElementFramePropertyInfo = "DOMHTMLTableElement::frame" + type AttrLabel DOMHTMLTableElementFramePropertyInfo = "frame" attrGet _ = getDOMHTMLTableElementFrame attrSet _ = setDOMHTMLTableElementFrame attrConstruct _ = constructDOMHTMLTableElementFrame @@ -458,7 +694,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementRowsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTableElementRowsPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementRowsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLTableElementRowsPropertyInfo = "DOMHTMLTableElement::rows" + type AttrLabel DOMHTMLTableElementRowsPropertyInfo = "rows" attrGet _ = getDOMHTMLTableElementRows attrSet _ = undefined attrConstruct _ = undefined @@ -482,7 +718,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementRulesPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableElementRulesPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementRulesPropertyInfo = T.Text - type AttrLabel DOMHTMLTableElementRulesPropertyInfo = "DOMHTMLTableElement::rules" + type AttrLabel DOMHTMLTableElementRulesPropertyInfo = "rules" attrGet _ = getDOMHTMLTableElementRules attrSet _ = setDOMHTMLTableElementRules attrConstruct _ = constructDOMHTMLTableElementRules @@ -506,7 +742,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementSummaryPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableElementSummaryPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementSummaryPropertyInfo = T.Text - type AttrLabel DOMHTMLTableElementSummaryPropertyInfo = "DOMHTMLTableElement::summary" + type AttrLabel DOMHTMLTableElementSummaryPropertyInfo = "summary" attrGet _ = getDOMHTMLTableElementSummary attrSet _ = setDOMHTMLTableElementSummary attrConstruct _ = constructDOMHTMLTableElementSummary @@ -524,7 +760,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementTBodiesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTableElementTBodiesPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementTBodiesPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLTableElementTBodiesPropertyInfo = "DOMHTMLTableElement::t-bodies" + type AttrLabel DOMHTMLTableElementTBodiesPropertyInfo = "t-bodies" attrGet _ = getDOMHTMLTableElementTBodies attrSet _ = undefined attrConstruct _ = undefined @@ -542,7 +778,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementTFootPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTableElementTFootPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementTFootPropertyInfo = DOMHTMLTableSectionElement - type AttrLabel DOMHTMLTableElementTFootPropertyInfo = "DOMHTMLTableElement::t-foot" + type AttrLabel DOMHTMLTableElementTFootPropertyInfo = "t-foot" attrGet _ = getDOMHTMLTableElementTFoot attrSet _ = undefined attrConstruct _ = undefined @@ -560,7 +796,7 @@ type AttrSetTypeConstraint DOMHTMLTableElementTHeadPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTableElementTHeadPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementTHeadPropertyInfo = DOMHTMLTableSectionElement - type AttrLabel DOMHTMLTableElementTHeadPropertyInfo = "DOMHTMLTableElement::t-head" + type AttrLabel DOMHTMLTableElementTHeadPropertyInfo = "t-head" attrGet _ = getDOMHTMLTableElementTHead attrSet _ = undefined attrConstruct _ = undefined @@ -584,22 +820,21 @@ type AttrSetTypeConstraint DOMHTMLTableElementWidthPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableElementWidthPropertyInfo = DOMHTMLTableElementK type AttrGetType DOMHTMLTableElementWidthPropertyInfo = T.Text - type AttrLabel DOMHTMLTableElementWidthPropertyInfo = "DOMHTMLTableElement::width" + type AttrLabel DOMHTMLTableElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLTableElementWidth attrSet _ = setDOMHTMLTableElementWidth attrConstruct _ = constructDOMHTMLTableElementWidth type instance AttributeList DOMHTMLTableElement = DOMHTMLTableElementAttributeList -type DOMHTMLTableElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("bg-color", DOMHTMLTableElementBgColorPropertyInfo), '("border", DOMHTMLTableElementBorderPropertyInfo), '("caption", DOMHTMLTableElementCaptionPropertyInfo), '("cell-padding", DOMHTMLTableElementCellPaddingPropertyInfo), '("cell-spacing", DOMHTMLTableElementCellSpacingPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("frame", DOMHTMLTableElementFramePropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("rows", DOMHTMLTableElementRowsPropertyInfo), '("rules", DOMHTMLTableElementRulesPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("summary", DOMHTMLTableElementSummaryPropertyInfo), '("t-bodies", DOMHTMLTableElementTBodiesPropertyInfo), '("t-foot", DOMHTMLTableElementTFootPropertyInfo), '("t-head", DOMHTMLTableElementTHeadPropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLTableElementWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLTableElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("bgColor", DOMHTMLTableElementBgColorPropertyInfo), '("border", DOMHTMLTableElementBorderPropertyInfo), '("caption", DOMHTMLTableElementCaptionPropertyInfo), '("cellPadding", DOMHTMLTableElementCellPaddingPropertyInfo), '("cellSpacing", DOMHTMLTableElementCellSpacingPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("frame", DOMHTMLTableElementFramePropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("rows", DOMHTMLTableElementRowsPropertyInfo), '("rules", DOMHTMLTableElementRulesPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("summary", DOMHTMLTableElementSummaryPropertyInfo), '("tBodies", DOMHTMLTableElementTBodiesPropertyInfo), '("tFoot", DOMHTMLTableElementTFootPropertyInfo), '("tHead", DOMHTMLTableElementTHeadPropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLTableElementWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLTableElement = DOMHTMLTableElementSignalList -type DOMHTMLTableElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLTableElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLTableElement::create_caption -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLElement" -- throws : False -- Skip return : False @@ -611,8 +846,8 @@ dOMHTMLTableElementCreateCaption :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m DOMHTMLElement + a -- _obj + -> m DOMHTMLElement -- result dOMHTMLTableElementCreateCaption _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_create_caption _obj' @@ -621,11 +856,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementCreateCaptionMethodInfo +instance (signature ~ (m DOMHTMLElement), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementCreateCaptionMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementCreateCaption + -- method DOMHTMLTableElement::create_t_body -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLElement" -- throws : False -- Skip return : False @@ -637,8 +875,8 @@ dOMHTMLTableElementCreateTBody :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m DOMHTMLElement + a -- _obj + -> m DOMHTMLElement -- result dOMHTMLTableElementCreateTBody _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_create_t_body _obj' @@ -647,11 +885,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementCreateTBodyMethodInfo +instance (signature ~ (m DOMHTMLElement), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementCreateTBodyMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementCreateTBody + -- method DOMHTMLTableElement::create_t_foot -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLElement" -- throws : False -- Skip return : False @@ -663,8 +904,8 @@ dOMHTMLTableElementCreateTFoot :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m DOMHTMLElement + a -- _obj + -> m DOMHTMLElement -- result dOMHTMLTableElementCreateTFoot _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_create_t_foot _obj' @@ -673,11 +914,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementCreateTFootMethodInfo +instance (signature ~ (m DOMHTMLElement), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementCreateTFootMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementCreateTFoot + -- method DOMHTMLTableElement::create_t_head -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLElement" -- throws : False -- Skip return : False @@ -689,8 +933,8 @@ dOMHTMLTableElementCreateTHead :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m DOMHTMLElement + a -- _obj + -> m DOMHTMLElement -- result dOMHTMLTableElementCreateTHead _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_create_t_head _obj' @@ -699,11 +943,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementCreateTHeadMethodInfo +instance (signature ~ (m DOMHTMLElement), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementCreateTHeadMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementCreateTHead + -- method DOMHTMLTableElement::delete_caption -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -715,19 +962,22 @@ dOMHTMLTableElementDeleteCaption :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLTableElementDeleteCaption _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_table_element_delete_caption _obj' touchManagedPtr _obj return () +data DOMHTMLTableElementDeleteCaptionMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementDeleteCaptionMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementDeleteCaption + -- method DOMHTMLTableElement::delete_row -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -741,9 +991,9 @@ dOMHTMLTableElementDeleteRow :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - Int64 -> -- index - m () + a -- _obj + -> Int64 -- index + -> m () -- result dOMHTMLTableElementDeleteRow _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -754,11 +1004,14 @@ return () ) +data DOMHTMLTableElementDeleteRowMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementDeleteRowMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementDeleteRow + -- method DOMHTMLTableElement::delete_t_foot -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -770,19 +1023,22 @@ dOMHTMLTableElementDeleteTFoot :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLTableElementDeleteTFoot _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_table_element_delete_t_foot _obj' touchManagedPtr _obj return () +data DOMHTMLTableElementDeleteTFootMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementDeleteTFootMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementDeleteTFoot + -- method DOMHTMLTableElement::delete_t_head -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -794,19 +1050,22 @@ dOMHTMLTableElementDeleteTHead :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLTableElementDeleteTHead _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_table_element_delete_t_head _obj' touchManagedPtr _obj return () +data DOMHTMLTableElementDeleteTHeadMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementDeleteTHeadMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementDeleteTHead + -- method DOMHTMLTableElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -818,8 +1077,8 @@ dOMHTMLTableElementGetAlign :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_align _obj' @@ -829,11 +1088,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetAlign + -- method DOMHTMLTableElement::get_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -845,8 +1107,8 @@ dOMHTMLTableElementGetBgColor :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableElementGetBgColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_bg_color _obj' @@ -856,11 +1118,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetBgColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetBgColor + -- method DOMHTMLTableElement::get_border -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -872,8 +1137,8 @@ dOMHTMLTableElementGetBorder :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableElementGetBorder _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_border _obj' @@ -883,11 +1148,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetBorderMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetBorderMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetBorder + -- method DOMHTMLTableElement::get_caption -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLTableCaptionElement" -- throws : False -- Skip return : False @@ -899,8 +1167,8 @@ dOMHTMLTableElementGetCaption :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m DOMHTMLTableCaptionElement + a -- _obj + -> m DOMHTMLTableCaptionElement -- result dOMHTMLTableElementGetCaption _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_caption _obj' @@ -909,11 +1177,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetCaptionMethodInfo +instance (signature ~ (m DOMHTMLTableCaptionElement), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetCaptionMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetCaption + -- method DOMHTMLTableElement::get_cell_padding -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -925,8 +1196,8 @@ dOMHTMLTableElementGetCellPadding :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableElementGetCellPadding _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_cell_padding _obj' @@ -936,11 +1207,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetCellPaddingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetCellPaddingMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetCellPadding + -- method DOMHTMLTableElement::get_cell_spacing -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -952,8 +1226,8 @@ dOMHTMLTableElementGetCellSpacing :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableElementGetCellSpacing _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_cell_spacing _obj' @@ -963,11 +1237,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetCellSpacingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetCellSpacingMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetCellSpacing + -- method DOMHTMLTableElement::get_frame -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -979,8 +1256,8 @@ dOMHTMLTableElementGetFrame :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableElementGetFrame _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_frame _obj' @@ -990,11 +1267,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetFrameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetFrameMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetFrame + -- method DOMHTMLTableElement::get_rows -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -1006,8 +1286,8 @@ dOMHTMLTableElementGetRows :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLTableElementGetRows _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_rows _obj' @@ -1016,11 +1296,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetRowsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetRowsMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetRows + -- method DOMHTMLTableElement::get_rules -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1032,8 +1315,8 @@ dOMHTMLTableElementGetRules :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableElementGetRules _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_rules _obj' @@ -1043,11 +1326,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetRulesMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetRulesMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetRules + -- method DOMHTMLTableElement::get_summary -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1059,8 +1345,8 @@ dOMHTMLTableElementGetSummary :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableElementGetSummary _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_summary _obj' @@ -1070,11 +1356,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetSummaryMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetSummaryMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetSummary + -- method DOMHTMLTableElement::get_t_bodies -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -1086,8 +1375,8 @@ dOMHTMLTableElementGetTBodies :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLTableElementGetTBodies _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_t_bodies _obj' @@ -1096,11 +1385,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetTBodiesMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetTBodiesMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetTBodies + -- method DOMHTMLTableElement::get_t_foot -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLTableSectionElement" -- throws : False -- Skip return : False @@ -1112,8 +1404,8 @@ dOMHTMLTableElementGetTFoot :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m DOMHTMLTableSectionElement + a -- _obj + -> m DOMHTMLTableSectionElement -- result dOMHTMLTableElementGetTFoot _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_t_foot _obj' @@ -1122,11 +1414,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetTFootMethodInfo +instance (signature ~ (m DOMHTMLTableSectionElement), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetTFootMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetTFoot + -- method DOMHTMLTableElement::get_t_head -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLTableSectionElement" -- throws : False -- Skip return : False @@ -1138,8 +1433,8 @@ dOMHTMLTableElementGetTHead :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m DOMHTMLTableSectionElement + a -- _obj + -> m DOMHTMLTableSectionElement -- result dOMHTMLTableElementGetTHead _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_t_head _obj' @@ -1148,11 +1443,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetTHeadMethodInfo +instance (signature ~ (m DOMHTMLTableSectionElement), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetTHeadMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetTHead + -- method DOMHTMLTableElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1164,8 +1462,8 @@ dOMHTMLTableElementGetWidth :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_element_get_width _obj' @@ -1175,11 +1473,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableElementGetWidthMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementGetWidth + -- method DOMHTMLTableElement::insert_row -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLElement" -- throws : True -- Skip return : False @@ -1193,9 +1494,9 @@ dOMHTMLTableElementInsertRow :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - Int64 -> -- index - m DOMHTMLElement + a -- _obj + -> Int64 -- index + -> m DOMHTMLElement -- result dOMHTMLTableElementInsertRow _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -1208,11 +1509,14 @@ return () ) +data DOMHTMLTableElementInsertRowMethodInfo +instance (signature ~ (Int64 -> m DOMHTMLElement), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementInsertRowMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementInsertRow + -- method DOMHTMLTableElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1225,9 +1529,9 @@ dOMHTMLTableElementSetAlign :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1236,11 +1540,14 @@ freeMem value' return () +data DOMHTMLTableElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetAlign + -- method DOMHTMLTableElement::set_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1253,9 +1560,9 @@ dOMHTMLTableElementSetBgColor :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableElementSetBgColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1264,11 +1571,14 @@ freeMem value' return () +data DOMHTMLTableElementSetBgColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementSetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetBgColor + -- method DOMHTMLTableElement::set_border -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1281,9 +1591,9 @@ dOMHTMLTableElementSetBorder :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableElementSetBorder _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1292,11 +1602,14 @@ freeMem value' return () +data DOMHTMLTableElementSetBorderMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementSetBorderMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetBorder + -- method DOMHTMLTableElement::set_caption -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMHTMLTableCaptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TInterface "WebKit" "DOMHTMLTableCaptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMHTMLTableCaptionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1310,9 +1623,9 @@ dOMHTMLTableElementSetCaption :: (MonadIO m, DOMHTMLTableElementK a, DOMHTMLTableCaptionElementK b) => - a -> -- _obj - b -> -- value - m () + a -- _obj + -> b -- value + -> m () -- result dOMHTMLTableElementSetCaption _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = unsafeManagedPtrCastPtr value @@ -1325,11 +1638,14 @@ return () ) +data DOMHTMLTableElementSetCaptionMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMHTMLTableElementK a, DOMHTMLTableCaptionElementK b) => MethodInfo DOMHTMLTableElementSetCaptionMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetCaption + -- method DOMHTMLTableElement::set_cell_padding -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1342,9 +1658,9 @@ dOMHTMLTableElementSetCellPadding :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableElementSetCellPadding _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1353,11 +1669,14 @@ freeMem value' return () +data DOMHTMLTableElementSetCellPaddingMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementSetCellPaddingMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetCellPadding + -- method DOMHTMLTableElement::set_cell_spacing -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1370,9 +1689,9 @@ dOMHTMLTableElementSetCellSpacing :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableElementSetCellSpacing _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1381,11 +1700,14 @@ freeMem value' return () +data DOMHTMLTableElementSetCellSpacingMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementSetCellSpacingMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetCellSpacing + -- method DOMHTMLTableElement::set_frame -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1398,9 +1720,9 @@ dOMHTMLTableElementSetFrame :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableElementSetFrame _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1409,11 +1731,14 @@ freeMem value' return () +data DOMHTMLTableElementSetFrameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementSetFrameMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetFrame + -- method DOMHTMLTableElement::set_rules -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1426,9 +1751,9 @@ dOMHTMLTableElementSetRules :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableElementSetRules _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1437,11 +1762,14 @@ freeMem value' return () +data DOMHTMLTableElementSetRulesMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementSetRulesMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetRules + -- method DOMHTMLTableElement::set_summary -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1454,9 +1782,9 @@ dOMHTMLTableElementSetSummary :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableElementSetSummary _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1465,11 +1793,14 @@ freeMem value' return () +data DOMHTMLTableElementSetSummaryMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementSetSummaryMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetSummary + -- method DOMHTMLTableElement::set_t_foot -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1483,9 +1814,9 @@ dOMHTMLTableElementSetTFoot :: (MonadIO m, DOMHTMLTableElementK a, DOMHTMLTableSectionElementK b) => - a -> -- _obj - b -> -- value - m () + a -- _obj + -> b -- value + -> m () -- result dOMHTMLTableElementSetTFoot _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = unsafeManagedPtrCastPtr value @@ -1498,11 +1829,14 @@ return () ) +data DOMHTMLTableElementSetTFootMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMHTMLTableElementK a, DOMHTMLTableSectionElementK b) => MethodInfo DOMHTMLTableElementSetTFootMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetTFoot + -- method DOMHTMLTableElement::set_t_head -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1516,9 +1850,9 @@ dOMHTMLTableElementSetTHead :: (MonadIO m, DOMHTMLTableElementK a, DOMHTMLTableSectionElementK b) => - a -> -- _obj - b -> -- value - m () + a -- _obj + -> b -- value + -> m () -- result dOMHTMLTableElementSetTHead _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = unsafeManagedPtrCastPtr value @@ -1531,11 +1865,14 @@ return () ) +data DOMHTMLTableElementSetTHeadMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMHTMLTableElementK a, DOMHTMLTableSectionElementK b) => MethodInfo DOMHTMLTableElementSetTHeadMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetTHead + -- method DOMHTMLTableElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1548,9 +1885,9 @@ dOMHTMLTableElementSetWidth :: (MonadIO m, DOMHTMLTableElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1558,5 +1895,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLTableElementSetWidthMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableElementK a) => MethodInfo DOMHTMLTableElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableElementSetWidth diff --git a/GI/WebKit/Objects/DOMHTMLTableElement.hs-boot b/GI/WebKit/Objects/DOMHTMLTableElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLTableElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLTableElement.hs-boot @@ -25,3 +25,38 @@ data DOMHTMLTableElementTFootPropertyInfo data DOMHTMLTableElementTHeadPropertyInfo data DOMHTMLTableElementWidthPropertyInfo +data DOMHTMLTableElementCreateCaptionMethodInfo +data DOMHTMLTableElementCreateTBodyMethodInfo +data DOMHTMLTableElementCreateTFootMethodInfo +data DOMHTMLTableElementCreateTHeadMethodInfo +data DOMHTMLTableElementDeleteCaptionMethodInfo +data DOMHTMLTableElementDeleteRowMethodInfo +data DOMHTMLTableElementDeleteTFootMethodInfo +data DOMHTMLTableElementDeleteTHeadMethodInfo +data DOMHTMLTableElementGetAlignMethodInfo +data DOMHTMLTableElementGetBgColorMethodInfo +data DOMHTMLTableElementGetBorderMethodInfo +data DOMHTMLTableElementGetCaptionMethodInfo +data DOMHTMLTableElementGetCellPaddingMethodInfo +data DOMHTMLTableElementGetCellSpacingMethodInfo +data DOMHTMLTableElementGetFrameMethodInfo +data DOMHTMLTableElementGetRowsMethodInfo +data DOMHTMLTableElementGetRulesMethodInfo +data DOMHTMLTableElementGetSummaryMethodInfo +data DOMHTMLTableElementGetTBodiesMethodInfo +data DOMHTMLTableElementGetTFootMethodInfo +data DOMHTMLTableElementGetTHeadMethodInfo +data DOMHTMLTableElementGetWidthMethodInfo +data DOMHTMLTableElementInsertRowMethodInfo +data DOMHTMLTableElementSetAlignMethodInfo +data DOMHTMLTableElementSetBgColorMethodInfo +data DOMHTMLTableElementSetBorderMethodInfo +data DOMHTMLTableElementSetCaptionMethodInfo +data DOMHTMLTableElementSetCellPaddingMethodInfo +data DOMHTMLTableElementSetCellSpacingMethodInfo +data DOMHTMLTableElementSetFrameMethodInfo +data DOMHTMLTableElementSetRulesMethodInfo +data DOMHTMLTableElementSetSummaryMethodInfo +data DOMHTMLTableElementSetTFootMethodInfo +data DOMHTMLTableElementSetTHeadMethodInfo +data DOMHTMLTableElementSetWidthMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLTableRowElement.hs b/GI/WebKit/Objects/DOMHTMLTableRowElement.hs --- a/GI/WebKit/Objects/DOMHTMLTableRowElement.hs +++ b/GI/WebKit/Objects/DOMHTMLTableRowElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,62 +18,77 @@ -- * Methods -- ** dOMHTMLTableRowElementDeleteCell + DOMHTMLTableRowElementDeleteCellMethodInfo, dOMHTMLTableRowElementDeleteCell , -- ** dOMHTMLTableRowElementGetAlign + DOMHTMLTableRowElementGetAlignMethodInfo, dOMHTMLTableRowElementGetAlign , -- ** dOMHTMLTableRowElementGetBgColor + DOMHTMLTableRowElementGetBgColorMethodInfo, dOMHTMLTableRowElementGetBgColor , -- ** dOMHTMLTableRowElementGetCells + DOMHTMLTableRowElementGetCellsMethodInfo, dOMHTMLTableRowElementGetCells , -- ** dOMHTMLTableRowElementGetCh + DOMHTMLTableRowElementGetChMethodInfo , dOMHTMLTableRowElementGetCh , -- ** dOMHTMLTableRowElementGetChOff + DOMHTMLTableRowElementGetChOffMethodInfo, dOMHTMLTableRowElementGetChOff , -- ** dOMHTMLTableRowElementGetRowIndex + DOMHTMLTableRowElementGetRowIndexMethodInfo, dOMHTMLTableRowElementGetRowIndex , -- ** dOMHTMLTableRowElementGetSectionRowIndex + DOMHTMLTableRowElementGetSectionRowIndexMethodInfo, dOMHTMLTableRowElementGetSectionRowIndex, -- ** dOMHTMLTableRowElementGetVAlign + DOMHTMLTableRowElementGetVAlignMethodInfo, dOMHTMLTableRowElementGetVAlign , -- ** dOMHTMLTableRowElementInsertCell + DOMHTMLTableRowElementInsertCellMethodInfo, dOMHTMLTableRowElementInsertCell , -- ** dOMHTMLTableRowElementSetAlign + DOMHTMLTableRowElementSetAlignMethodInfo, dOMHTMLTableRowElementSetAlign , -- ** dOMHTMLTableRowElementSetBgColor + DOMHTMLTableRowElementSetBgColorMethodInfo, dOMHTMLTableRowElementSetBgColor , -- ** dOMHTMLTableRowElementSetCh + DOMHTMLTableRowElementSetChMethodInfo , dOMHTMLTableRowElementSetCh , -- ** dOMHTMLTableRowElementSetChOff + DOMHTMLTableRowElementSetChOffMethodInfo, dOMHTMLTableRowElementSetChOff , -- ** dOMHTMLTableRowElementSetVAlign + DOMHTMLTableRowElementSetVAlignMethodInfo, dOMHTMLTableRowElementSetVAlign , @@ -165,6 +181,186 @@ noDOMHTMLTableRowElement :: Maybe DOMHTMLTableRowElement noDOMHTMLTableRowElement = Nothing +type family ResolveDOMHTMLTableRowElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLTableRowElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLTableRowElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLTableRowElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLTableRowElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLTableRowElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLTableRowElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLTableRowElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLTableRowElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLTableRowElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLTableRowElementMethod "deleteCell" o = DOMHTMLTableRowElementDeleteCellMethodInfo + ResolveDOMHTMLTableRowElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLTableRowElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLTableRowElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLTableRowElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLTableRowElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLTableRowElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLTableRowElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLTableRowElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLTableRowElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLTableRowElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLTableRowElementMethod "insertCell" o = DOMHTMLTableRowElementInsertCellMethodInfo + ResolveDOMHTMLTableRowElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLTableRowElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLTableRowElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLTableRowElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLTableRowElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLTableRowElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLTableRowElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLTableRowElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLTableRowElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLTableRowElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLTableRowElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLTableRowElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLTableRowElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLTableRowElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLTableRowElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLTableRowElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLTableRowElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLTableRowElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLTableRowElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLTableRowElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLTableRowElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLTableRowElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLTableRowElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLTableRowElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLTableRowElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLTableRowElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLTableRowElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLTableRowElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLTableRowElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLTableRowElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLTableRowElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLTableRowElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLTableRowElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLTableRowElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLTableRowElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLTableRowElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLTableRowElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLTableRowElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLTableRowElementMethod "getAlign" o = DOMHTMLTableRowElementGetAlignMethodInfo + ResolveDOMHTMLTableRowElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLTableRowElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLTableRowElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableRowElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLTableRowElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLTableRowElementMethod "getBgColor" o = DOMHTMLTableRowElementGetBgColorMethodInfo + ResolveDOMHTMLTableRowElementMethod "getCells" o = DOMHTMLTableRowElementGetCellsMethodInfo + ResolveDOMHTMLTableRowElementMethod "getCh" o = DOMHTMLTableRowElementGetChMethodInfo + ResolveDOMHTMLTableRowElementMethod "getChOff" o = DOMHTMLTableRowElementGetChOffMethodInfo + ResolveDOMHTMLTableRowElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLTableRowElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLTableRowElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLTableRowElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLTableRowElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLTableRowElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLTableRowElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLTableRowElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLTableRowElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLTableRowElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLTableRowElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLTableRowElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLTableRowElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLTableRowElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLTableRowElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLTableRowElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLTableRowElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLTableRowElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLTableRowElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLTableRowElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLTableRowElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLTableRowElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLTableRowElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLTableRowElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLTableRowElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLTableRowElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLTableRowElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLTableRowElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLTableRowElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLTableRowElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLTableRowElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLTableRowElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLTableRowElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLTableRowElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLTableRowElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLTableRowElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLTableRowElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLTableRowElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLTableRowElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLTableRowElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLTableRowElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLTableRowElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLTableRowElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLTableRowElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLTableRowElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLTableRowElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLTableRowElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLTableRowElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLTableRowElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLTableRowElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLTableRowElementMethod "getRowIndex" o = DOMHTMLTableRowElementGetRowIndexMethodInfo + ResolveDOMHTMLTableRowElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLTableRowElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLTableRowElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLTableRowElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLTableRowElementMethod "getSectionRowIndex" o = DOMHTMLTableRowElementGetSectionRowIndexMethodInfo + ResolveDOMHTMLTableRowElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLTableRowElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLTableRowElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLTableRowElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLTableRowElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLTableRowElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLTableRowElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLTableRowElementMethod "getVAlign" o = DOMHTMLTableRowElementGetVAlignMethodInfo + ResolveDOMHTMLTableRowElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLTableRowElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLTableRowElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableRowElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLTableRowElementMethod "setAlign" o = DOMHTMLTableRowElementSetAlignMethodInfo + ResolveDOMHTMLTableRowElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLTableRowElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLTableRowElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableRowElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLTableRowElementMethod "setBgColor" o = DOMHTMLTableRowElementSetBgColorMethodInfo + ResolveDOMHTMLTableRowElementMethod "setCh" o = DOMHTMLTableRowElementSetChMethodInfo + ResolveDOMHTMLTableRowElementMethod "setChOff" o = DOMHTMLTableRowElementSetChOffMethodInfo + ResolveDOMHTMLTableRowElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLTableRowElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLTableRowElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLTableRowElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLTableRowElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLTableRowElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLTableRowElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLTableRowElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLTableRowElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLTableRowElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLTableRowElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLTableRowElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLTableRowElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLTableRowElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLTableRowElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLTableRowElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLTableRowElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLTableRowElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLTableRowElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLTableRowElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLTableRowElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLTableRowElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLTableRowElementMethod "setVAlign" o = DOMHTMLTableRowElementSetVAlignMethodInfo + ResolveDOMHTMLTableRowElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableRowElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLTableRowElementMethod t DOMHTMLTableRowElement, MethodInfo info DOMHTMLTableRowElement p) => IsLabelProxy t (DOMHTMLTableRowElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLTableRowElementMethod t DOMHTMLTableRowElement, MethodInfo info DOMHTMLTableRowElement p) => IsLabel t (DOMHTMLTableRowElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -184,7 +380,7 @@ type AttrSetTypeConstraint DOMHTMLTableRowElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableRowElementAlignPropertyInfo = DOMHTMLTableRowElementK type AttrGetType DOMHTMLTableRowElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLTableRowElementAlignPropertyInfo = "DOMHTMLTableRowElement::align" + type AttrLabel DOMHTMLTableRowElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLTableRowElementAlign attrSet _ = setDOMHTMLTableRowElementAlign attrConstruct _ = constructDOMHTMLTableRowElementAlign @@ -208,7 +404,7 @@ type AttrSetTypeConstraint DOMHTMLTableRowElementBgColorPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableRowElementBgColorPropertyInfo = DOMHTMLTableRowElementK type AttrGetType DOMHTMLTableRowElementBgColorPropertyInfo = T.Text - type AttrLabel DOMHTMLTableRowElementBgColorPropertyInfo = "DOMHTMLTableRowElement::bg-color" + type AttrLabel DOMHTMLTableRowElementBgColorPropertyInfo = "bg-color" attrGet _ = getDOMHTMLTableRowElementBgColor attrSet _ = setDOMHTMLTableRowElementBgColor attrConstruct _ = constructDOMHTMLTableRowElementBgColor @@ -226,7 +422,7 @@ type AttrSetTypeConstraint DOMHTMLTableRowElementCellsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTableRowElementCellsPropertyInfo = DOMHTMLTableRowElementK type AttrGetType DOMHTMLTableRowElementCellsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLTableRowElementCellsPropertyInfo = "DOMHTMLTableRowElement::cells" + type AttrLabel DOMHTMLTableRowElementCellsPropertyInfo = "cells" attrGet _ = getDOMHTMLTableRowElementCells attrSet _ = undefined attrConstruct _ = undefined @@ -250,7 +446,7 @@ type AttrSetTypeConstraint DOMHTMLTableRowElementChPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableRowElementChPropertyInfo = DOMHTMLTableRowElementK type AttrGetType DOMHTMLTableRowElementChPropertyInfo = T.Text - type AttrLabel DOMHTMLTableRowElementChPropertyInfo = "DOMHTMLTableRowElement::ch" + type AttrLabel DOMHTMLTableRowElementChPropertyInfo = "ch" attrGet _ = getDOMHTMLTableRowElementCh attrSet _ = setDOMHTMLTableRowElementCh attrConstruct _ = constructDOMHTMLTableRowElementCh @@ -274,7 +470,7 @@ type AttrSetTypeConstraint DOMHTMLTableRowElementChOffPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableRowElementChOffPropertyInfo = DOMHTMLTableRowElementK type AttrGetType DOMHTMLTableRowElementChOffPropertyInfo = T.Text - type AttrLabel DOMHTMLTableRowElementChOffPropertyInfo = "DOMHTMLTableRowElement::ch-off" + type AttrLabel DOMHTMLTableRowElementChOffPropertyInfo = "ch-off" attrGet _ = getDOMHTMLTableRowElementChOff attrSet _ = setDOMHTMLTableRowElementChOff attrConstruct _ = constructDOMHTMLTableRowElementChOff @@ -292,7 +488,7 @@ type AttrSetTypeConstraint DOMHTMLTableRowElementRowIndexPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTableRowElementRowIndexPropertyInfo = DOMHTMLTableRowElementK type AttrGetType DOMHTMLTableRowElementRowIndexPropertyInfo = Int64 - type AttrLabel DOMHTMLTableRowElementRowIndexPropertyInfo = "DOMHTMLTableRowElement::row-index" + type AttrLabel DOMHTMLTableRowElementRowIndexPropertyInfo = "row-index" attrGet _ = getDOMHTMLTableRowElementRowIndex attrSet _ = undefined attrConstruct _ = undefined @@ -310,7 +506,7 @@ type AttrSetTypeConstraint DOMHTMLTableRowElementSectionRowIndexPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTableRowElementSectionRowIndexPropertyInfo = DOMHTMLTableRowElementK type AttrGetType DOMHTMLTableRowElementSectionRowIndexPropertyInfo = Int64 - type AttrLabel DOMHTMLTableRowElementSectionRowIndexPropertyInfo = "DOMHTMLTableRowElement::section-row-index" + type AttrLabel DOMHTMLTableRowElementSectionRowIndexPropertyInfo = "section-row-index" attrGet _ = getDOMHTMLTableRowElementSectionRowIndex attrSet _ = undefined attrConstruct _ = undefined @@ -334,22 +530,21 @@ type AttrSetTypeConstraint DOMHTMLTableRowElementVAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableRowElementVAlignPropertyInfo = DOMHTMLTableRowElementK type AttrGetType DOMHTMLTableRowElementVAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLTableRowElementVAlignPropertyInfo = "DOMHTMLTableRowElement::v-align" + type AttrLabel DOMHTMLTableRowElementVAlignPropertyInfo = "v-align" attrGet _ = getDOMHTMLTableRowElementVAlign attrSet _ = setDOMHTMLTableRowElementVAlign attrConstruct _ = constructDOMHTMLTableRowElementVAlign type instance AttributeList DOMHTMLTableRowElement = DOMHTMLTableRowElementAttributeList -type DOMHTMLTableRowElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableRowElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("bg-color", DOMHTMLTableRowElementBgColorPropertyInfo), '("cells", DOMHTMLTableRowElementCellsPropertyInfo), '("ch", DOMHTMLTableRowElementChPropertyInfo), '("ch-off", DOMHTMLTableRowElementChOffPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("row-index", DOMHTMLTableRowElementRowIndexPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("section-row-index", DOMHTMLTableRowElementSectionRowIndexPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("v-align", DOMHTMLTableRowElementVAlignPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLTableRowElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableRowElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("bgColor", DOMHTMLTableRowElementBgColorPropertyInfo), '("cells", DOMHTMLTableRowElementCellsPropertyInfo), '("ch", DOMHTMLTableRowElementChPropertyInfo), '("chOff", DOMHTMLTableRowElementChOffPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("rowIndex", DOMHTMLTableRowElementRowIndexPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("sectionRowIndex", DOMHTMLTableRowElementSectionRowIndexPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("vAlign", DOMHTMLTableRowElementVAlignPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLTableRowElement = DOMHTMLTableRowElementSignalList -type DOMHTMLTableRowElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLTableRowElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLTableRowElement::delete_cell -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -363,9 +558,9 @@ dOMHTMLTableRowElementDeleteCell :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - Int64 -> -- index - m () + a -- _obj + -> Int64 -- index + -> m () -- result dOMHTMLTableRowElementDeleteCell _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -376,11 +571,14 @@ return () ) +data DOMHTMLTableRowElementDeleteCellMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementDeleteCellMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementDeleteCell + -- method DOMHTMLTableRowElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -392,8 +590,8 @@ dOMHTMLTableRowElementGetAlign :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableRowElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_row_element_get_align _obj' @@ -403,11 +601,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableRowElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementGetAlign + -- method DOMHTMLTableRowElement::get_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -419,8 +620,8 @@ dOMHTMLTableRowElementGetBgColor :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableRowElementGetBgColor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_row_element_get_bg_color _obj' @@ -430,11 +631,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableRowElementGetBgColorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementGetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementGetBgColor + -- method DOMHTMLTableRowElement::get_cells -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -446,8 +650,8 @@ dOMHTMLTableRowElementGetCells :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLTableRowElementGetCells _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_row_element_get_cells _obj' @@ -456,11 +660,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableRowElementGetCellsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementGetCellsMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementGetCells + -- method DOMHTMLTableRowElement::get_ch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -472,8 +679,8 @@ dOMHTMLTableRowElementGetCh :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableRowElementGetCh _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_row_element_get_ch _obj' @@ -483,11 +690,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableRowElementGetChMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementGetChMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementGetCh + -- method DOMHTMLTableRowElement::get_ch_off -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -499,8 +709,8 @@ dOMHTMLTableRowElementGetChOff :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableRowElementGetChOff _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_row_element_get_ch_off _obj' @@ -510,11 +720,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableRowElementGetChOffMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementGetChOffMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementGetChOff + -- method DOMHTMLTableRowElement::get_row_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -526,19 +739,22 @@ dOMHTMLTableRowElementGetRowIndex :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLTableRowElementGetRowIndex _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_row_element_get_row_index _obj' touchManagedPtr _obj return result +data DOMHTMLTableRowElementGetRowIndexMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementGetRowIndexMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementGetRowIndex + -- method DOMHTMLTableRowElement::get_section_row_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -550,19 +766,22 @@ dOMHTMLTableRowElementGetSectionRowIndex :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLTableRowElementGetSectionRowIndex _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_row_element_get_section_row_index _obj' touchManagedPtr _obj return result +data DOMHTMLTableRowElementGetSectionRowIndexMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementGetSectionRowIndexMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementGetSectionRowIndex + -- method DOMHTMLTableRowElement::get_v_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -574,8 +793,8 @@ dOMHTMLTableRowElementGetVAlign :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableRowElementGetVAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_row_element_get_v_align _obj' @@ -585,11 +804,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableRowElementGetVAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementGetVAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementGetVAlign + -- method DOMHTMLTableRowElement::insert_cell -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLElement" -- throws : True -- Skip return : False @@ -603,9 +825,9 @@ dOMHTMLTableRowElementInsertCell :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - Int64 -> -- index - m DOMHTMLElement + a -- _obj + -> Int64 -- index + -> m DOMHTMLElement -- result dOMHTMLTableRowElementInsertCell _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -618,11 +840,14 @@ return () ) +data DOMHTMLTableRowElementInsertCellMethodInfo +instance (signature ~ (Int64 -> m DOMHTMLElement), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementInsertCellMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementInsertCell + -- method DOMHTMLTableRowElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -635,9 +860,9 @@ dOMHTMLTableRowElementSetAlign :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableRowElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -646,11 +871,14 @@ freeMem value' return () +data DOMHTMLTableRowElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementSetAlign + -- method DOMHTMLTableRowElement::set_bg_color -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -663,9 +891,9 @@ dOMHTMLTableRowElementSetBgColor :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableRowElementSetBgColor _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -674,11 +902,14 @@ freeMem value' return () +data DOMHTMLTableRowElementSetBgColorMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementSetBgColorMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementSetBgColor + -- method DOMHTMLTableRowElement::set_ch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -691,9 +922,9 @@ dOMHTMLTableRowElementSetCh :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableRowElementSetCh _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -702,11 +933,14 @@ freeMem value' return () +data DOMHTMLTableRowElementSetChMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementSetChMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementSetCh + -- method DOMHTMLTableRowElement::set_ch_off -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -719,9 +953,9 @@ dOMHTMLTableRowElementSetChOff :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableRowElementSetChOff _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -730,11 +964,14 @@ freeMem value' return () +data DOMHTMLTableRowElementSetChOffMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementSetChOffMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementSetChOff + -- method DOMHTMLTableRowElement::set_v_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableRowElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -747,9 +984,9 @@ dOMHTMLTableRowElementSetVAlign :: (MonadIO m, DOMHTMLTableRowElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableRowElementSetVAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -757,5 +994,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLTableRowElementSetVAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableRowElementK a) => MethodInfo DOMHTMLTableRowElementSetVAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableRowElementSetVAlign diff --git a/GI/WebKit/Objects/DOMHTMLTableRowElement.hs-boot b/GI/WebKit/Objects/DOMHTMLTableRowElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLTableRowElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLTableRowElement.hs-boot @@ -19,3 +19,18 @@ data DOMHTMLTableRowElementRowIndexPropertyInfo data DOMHTMLTableRowElementSectionRowIndexPropertyInfo data DOMHTMLTableRowElementVAlignPropertyInfo +data DOMHTMLTableRowElementDeleteCellMethodInfo +data DOMHTMLTableRowElementGetAlignMethodInfo +data DOMHTMLTableRowElementGetBgColorMethodInfo +data DOMHTMLTableRowElementGetCellsMethodInfo +data DOMHTMLTableRowElementGetChMethodInfo +data DOMHTMLTableRowElementGetChOffMethodInfo +data DOMHTMLTableRowElementGetRowIndexMethodInfo +data DOMHTMLTableRowElementGetSectionRowIndexMethodInfo +data DOMHTMLTableRowElementGetVAlignMethodInfo +data DOMHTMLTableRowElementInsertCellMethodInfo +data DOMHTMLTableRowElementSetAlignMethodInfo +data DOMHTMLTableRowElementSetBgColorMethodInfo +data DOMHTMLTableRowElementSetChMethodInfo +data DOMHTMLTableRowElementSetChOffMethodInfo +data DOMHTMLTableRowElementSetVAlignMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLTableSectionElement.hs b/GI/WebKit/Objects/DOMHTMLTableSectionElement.hs --- a/GI/WebKit/Objects/DOMHTMLTableSectionElement.hs +++ b/GI/WebKit/Objects/DOMHTMLTableSectionElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,46 +18,57 @@ -- * Methods -- ** dOMHTMLTableSectionElementDeleteRow + DOMHTMLTableSectionElementDeleteRowMethodInfo, dOMHTMLTableSectionElementDeleteRow , -- ** dOMHTMLTableSectionElementGetAlign + DOMHTMLTableSectionElementGetAlignMethodInfo, dOMHTMLTableSectionElementGetAlign , -- ** dOMHTMLTableSectionElementGetCh + DOMHTMLTableSectionElementGetChMethodInfo, dOMHTMLTableSectionElementGetCh , -- ** dOMHTMLTableSectionElementGetChOff + DOMHTMLTableSectionElementGetChOffMethodInfo, dOMHTMLTableSectionElementGetChOff , -- ** dOMHTMLTableSectionElementGetRows + DOMHTMLTableSectionElementGetRowsMethodInfo, dOMHTMLTableSectionElementGetRows , -- ** dOMHTMLTableSectionElementGetVAlign + DOMHTMLTableSectionElementGetVAlignMethodInfo, dOMHTMLTableSectionElementGetVAlign , -- ** dOMHTMLTableSectionElementInsertRow + DOMHTMLTableSectionElementInsertRowMethodInfo, dOMHTMLTableSectionElementInsertRow , -- ** dOMHTMLTableSectionElementSetAlign + DOMHTMLTableSectionElementSetAlignMethodInfo, dOMHTMLTableSectionElementSetAlign , -- ** dOMHTMLTableSectionElementSetCh + DOMHTMLTableSectionElementSetChMethodInfo, dOMHTMLTableSectionElementSetCh , -- ** dOMHTMLTableSectionElementSetChOff + DOMHTMLTableSectionElementSetChOffMethodInfo, dOMHTMLTableSectionElementSetChOff , -- ** dOMHTMLTableSectionElementSetVAlign + DOMHTMLTableSectionElementSetVAlignMethodInfo, dOMHTMLTableSectionElementSetVAlign , @@ -132,6 +144,182 @@ noDOMHTMLTableSectionElement :: Maybe DOMHTMLTableSectionElement noDOMHTMLTableSectionElement = Nothing +type family ResolveDOMHTMLTableSectionElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLTableSectionElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLTableSectionElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLTableSectionElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLTableSectionElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLTableSectionElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLTableSectionElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLTableSectionElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLTableSectionElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLTableSectionElementMethod "deleteRow" o = DOMHTMLTableSectionElementDeleteRowMethodInfo + ResolveDOMHTMLTableSectionElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLTableSectionElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLTableSectionElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLTableSectionElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLTableSectionElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLTableSectionElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLTableSectionElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLTableSectionElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLTableSectionElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "insertRow" o = DOMHTMLTableSectionElementInsertRowMethodInfo + ResolveDOMHTMLTableSectionElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLTableSectionElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLTableSectionElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLTableSectionElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLTableSectionElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLTableSectionElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLTableSectionElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLTableSectionElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLTableSectionElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLTableSectionElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLTableSectionElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLTableSectionElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLTableSectionElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLTableSectionElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLTableSectionElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLTableSectionElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLTableSectionElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLTableSectionElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLTableSectionElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLTableSectionElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLTableSectionElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLTableSectionElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLTableSectionElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLTableSectionElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLTableSectionElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLTableSectionElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLTableSectionElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLTableSectionElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLTableSectionElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLTableSectionElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLTableSectionElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getAlign" o = DOMHTMLTableSectionElementGetAlignMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getCh" o = DOMHTMLTableSectionElementGetChMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getChOff" o = DOMHTMLTableSectionElementGetChOffMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getRows" o = DOMHTMLTableSectionElementGetRowsMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getVAlign" o = DOMHTMLTableSectionElementGetVAlignMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLTableSectionElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setAlign" o = DOMHTMLTableSectionElementSetAlignMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setCh" o = DOMHTMLTableSectionElementSetChMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setChOff" o = DOMHTMLTableSectionElementSetChOffMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setVAlign" o = DOMHTMLTableSectionElementSetVAlignMethodInfo + ResolveDOMHTMLTableSectionElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLTableSectionElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLTableSectionElementMethod t DOMHTMLTableSectionElement, MethodInfo info DOMHTMLTableSectionElement p) => IsLabelProxy t (DOMHTMLTableSectionElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLTableSectionElementMethod t DOMHTMLTableSectionElement, MethodInfo info DOMHTMLTableSectionElement p) => IsLabel t (DOMHTMLTableSectionElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -151,7 +339,7 @@ type AttrSetTypeConstraint DOMHTMLTableSectionElementAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableSectionElementAlignPropertyInfo = DOMHTMLTableSectionElementK type AttrGetType DOMHTMLTableSectionElementAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLTableSectionElementAlignPropertyInfo = "DOMHTMLTableSectionElement::align" + type AttrLabel DOMHTMLTableSectionElementAlignPropertyInfo = "align" attrGet _ = getDOMHTMLTableSectionElementAlign attrSet _ = setDOMHTMLTableSectionElementAlign attrConstruct _ = constructDOMHTMLTableSectionElementAlign @@ -175,7 +363,7 @@ type AttrSetTypeConstraint DOMHTMLTableSectionElementChPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableSectionElementChPropertyInfo = DOMHTMLTableSectionElementK type AttrGetType DOMHTMLTableSectionElementChPropertyInfo = T.Text - type AttrLabel DOMHTMLTableSectionElementChPropertyInfo = "DOMHTMLTableSectionElement::ch" + type AttrLabel DOMHTMLTableSectionElementChPropertyInfo = "ch" attrGet _ = getDOMHTMLTableSectionElementCh attrSet _ = setDOMHTMLTableSectionElementCh attrConstruct _ = constructDOMHTMLTableSectionElementCh @@ -199,7 +387,7 @@ type AttrSetTypeConstraint DOMHTMLTableSectionElementChOffPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableSectionElementChOffPropertyInfo = DOMHTMLTableSectionElementK type AttrGetType DOMHTMLTableSectionElementChOffPropertyInfo = T.Text - type AttrLabel DOMHTMLTableSectionElementChOffPropertyInfo = "DOMHTMLTableSectionElement::ch-off" + type AttrLabel DOMHTMLTableSectionElementChOffPropertyInfo = "ch-off" attrGet _ = getDOMHTMLTableSectionElementChOff attrSet _ = setDOMHTMLTableSectionElementChOff attrConstruct _ = constructDOMHTMLTableSectionElementChOff @@ -217,7 +405,7 @@ type AttrSetTypeConstraint DOMHTMLTableSectionElementRowsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTableSectionElementRowsPropertyInfo = DOMHTMLTableSectionElementK type AttrGetType DOMHTMLTableSectionElementRowsPropertyInfo = DOMHTMLCollection - type AttrLabel DOMHTMLTableSectionElementRowsPropertyInfo = "DOMHTMLTableSectionElement::rows" + type AttrLabel DOMHTMLTableSectionElementRowsPropertyInfo = "rows" attrGet _ = getDOMHTMLTableSectionElementRows attrSet _ = undefined attrConstruct _ = undefined @@ -241,22 +429,21 @@ type AttrSetTypeConstraint DOMHTMLTableSectionElementVAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTableSectionElementVAlignPropertyInfo = DOMHTMLTableSectionElementK type AttrGetType DOMHTMLTableSectionElementVAlignPropertyInfo = T.Text - type AttrLabel DOMHTMLTableSectionElementVAlignPropertyInfo = "DOMHTMLTableSectionElement::v-align" + type AttrLabel DOMHTMLTableSectionElementVAlignPropertyInfo = "v-align" attrGet _ = getDOMHTMLTableSectionElementVAlign attrSet _ = setDOMHTMLTableSectionElementVAlign attrConstruct _ = constructDOMHTMLTableSectionElementVAlign type instance AttributeList DOMHTMLTableSectionElement = DOMHTMLTableSectionElementAttributeList -type DOMHTMLTableSectionElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableSectionElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("ch", DOMHTMLTableSectionElementChPropertyInfo), '("ch-off", DOMHTMLTableSectionElementChOffPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("rows", DOMHTMLTableSectionElementRowsPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("v-align", DOMHTMLTableSectionElementVAlignPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLTableSectionElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("align", DOMHTMLTableSectionElementAlignPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("ch", DOMHTMLTableSectionElementChPropertyInfo), '("chOff", DOMHTMLTableSectionElementChOffPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("rows", DOMHTMLTableSectionElementRowsPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("vAlign", DOMHTMLTableSectionElementVAlignPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLTableSectionElement = DOMHTMLTableSectionElementSignalList -type DOMHTMLTableSectionElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLTableSectionElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLTableSectionElement::delete_row -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -270,9 +457,9 @@ dOMHTMLTableSectionElementDeleteRow :: (MonadIO m, DOMHTMLTableSectionElementK a) => - a -> -- _obj - Int64 -> -- index - m () + a -- _obj + -> Int64 -- index + -> m () -- result dOMHTMLTableSectionElementDeleteRow _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -283,11 +470,14 @@ return () ) +data DOMHTMLTableSectionElementDeleteRowMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLTableSectionElementK a) => MethodInfo DOMHTMLTableSectionElementDeleteRowMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableSectionElementDeleteRow + -- method DOMHTMLTableSectionElement::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -299,8 +489,8 @@ dOMHTMLTableSectionElementGetAlign :: (MonadIO m, DOMHTMLTableSectionElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableSectionElementGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_section_element_get_align _obj' @@ -310,11 +500,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableSectionElementGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableSectionElementK a) => MethodInfo DOMHTMLTableSectionElementGetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableSectionElementGetAlign + -- method DOMHTMLTableSectionElement::get_ch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -326,8 +519,8 @@ dOMHTMLTableSectionElementGetCh :: (MonadIO m, DOMHTMLTableSectionElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableSectionElementGetCh _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_section_element_get_ch _obj' @@ -337,11 +530,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableSectionElementGetChMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableSectionElementK a) => MethodInfo DOMHTMLTableSectionElementGetChMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableSectionElementGetCh + -- method DOMHTMLTableSectionElement::get_ch_off -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -353,8 +549,8 @@ dOMHTMLTableSectionElementGetChOff :: (MonadIO m, DOMHTMLTableSectionElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableSectionElementGetChOff _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_section_element_get_ch_off _obj' @@ -364,11 +560,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableSectionElementGetChOffMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableSectionElementK a) => MethodInfo DOMHTMLTableSectionElementGetChOffMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableSectionElementGetChOff + -- method DOMHTMLTableSectionElement::get_rows -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLCollection" -- throws : False -- Skip return : False @@ -380,8 +579,8 @@ dOMHTMLTableSectionElementGetRows :: (MonadIO m, DOMHTMLTableSectionElementK a) => - a -> -- _obj - m DOMHTMLCollection + a -- _obj + -> m DOMHTMLCollection -- result dOMHTMLTableSectionElementGetRows _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_section_element_get_rows _obj' @@ -390,11 +589,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableSectionElementGetRowsMethodInfo +instance (signature ~ (m DOMHTMLCollection), MonadIO m, DOMHTMLTableSectionElementK a) => MethodInfo DOMHTMLTableSectionElementGetRowsMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableSectionElementGetRows + -- method DOMHTMLTableSectionElement::get_v_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -406,8 +608,8 @@ dOMHTMLTableSectionElementGetVAlign :: (MonadIO m, DOMHTMLTableSectionElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTableSectionElementGetVAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_table_section_element_get_v_align _obj' @@ -417,11 +619,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTableSectionElementGetVAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTableSectionElementK a) => MethodInfo DOMHTMLTableSectionElementGetVAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableSectionElementGetVAlign + -- method DOMHTMLTableSectionElement::insert_row -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLElement" -- throws : True -- Skip return : False @@ -435,9 +640,9 @@ dOMHTMLTableSectionElementInsertRow :: (MonadIO m, DOMHTMLTableSectionElementK a) => - a -> -- _obj - Int64 -> -- index - m DOMHTMLElement + a -- _obj + -> Int64 -- index + -> m DOMHTMLElement -- result dOMHTMLTableSectionElementInsertRow _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -450,11 +655,14 @@ return () ) +data DOMHTMLTableSectionElementInsertRowMethodInfo +instance (signature ~ (Int64 -> m DOMHTMLElement), MonadIO m, DOMHTMLTableSectionElementK a) => MethodInfo DOMHTMLTableSectionElementInsertRowMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableSectionElementInsertRow + -- method DOMHTMLTableSectionElement::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -467,9 +675,9 @@ dOMHTMLTableSectionElementSetAlign :: (MonadIO m, DOMHTMLTableSectionElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableSectionElementSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -478,11 +686,14 @@ freeMem value' return () +data DOMHTMLTableSectionElementSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableSectionElementK a) => MethodInfo DOMHTMLTableSectionElementSetAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableSectionElementSetAlign + -- method DOMHTMLTableSectionElement::set_ch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -495,9 +706,9 @@ dOMHTMLTableSectionElementSetCh :: (MonadIO m, DOMHTMLTableSectionElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableSectionElementSetCh _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -506,11 +717,14 @@ freeMem value' return () +data DOMHTMLTableSectionElementSetChMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableSectionElementK a) => MethodInfo DOMHTMLTableSectionElementSetChMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableSectionElementSetCh + -- method DOMHTMLTableSectionElement::set_ch_off -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -523,9 +737,9 @@ dOMHTMLTableSectionElementSetChOff :: (MonadIO m, DOMHTMLTableSectionElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableSectionElementSetChOff _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -534,11 +748,14 @@ freeMem value' return () +data DOMHTMLTableSectionElementSetChOffMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableSectionElementK a) => MethodInfo DOMHTMLTableSectionElementSetChOffMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableSectionElementSetChOff + -- method DOMHTMLTableSectionElement::set_v_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTableSectionElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -551,9 +768,9 @@ dOMHTMLTableSectionElementSetVAlign :: (MonadIO m, DOMHTMLTableSectionElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTableSectionElementSetVAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -561,5 +778,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLTableSectionElementSetVAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTableSectionElementK a) => MethodInfo DOMHTMLTableSectionElementSetVAlignMethodInfo a signature where + overloadedMethod _ = dOMHTMLTableSectionElementSetVAlign diff --git a/GI/WebKit/Objects/DOMHTMLTableSectionElement.hs-boot b/GI/WebKit/Objects/DOMHTMLTableSectionElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLTableSectionElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLTableSectionElement.hs-boot @@ -16,3 +16,14 @@ data DOMHTMLTableSectionElementChOffPropertyInfo data DOMHTMLTableSectionElementRowsPropertyInfo data DOMHTMLTableSectionElementVAlignPropertyInfo +data DOMHTMLTableSectionElementDeleteRowMethodInfo +data DOMHTMLTableSectionElementGetAlignMethodInfo +data DOMHTMLTableSectionElementGetChMethodInfo +data DOMHTMLTableSectionElementGetChOffMethodInfo +data DOMHTMLTableSectionElementGetRowsMethodInfo +data DOMHTMLTableSectionElementGetVAlignMethodInfo +data DOMHTMLTableSectionElementInsertRowMethodInfo +data DOMHTMLTableSectionElementSetAlignMethodInfo +data DOMHTMLTableSectionElementSetChMethodInfo +data DOMHTMLTableSectionElementSetChOffMethodInfo +data DOMHTMLTableSectionElementSetVAlignMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLTextAreaElement.hs b/GI/WebKit/Objects/DOMHTMLTextAreaElement.hs --- a/GI/WebKit/Objects/DOMHTMLTextAreaElement.hs +++ b/GI/WebKit/Objects/DOMHTMLTextAreaElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,194 +18,242 @@ -- * Methods -- ** dOMHTMLTextAreaElementCheckValidity + DOMHTMLTextAreaElementCheckValidityMethodInfo, dOMHTMLTextAreaElementCheckValidity , -- ** dOMHTMLTextAreaElementGetAutocapitalize + DOMHTMLTextAreaElementGetAutocapitalizeMethodInfo, dOMHTMLTextAreaElementGetAutocapitalize , -- ** dOMHTMLTextAreaElementGetAutocorrect + DOMHTMLTextAreaElementGetAutocorrectMethodInfo, dOMHTMLTextAreaElementGetAutocorrect , -- ** dOMHTMLTextAreaElementGetAutofocus + DOMHTMLTextAreaElementGetAutofocusMethodInfo, dOMHTMLTextAreaElementGetAutofocus , -- ** dOMHTMLTextAreaElementGetCols + DOMHTMLTextAreaElementGetColsMethodInfo , dOMHTMLTextAreaElementGetCols , -- ** dOMHTMLTextAreaElementGetDefaultValue + DOMHTMLTextAreaElementGetDefaultValueMethodInfo, dOMHTMLTextAreaElementGetDefaultValue , -- ** dOMHTMLTextAreaElementGetDirName + DOMHTMLTextAreaElementGetDirNameMethodInfo, dOMHTMLTextAreaElementGetDirName , -- ** dOMHTMLTextAreaElementGetDisabled + DOMHTMLTextAreaElementGetDisabledMethodInfo, dOMHTMLTextAreaElementGetDisabled , -- ** dOMHTMLTextAreaElementGetForm + DOMHTMLTextAreaElementGetFormMethodInfo , dOMHTMLTextAreaElementGetForm , -- ** dOMHTMLTextAreaElementGetLabels + DOMHTMLTextAreaElementGetLabelsMethodInfo, dOMHTMLTextAreaElementGetLabels , -- ** dOMHTMLTextAreaElementGetMaxLength + DOMHTMLTextAreaElementGetMaxLengthMethodInfo, dOMHTMLTextAreaElementGetMaxLength , -- ** dOMHTMLTextAreaElementGetName + DOMHTMLTextAreaElementGetNameMethodInfo , dOMHTMLTextAreaElementGetName , -- ** dOMHTMLTextAreaElementGetPlaceholder + DOMHTMLTextAreaElementGetPlaceholderMethodInfo, dOMHTMLTextAreaElementGetPlaceholder , -- ** dOMHTMLTextAreaElementGetReadOnly + DOMHTMLTextAreaElementGetReadOnlyMethodInfo, dOMHTMLTextAreaElementGetReadOnly , -- ** dOMHTMLTextAreaElementGetRequired + DOMHTMLTextAreaElementGetRequiredMethodInfo, dOMHTMLTextAreaElementGetRequired , -- ** dOMHTMLTextAreaElementGetRows + DOMHTMLTextAreaElementGetRowsMethodInfo , dOMHTMLTextAreaElementGetRows , -- ** dOMHTMLTextAreaElementGetSelectionDirection + DOMHTMLTextAreaElementGetSelectionDirectionMethodInfo, dOMHTMLTextAreaElementGetSelectionDirection, -- ** dOMHTMLTextAreaElementGetSelectionEnd + DOMHTMLTextAreaElementGetSelectionEndMethodInfo, dOMHTMLTextAreaElementGetSelectionEnd , -- ** dOMHTMLTextAreaElementGetSelectionStart + DOMHTMLTextAreaElementGetSelectionStartMethodInfo, dOMHTMLTextAreaElementGetSelectionStart , -- ** dOMHTMLTextAreaElementGetTextLength + DOMHTMLTextAreaElementGetTextLengthMethodInfo, dOMHTMLTextAreaElementGetTextLength , -- ** dOMHTMLTextAreaElementGetValidationMessage + DOMHTMLTextAreaElementGetValidationMessageMethodInfo, dOMHTMLTextAreaElementGetValidationMessage, -- ** dOMHTMLTextAreaElementGetValidity + DOMHTMLTextAreaElementGetValidityMethodInfo, dOMHTMLTextAreaElementGetValidity , -- ** dOMHTMLTextAreaElementGetValue + DOMHTMLTextAreaElementGetValueMethodInfo, dOMHTMLTextAreaElementGetValue , -- ** dOMHTMLTextAreaElementGetWillValidate + DOMHTMLTextAreaElementGetWillValidateMethodInfo, dOMHTMLTextAreaElementGetWillValidate , -- ** dOMHTMLTextAreaElementGetWrap + DOMHTMLTextAreaElementGetWrapMethodInfo , dOMHTMLTextAreaElementGetWrap , -- ** dOMHTMLTextAreaElementIsEdited + DOMHTMLTextAreaElementIsEditedMethodInfo, dOMHTMLTextAreaElementIsEdited , -- ** dOMHTMLTextAreaElementSelect + DOMHTMLTextAreaElementSelectMethodInfo , dOMHTMLTextAreaElementSelect , -- ** dOMHTMLTextAreaElementSetAutocapitalize + DOMHTMLTextAreaElementSetAutocapitalizeMethodInfo, dOMHTMLTextAreaElementSetAutocapitalize , -- ** dOMHTMLTextAreaElementSetAutocorrect + DOMHTMLTextAreaElementSetAutocorrectMethodInfo, dOMHTMLTextAreaElementSetAutocorrect , -- ** dOMHTMLTextAreaElementSetAutofocus + DOMHTMLTextAreaElementSetAutofocusMethodInfo, dOMHTMLTextAreaElementSetAutofocus , -- ** dOMHTMLTextAreaElementSetCols + DOMHTMLTextAreaElementSetColsMethodInfo , dOMHTMLTextAreaElementSetCols , -- ** dOMHTMLTextAreaElementSetCustomValidity + DOMHTMLTextAreaElementSetCustomValidityMethodInfo, dOMHTMLTextAreaElementSetCustomValidity , -- ** dOMHTMLTextAreaElementSetDefaultValue + DOMHTMLTextAreaElementSetDefaultValueMethodInfo, dOMHTMLTextAreaElementSetDefaultValue , -- ** dOMHTMLTextAreaElementSetDirName + DOMHTMLTextAreaElementSetDirNameMethodInfo, dOMHTMLTextAreaElementSetDirName , -- ** dOMHTMLTextAreaElementSetDisabled + DOMHTMLTextAreaElementSetDisabledMethodInfo, dOMHTMLTextAreaElementSetDisabled , -- ** dOMHTMLTextAreaElementSetMaxLength + DOMHTMLTextAreaElementSetMaxLengthMethodInfo, dOMHTMLTextAreaElementSetMaxLength , -- ** dOMHTMLTextAreaElementSetName + DOMHTMLTextAreaElementSetNameMethodInfo , dOMHTMLTextAreaElementSetName , -- ** dOMHTMLTextAreaElementSetPlaceholder + DOMHTMLTextAreaElementSetPlaceholderMethodInfo, dOMHTMLTextAreaElementSetPlaceholder , -- ** dOMHTMLTextAreaElementSetRangeText + DOMHTMLTextAreaElementSetRangeTextMethodInfo, dOMHTMLTextAreaElementSetRangeText , -- ** dOMHTMLTextAreaElementSetReadOnly + DOMHTMLTextAreaElementSetReadOnlyMethodInfo, dOMHTMLTextAreaElementSetReadOnly , -- ** dOMHTMLTextAreaElementSetRequired + DOMHTMLTextAreaElementSetRequiredMethodInfo, dOMHTMLTextAreaElementSetRequired , -- ** dOMHTMLTextAreaElementSetRows + DOMHTMLTextAreaElementSetRowsMethodInfo , dOMHTMLTextAreaElementSetRows , -- ** dOMHTMLTextAreaElementSetSelectionDirection + DOMHTMLTextAreaElementSetSelectionDirectionMethodInfo, dOMHTMLTextAreaElementSetSelectionDirection, -- ** dOMHTMLTextAreaElementSetSelectionEnd + DOMHTMLTextAreaElementSetSelectionEndMethodInfo, dOMHTMLTextAreaElementSetSelectionEnd , -- ** dOMHTMLTextAreaElementSetSelectionRange + DOMHTMLTextAreaElementSetSelectionRangeMethodInfo, dOMHTMLTextAreaElementSetSelectionRange , -- ** dOMHTMLTextAreaElementSetSelectionStart + DOMHTMLTextAreaElementSetSelectionStartMethodInfo, dOMHTMLTextAreaElementSetSelectionStart , -- ** dOMHTMLTextAreaElementSetValue + DOMHTMLTextAreaElementSetValueMethodInfo, dOMHTMLTextAreaElementSetValue , -- ** dOMHTMLTextAreaElementSetWrap + DOMHTMLTextAreaElementSetWrapMethodInfo , dOMHTMLTextAreaElementSetWrap , @@ -408,6 +457,219 @@ noDOMHTMLTextAreaElement :: Maybe DOMHTMLTextAreaElement noDOMHTMLTextAreaElement = Nothing +type family ResolveDOMHTMLTextAreaElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLTextAreaElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLTextAreaElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLTextAreaElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLTextAreaElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLTextAreaElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLTextAreaElementMethod "checkValidity" o = DOMHTMLTextAreaElementCheckValidityMethodInfo + ResolveDOMHTMLTextAreaElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLTextAreaElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLTextAreaElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLTextAreaElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLTextAreaElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLTextAreaElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLTextAreaElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLTextAreaElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLTextAreaElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLTextAreaElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLTextAreaElementMethod "isEdited" o = DOMHTMLTextAreaElementIsEditedMethodInfo + ResolveDOMHTMLTextAreaElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLTextAreaElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLTextAreaElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLTextAreaElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLTextAreaElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLTextAreaElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLTextAreaElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLTextAreaElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLTextAreaElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLTextAreaElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLTextAreaElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLTextAreaElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLTextAreaElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLTextAreaElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLTextAreaElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLTextAreaElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLTextAreaElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLTextAreaElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLTextAreaElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLTextAreaElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLTextAreaElementMethod "select" o = DOMHTMLTextAreaElementSelectMethodInfo + ResolveDOMHTMLTextAreaElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLTextAreaElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLTextAreaElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLTextAreaElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLTextAreaElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLTextAreaElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLTextAreaElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLTextAreaElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLTextAreaElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getAutocapitalize" o = DOMHTMLTextAreaElementGetAutocapitalizeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getAutocorrect" o = DOMHTMLTextAreaElementGetAutocorrectMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getAutofocus" o = DOMHTMLTextAreaElementGetAutofocusMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getCols" o = DOMHTMLTextAreaElementGetColsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getDefaultValue" o = DOMHTMLTextAreaElementGetDefaultValueMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getDirName" o = DOMHTMLTextAreaElementGetDirNameMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getDisabled" o = DOMHTMLTextAreaElementGetDisabledMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getForm" o = DOMHTMLTextAreaElementGetFormMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getLabels" o = DOMHTMLTextAreaElementGetLabelsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getMaxLength" o = DOMHTMLTextAreaElementGetMaxLengthMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getName" o = DOMHTMLTextAreaElementGetNameMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getPlaceholder" o = DOMHTMLTextAreaElementGetPlaceholderMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getReadOnly" o = DOMHTMLTextAreaElementGetReadOnlyMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getRequired" o = DOMHTMLTextAreaElementGetRequiredMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getRows" o = DOMHTMLTextAreaElementGetRowsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getSelectionDirection" o = DOMHTMLTextAreaElementGetSelectionDirectionMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getSelectionEnd" o = DOMHTMLTextAreaElementGetSelectionEndMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getSelectionStart" o = DOMHTMLTextAreaElementGetSelectionStartMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getTextLength" o = DOMHTMLTextAreaElementGetTextLengthMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getValidationMessage" o = DOMHTMLTextAreaElementGetValidationMessageMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getValidity" o = DOMHTMLTextAreaElementGetValidityMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getValue" o = DOMHTMLTextAreaElementGetValueMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getWillValidate" o = DOMHTMLTextAreaElementGetWillValidateMethodInfo + ResolveDOMHTMLTextAreaElementMethod "getWrap" o = DOMHTMLTextAreaElementGetWrapMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setAutocapitalize" o = DOMHTMLTextAreaElementSetAutocapitalizeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setAutocorrect" o = DOMHTMLTextAreaElementSetAutocorrectMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setAutofocus" o = DOMHTMLTextAreaElementSetAutofocusMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setCols" o = DOMHTMLTextAreaElementSetColsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setCustomValidity" o = DOMHTMLTextAreaElementSetCustomValidityMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setDefaultValue" o = DOMHTMLTextAreaElementSetDefaultValueMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setDirName" o = DOMHTMLTextAreaElementSetDirNameMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setDisabled" o = DOMHTMLTextAreaElementSetDisabledMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setMaxLength" o = DOMHTMLTextAreaElementSetMaxLengthMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setName" o = DOMHTMLTextAreaElementSetNameMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setPlaceholder" o = DOMHTMLTextAreaElementSetPlaceholderMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setRangeText" o = DOMHTMLTextAreaElementSetRangeTextMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setReadOnly" o = DOMHTMLTextAreaElementSetReadOnlyMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setRequired" o = DOMHTMLTextAreaElementSetRequiredMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setRows" o = DOMHTMLTextAreaElementSetRowsMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setSelectionDirection" o = DOMHTMLTextAreaElementSetSelectionDirectionMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setSelectionEnd" o = DOMHTMLTextAreaElementSetSelectionEndMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setSelectionRange" o = DOMHTMLTextAreaElementSetSelectionRangeMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setSelectionStart" o = DOMHTMLTextAreaElementSetSelectionStartMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setValue" o = DOMHTMLTextAreaElementSetValueMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLTextAreaElementMethod "setWrap" o = DOMHTMLTextAreaElementSetWrapMethodInfo + ResolveDOMHTMLTextAreaElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLTextAreaElementMethod t DOMHTMLTextAreaElement, MethodInfo info DOMHTMLTextAreaElement p) => IsLabelProxy t (DOMHTMLTextAreaElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLTextAreaElementMethod t DOMHTMLTextAreaElement, MethodInfo info DOMHTMLTextAreaElement p) => IsLabel t (DOMHTMLTextAreaElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "autocapitalize" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -427,7 +689,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementAutocapitalizePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTextAreaElementAutocapitalizePropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementAutocapitalizePropertyInfo = T.Text - type AttrLabel DOMHTMLTextAreaElementAutocapitalizePropertyInfo = "DOMHTMLTextAreaElement::autocapitalize" + type AttrLabel DOMHTMLTextAreaElementAutocapitalizePropertyInfo = "autocapitalize" attrGet _ = getDOMHTMLTextAreaElementAutocapitalize attrSet _ = setDOMHTMLTextAreaElementAutocapitalize attrConstruct _ = constructDOMHTMLTextAreaElementAutocapitalize @@ -451,7 +713,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementAutocorrectPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLTextAreaElementAutocorrectPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementAutocorrectPropertyInfo = Bool - type AttrLabel DOMHTMLTextAreaElementAutocorrectPropertyInfo = "DOMHTMLTextAreaElement::autocorrect" + type AttrLabel DOMHTMLTextAreaElementAutocorrectPropertyInfo = "autocorrect" attrGet _ = getDOMHTMLTextAreaElementAutocorrect attrSet _ = setDOMHTMLTextAreaElementAutocorrect attrConstruct _ = constructDOMHTMLTextAreaElementAutocorrect @@ -475,7 +737,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementAutofocusPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLTextAreaElementAutofocusPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementAutofocusPropertyInfo = Bool - type AttrLabel DOMHTMLTextAreaElementAutofocusPropertyInfo = "DOMHTMLTextAreaElement::autofocus" + type AttrLabel DOMHTMLTextAreaElementAutofocusPropertyInfo = "autofocus" attrGet _ = getDOMHTMLTextAreaElementAutofocus attrSet _ = setDOMHTMLTextAreaElementAutofocus attrConstruct _ = constructDOMHTMLTextAreaElementAutofocus @@ -499,7 +761,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementColsPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLTextAreaElementColsPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementColsPropertyInfo = Int64 - type AttrLabel DOMHTMLTextAreaElementColsPropertyInfo = "DOMHTMLTextAreaElement::cols" + type AttrLabel DOMHTMLTextAreaElementColsPropertyInfo = "cols" attrGet _ = getDOMHTMLTextAreaElementCols attrSet _ = setDOMHTMLTextAreaElementCols attrConstruct _ = constructDOMHTMLTextAreaElementCols @@ -523,7 +785,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementDefaultValuePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTextAreaElementDefaultValuePropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementDefaultValuePropertyInfo = T.Text - type AttrLabel DOMHTMLTextAreaElementDefaultValuePropertyInfo = "DOMHTMLTextAreaElement::default-value" + type AttrLabel DOMHTMLTextAreaElementDefaultValuePropertyInfo = "default-value" attrGet _ = getDOMHTMLTextAreaElementDefaultValue attrSet _ = setDOMHTMLTextAreaElementDefaultValue attrConstruct _ = constructDOMHTMLTextAreaElementDefaultValue @@ -547,7 +809,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementDirNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTextAreaElementDirNamePropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementDirNamePropertyInfo = T.Text - type AttrLabel DOMHTMLTextAreaElementDirNamePropertyInfo = "DOMHTMLTextAreaElement::dir-name" + type AttrLabel DOMHTMLTextAreaElementDirNamePropertyInfo = "dir-name" attrGet _ = getDOMHTMLTextAreaElementDirName attrSet _ = setDOMHTMLTextAreaElementDirName attrConstruct _ = constructDOMHTMLTextAreaElementDirName @@ -571,7 +833,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementDisabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLTextAreaElementDisabledPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementDisabledPropertyInfo = Bool - type AttrLabel DOMHTMLTextAreaElementDisabledPropertyInfo = "DOMHTMLTextAreaElement::disabled" + type AttrLabel DOMHTMLTextAreaElementDisabledPropertyInfo = "disabled" attrGet _ = getDOMHTMLTextAreaElementDisabled attrSet _ = setDOMHTMLTextAreaElementDisabled attrConstruct _ = constructDOMHTMLTextAreaElementDisabled @@ -589,7 +851,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementFormPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTextAreaElementFormPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementFormPropertyInfo = DOMHTMLFormElement - type AttrLabel DOMHTMLTextAreaElementFormPropertyInfo = "DOMHTMLTextAreaElement::form" + type AttrLabel DOMHTMLTextAreaElementFormPropertyInfo = "form" attrGet _ = getDOMHTMLTextAreaElementForm attrSet _ = undefined attrConstruct _ = undefined @@ -607,7 +869,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementLabelsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTextAreaElementLabelsPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementLabelsPropertyInfo = DOMNodeList - type AttrLabel DOMHTMLTextAreaElementLabelsPropertyInfo = "DOMHTMLTextAreaElement::labels" + type AttrLabel DOMHTMLTextAreaElementLabelsPropertyInfo = "labels" attrGet _ = getDOMHTMLTextAreaElementLabels attrSet _ = undefined attrConstruct _ = undefined @@ -631,7 +893,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementMaxLengthPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLTextAreaElementMaxLengthPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementMaxLengthPropertyInfo = Int64 - type AttrLabel DOMHTMLTextAreaElementMaxLengthPropertyInfo = "DOMHTMLTextAreaElement::max-length" + type AttrLabel DOMHTMLTextAreaElementMaxLengthPropertyInfo = "max-length" attrGet _ = getDOMHTMLTextAreaElementMaxLength attrSet _ = setDOMHTMLTextAreaElementMaxLength attrConstruct _ = constructDOMHTMLTextAreaElementMaxLength @@ -655,7 +917,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTextAreaElementNamePropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementNamePropertyInfo = T.Text - type AttrLabel DOMHTMLTextAreaElementNamePropertyInfo = "DOMHTMLTextAreaElement::name" + type AttrLabel DOMHTMLTextAreaElementNamePropertyInfo = "name" attrGet _ = getDOMHTMLTextAreaElementName attrSet _ = setDOMHTMLTextAreaElementName attrConstruct _ = constructDOMHTMLTextAreaElementName @@ -679,7 +941,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementPlaceholderPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTextAreaElementPlaceholderPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementPlaceholderPropertyInfo = T.Text - type AttrLabel DOMHTMLTextAreaElementPlaceholderPropertyInfo = "DOMHTMLTextAreaElement::placeholder" + type AttrLabel DOMHTMLTextAreaElementPlaceholderPropertyInfo = "placeholder" attrGet _ = getDOMHTMLTextAreaElementPlaceholder attrSet _ = setDOMHTMLTextAreaElementPlaceholder attrConstruct _ = constructDOMHTMLTextAreaElementPlaceholder @@ -703,7 +965,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementReadOnlyPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLTextAreaElementReadOnlyPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementReadOnlyPropertyInfo = Bool - type AttrLabel DOMHTMLTextAreaElementReadOnlyPropertyInfo = "DOMHTMLTextAreaElement::read-only" + type AttrLabel DOMHTMLTextAreaElementReadOnlyPropertyInfo = "read-only" attrGet _ = getDOMHTMLTextAreaElementReadOnly attrSet _ = setDOMHTMLTextAreaElementReadOnly attrConstruct _ = constructDOMHTMLTextAreaElementReadOnly @@ -727,7 +989,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementRequiredPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLTextAreaElementRequiredPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementRequiredPropertyInfo = Bool - type AttrLabel DOMHTMLTextAreaElementRequiredPropertyInfo = "DOMHTMLTextAreaElement::required" + type AttrLabel DOMHTMLTextAreaElementRequiredPropertyInfo = "required" attrGet _ = getDOMHTMLTextAreaElementRequired attrSet _ = setDOMHTMLTextAreaElementRequired attrConstruct _ = constructDOMHTMLTextAreaElementRequired @@ -751,7 +1013,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementRowsPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLTextAreaElementRowsPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementRowsPropertyInfo = Int64 - type AttrLabel DOMHTMLTextAreaElementRowsPropertyInfo = "DOMHTMLTextAreaElement::rows" + type AttrLabel DOMHTMLTextAreaElementRowsPropertyInfo = "rows" attrGet _ = getDOMHTMLTextAreaElementRows attrSet _ = setDOMHTMLTextAreaElementRows attrConstruct _ = constructDOMHTMLTextAreaElementRows @@ -775,7 +1037,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementSelectionDirectionPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTextAreaElementSelectionDirectionPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementSelectionDirectionPropertyInfo = T.Text - type AttrLabel DOMHTMLTextAreaElementSelectionDirectionPropertyInfo = "DOMHTMLTextAreaElement::selection-direction" + type AttrLabel DOMHTMLTextAreaElementSelectionDirectionPropertyInfo = "selection-direction" attrGet _ = getDOMHTMLTextAreaElementSelectionDirection attrSet _ = setDOMHTMLTextAreaElementSelectionDirection attrConstruct _ = constructDOMHTMLTextAreaElementSelectionDirection @@ -799,7 +1061,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementSelectionEndPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLTextAreaElementSelectionEndPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementSelectionEndPropertyInfo = Int64 - type AttrLabel DOMHTMLTextAreaElementSelectionEndPropertyInfo = "DOMHTMLTextAreaElement::selection-end" + type AttrLabel DOMHTMLTextAreaElementSelectionEndPropertyInfo = "selection-end" attrGet _ = getDOMHTMLTextAreaElementSelectionEnd attrSet _ = setDOMHTMLTextAreaElementSelectionEnd attrConstruct _ = constructDOMHTMLTextAreaElementSelectionEnd @@ -823,7 +1085,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementSelectionStartPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMHTMLTextAreaElementSelectionStartPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementSelectionStartPropertyInfo = Int64 - type AttrLabel DOMHTMLTextAreaElementSelectionStartPropertyInfo = "DOMHTMLTextAreaElement::selection-start" + type AttrLabel DOMHTMLTextAreaElementSelectionStartPropertyInfo = "selection-start" attrGet _ = getDOMHTMLTextAreaElementSelectionStart attrSet _ = setDOMHTMLTextAreaElementSelectionStart attrConstruct _ = constructDOMHTMLTextAreaElementSelectionStart @@ -841,7 +1103,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementTextLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTextAreaElementTextLengthPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementTextLengthPropertyInfo = Word64 - type AttrLabel DOMHTMLTextAreaElementTextLengthPropertyInfo = "DOMHTMLTextAreaElement::text-length" + type AttrLabel DOMHTMLTextAreaElementTextLengthPropertyInfo = "text-length" attrGet _ = getDOMHTMLTextAreaElementTextLength attrSet _ = undefined attrConstruct _ = undefined @@ -859,7 +1121,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTextAreaElementTypePropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLTextAreaElementTypePropertyInfo = "DOMHTMLTextAreaElement::type" + type AttrLabel DOMHTMLTextAreaElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLTextAreaElementType attrSet _ = undefined attrConstruct _ = undefined @@ -877,7 +1139,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementValidationMessagePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTextAreaElementValidationMessagePropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementValidationMessagePropertyInfo = T.Text - type AttrLabel DOMHTMLTextAreaElementValidationMessagePropertyInfo = "DOMHTMLTextAreaElement::validation-message" + type AttrLabel DOMHTMLTextAreaElementValidationMessagePropertyInfo = "validation-message" attrGet _ = getDOMHTMLTextAreaElementValidationMessage attrSet _ = undefined attrConstruct _ = undefined @@ -895,7 +1157,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementValidityPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTextAreaElementValidityPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementValidityPropertyInfo = DOMValidityState - type AttrLabel DOMHTMLTextAreaElementValidityPropertyInfo = "DOMHTMLTextAreaElement::validity" + type AttrLabel DOMHTMLTextAreaElementValidityPropertyInfo = "validity" attrGet _ = getDOMHTMLTextAreaElementValidity attrSet _ = undefined attrConstruct _ = undefined @@ -919,7 +1181,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementValuePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTextAreaElementValuePropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementValuePropertyInfo = T.Text - type AttrLabel DOMHTMLTextAreaElementValuePropertyInfo = "DOMHTMLTextAreaElement::value" + type AttrLabel DOMHTMLTextAreaElementValuePropertyInfo = "value" attrGet _ = getDOMHTMLTextAreaElementValue attrSet _ = setDOMHTMLTextAreaElementValue attrConstruct _ = constructDOMHTMLTextAreaElementValue @@ -937,7 +1199,7 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementWillValidatePropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLTextAreaElementWillValidatePropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementWillValidatePropertyInfo = Bool - type AttrLabel DOMHTMLTextAreaElementWillValidatePropertyInfo = "DOMHTMLTextAreaElement::will-validate" + type AttrLabel DOMHTMLTextAreaElementWillValidatePropertyInfo = "will-validate" attrGet _ = getDOMHTMLTextAreaElementWillValidate attrSet _ = undefined attrConstruct _ = undefined @@ -961,22 +1223,21 @@ type AttrSetTypeConstraint DOMHTMLTextAreaElementWrapPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTextAreaElementWrapPropertyInfo = DOMHTMLTextAreaElementK type AttrGetType DOMHTMLTextAreaElementWrapPropertyInfo = T.Text - type AttrLabel DOMHTMLTextAreaElementWrapPropertyInfo = "DOMHTMLTextAreaElement::wrap" + type AttrLabel DOMHTMLTextAreaElementWrapPropertyInfo = "wrap" attrGet _ = getDOMHTMLTextAreaElementWrap attrSet _ = setDOMHTMLTextAreaElementWrap attrConstruct _ = constructDOMHTMLTextAreaElementWrap type instance AttributeList DOMHTMLTextAreaElement = DOMHTMLTextAreaElementAttributeList -type DOMHTMLTextAreaElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autocapitalize", DOMHTMLTextAreaElementAutocapitalizePropertyInfo), '("autocorrect", DOMHTMLTextAreaElementAutocorrectPropertyInfo), '("autofocus", DOMHTMLTextAreaElementAutofocusPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("cols", DOMHTMLTextAreaElementColsPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("default-value", DOMHTMLTextAreaElementDefaultValuePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("dir-name", DOMHTMLTextAreaElementDirNamePropertyInfo), '("disabled", DOMHTMLTextAreaElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLTextAreaElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLTextAreaElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("max-length", DOMHTMLTextAreaElementMaxLengthPropertyInfo), '("name", DOMHTMLTextAreaElementNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("placeholder", DOMHTMLTextAreaElementPlaceholderPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("read-only", DOMHTMLTextAreaElementReadOnlyPropertyInfo), '("required", DOMHTMLTextAreaElementRequiredPropertyInfo), '("rows", DOMHTMLTextAreaElementRowsPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("selection-direction", DOMHTMLTextAreaElementSelectionDirectionPropertyInfo), '("selection-end", DOMHTMLTextAreaElementSelectionEndPropertyInfo), '("selection-start", DOMHTMLTextAreaElementSelectionStartPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("text-length", DOMHTMLTextAreaElementTextLengthPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLTextAreaElementTypePropertyInfo), '("validation-message", DOMHTMLTextAreaElementValidationMessagePropertyInfo), '("validity", DOMHTMLTextAreaElementValidityPropertyInfo), '("value", DOMHTMLTextAreaElementValuePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("will-validate", DOMHTMLTextAreaElementWillValidatePropertyInfo), '("wrap", DOMHTMLTextAreaElementWrapPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLTextAreaElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("autocapitalize", DOMHTMLTextAreaElementAutocapitalizePropertyInfo), '("autocorrect", DOMHTMLTextAreaElementAutocorrectPropertyInfo), '("autofocus", DOMHTMLTextAreaElementAutofocusPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("cols", DOMHTMLTextAreaElementColsPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("defaultValue", DOMHTMLTextAreaElementDefaultValuePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("dirName", DOMHTMLTextAreaElementDirNamePropertyInfo), '("disabled", DOMHTMLTextAreaElementDisabledPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("form", DOMHTMLTextAreaElementFormPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("labels", DOMHTMLTextAreaElementLabelsPropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("maxLength", DOMHTMLTextAreaElementMaxLengthPropertyInfo), '("name", DOMHTMLTextAreaElementNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("placeholder", DOMHTMLTextAreaElementPlaceholderPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("readOnly", DOMHTMLTextAreaElementReadOnlyPropertyInfo), '("required", DOMHTMLTextAreaElementRequiredPropertyInfo), '("rows", DOMHTMLTextAreaElementRowsPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("selectionDirection", DOMHTMLTextAreaElementSelectionDirectionPropertyInfo), '("selectionEnd", DOMHTMLTextAreaElementSelectionEndPropertyInfo), '("selectionStart", DOMHTMLTextAreaElementSelectionStartPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("textLength", DOMHTMLTextAreaElementTextLengthPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLTextAreaElementTypePropertyInfo), '("validationMessage", DOMHTMLTextAreaElementValidationMessagePropertyInfo), '("validity", DOMHTMLTextAreaElementValidityPropertyInfo), '("value", DOMHTMLTextAreaElementValuePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("willValidate", DOMHTMLTextAreaElementWillValidatePropertyInfo), '("wrap", DOMHTMLTextAreaElementWrapPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLTextAreaElement = DOMHTMLTextAreaElementSignalList -type DOMHTMLTextAreaElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLTextAreaElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLTextAreaElement::check_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -988,8 +1249,8 @@ dOMHTMLTextAreaElementCheckValidity :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLTextAreaElementCheckValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_check_validity _obj' @@ -997,11 +1258,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementCheckValidityMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementCheckValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementCheckValidity + -- method DOMHTMLTextAreaElement::get_autocapitalize -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1013,8 +1277,8 @@ dOMHTMLTextAreaElementGetAutocapitalize :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTextAreaElementGetAutocapitalize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_autocapitalize _obj' @@ -1024,11 +1288,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetAutocapitalizeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetAutocapitalizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetAutocapitalize + -- method DOMHTMLTextAreaElement::get_autocorrect -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1040,8 +1307,8 @@ dOMHTMLTextAreaElementGetAutocorrect :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLTextAreaElementGetAutocorrect _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_autocorrect _obj' @@ -1049,11 +1316,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetAutocorrectMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetAutocorrectMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetAutocorrect + -- method DOMHTMLTextAreaElement::get_autofocus -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1065,8 +1335,8 @@ dOMHTMLTextAreaElementGetAutofocus :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLTextAreaElementGetAutofocus _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_autofocus _obj' @@ -1074,11 +1344,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetAutofocusMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetAutofocusMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetAutofocus + -- method DOMHTMLTextAreaElement::get_cols -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1090,19 +1363,22 @@ dOMHTMLTextAreaElementGetCols :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLTextAreaElementGetCols _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_cols _obj' touchManagedPtr _obj return result +data DOMHTMLTextAreaElementGetColsMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetColsMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetCols + -- method DOMHTMLTextAreaElement::get_default_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1114,8 +1390,8 @@ dOMHTMLTextAreaElementGetDefaultValue :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTextAreaElementGetDefaultValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_default_value _obj' @@ -1125,11 +1401,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetDefaultValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetDefaultValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetDefaultValue + -- method DOMHTMLTextAreaElement::get_dir_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1141,8 +1420,8 @@ dOMHTMLTextAreaElementGetDirName :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTextAreaElementGetDirName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_dir_name _obj' @@ -1152,11 +1431,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetDirNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetDirNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetDirName + -- method DOMHTMLTextAreaElement::get_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1168,8 +1450,8 @@ dOMHTMLTextAreaElementGetDisabled :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLTextAreaElementGetDisabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_disabled _obj' @@ -1177,11 +1459,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetDisabled + -- method DOMHTMLTextAreaElement::get_form -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMHTMLFormElement" -- throws : False -- Skip return : False @@ -1193,8 +1478,8 @@ dOMHTMLTextAreaElementGetForm :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m DOMHTMLFormElement + a -- _obj + -> m DOMHTMLFormElement -- result dOMHTMLTextAreaElementGetForm _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_form _obj' @@ -1203,11 +1488,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetFormMethodInfo +instance (signature ~ (m DOMHTMLFormElement), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetFormMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetForm + -- method DOMHTMLTextAreaElement::get_labels -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -1219,8 +1507,8 @@ dOMHTMLTextAreaElementGetLabels :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m DOMNodeList + a -- _obj + -> m DOMNodeList -- result dOMHTMLTextAreaElementGetLabels _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_labels _obj' @@ -1229,11 +1517,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetLabelsMethodInfo +instance (signature ~ (m DOMNodeList), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetLabelsMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetLabels + -- method DOMHTMLTextAreaElement::get_max_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1245,19 +1536,22 @@ dOMHTMLTextAreaElementGetMaxLength :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLTextAreaElementGetMaxLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_max_length _obj' touchManagedPtr _obj return result +data DOMHTMLTextAreaElementGetMaxLengthMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetMaxLengthMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetMaxLength + -- method DOMHTMLTextAreaElement::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1269,8 +1563,8 @@ dOMHTMLTextAreaElementGetName :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTextAreaElementGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_name _obj' @@ -1280,11 +1574,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetName + -- method DOMHTMLTextAreaElement::get_placeholder -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1296,8 +1593,8 @@ dOMHTMLTextAreaElementGetPlaceholder :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTextAreaElementGetPlaceholder _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_placeholder _obj' @@ -1307,11 +1604,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetPlaceholderMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetPlaceholderMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetPlaceholder + -- method DOMHTMLTextAreaElement::get_read_only -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1323,8 +1623,8 @@ dOMHTMLTextAreaElementGetReadOnly :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLTextAreaElementGetReadOnly _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_read_only _obj' @@ -1332,11 +1632,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetReadOnlyMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetReadOnlyMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetReadOnly + -- method DOMHTMLTextAreaElement::get_required -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1348,8 +1651,8 @@ dOMHTMLTextAreaElementGetRequired :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLTextAreaElementGetRequired _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_required _obj' @@ -1357,11 +1660,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetRequiredMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetRequiredMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetRequired + -- method DOMHTMLTextAreaElement::get_rows -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1373,19 +1679,22 @@ dOMHTMLTextAreaElementGetRows :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLTextAreaElementGetRows _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_rows _obj' touchManagedPtr _obj return result +data DOMHTMLTextAreaElementGetRowsMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetRowsMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetRows + -- method DOMHTMLTextAreaElement::get_selection_direction -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1397,8 +1706,8 @@ dOMHTMLTextAreaElementGetSelectionDirection :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTextAreaElementGetSelectionDirection _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_selection_direction _obj' @@ -1408,11 +1717,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetSelectionDirectionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetSelectionDirectionMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetSelectionDirection + -- method DOMHTMLTextAreaElement::get_selection_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1424,19 +1736,22 @@ dOMHTMLTextAreaElementGetSelectionEnd :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLTextAreaElementGetSelectionEnd _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_selection_end _obj' touchManagedPtr _obj return result +data DOMHTMLTextAreaElementGetSelectionEndMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetSelectionEndMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetSelectionEnd + -- method DOMHTMLTextAreaElement::get_selection_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -1448,19 +1763,22 @@ dOMHTMLTextAreaElementGetSelectionStart :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMHTMLTextAreaElementGetSelectionStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_selection_start _obj' touchManagedPtr _obj return result +data DOMHTMLTextAreaElementGetSelectionStartMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetSelectionStartMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetSelectionStart + -- method DOMHTMLTextAreaElement::get_text_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -1472,19 +1790,22 @@ dOMHTMLTextAreaElementGetTextLength :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLTextAreaElementGetTextLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_text_length _obj' touchManagedPtr _obj return result +data DOMHTMLTextAreaElementGetTextLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetTextLengthMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetTextLength + -- method DOMHTMLTextAreaElement::get_validation_message -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1496,8 +1817,8 @@ dOMHTMLTextAreaElementGetValidationMessage :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTextAreaElementGetValidationMessage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_validation_message _obj' @@ -1507,11 +1828,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetValidationMessageMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetValidationMessageMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetValidationMessage + -- method DOMHTMLTextAreaElement::get_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMValidityState" -- throws : False -- Skip return : False @@ -1523,8 +1847,8 @@ dOMHTMLTextAreaElementGetValidity :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m DOMValidityState + a -- _obj + -> m DOMValidityState -- result dOMHTMLTextAreaElementGetValidity _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_validity _obj' @@ -1533,11 +1857,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetValidityMethodInfo +instance (signature ~ (m DOMValidityState), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetValidity + -- method DOMHTMLTextAreaElement::get_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1549,8 +1876,8 @@ dOMHTMLTextAreaElementGetValue :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTextAreaElementGetValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_value _obj' @@ -1560,11 +1887,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetValue + -- method DOMHTMLTextAreaElement::get_will_validate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1576,8 +1906,8 @@ dOMHTMLTextAreaElementGetWillValidate :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLTextAreaElementGetWillValidate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_will_validate _obj' @@ -1585,11 +1915,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetWillValidateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetWillValidateMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetWillValidate + -- method DOMHTMLTextAreaElement::get_wrap -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1601,8 +1934,8 @@ dOMHTMLTextAreaElementGetWrap :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTextAreaElementGetWrap _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_get_wrap _obj' @@ -1612,11 +1945,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementGetWrapMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementGetWrapMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementGetWrap + -- method DOMHTMLTextAreaElement::is_edited -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1628,8 +1964,8 @@ dOMHTMLTextAreaElementIsEdited :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLTextAreaElementIsEdited _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_text_area_element_is_edited _obj' @@ -1637,11 +1973,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTextAreaElementIsEditedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementIsEditedMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementIsEdited + -- method DOMHTMLTextAreaElement::select -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1653,19 +1992,22 @@ dOMHTMLTextAreaElementSelect :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLTextAreaElementSelect _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_text_area_element_select _obj' touchManagedPtr _obj return () +data DOMHTMLTextAreaElementSelectMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSelectMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSelect + -- method DOMHTMLTextAreaElement::set_autocapitalize -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1678,9 +2020,9 @@ dOMHTMLTextAreaElementSetAutocapitalize :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTextAreaElementSetAutocapitalize _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1689,11 +2031,14 @@ freeMem value' return () +data DOMHTMLTextAreaElementSetAutocapitalizeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetAutocapitalizeMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetAutocapitalize + -- method DOMHTMLTextAreaElement::set_autocorrect -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1706,9 +2051,9 @@ dOMHTMLTextAreaElementSetAutocorrect :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLTextAreaElementSetAutocorrect _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1716,11 +2061,14 @@ touchManagedPtr _obj return () +data DOMHTMLTextAreaElementSetAutocorrectMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetAutocorrectMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetAutocorrect + -- method DOMHTMLTextAreaElement::set_autofocus -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1733,9 +2081,9 @@ dOMHTMLTextAreaElementSetAutofocus :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLTextAreaElementSetAutofocus _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1743,11 +2091,14 @@ touchManagedPtr _obj return () +data DOMHTMLTextAreaElementSetAutofocusMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetAutofocusMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetAutofocus + -- method DOMHTMLTextAreaElement::set_cols -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1760,20 +2111,23 @@ dOMHTMLTextAreaElementSetCols :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLTextAreaElementSetCols _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_text_area_element_set_cols _obj' value touchManagedPtr _obj return () +data DOMHTMLTextAreaElementSetColsMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetColsMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetCols + -- method DOMHTMLTextAreaElement::set_custom_validity -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "error", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1786,9 +2140,9 @@ dOMHTMLTextAreaElementSetCustomValidity :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - T.Text -> -- error - m () + a -- _obj + -> T.Text -- error_ + -> m () -- result dOMHTMLTextAreaElementSetCustomValidity _obj error_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj error_' <- textToCString error_ @@ -1797,11 +2151,14 @@ freeMem error_' return () +data DOMHTMLTextAreaElementSetCustomValidityMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetCustomValidityMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetCustomValidity + -- method DOMHTMLTextAreaElement::set_default_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1814,9 +2171,9 @@ dOMHTMLTextAreaElementSetDefaultValue :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTextAreaElementSetDefaultValue _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1825,11 +2182,14 @@ freeMem value' return () +data DOMHTMLTextAreaElementSetDefaultValueMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetDefaultValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetDefaultValue + -- method DOMHTMLTextAreaElement::set_dir_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1842,9 +2202,9 @@ dOMHTMLTextAreaElementSetDirName :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTextAreaElementSetDirName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1853,11 +2213,14 @@ freeMem value' return () +data DOMHTMLTextAreaElementSetDirNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetDirNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetDirName + -- method DOMHTMLTextAreaElement::set_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1870,9 +2233,9 @@ dOMHTMLTextAreaElementSetDisabled :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLTextAreaElementSetDisabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1880,11 +2243,14 @@ touchManagedPtr _obj return () +data DOMHTMLTextAreaElementSetDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetDisabled + -- method DOMHTMLTextAreaElement::set_max_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1898,9 +2264,9 @@ dOMHTMLTextAreaElementSetMaxLength :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLTextAreaElementSetMaxLength _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -1911,11 +2277,14 @@ return () ) +data DOMHTMLTextAreaElementSetMaxLengthMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetMaxLengthMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetMaxLength + -- method DOMHTMLTextAreaElement::set_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1928,9 +2297,9 @@ dOMHTMLTextAreaElementSetName :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTextAreaElementSetName _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1939,11 +2308,14 @@ freeMem value' return () +data DOMHTMLTextAreaElementSetNameMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetNameMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetName + -- method DOMHTMLTextAreaElement::set_placeholder -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1956,9 +2328,9 @@ dOMHTMLTextAreaElementSetPlaceholder :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTextAreaElementSetPlaceholder _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1967,11 +2339,14 @@ freeMem value' return () +data DOMHTMLTextAreaElementSetPlaceholderMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetPlaceholderMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetPlaceholder + -- method DOMHTMLTextAreaElement::set_range_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "replacement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "start", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "end", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectionMode", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "replacement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "selectionMode", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "replacement", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "start", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "end", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "selectionMode", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1988,12 +2363,12 @@ dOMHTMLTextAreaElementSetRangeText :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - T.Text -> -- replacement - Word64 -> -- start - Word64 -> -- end - T.Text -> -- selectionMode - m () + a -- _obj + -> T.Text -- replacement + -> Word64 -- start + -> Word64 -- end + -> T.Text -- selectionMode + -> m () -- result dOMHTMLTextAreaElementSetRangeText _obj replacement start end selectionMode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj replacement' <- textToCString replacement @@ -2009,11 +2384,14 @@ freeMem selectionMode' ) +data DOMHTMLTextAreaElementSetRangeTextMethodInfo +instance (signature ~ (T.Text -> Word64 -> Word64 -> T.Text -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetRangeTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetRangeText + -- method DOMHTMLTextAreaElement::set_read_only -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2026,9 +2404,9 @@ dOMHTMLTextAreaElementSetReadOnly :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLTextAreaElementSetReadOnly _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -2036,11 +2414,14 @@ touchManagedPtr _obj return () +data DOMHTMLTextAreaElementSetReadOnlyMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetReadOnlyMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetReadOnly + -- method DOMHTMLTextAreaElement::set_required -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2053,9 +2434,9 @@ dOMHTMLTextAreaElementSetRequired :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLTextAreaElementSetRequired _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -2063,11 +2444,14 @@ touchManagedPtr _obj return () +data DOMHTMLTextAreaElementSetRequiredMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetRequiredMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetRequired + -- method DOMHTMLTextAreaElement::set_rows -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2080,20 +2464,23 @@ dOMHTMLTextAreaElementSetRows :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLTextAreaElementSetRows _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_text_area_element_set_rows _obj' value touchManagedPtr _obj return () +data DOMHTMLTextAreaElementSetRowsMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetRowsMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetRows + -- method DOMHTMLTextAreaElement::set_selection_direction -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2106,9 +2493,9 @@ dOMHTMLTextAreaElementSetSelectionDirection :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTextAreaElementSetSelectionDirection _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -2117,11 +2504,14 @@ freeMem value' return () +data DOMHTMLTextAreaElementSetSelectionDirectionMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetSelectionDirectionMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetSelectionDirection + -- method DOMHTMLTextAreaElement::set_selection_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2134,20 +2524,23 @@ dOMHTMLTextAreaElementSetSelectionEnd :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLTextAreaElementSetSelectionEnd _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_text_area_element_set_selection_end _obj' value touchManagedPtr _obj return () +data DOMHTMLTextAreaElementSetSelectionEndMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetSelectionEndMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetSelectionEnd + -- method DOMHTMLTextAreaElement::set_selection_range -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "start", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "end", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "direction", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "direction", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "start", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "end", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "direction", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2162,11 +2555,11 @@ dOMHTMLTextAreaElementSetSelectionRange :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - Int64 -> -- start - Int64 -> -- end - T.Text -> -- direction - m () + a -- _obj + -> Int64 -- start + -> Int64 -- end + -> T.Text -- direction + -> m () -- result dOMHTMLTextAreaElementSetSelectionRange _obj start end direction = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj direction' <- textToCString direction @@ -2175,11 +2568,14 @@ freeMem direction' return () +data DOMHTMLTextAreaElementSetSelectionRangeMethodInfo +instance (signature ~ (Int64 -> Int64 -> T.Text -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetSelectionRangeMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetSelectionRange + -- method DOMHTMLTextAreaElement::set_selection_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2192,20 +2588,23 @@ dOMHTMLTextAreaElementSetSelectionStart :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMHTMLTextAreaElementSetSelectionStart _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_text_area_element_set_selection_start _obj' value touchManagedPtr _obj return () +data DOMHTMLTextAreaElementSetSelectionStartMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetSelectionStartMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetSelectionStart + -- method DOMHTMLTextAreaElement::set_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2218,9 +2617,9 @@ dOMHTMLTextAreaElementSetValue :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTextAreaElementSetValue _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -2229,11 +2628,14 @@ freeMem value' return () +data DOMHTMLTextAreaElementSetValueMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetValueMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetValue + -- method DOMHTMLTextAreaElement::set_wrap -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTextAreaElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -2246,9 +2648,9 @@ dOMHTMLTextAreaElementSetWrap :: (MonadIO m, DOMHTMLTextAreaElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTextAreaElementSetWrap _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -2256,5 +2658,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLTextAreaElementSetWrapMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTextAreaElementK a) => MethodInfo DOMHTMLTextAreaElementSetWrapMethodInfo a signature where + overloadedMethod _ = dOMHTMLTextAreaElementSetWrap diff --git a/GI/WebKit/Objects/DOMHTMLTextAreaElement.hs-boot b/GI/WebKit/Objects/DOMHTMLTextAreaElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLTextAreaElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLTextAreaElement.hs-boot @@ -36,3 +36,51 @@ data DOMHTMLTextAreaElementValuePropertyInfo data DOMHTMLTextAreaElementWillValidatePropertyInfo data DOMHTMLTextAreaElementWrapPropertyInfo +data DOMHTMLTextAreaElementCheckValidityMethodInfo +data DOMHTMLTextAreaElementGetAutocapitalizeMethodInfo +data DOMHTMLTextAreaElementGetAutocorrectMethodInfo +data DOMHTMLTextAreaElementGetAutofocusMethodInfo +data DOMHTMLTextAreaElementGetColsMethodInfo +data DOMHTMLTextAreaElementGetDefaultValueMethodInfo +data DOMHTMLTextAreaElementGetDirNameMethodInfo +data DOMHTMLTextAreaElementGetDisabledMethodInfo +data DOMHTMLTextAreaElementGetFormMethodInfo +data DOMHTMLTextAreaElementGetLabelsMethodInfo +data DOMHTMLTextAreaElementGetMaxLengthMethodInfo +data DOMHTMLTextAreaElementGetNameMethodInfo +data DOMHTMLTextAreaElementGetPlaceholderMethodInfo +data DOMHTMLTextAreaElementGetReadOnlyMethodInfo +data DOMHTMLTextAreaElementGetRequiredMethodInfo +data DOMHTMLTextAreaElementGetRowsMethodInfo +data DOMHTMLTextAreaElementGetSelectionDirectionMethodInfo +data DOMHTMLTextAreaElementGetSelectionEndMethodInfo +data DOMHTMLTextAreaElementGetSelectionStartMethodInfo +data DOMHTMLTextAreaElementGetTextLengthMethodInfo +data DOMHTMLTextAreaElementGetValidationMessageMethodInfo +data DOMHTMLTextAreaElementGetValidityMethodInfo +data DOMHTMLTextAreaElementGetValueMethodInfo +data DOMHTMLTextAreaElementGetWillValidateMethodInfo +data DOMHTMLTextAreaElementGetWrapMethodInfo +data DOMHTMLTextAreaElementIsEditedMethodInfo +data DOMHTMLTextAreaElementSelectMethodInfo +data DOMHTMLTextAreaElementSetAutocapitalizeMethodInfo +data DOMHTMLTextAreaElementSetAutocorrectMethodInfo +data DOMHTMLTextAreaElementSetAutofocusMethodInfo +data DOMHTMLTextAreaElementSetColsMethodInfo +data DOMHTMLTextAreaElementSetCustomValidityMethodInfo +data DOMHTMLTextAreaElementSetDefaultValueMethodInfo +data DOMHTMLTextAreaElementSetDirNameMethodInfo +data DOMHTMLTextAreaElementSetDisabledMethodInfo +data DOMHTMLTextAreaElementSetMaxLengthMethodInfo +data DOMHTMLTextAreaElementSetNameMethodInfo +data DOMHTMLTextAreaElementSetPlaceholderMethodInfo +data DOMHTMLTextAreaElementSetRangeTextMethodInfo +data DOMHTMLTextAreaElementSetReadOnlyMethodInfo +data DOMHTMLTextAreaElementSetRequiredMethodInfo +data DOMHTMLTextAreaElementSetRowsMethodInfo +data DOMHTMLTextAreaElementSetSelectionDirectionMethodInfo +data DOMHTMLTextAreaElementSetSelectionEndMethodInfo +data DOMHTMLTextAreaElementSetSelectionRangeMethodInfo +data DOMHTMLTextAreaElementSetSelectionStartMethodInfo +data DOMHTMLTextAreaElementSetValueMethodInfo +data DOMHTMLTextAreaElementSetWrapMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLTitleElement.hs b/GI/WebKit/Objects/DOMHTMLTitleElement.hs --- a/GI/WebKit/Objects/DOMHTMLTitleElement.hs +++ b/GI/WebKit/Objects/DOMHTMLTitleElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLTitleElementGetText + DOMHTMLTitleElementGetTextMethodInfo , dOMHTMLTitleElementGetText , -- ** dOMHTMLTitleElementSetText + DOMHTMLTitleElementSetTextMethodInfo , dOMHTMLTitleElementSetText , @@ -70,6 +73,173 @@ noDOMHTMLTitleElement :: Maybe DOMHTMLTitleElement noDOMHTMLTitleElement = Nothing +type family ResolveDOMHTMLTitleElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLTitleElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLTitleElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLTitleElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLTitleElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLTitleElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLTitleElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLTitleElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLTitleElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLTitleElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLTitleElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLTitleElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLTitleElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLTitleElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLTitleElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLTitleElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLTitleElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLTitleElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLTitleElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLTitleElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLTitleElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLTitleElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLTitleElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLTitleElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLTitleElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLTitleElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLTitleElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLTitleElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLTitleElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLTitleElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLTitleElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLTitleElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLTitleElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLTitleElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLTitleElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLTitleElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLTitleElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLTitleElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLTitleElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLTitleElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLTitleElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLTitleElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLTitleElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLTitleElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLTitleElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLTitleElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLTitleElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLTitleElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLTitleElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLTitleElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLTitleElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLTitleElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLTitleElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLTitleElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLTitleElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLTitleElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLTitleElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLTitleElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLTitleElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLTitleElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLTitleElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLTitleElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLTitleElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLTitleElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLTitleElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLTitleElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLTitleElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLTitleElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLTitleElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLTitleElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLTitleElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLTitleElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLTitleElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLTitleElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLTitleElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLTitleElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLTitleElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLTitleElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLTitleElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLTitleElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLTitleElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLTitleElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLTitleElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLTitleElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLTitleElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLTitleElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLTitleElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLTitleElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLTitleElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLTitleElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLTitleElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLTitleElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLTitleElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLTitleElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLTitleElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLTitleElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLTitleElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLTitleElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLTitleElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLTitleElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLTitleElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLTitleElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLTitleElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLTitleElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLTitleElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLTitleElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLTitleElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLTitleElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLTitleElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLTitleElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLTitleElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLTitleElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLTitleElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLTitleElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLTitleElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLTitleElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLTitleElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLTitleElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLTitleElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLTitleElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLTitleElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLTitleElementMethod "getText" o = DOMHTMLTitleElementGetTextMethodInfo + ResolveDOMHTMLTitleElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLTitleElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLTitleElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLTitleElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLTitleElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLTitleElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLTitleElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLTitleElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLTitleElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLTitleElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLTitleElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLTitleElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLTitleElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLTitleElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLTitleElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLTitleElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLTitleElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLTitleElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLTitleElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLTitleElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLTitleElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLTitleElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLTitleElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLTitleElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLTitleElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLTitleElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLTitleElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLTitleElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLTitleElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLTitleElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLTitleElementMethod "setText" o = DOMHTMLTitleElementSetTextMethodInfo + ResolveDOMHTMLTitleElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLTitleElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLTitleElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLTitleElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLTitleElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLTitleElementMethod t DOMHTMLTitleElement, MethodInfo info DOMHTMLTitleElement p) => IsLabelProxy t (DOMHTMLTitleElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLTitleElementMethod t DOMHTMLTitleElement, MethodInfo info DOMHTMLTitleElement p) => IsLabel t (DOMHTMLTitleElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "text" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -89,22 +259,21 @@ type AttrSetTypeConstraint DOMHTMLTitleElementTextPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLTitleElementTextPropertyInfo = DOMHTMLTitleElementK type AttrGetType DOMHTMLTitleElementTextPropertyInfo = T.Text - type AttrLabel DOMHTMLTitleElementTextPropertyInfo = "DOMHTMLTitleElement::text" + type AttrLabel DOMHTMLTitleElementTextPropertyInfo = "text" attrGet _ = getDOMHTMLTitleElementText attrSet _ = setDOMHTMLTitleElementText attrConstruct _ = constructDOMHTMLTitleElementText type instance AttributeList DOMHTMLTitleElement = DOMHTMLTitleElementAttributeList -type DOMHTMLTitleElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text", DOMHTMLTitleElementTextPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLTitleElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("text", DOMHTMLTitleElementTextPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLTitleElement = DOMHTMLTitleElementSignalList -type DOMHTMLTitleElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLTitleElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLTitleElement::get_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTitleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTitleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTitleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -116,8 +285,8 @@ dOMHTMLTitleElementGetText :: (MonadIO m, DOMHTMLTitleElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLTitleElementGetText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_title_element_get_text _obj' @@ -127,11 +296,14 @@ touchManagedPtr _obj return result' +data DOMHTMLTitleElementGetTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLTitleElementK a) => MethodInfo DOMHTMLTitleElementGetTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLTitleElementGetText + -- method DOMHTMLTitleElement::set_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTitleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLTitleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLTitleElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -144,9 +316,9 @@ dOMHTMLTitleElementSetText :: (MonadIO m, DOMHTMLTitleElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLTitleElementSetText _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -154,5 +326,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMHTMLTitleElementSetTextMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLTitleElementK a) => MethodInfo DOMHTMLTitleElementSetTextMethodInfo a signature where + overloadedMethod _ = dOMHTMLTitleElementSetText diff --git a/GI/WebKit/Objects/DOMHTMLTitleElement.hs-boot b/GI/WebKit/Objects/DOMHTMLTitleElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLTitleElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLTitleElement.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMHTMLTitleElementK o instance (GObject o, IsDescendantOf DOMHTMLTitleElement o) => DOMHTMLTitleElementK o data DOMHTMLTitleElementTextPropertyInfo +data DOMHTMLTitleElementGetTextMethodInfo +data DOMHTMLTitleElementSetTextMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLUListElement.hs b/GI/WebKit/Objects/DOMHTMLUListElement.hs --- a/GI/WebKit/Objects/DOMHTMLUListElement.hs +++ b/GI/WebKit/Objects/DOMHTMLUListElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMHTMLUListElementGetCompact + DOMHTMLUListElementGetCompactMethodInfo , dOMHTMLUListElementGetCompact , -- ** dOMHTMLUListElementSetCompact + DOMHTMLUListElementSetCompactMethodInfo , dOMHTMLUListElementSetCompact , @@ -77,6 +80,173 @@ noDOMHTMLUListElement :: Maybe DOMHTMLUListElement noDOMHTMLUListElement = Nothing +type family ResolveDOMHTMLUListElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLUListElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLUListElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLUListElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLUListElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLUListElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLUListElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLUListElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLUListElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLUListElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLUListElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLUListElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLUListElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLUListElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLUListElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLUListElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLUListElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLUListElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLUListElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLUListElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLUListElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLUListElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLUListElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLUListElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLUListElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLUListElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLUListElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLUListElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLUListElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLUListElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLUListElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLUListElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLUListElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLUListElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLUListElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLUListElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLUListElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLUListElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLUListElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLUListElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLUListElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLUListElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLUListElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLUListElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLUListElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLUListElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLUListElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLUListElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLUListElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLUListElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLUListElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLUListElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLUListElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLUListElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLUListElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLUListElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLUListElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLUListElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLUListElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLUListElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLUListElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLUListElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLUListElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLUListElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLUListElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLUListElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLUListElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLUListElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLUListElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLUListElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLUListElementMethod "getCompact" o = DOMHTMLUListElementGetCompactMethodInfo + ResolveDOMHTMLUListElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLUListElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLUListElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLUListElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLUListElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLUListElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLUListElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLUListElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLUListElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLUListElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLUListElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLUListElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLUListElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLUListElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLUListElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLUListElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLUListElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLUListElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLUListElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLUListElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLUListElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLUListElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLUListElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLUListElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLUListElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLUListElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLUListElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLUListElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLUListElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLUListElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLUListElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLUListElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLUListElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLUListElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLUListElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLUListElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLUListElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLUListElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLUListElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLUListElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLUListElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLUListElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLUListElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLUListElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLUListElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLUListElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLUListElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLUListElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLUListElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLUListElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLUListElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLUListElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLUListElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLUListElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLUListElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLUListElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLUListElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLUListElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLUListElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLUListElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLUListElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLUListElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLUListElementMethod "setCompact" o = DOMHTMLUListElementSetCompactMethodInfo + ResolveDOMHTMLUListElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLUListElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLUListElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLUListElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLUListElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLUListElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLUListElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLUListElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLUListElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLUListElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLUListElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLUListElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLUListElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLUListElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLUListElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLUListElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLUListElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLUListElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLUListElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLUListElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLUListElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLUListElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLUListElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLUListElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLUListElementMethod t DOMHTMLUListElement, MethodInfo info DOMHTMLUListElement p) => IsLabelProxy t (DOMHTMLUListElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLUListElementMethod t DOMHTMLUListElement, MethodInfo info DOMHTMLUListElement p) => IsLabel t (DOMHTMLUListElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "compact" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -96,7 +266,7 @@ type AttrSetTypeConstraint DOMHTMLUListElementCompactPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLUListElementCompactPropertyInfo = DOMHTMLUListElementK type AttrGetType DOMHTMLUListElementCompactPropertyInfo = Bool - type AttrLabel DOMHTMLUListElementCompactPropertyInfo = "DOMHTMLUListElement::compact" + type AttrLabel DOMHTMLUListElementCompactPropertyInfo = "compact" attrGet _ = getDOMHTMLUListElementCompact attrSet _ = setDOMHTMLUListElementCompact attrConstruct _ = constructDOMHTMLUListElementCompact @@ -120,22 +290,21 @@ type AttrSetTypeConstraint DOMHTMLUListElementTypePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLUListElementTypePropertyInfo = DOMHTMLUListElementK type AttrGetType DOMHTMLUListElementTypePropertyInfo = T.Text - type AttrLabel DOMHTMLUListElementTypePropertyInfo = "DOMHTMLUListElement::type" + type AttrLabel DOMHTMLUListElementTypePropertyInfo = "type" attrGet _ = getDOMHTMLUListElementType attrSet _ = setDOMHTMLUListElementType attrConstruct _ = constructDOMHTMLUListElementType type instance AttributeList DOMHTMLUListElement = DOMHTMLUListElementAttributeList -type DOMHTMLUListElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLUListElementCompactPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLUListElementTypePropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLUListElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("compact", DOMHTMLUListElementCompactPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("type", DOMHTMLUListElementTypePropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLUListElement = DOMHTMLUListElementSignalList -type DOMHTMLUListElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLUListElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLUListElement::get_compact -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLUListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLUListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLUListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -147,8 +316,8 @@ dOMHTMLUListElementGetCompact :: (MonadIO m, DOMHTMLUListElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLUListElementGetCompact _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_htmlu_list_element_get_compact _obj' @@ -156,11 +325,14 @@ touchManagedPtr _obj return result' +data DOMHTMLUListElementGetCompactMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLUListElementK a) => MethodInfo DOMHTMLUListElementGetCompactMethodInfo a signature where + overloadedMethod _ = dOMHTMLUListElementGetCompact + -- method DOMHTMLUListElement::set_compact -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLUListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLUListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLUListElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -173,14 +345,18 @@ dOMHTMLUListElementSetCompact :: (MonadIO m, DOMHTMLUListElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLUListElementSetCompact _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_htmlu_list_element_set_compact _obj' value' touchManagedPtr _obj return () + +data DOMHTMLUListElementSetCompactMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLUListElementK a) => MethodInfo DOMHTMLUListElementSetCompactMethodInfo a signature where + overloadedMethod _ = dOMHTMLUListElementSetCompact diff --git a/GI/WebKit/Objects/DOMHTMLUListElement.hs-boot b/GI/WebKit/Objects/DOMHTMLUListElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLUListElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLUListElement.hs-boot @@ -13,3 +13,5 @@ instance (GObject o, IsDescendantOf DOMHTMLUListElement o) => DOMHTMLUListElementK o data DOMHTMLUListElementCompactPropertyInfo data DOMHTMLUListElementTypePropertyInfo +data DOMHTMLUListElementGetCompactMethodInfo +data DOMHTMLUListElementSetCompactMethodInfo diff --git a/GI/WebKit/Objects/DOMHTMLVideoElement.hs b/GI/WebKit/Objects/DOMHTMLVideoElement.hs --- a/GI/WebKit/Objects/DOMHTMLVideoElement.hs +++ b/GI/WebKit/Objects/DOMHTMLVideoElement.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,74 +18,92 @@ -- * Methods -- ** dOMHTMLVideoElementGetHeight + DOMHTMLVideoElementGetHeightMethodInfo , dOMHTMLVideoElementGetHeight , -- ** dOMHTMLVideoElementGetPoster + DOMHTMLVideoElementGetPosterMethodInfo , dOMHTMLVideoElementGetPoster , -- ** dOMHTMLVideoElementGetVideoHeight + DOMHTMLVideoElementGetVideoHeightMethodInfo, dOMHTMLVideoElementGetVideoHeight , -- ** dOMHTMLVideoElementGetVideoWidth + DOMHTMLVideoElementGetVideoWidthMethodInfo, dOMHTMLVideoElementGetVideoWidth , -- ** dOMHTMLVideoElementGetWebkitDecodedFrameCount + DOMHTMLVideoElementGetWebkitDecodedFrameCountMethodInfo, dOMHTMLVideoElementGetWebkitDecodedFrameCount, -- ** dOMHTMLVideoElementGetWebkitDisplayingFullscreen + DOMHTMLVideoElementGetWebkitDisplayingFullscreenMethodInfo, dOMHTMLVideoElementGetWebkitDisplayingFullscreen, -- ** dOMHTMLVideoElementGetWebkitDroppedFrameCount + DOMHTMLVideoElementGetWebkitDroppedFrameCountMethodInfo, dOMHTMLVideoElementGetWebkitDroppedFrameCount, -- ** dOMHTMLVideoElementGetWebkitSupportsFullscreen + DOMHTMLVideoElementGetWebkitSupportsFullscreenMethodInfo, dOMHTMLVideoElementGetWebkitSupportsFullscreen, -- ** dOMHTMLVideoElementGetWebkitWirelessVideoPlaybackDisabled + DOMHTMLVideoElementGetWebkitWirelessVideoPlaybackDisabledMethodInfo, dOMHTMLVideoElementGetWebkitWirelessVideoPlaybackDisabled, -- ** dOMHTMLVideoElementGetWidth + DOMHTMLVideoElementGetWidthMethodInfo , dOMHTMLVideoElementGetWidth , -- ** dOMHTMLVideoElementSetHeight + DOMHTMLVideoElementSetHeightMethodInfo , dOMHTMLVideoElementSetHeight , -- ** dOMHTMLVideoElementSetPoster + DOMHTMLVideoElementSetPosterMethodInfo , dOMHTMLVideoElementSetPoster , -- ** dOMHTMLVideoElementSetWebkitWirelessVideoPlaybackDisabled + DOMHTMLVideoElementSetWebkitWirelessVideoPlaybackDisabledMethodInfo, dOMHTMLVideoElementSetWebkitWirelessVideoPlaybackDisabled, -- ** dOMHTMLVideoElementSetWidth + DOMHTMLVideoElementSetWidthMethodInfo , dOMHTMLVideoElementSetWidth , -- ** dOMHTMLVideoElementWebkitEnterFullScreen + DOMHTMLVideoElementWebkitEnterFullScreenMethodInfo, dOMHTMLVideoElementWebkitEnterFullScreen, -- ** dOMHTMLVideoElementWebkitEnterFullscreen + DOMHTMLVideoElementWebkitEnterFullscreenMethodInfo, dOMHTMLVideoElementWebkitEnterFullscreen, -- ** dOMHTMLVideoElementWebkitExitFullScreen + DOMHTMLVideoElementWebkitExitFullScreenMethodInfo, dOMHTMLVideoElementWebkitExitFullScreen , -- ** dOMHTMLVideoElementWebkitExitFullscreen + DOMHTMLVideoElementWebkitExitFullscreenMethodInfo, dOMHTMLVideoElementWebkitExitFullscreen , @@ -185,6 +204,245 @@ noDOMHTMLVideoElement :: Maybe DOMHTMLVideoElement noDOMHTMLVideoElement = Nothing +type family ResolveDOMHTMLVideoElementMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHTMLVideoElementMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMHTMLVideoElementMethod "addTextTrack" o = DOMHTMLMediaElementAddTextTrackMethodInfo + ResolveDOMHTMLVideoElementMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMHTMLVideoElementMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHTMLVideoElementMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHTMLVideoElementMethod "blur" o = DOMElementBlurMethodInfo + ResolveDOMHTMLVideoElementMethod "canPlayType" o = DOMHTMLMediaElementCanPlayTypeMethodInfo + ResolveDOMHTMLVideoElementMethod "click" o = DOMHTMLElementClickMethodInfo + ResolveDOMHTMLVideoElementMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMHTMLVideoElementMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMHTMLVideoElementMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMHTMLVideoElementMethod "fastSeek" o = DOMHTMLMediaElementFastSeekMethodInfo + ResolveDOMHTMLVideoElementMethod "focus" o = DOMElementFocusMethodInfo + ResolveDOMHTMLVideoElementMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHTMLVideoElementMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHTMLVideoElementMethod "hasAttribute" o = DOMElementHasAttributeMethodInfo + ResolveDOMHTMLVideoElementMethod "hasAttributeNs" o = DOMElementHasAttributeNsMethodInfo + ResolveDOMHTMLVideoElementMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMHTMLVideoElementMethod "insertAdjacentElement" o = DOMHTMLElementInsertAdjacentElementMethodInfo + ResolveDOMHTMLVideoElementMethod "insertAdjacentHtml" o = DOMHTMLElementInsertAdjacentHtmlMethodInfo + ResolveDOMHTMLVideoElementMethod "insertAdjacentText" o = DOMHTMLElementInsertAdjacentTextMethodInfo + ResolveDOMHTMLVideoElementMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMHTMLVideoElementMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMHTMLVideoElementMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMHTMLVideoElementMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHTMLVideoElementMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMHTMLVideoElementMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMHTMLVideoElementMethod "load" o = DOMHTMLMediaElementLoadMethodInfo + ResolveDOMHTMLVideoElementMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMHTMLVideoElementMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMHTMLVideoElementMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMHTMLVideoElementMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHTMLVideoElementMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHTMLVideoElementMethod "pause" o = DOMHTMLMediaElementPauseMethodInfo + ResolveDOMHTMLVideoElementMethod "play" o = DOMHTMLMediaElementPlayMethodInfo + ResolveDOMHTMLVideoElementMethod "querySelector" o = DOMElementQuerySelectorMethodInfo + ResolveDOMHTMLVideoElementMethod "querySelectorAll" o = DOMElementQuerySelectorAllMethodInfo + ResolveDOMHTMLVideoElementMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHTMLVideoElementMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHTMLVideoElementMethod "remove" o = DOMElementRemoveMethodInfo + ResolveDOMHTMLVideoElementMethod "removeAttribute" o = DOMElementRemoveAttributeMethodInfo + ResolveDOMHTMLVideoElementMethod "removeAttributeNode" o = DOMElementRemoveAttributeNodeMethodInfo + ResolveDOMHTMLVideoElementMethod "removeAttributeNs" o = DOMElementRemoveAttributeNsMethodInfo + ResolveDOMHTMLVideoElementMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMHTMLVideoElementMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMHTMLVideoElementMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMHTMLVideoElementMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHTMLVideoElementMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHTMLVideoElementMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHTMLVideoElementMethod "scrollByLines" o = DOMElementScrollByLinesMethodInfo + ResolveDOMHTMLVideoElementMethod "scrollByPages" o = DOMElementScrollByPagesMethodInfo + ResolveDOMHTMLVideoElementMethod "scrollIntoView" o = DOMElementScrollIntoViewMethodInfo + ResolveDOMHTMLVideoElementMethod "scrollIntoViewIfNeeded" o = DOMElementScrollIntoViewIfNeededMethodInfo + ResolveDOMHTMLVideoElementMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHTMLVideoElementMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHTMLVideoElementMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHTMLVideoElementMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHTMLVideoElementMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHTMLVideoElementMethod "webkitEnterFullScreen" o = DOMHTMLVideoElementWebkitEnterFullScreenMethodInfo + ResolveDOMHTMLVideoElementMethod "webkitEnterFullscreen" o = DOMHTMLVideoElementWebkitEnterFullscreenMethodInfo + ResolveDOMHTMLVideoElementMethod "webkitExitFullScreen" o = DOMHTMLVideoElementWebkitExitFullScreenMethodInfo + ResolveDOMHTMLVideoElementMethod "webkitExitFullscreen" o = DOMHTMLVideoElementWebkitExitFullscreenMethodInfo + ResolveDOMHTMLVideoElementMethod "webkitMatchesSelector" o = DOMElementWebkitMatchesSelectorMethodInfo + ResolveDOMHTMLVideoElementMethod "webkitRequestFullScreen" o = DOMElementWebkitRequestFullScreenMethodInfo + ResolveDOMHTMLVideoElementMethod "webkitRequestFullscreen" o = DOMElementWebkitRequestFullscreenMethodInfo + ResolveDOMHTMLVideoElementMethod "webkitRequestPointerLock" o = DOMElementWebkitRequestPointerLockMethodInfo + ResolveDOMHTMLVideoElementMethod "webkitShowPlaybackTargetPicker" o = DOMHTMLMediaElementWebkitShowPlaybackTargetPickerMethodInfo + ResolveDOMHTMLVideoElementMethod "getAccessKey" o = DOMHTMLElementGetAccessKeyMethodInfo + ResolveDOMHTMLVideoElementMethod "getAttribute" o = DOMElementGetAttributeMethodInfo + ResolveDOMHTMLVideoElementMethod "getAttributeNode" o = DOMElementGetAttributeNodeMethodInfo + ResolveDOMHTMLVideoElementMethod "getAttributeNodeNs" o = DOMElementGetAttributeNodeNsMethodInfo + ResolveDOMHTMLVideoElementMethod "getAttributeNs" o = DOMElementGetAttributeNsMethodInfo + ResolveDOMHTMLVideoElementMethod "getAudioTracks" o = DOMHTMLMediaElementGetAudioTracksMethodInfo + ResolveDOMHTMLVideoElementMethod "getAutoplay" o = DOMHTMLMediaElementGetAutoplayMethodInfo + ResolveDOMHTMLVideoElementMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMHTMLVideoElementMethod "getBuffered" o = DOMHTMLMediaElementGetBufferedMethodInfo + ResolveDOMHTMLVideoElementMethod "getChildElementCount" o = DOMElementGetChildElementCountMethodInfo + ResolveDOMHTMLVideoElementMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMHTMLVideoElementMethod "getChildren" o = DOMHTMLElementGetChildrenMethodInfo + ResolveDOMHTMLVideoElementMethod "getClientHeight" o = DOMElementGetClientHeightMethodInfo + ResolveDOMHTMLVideoElementMethod "getClientLeft" o = DOMElementGetClientLeftMethodInfo + ResolveDOMHTMLVideoElementMethod "getClientTop" o = DOMElementGetClientTopMethodInfo + ResolveDOMHTMLVideoElementMethod "getClientWidth" o = DOMElementGetClientWidthMethodInfo + ResolveDOMHTMLVideoElementMethod "getContentEditable" o = DOMHTMLElementGetContentEditableMethodInfo + ResolveDOMHTMLVideoElementMethod "getController" o = DOMHTMLMediaElementGetControllerMethodInfo + ResolveDOMHTMLVideoElementMethod "getControls" o = DOMHTMLMediaElementGetControlsMethodInfo + ResolveDOMHTMLVideoElementMethod "getCurrentSrc" o = DOMHTMLMediaElementGetCurrentSrcMethodInfo + ResolveDOMHTMLVideoElementMethod "getCurrentTime" o = DOMHTMLMediaElementGetCurrentTimeMethodInfo + ResolveDOMHTMLVideoElementMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHTMLVideoElementMethod "getDefaultMuted" o = DOMHTMLMediaElementGetDefaultMutedMethodInfo + ResolveDOMHTMLVideoElementMethod "getDefaultPlaybackRate" o = DOMHTMLMediaElementGetDefaultPlaybackRateMethodInfo + ResolveDOMHTMLVideoElementMethod "getDir" o = DOMHTMLElementGetDirMethodInfo + ResolveDOMHTMLVideoElementMethod "getDraggable" o = DOMHTMLElementGetDraggableMethodInfo + ResolveDOMHTMLVideoElementMethod "getDuration" o = DOMHTMLMediaElementGetDurationMethodInfo + ResolveDOMHTMLVideoElementMethod "getElementsByClassName" o = DOMElementGetElementsByClassNameMethodInfo + ResolveDOMHTMLVideoElementMethod "getElementsByTagName" o = DOMElementGetElementsByTagNameMethodInfo + ResolveDOMHTMLVideoElementMethod "getElementsByTagNameNs" o = DOMElementGetElementsByTagNameNsMethodInfo + ResolveDOMHTMLVideoElementMethod "getEnded" o = DOMHTMLMediaElementGetEndedMethodInfo + ResolveDOMHTMLVideoElementMethod "getError" o = DOMHTMLMediaElementGetErrorMethodInfo + ResolveDOMHTMLVideoElementMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMHTMLVideoElementMethod "getFirstElementChild" o = DOMElementGetFirstElementChildMethodInfo + ResolveDOMHTMLVideoElementMethod "getHeight" o = DOMHTMLVideoElementGetHeightMethodInfo + ResolveDOMHTMLVideoElementMethod "getHidden" o = DOMHTMLElementGetHiddenMethodInfo + ResolveDOMHTMLVideoElementMethod "getInitialTime" o = DOMHTMLMediaElementGetInitialTimeMethodInfo + ResolveDOMHTMLVideoElementMethod "getInnerHtml" o = DOMHTMLElementGetInnerHtmlMethodInfo + ResolveDOMHTMLVideoElementMethod "getInnerText" o = DOMHTMLElementGetInnerTextMethodInfo + ResolveDOMHTMLVideoElementMethod "getIsContentEditable" o = DOMHTMLElementGetIsContentEditableMethodInfo + ResolveDOMHTMLVideoElementMethod "getItemId" o = DOMHTMLElementGetItemIdMethodInfo + ResolveDOMHTMLVideoElementMethod "getItemProp" o = DOMHTMLElementGetItemPropMethodInfo + ResolveDOMHTMLVideoElementMethod "getItemRef" o = DOMHTMLElementGetItemRefMethodInfo + ResolveDOMHTMLVideoElementMethod "getItemScope" o = DOMHTMLElementGetItemScopeMethodInfo + ResolveDOMHTMLVideoElementMethod "getItemType" o = DOMHTMLElementGetItemTypeMethodInfo + ResolveDOMHTMLVideoElementMethod "getLang" o = DOMHTMLElementGetLangMethodInfo + ResolveDOMHTMLVideoElementMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMHTMLVideoElementMethod "getLastElementChild" o = DOMElementGetLastElementChildMethodInfo + ResolveDOMHTMLVideoElementMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMHTMLVideoElementMethod "getLoop" o = DOMHTMLMediaElementGetLoopMethodInfo + ResolveDOMHTMLVideoElementMethod "getMediaGroup" o = DOMHTMLMediaElementGetMediaGroupMethodInfo + ResolveDOMHTMLVideoElementMethod "getMuted" o = DOMHTMLMediaElementGetMutedMethodInfo + ResolveDOMHTMLVideoElementMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMHTMLVideoElementMethod "getNetworkState" o = DOMHTMLMediaElementGetNetworkStateMethodInfo + ResolveDOMHTMLVideoElementMethod "getNextElementSibling" o = DOMElementGetNextElementSiblingMethodInfo + ResolveDOMHTMLVideoElementMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMHTMLVideoElementMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMHTMLVideoElementMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMHTMLVideoElementMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMHTMLVideoElementMethod "getOffsetHeight" o = DOMElementGetOffsetHeightMethodInfo + ResolveDOMHTMLVideoElementMethod "getOffsetLeft" o = DOMElementGetOffsetLeftMethodInfo + ResolveDOMHTMLVideoElementMethod "getOffsetParent" o = DOMElementGetOffsetParentMethodInfo + ResolveDOMHTMLVideoElementMethod "getOffsetTop" o = DOMElementGetOffsetTopMethodInfo + ResolveDOMHTMLVideoElementMethod "getOffsetWidth" o = DOMElementGetOffsetWidthMethodInfo + ResolveDOMHTMLVideoElementMethod "getOuterHtml" o = DOMHTMLElementGetOuterHtmlMethodInfo + ResolveDOMHTMLVideoElementMethod "getOuterText" o = DOMHTMLElementGetOuterTextMethodInfo + ResolveDOMHTMLVideoElementMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMHTMLVideoElementMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMHTMLVideoElementMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMHTMLVideoElementMethod "getPaused" o = DOMHTMLMediaElementGetPausedMethodInfo + ResolveDOMHTMLVideoElementMethod "getPlaybackRate" o = DOMHTMLMediaElementGetPlaybackRateMethodInfo + ResolveDOMHTMLVideoElementMethod "getPlayed" o = DOMHTMLMediaElementGetPlayedMethodInfo + ResolveDOMHTMLVideoElementMethod "getPoster" o = DOMHTMLVideoElementGetPosterMethodInfo + ResolveDOMHTMLVideoElementMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMHTMLVideoElementMethod "getPreload" o = DOMHTMLMediaElementGetPreloadMethodInfo + ResolveDOMHTMLVideoElementMethod "getPreviousElementSibling" o = DOMElementGetPreviousElementSiblingMethodInfo + ResolveDOMHTMLVideoElementMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMHTMLVideoElementMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHTMLVideoElementMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHTMLVideoElementMethod "getReadyState" o = DOMHTMLMediaElementGetReadyStateMethodInfo + ResolveDOMHTMLVideoElementMethod "getScrollHeight" o = DOMElementGetScrollHeightMethodInfo + ResolveDOMHTMLVideoElementMethod "getScrollLeft" o = DOMElementGetScrollLeftMethodInfo + ResolveDOMHTMLVideoElementMethod "getScrollTop" o = DOMElementGetScrollTopMethodInfo + ResolveDOMHTMLVideoElementMethod "getScrollWidth" o = DOMElementGetScrollWidthMethodInfo + ResolveDOMHTMLVideoElementMethod "getSeekable" o = DOMHTMLMediaElementGetSeekableMethodInfo + ResolveDOMHTMLVideoElementMethod "getSeeking" o = DOMHTMLMediaElementGetSeekingMethodInfo + ResolveDOMHTMLVideoElementMethod "getSpellcheck" o = DOMHTMLElementGetSpellcheckMethodInfo + ResolveDOMHTMLVideoElementMethod "getSrc" o = DOMHTMLMediaElementGetSrcMethodInfo + ResolveDOMHTMLVideoElementMethod "getStartTime" o = DOMHTMLMediaElementGetStartTimeMethodInfo + ResolveDOMHTMLVideoElementMethod "getStyle" o = DOMElementGetStyleMethodInfo + ResolveDOMHTMLVideoElementMethod "getTabIndex" o = DOMHTMLElementGetTabIndexMethodInfo + ResolveDOMHTMLVideoElementMethod "getTagName" o = DOMElementGetTagNameMethodInfo + ResolveDOMHTMLVideoElementMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMHTMLVideoElementMethod "getTextTracks" o = DOMHTMLMediaElementGetTextTracksMethodInfo + ResolveDOMHTMLVideoElementMethod "getTitle" o = DOMHTMLElementGetTitleMethodInfo + ResolveDOMHTMLVideoElementMethod "getTranslate" o = DOMHTMLElementGetTranslateMethodInfo + ResolveDOMHTMLVideoElementMethod "getVideoHeight" o = DOMHTMLVideoElementGetVideoHeightMethodInfo + ResolveDOMHTMLVideoElementMethod "getVideoTracks" o = DOMHTMLMediaElementGetVideoTracksMethodInfo + ResolveDOMHTMLVideoElementMethod "getVideoWidth" o = DOMHTMLVideoElementGetVideoWidthMethodInfo + ResolveDOMHTMLVideoElementMethod "getVolume" o = DOMHTMLMediaElementGetVolumeMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitAudioDecodedByteCount" o = DOMHTMLMediaElementGetWebkitAudioDecodedByteCountMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitClosedCaptionsVisible" o = DOMHTMLMediaElementGetWebkitClosedCaptionsVisibleMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitCurrentPlaybackTargetIsWireless" o = DOMHTMLMediaElementGetWebkitCurrentPlaybackTargetIsWirelessMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitDecodedFrameCount" o = DOMHTMLVideoElementGetWebkitDecodedFrameCountMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitDisplayingFullscreen" o = DOMHTMLVideoElementGetWebkitDisplayingFullscreenMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitDroppedFrameCount" o = DOMHTMLVideoElementGetWebkitDroppedFrameCountMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitHasClosedCaptions" o = DOMHTMLMediaElementGetWebkitHasClosedCaptionsMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitPreservesPitch" o = DOMHTMLMediaElementGetWebkitPreservesPitchMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitRegionOverflow" o = DOMElementGetWebkitRegionOverflowMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitRegionOverset" o = DOMElementGetWebkitRegionOversetMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitSupportsFullscreen" o = DOMHTMLVideoElementGetWebkitSupportsFullscreenMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitVideoDecodedByteCount" o = DOMHTMLMediaElementGetWebkitVideoDecodedByteCountMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitWirelessVideoPlaybackDisabled" o = DOMHTMLVideoElementGetWebkitWirelessVideoPlaybackDisabledMethodInfo + ResolveDOMHTMLVideoElementMethod "getWebkitdropzone" o = DOMHTMLElementGetWebkitdropzoneMethodInfo + ResolveDOMHTMLVideoElementMethod "getWidth" o = DOMHTMLVideoElementGetWidthMethodInfo + ResolveDOMHTMLVideoElementMethod "setAccessKey" o = DOMHTMLElementSetAccessKeyMethodInfo + ResolveDOMHTMLVideoElementMethod "setAttribute" o = DOMElementSetAttributeMethodInfo + ResolveDOMHTMLVideoElementMethod "setAttributeNode" o = DOMElementSetAttributeNodeMethodInfo + ResolveDOMHTMLVideoElementMethod "setAttributeNodeNs" o = DOMElementSetAttributeNodeNsMethodInfo + ResolveDOMHTMLVideoElementMethod "setAttributeNs" o = DOMElementSetAttributeNsMethodInfo + ResolveDOMHTMLVideoElementMethod "setAutoplay" o = DOMHTMLMediaElementSetAutoplayMethodInfo + ResolveDOMHTMLVideoElementMethod "setContentEditable" o = DOMHTMLElementSetContentEditableMethodInfo + ResolveDOMHTMLVideoElementMethod "setControls" o = DOMHTMLMediaElementSetControlsMethodInfo + ResolveDOMHTMLVideoElementMethod "setCurrentTime" o = DOMHTMLMediaElementSetCurrentTimeMethodInfo + ResolveDOMHTMLVideoElementMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHTMLVideoElementMethod "setDefaultMuted" o = DOMHTMLMediaElementSetDefaultMutedMethodInfo + ResolveDOMHTMLVideoElementMethod "setDefaultPlaybackRate" o = DOMHTMLMediaElementSetDefaultPlaybackRateMethodInfo + ResolveDOMHTMLVideoElementMethod "setDir" o = DOMHTMLElementSetDirMethodInfo + ResolveDOMHTMLVideoElementMethod "setDraggable" o = DOMHTMLElementSetDraggableMethodInfo + ResolveDOMHTMLVideoElementMethod "setHeight" o = DOMHTMLVideoElementSetHeightMethodInfo + ResolveDOMHTMLVideoElementMethod "setHidden" o = DOMHTMLElementSetHiddenMethodInfo + ResolveDOMHTMLVideoElementMethod "setInnerHtml" o = DOMHTMLElementSetInnerHtmlMethodInfo + ResolveDOMHTMLVideoElementMethod "setInnerText" o = DOMHTMLElementSetInnerTextMethodInfo + ResolveDOMHTMLVideoElementMethod "setItemId" o = DOMHTMLElementSetItemIdMethodInfo + ResolveDOMHTMLVideoElementMethod "setItemScope" o = DOMHTMLElementSetItemScopeMethodInfo + ResolveDOMHTMLVideoElementMethod "setLang" o = DOMHTMLElementSetLangMethodInfo + ResolveDOMHTMLVideoElementMethod "setLoop" o = DOMHTMLMediaElementSetLoopMethodInfo + ResolveDOMHTMLVideoElementMethod "setMediaGroup" o = DOMHTMLMediaElementSetMediaGroupMethodInfo + ResolveDOMHTMLVideoElementMethod "setMuted" o = DOMHTMLMediaElementSetMutedMethodInfo + ResolveDOMHTMLVideoElementMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMHTMLVideoElementMethod "setOuterHtml" o = DOMHTMLElementSetOuterHtmlMethodInfo + ResolveDOMHTMLVideoElementMethod "setOuterText" o = DOMHTMLElementSetOuterTextMethodInfo + ResolveDOMHTMLVideoElementMethod "setPlaybackRate" o = DOMHTMLMediaElementSetPlaybackRateMethodInfo + ResolveDOMHTMLVideoElementMethod "setPoster" o = DOMHTMLVideoElementSetPosterMethodInfo + ResolveDOMHTMLVideoElementMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMHTMLVideoElementMethod "setPreload" o = DOMHTMLMediaElementSetPreloadMethodInfo + ResolveDOMHTMLVideoElementMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHTMLVideoElementMethod "setScrollLeft" o = DOMElementSetScrollLeftMethodInfo + ResolveDOMHTMLVideoElementMethod "setScrollTop" o = DOMElementSetScrollTopMethodInfo + ResolveDOMHTMLVideoElementMethod "setSpellcheck" o = DOMHTMLElementSetSpellcheckMethodInfo + ResolveDOMHTMLVideoElementMethod "setSrc" o = DOMHTMLMediaElementSetSrcMethodInfo + ResolveDOMHTMLVideoElementMethod "setTabIndex" o = DOMHTMLElementSetTabIndexMethodInfo + ResolveDOMHTMLVideoElementMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMHTMLVideoElementMethod "setTitle" o = DOMHTMLElementSetTitleMethodInfo + ResolveDOMHTMLVideoElementMethod "setTranslate" o = DOMHTMLElementSetTranslateMethodInfo + ResolveDOMHTMLVideoElementMethod "setVolume" o = DOMHTMLMediaElementSetVolumeMethodInfo + ResolveDOMHTMLVideoElementMethod "setWebkitClosedCaptionsVisible" o = DOMHTMLMediaElementSetWebkitClosedCaptionsVisibleMethodInfo + ResolveDOMHTMLVideoElementMethod "setWebkitPreservesPitch" o = DOMHTMLMediaElementSetWebkitPreservesPitchMethodInfo + ResolveDOMHTMLVideoElementMethod "setWebkitWirelessVideoPlaybackDisabled" o = DOMHTMLVideoElementSetWebkitWirelessVideoPlaybackDisabledMethodInfo + ResolveDOMHTMLVideoElementMethod "setWebkitdropzone" o = DOMHTMLElementSetWebkitdropzoneMethodInfo + ResolveDOMHTMLVideoElementMethod "setWidth" o = DOMHTMLVideoElementSetWidthMethodInfo + ResolveDOMHTMLVideoElementMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHTMLVideoElementMethod t DOMHTMLVideoElement, MethodInfo info DOMHTMLVideoElement p) => IsLabelProxy t (DOMHTMLVideoElement -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHTMLVideoElementMethod t DOMHTMLVideoElement, MethodInfo info DOMHTMLVideoElement p) => IsLabel t (DOMHTMLVideoElement -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "height" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable,PropertyWritable] @@ -204,7 +462,7 @@ type AttrSetTypeConstraint DOMHTMLVideoElementHeightPropertyInfo = (~) Word64 type AttrBaseTypeConstraint DOMHTMLVideoElementHeightPropertyInfo = DOMHTMLVideoElementK type AttrGetType DOMHTMLVideoElementHeightPropertyInfo = Word64 - type AttrLabel DOMHTMLVideoElementHeightPropertyInfo = "DOMHTMLVideoElement::height" + type AttrLabel DOMHTMLVideoElementHeightPropertyInfo = "height" attrGet _ = getDOMHTMLVideoElementHeight attrSet _ = setDOMHTMLVideoElementHeight attrConstruct _ = constructDOMHTMLVideoElementHeight @@ -228,7 +486,7 @@ type AttrSetTypeConstraint DOMHTMLVideoElementPosterPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMHTMLVideoElementPosterPropertyInfo = DOMHTMLVideoElementK type AttrGetType DOMHTMLVideoElementPosterPropertyInfo = T.Text - type AttrLabel DOMHTMLVideoElementPosterPropertyInfo = "DOMHTMLVideoElement::poster" + type AttrLabel DOMHTMLVideoElementPosterPropertyInfo = "poster" attrGet _ = getDOMHTMLVideoElementPoster attrSet _ = setDOMHTMLVideoElementPoster attrConstruct _ = constructDOMHTMLVideoElementPoster @@ -246,7 +504,7 @@ type AttrSetTypeConstraint DOMHTMLVideoElementVideoHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLVideoElementVideoHeightPropertyInfo = DOMHTMLVideoElementK type AttrGetType DOMHTMLVideoElementVideoHeightPropertyInfo = Word64 - type AttrLabel DOMHTMLVideoElementVideoHeightPropertyInfo = "DOMHTMLVideoElement::video-height" + type AttrLabel DOMHTMLVideoElementVideoHeightPropertyInfo = "video-height" attrGet _ = getDOMHTMLVideoElementVideoHeight attrSet _ = undefined attrConstruct _ = undefined @@ -264,7 +522,7 @@ type AttrSetTypeConstraint DOMHTMLVideoElementVideoWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLVideoElementVideoWidthPropertyInfo = DOMHTMLVideoElementK type AttrGetType DOMHTMLVideoElementVideoWidthPropertyInfo = Word64 - type AttrLabel DOMHTMLVideoElementVideoWidthPropertyInfo = "DOMHTMLVideoElement::video-width" + type AttrLabel DOMHTMLVideoElementVideoWidthPropertyInfo = "video-width" attrGet _ = getDOMHTMLVideoElementVideoWidth attrSet _ = undefined attrConstruct _ = undefined @@ -282,7 +540,7 @@ type AttrSetTypeConstraint DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo = DOMHTMLVideoElementK type AttrGetType DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo = Word64 - type AttrLabel DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo = "DOMHTMLVideoElement::webkit-decoded-frame-count" + type AttrLabel DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo = "webkit-decoded-frame-count" attrGet _ = getDOMHTMLVideoElementWebkitDecodedFrameCount attrSet _ = undefined attrConstruct _ = undefined @@ -300,7 +558,7 @@ type AttrSetTypeConstraint DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo = DOMHTMLVideoElementK type AttrGetType DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo = Bool - type AttrLabel DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo = "DOMHTMLVideoElement::webkit-displaying-fullscreen" + type AttrLabel DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo = "webkit-displaying-fullscreen" attrGet _ = getDOMHTMLVideoElementWebkitDisplayingFullscreen attrSet _ = undefined attrConstruct _ = undefined @@ -318,7 +576,7 @@ type AttrSetTypeConstraint DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo = DOMHTMLVideoElementK type AttrGetType DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo = Word64 - type AttrLabel DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo = "DOMHTMLVideoElement::webkit-dropped-frame-count" + type AttrLabel DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo = "webkit-dropped-frame-count" attrGet _ = getDOMHTMLVideoElementWebkitDroppedFrameCount attrSet _ = undefined attrConstruct _ = undefined @@ -336,7 +594,7 @@ type AttrSetTypeConstraint DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo = DOMHTMLVideoElementK type AttrGetType DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo = Bool - type AttrLabel DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo = "DOMHTMLVideoElement::webkit-supports-fullscreen" + type AttrLabel DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo = "webkit-supports-fullscreen" attrGet _ = getDOMHTMLVideoElementWebkitSupportsFullscreen attrSet _ = undefined attrConstruct _ = undefined @@ -360,7 +618,7 @@ type AttrSetTypeConstraint DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo = DOMHTMLVideoElementK type AttrGetType DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo = Bool - type AttrLabel DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo = "DOMHTMLVideoElement::webkit-wireless-video-playback-disabled" + type AttrLabel DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo = "webkit-wireless-video-playback-disabled" attrGet _ = getDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled attrSet _ = setDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled attrConstruct _ = constructDOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabled @@ -384,22 +642,21 @@ type AttrSetTypeConstraint DOMHTMLVideoElementWidthPropertyInfo = (~) Word64 type AttrBaseTypeConstraint DOMHTMLVideoElementWidthPropertyInfo = DOMHTMLVideoElementK type AttrGetType DOMHTMLVideoElementWidthPropertyInfo = Word64 - type AttrLabel DOMHTMLVideoElementWidthPropertyInfo = "DOMHTMLVideoElement::width" + type AttrLabel DOMHTMLVideoElementWidthPropertyInfo = "width" attrGet _ = getDOMHTMLVideoElementWidth attrSet _ = setDOMHTMLVideoElementWidth attrConstruct _ = constructDOMHTMLVideoElementWidth type instance AttributeList DOMHTMLVideoElement = DOMHTMLVideoElementAttributeList -type DOMHTMLVideoElementAttributeList = ('[ '("access-key", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("audio-tracks", DOMHTMLMediaElementAudioTracksPropertyInfo), '("autoplay", DOMHTMLMediaElementAutoplayPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("buffered", DOMHTMLMediaElementBufferedPropertyInfo), '("child-element-count", DOMElementChildElementCountPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("class-list", DOMElementClassListPropertyInfo), '("class-name", DOMElementClassNamePropertyInfo), '("client-height", DOMElementClientHeightPropertyInfo), '("client-left", DOMElementClientLeftPropertyInfo), '("client-top", DOMElementClientTopPropertyInfo), '("client-width", DOMElementClientWidthPropertyInfo), '("content-editable", DOMHTMLElementContentEditablePropertyInfo), '("controller", DOMHTMLMediaElementControllerPropertyInfo), '("controls", DOMHTMLMediaElementControlsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-src", DOMHTMLMediaElementCurrentSrcPropertyInfo), '("current-time", DOMHTMLMediaElementCurrentTimePropertyInfo), '("default-muted", DOMHTMLMediaElementDefaultMutedPropertyInfo), '("default-playback-rate", DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("duration", DOMHTMLMediaElementDurationPropertyInfo), '("ended", DOMHTMLMediaElementEndedPropertyInfo), '("error", DOMHTMLMediaElementErrorPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("first-element-child", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLVideoElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("inner-html", DOMHTMLElementInnerHtmlPropertyInfo), '("inner-text", DOMHTMLElementInnerTextPropertyInfo), '("is-content-editable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("last-element-child", DOMElementLastElementChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMediaElementLoopPropertyInfo), '("media-group", DOMHTMLMediaElementMediaGroupPropertyInfo), '("muted", DOMHTMLMediaElementMutedPropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("network-state", DOMHTMLMediaElementNetworkStatePropertyInfo), '("next-element-sibling", DOMElementNextElementSiblingPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("offset-height", DOMElementOffsetHeightPropertyInfo), '("offset-left", DOMElementOffsetLeftPropertyInfo), '("offset-parent", DOMElementOffsetParentPropertyInfo), '("offset-top", DOMElementOffsetTopPropertyInfo), '("offset-width", DOMElementOffsetWidthPropertyInfo), '("outer-html", DOMHTMLElementOuterHtmlPropertyInfo), '("outer-text", DOMHTMLElementOuterTextPropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("paused", DOMHTMLMediaElementPausedPropertyInfo), '("playback-rate", DOMHTMLMediaElementPlaybackRatePropertyInfo), '("played", DOMHTMLMediaElementPlayedPropertyInfo), '("poster", DOMHTMLVideoElementPosterPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("preload", DOMHTMLMediaElementPreloadPropertyInfo), '("previous-element-sibling", DOMElementPreviousElementSiblingPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("ready-state", DOMHTMLMediaElementReadyStatePropertyInfo), '("scroll-height", DOMElementScrollHeightPropertyInfo), '("scroll-left", DOMElementScrollLeftPropertyInfo), '("scroll-top", DOMElementScrollTopPropertyInfo), '("scroll-width", DOMElementScrollWidthPropertyInfo), '("seekable", DOMHTMLMediaElementSeekablePropertyInfo), '("seeking", DOMHTMLMediaElementSeekingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLMediaElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tab-index", DOMHTMLElementTabIndexPropertyInfo), '("tag-name", DOMElementTagNamePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("text-tracks", DOMHTMLMediaElementTextTracksPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("video-height", DOMHTMLVideoElementVideoHeightPropertyInfo), '("video-tracks", DOMHTMLMediaElementVideoTracksPropertyInfo), '("video-width", DOMHTMLVideoElementVideoWidthPropertyInfo), '("volume", DOMHTMLMediaElementVolumePropertyInfo), '("webkit-audio-decoded-byte-count", DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo), '("webkit-closed-captions-visible", DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo), '("webkit-current-playback-target-is-wireless", DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo), '("webkit-decoded-frame-count", DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo), '("webkit-displaying-fullscreen", DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo), '("webkit-dropped-frame-count", DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo), '("webkit-has-closed-captions", DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo), '("webkit-preserves-pitch", DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo), '("webkit-region-overset", DOMElementWebkitRegionOversetPropertyInfo), '("webkit-supports-fullscreen", DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo), '("webkit-video-decoded-byte-count", DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo), '("webkit-wireless-video-playback-disabled", DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLVideoElementWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMHTMLVideoElementAttributeList = ('[ '("accessKey", DOMHTMLElementAccessKeyPropertyInfo), '("attributes", DOMElementAttributesPropertyInfo), '("audioTracks", DOMHTMLMediaElementAudioTracksPropertyInfo), '("autoplay", DOMHTMLMediaElementAutoplayPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("buffered", DOMHTMLMediaElementBufferedPropertyInfo), '("childElementCount", DOMElementChildElementCountPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("children", DOMHTMLElementChildrenPropertyInfo), '("classList", DOMElementClassListPropertyInfo), '("className", DOMElementClassNamePropertyInfo), '("clientHeight", DOMElementClientHeightPropertyInfo), '("clientLeft", DOMElementClientLeftPropertyInfo), '("clientTop", DOMElementClientTopPropertyInfo), '("clientWidth", DOMElementClientWidthPropertyInfo), '("contentEditable", DOMHTMLElementContentEditablePropertyInfo), '("controller", DOMHTMLMediaElementControllerPropertyInfo), '("controls", DOMHTMLMediaElementControlsPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentSrc", DOMHTMLMediaElementCurrentSrcPropertyInfo), '("currentTime", DOMHTMLMediaElementCurrentTimePropertyInfo), '("defaultMuted", DOMHTMLMediaElementDefaultMutedPropertyInfo), '("defaultPlaybackRate", DOMHTMLMediaElementDefaultPlaybackRatePropertyInfo), '("dir", DOMHTMLElementDirPropertyInfo), '("draggable", DOMHTMLElementDraggablePropertyInfo), '("duration", DOMHTMLMediaElementDurationPropertyInfo), '("ended", DOMHTMLMediaElementEndedPropertyInfo), '("error", DOMHTMLMediaElementErrorPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("firstElementChild", DOMElementFirstElementChildPropertyInfo), '("height", DOMHTMLVideoElementHeightPropertyInfo), '("hidden", DOMHTMLElementHiddenPropertyInfo), '("id", DOMElementIdPropertyInfo), '("innerHtml", DOMHTMLElementInnerHtmlPropertyInfo), '("innerText", DOMHTMLElementInnerTextPropertyInfo), '("isContentEditable", DOMHTMLElementIsContentEditablePropertyInfo), '("lang", DOMHTMLElementLangPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("lastElementChild", DOMElementLastElementChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("loop", DOMHTMLMediaElementLoopPropertyInfo), '("mediaGroup", DOMHTMLMediaElementMediaGroupPropertyInfo), '("muted", DOMHTMLMediaElementMutedPropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("networkState", DOMHTMLMediaElementNetworkStatePropertyInfo), '("nextElementSibling", DOMElementNextElementSiblingPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("offsetHeight", DOMElementOffsetHeightPropertyInfo), '("offsetLeft", DOMElementOffsetLeftPropertyInfo), '("offsetParent", DOMElementOffsetParentPropertyInfo), '("offsetTop", DOMElementOffsetTopPropertyInfo), '("offsetWidth", DOMElementOffsetWidthPropertyInfo), '("outerHtml", DOMHTMLElementOuterHtmlPropertyInfo), '("outerText", DOMHTMLElementOuterTextPropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("paused", DOMHTMLMediaElementPausedPropertyInfo), '("playbackRate", DOMHTMLMediaElementPlaybackRatePropertyInfo), '("played", DOMHTMLMediaElementPlayedPropertyInfo), '("poster", DOMHTMLVideoElementPosterPropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("preload", DOMHTMLMediaElementPreloadPropertyInfo), '("previousElementSibling", DOMElementPreviousElementSiblingPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("readyState", DOMHTMLMediaElementReadyStatePropertyInfo), '("scrollHeight", DOMElementScrollHeightPropertyInfo), '("scrollLeft", DOMElementScrollLeftPropertyInfo), '("scrollTop", DOMElementScrollTopPropertyInfo), '("scrollWidth", DOMElementScrollWidthPropertyInfo), '("seekable", DOMHTMLMediaElementSeekablePropertyInfo), '("seeking", DOMHTMLMediaElementSeekingPropertyInfo), '("spellcheck", DOMHTMLElementSpellcheckPropertyInfo), '("src", DOMHTMLMediaElementSrcPropertyInfo), '("style", DOMElementStylePropertyInfo), '("tabIndex", DOMHTMLElementTabIndexPropertyInfo), '("tagName", DOMElementTagNamePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("textTracks", DOMHTMLMediaElementTextTracksPropertyInfo), '("title", DOMHTMLElementTitlePropertyInfo), '("translate", DOMHTMLElementTranslatePropertyInfo), '("videoHeight", DOMHTMLVideoElementVideoHeightPropertyInfo), '("videoTracks", DOMHTMLMediaElementVideoTracksPropertyInfo), '("videoWidth", DOMHTMLVideoElementVideoWidthPropertyInfo), '("volume", DOMHTMLMediaElementVolumePropertyInfo), '("webkitAudioDecodedByteCount", DOMHTMLMediaElementWebkitAudioDecodedByteCountPropertyInfo), '("webkitClosedCaptionsVisible", DOMHTMLMediaElementWebkitClosedCaptionsVisiblePropertyInfo), '("webkitCurrentPlaybackTargetIsWireless", DOMHTMLMediaElementWebkitCurrentPlaybackTargetIsWirelessPropertyInfo), '("webkitDecodedFrameCount", DOMHTMLVideoElementWebkitDecodedFrameCountPropertyInfo), '("webkitDisplayingFullscreen", DOMHTMLVideoElementWebkitDisplayingFullscreenPropertyInfo), '("webkitDroppedFrameCount", DOMHTMLVideoElementWebkitDroppedFrameCountPropertyInfo), '("webkitHasClosedCaptions", DOMHTMLMediaElementWebkitHasClosedCaptionsPropertyInfo), '("webkitPreservesPitch", DOMHTMLMediaElementWebkitPreservesPitchPropertyInfo), '("webkitRegionOverset", DOMElementWebkitRegionOversetPropertyInfo), '("webkitSupportsFullscreen", DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo), '("webkitVideoDecodedByteCount", DOMHTMLMediaElementWebkitVideoDecodedByteCountPropertyInfo), '("webkitWirelessVideoPlaybackDisabled", DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo), '("webkitdropzone", DOMHTMLElementWebkitdropzonePropertyInfo), '("width", DOMHTMLVideoElementWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHTMLVideoElement = DOMHTMLVideoElementSignalList -type DOMHTMLVideoElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHTMLVideoElementSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHTMLVideoElement::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -411,19 +668,22 @@ dOMHTMLVideoElementGetHeight :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLVideoElementGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_video_element_get_height _obj' touchManagedPtr _obj return result +data DOMHTMLVideoElementGetHeightMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementGetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementGetHeight + -- method DOMHTMLVideoElement::get_poster -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -435,8 +695,8 @@ dOMHTMLVideoElementGetPoster :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMHTMLVideoElementGetPoster _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_video_element_get_poster _obj' @@ -446,11 +706,14 @@ touchManagedPtr _obj return result' +data DOMHTMLVideoElementGetPosterMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementGetPosterMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementGetPoster + -- method DOMHTMLVideoElement::get_video_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -462,19 +725,22 @@ dOMHTMLVideoElementGetVideoHeight :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLVideoElementGetVideoHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_video_element_get_video_height _obj' touchManagedPtr _obj return result +data DOMHTMLVideoElementGetVideoHeightMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementGetVideoHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementGetVideoHeight + -- method DOMHTMLVideoElement::get_video_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -486,19 +752,22 @@ dOMHTMLVideoElementGetVideoWidth :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLVideoElementGetVideoWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_video_element_get_video_width _obj' touchManagedPtr _obj return result +data DOMHTMLVideoElementGetVideoWidthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementGetVideoWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementGetVideoWidth + -- method DOMHTMLVideoElement::get_webkit_decoded_frame_count -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -510,19 +779,22 @@ dOMHTMLVideoElementGetWebkitDecodedFrameCount :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLVideoElementGetWebkitDecodedFrameCount _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_video_element_get_webkit_decoded_frame_count _obj' touchManagedPtr _obj return result +data DOMHTMLVideoElementGetWebkitDecodedFrameCountMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementGetWebkitDecodedFrameCountMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementGetWebkitDecodedFrameCount + -- method DOMHTMLVideoElement::get_webkit_displaying_fullscreen -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -534,8 +806,8 @@ dOMHTMLVideoElementGetWebkitDisplayingFullscreen :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLVideoElementGetWebkitDisplayingFullscreen _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_video_element_get_webkit_displaying_fullscreen _obj' @@ -543,11 +815,14 @@ touchManagedPtr _obj return result' +data DOMHTMLVideoElementGetWebkitDisplayingFullscreenMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementGetWebkitDisplayingFullscreenMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementGetWebkitDisplayingFullscreen + -- method DOMHTMLVideoElement::get_webkit_dropped_frame_count -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -559,19 +834,22 @@ dOMHTMLVideoElementGetWebkitDroppedFrameCount :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLVideoElementGetWebkitDroppedFrameCount _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_video_element_get_webkit_dropped_frame_count _obj' touchManagedPtr _obj return result +data DOMHTMLVideoElementGetWebkitDroppedFrameCountMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementGetWebkitDroppedFrameCountMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementGetWebkitDroppedFrameCount + -- method DOMHTMLVideoElement::get_webkit_supports_fullscreen -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -583,8 +861,8 @@ dOMHTMLVideoElementGetWebkitSupportsFullscreen :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLVideoElementGetWebkitSupportsFullscreen _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_video_element_get_webkit_supports_fullscreen _obj' @@ -592,11 +870,14 @@ touchManagedPtr _obj return result' +data DOMHTMLVideoElementGetWebkitSupportsFullscreenMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementGetWebkitSupportsFullscreenMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementGetWebkitSupportsFullscreen + -- method DOMHTMLVideoElement::get_webkit_wireless_video_playback_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -608,8 +889,8 @@ dOMHTMLVideoElementGetWebkitWirelessVideoPlaybackDisabled :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMHTMLVideoElementGetWebkitWirelessVideoPlaybackDisabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_video_element_get_webkit_wireless_video_playback_disabled _obj' @@ -617,11 +898,14 @@ touchManagedPtr _obj return result' +data DOMHTMLVideoElementGetWebkitWirelessVideoPlaybackDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementGetWebkitWirelessVideoPlaybackDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementGetWebkitWirelessVideoPlaybackDisabled + -- method DOMHTMLVideoElement::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -633,19 +917,22 @@ dOMHTMLVideoElementGetWidth :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHTMLVideoElementGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_html_video_element_get_width _obj' touchManagedPtr _obj return result +data DOMHTMLVideoElementGetWidthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementGetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementGetWidth + -- method DOMHTMLVideoElement::set_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -658,20 +945,23 @@ dOMHTMLVideoElementSetHeight :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - Word64 -> -- value - m () + a -- _obj + -> Word64 -- value + -> m () -- result dOMHTMLVideoElementSetHeight _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_video_element_set_height _obj' value touchManagedPtr _obj return () +data DOMHTMLVideoElementSetHeightMethodInfo +instance (signature ~ (Word64 -> m ()), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementSetHeightMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementSetHeight + -- method DOMHTMLVideoElement::set_poster -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -684,9 +974,9 @@ dOMHTMLVideoElementSetPoster :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMHTMLVideoElementSetPoster _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -695,11 +985,14 @@ freeMem value' return () +data DOMHTMLVideoElementSetPosterMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementSetPosterMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementSetPoster + -- method DOMHTMLVideoElement::set_webkit_wireless_video_playback_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -712,9 +1005,9 @@ dOMHTMLVideoElementSetWebkitWirelessVideoPlaybackDisabled :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMHTMLVideoElementSetWebkitWirelessVideoPlaybackDisabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -722,11 +1015,14 @@ touchManagedPtr _obj return () +data DOMHTMLVideoElementSetWebkitWirelessVideoPlaybackDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementSetWebkitWirelessVideoPlaybackDisabledMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementSetWebkitWirelessVideoPlaybackDisabled + -- method DOMHTMLVideoElement::set_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -739,20 +1035,23 @@ dOMHTMLVideoElementSetWidth :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - Word64 -> -- value - m () + a -- _obj + -> Word64 -- value + -> m () -- result dOMHTMLVideoElementSetWidth _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_video_element_set_width _obj' value touchManagedPtr _obj return () +data DOMHTMLVideoElementSetWidthMethodInfo +instance (signature ~ (Word64 -> m ()), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementSetWidthMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementSetWidth + -- method DOMHTMLVideoElement::webkit_enter_full_screen -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -765,8 +1064,8 @@ dOMHTMLVideoElementWebkitEnterFullScreen :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLVideoElementWebkitEnterFullScreen _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -777,11 +1076,14 @@ return () ) +data DOMHTMLVideoElementWebkitEnterFullScreenMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementWebkitEnterFullScreenMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementWebkitEnterFullScreen + -- method DOMHTMLVideoElement::webkit_enter_fullscreen -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -794,8 +1096,8 @@ dOMHTMLVideoElementWebkitEnterFullscreen :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLVideoElementWebkitEnterFullscreen _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -806,11 +1108,14 @@ return () ) +data DOMHTMLVideoElementWebkitEnterFullscreenMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementWebkitEnterFullscreenMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementWebkitEnterFullscreen + -- method DOMHTMLVideoElement::webkit_exit_full_screen -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -822,19 +1127,22 @@ dOMHTMLVideoElementWebkitExitFullScreen :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLVideoElementWebkitExitFullScreen _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_video_element_webkit_exit_full_screen _obj' touchManagedPtr _obj return () +data DOMHTMLVideoElementWebkitExitFullScreenMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementWebkitExitFullScreenMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementWebkitExitFullScreen + -- method DOMHTMLVideoElement::webkit_exit_fullscreen -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHTMLVideoElement", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -846,12 +1154,16 @@ dOMHTMLVideoElementWebkitExitFullscreen :: (MonadIO m, DOMHTMLVideoElementK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHTMLVideoElementWebkitExitFullscreen _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_html_video_element_webkit_exit_fullscreen _obj' touchManagedPtr _obj return () + +data DOMHTMLVideoElementWebkitExitFullscreenMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHTMLVideoElementK a) => MethodInfo DOMHTMLVideoElementWebkitExitFullscreenMethodInfo a signature where + overloadedMethod _ = dOMHTMLVideoElementWebkitExitFullscreen diff --git a/GI/WebKit/Objects/DOMHTMLVideoElement.hs-boot b/GI/WebKit/Objects/DOMHTMLVideoElement.hs-boot --- a/GI/WebKit/Objects/DOMHTMLVideoElement.hs-boot +++ b/GI/WebKit/Objects/DOMHTMLVideoElement.hs-boot @@ -21,3 +21,21 @@ data DOMHTMLVideoElementWebkitSupportsFullscreenPropertyInfo data DOMHTMLVideoElementWebkitWirelessVideoPlaybackDisabledPropertyInfo data DOMHTMLVideoElementWidthPropertyInfo +data DOMHTMLVideoElementGetHeightMethodInfo +data DOMHTMLVideoElementGetPosterMethodInfo +data DOMHTMLVideoElementGetVideoHeightMethodInfo +data DOMHTMLVideoElementGetVideoWidthMethodInfo +data DOMHTMLVideoElementGetWebkitDecodedFrameCountMethodInfo +data DOMHTMLVideoElementGetWebkitDisplayingFullscreenMethodInfo +data DOMHTMLVideoElementGetWebkitDroppedFrameCountMethodInfo +data DOMHTMLVideoElementGetWebkitSupportsFullscreenMethodInfo +data DOMHTMLVideoElementGetWebkitWirelessVideoPlaybackDisabledMethodInfo +data DOMHTMLVideoElementGetWidthMethodInfo +data DOMHTMLVideoElementSetHeightMethodInfo +data DOMHTMLVideoElementSetPosterMethodInfo +data DOMHTMLVideoElementSetWebkitWirelessVideoPlaybackDisabledMethodInfo +data DOMHTMLVideoElementSetWidthMethodInfo +data DOMHTMLVideoElementWebkitEnterFullScreenMethodInfo +data DOMHTMLVideoElementWebkitEnterFullscreenMethodInfo +data DOMHTMLVideoElementWebkitExitFullScreenMethodInfo +data DOMHTMLVideoElementWebkitExitFullscreenMethodInfo diff --git a/GI/WebKit/Objects/DOMHistory.hs b/GI/WebKit/Objects/DOMHistory.hs --- a/GI/WebKit/Objects/DOMHistory.hs +++ b/GI/WebKit/Objects/DOMHistory.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMHistoryBack + DOMHistoryBackMethodInfo , dOMHistoryBack , -- ** dOMHistoryForward + DOMHistoryForwardMethodInfo , dOMHistoryForward , -- ** dOMHistoryGetLength + DOMHistoryGetLengthMethodInfo , dOMHistoryGetLength , -- ** dOMHistoryGo + DOMHistoryGoMethodInfo , dOMHistoryGo , @@ -76,6 +81,43 @@ noDOMHistory :: Maybe DOMHistory noDOMHistory = Nothing +type family ResolveDOMHistoryMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMHistoryMethod "back" o = DOMHistoryBackMethodInfo + ResolveDOMHistoryMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMHistoryMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMHistoryMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMHistoryMethod "forward" o = DOMHistoryForwardMethodInfo + ResolveDOMHistoryMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMHistoryMethod "go" o = DOMHistoryGoMethodInfo + ResolveDOMHistoryMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMHistoryMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMHistoryMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMHistoryMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMHistoryMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMHistoryMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMHistoryMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMHistoryMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMHistoryMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMHistoryMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMHistoryMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMHistoryMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMHistoryMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMHistoryMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMHistoryMethod "getLength" o = DOMHistoryGetLengthMethodInfo + ResolveDOMHistoryMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMHistoryMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMHistoryMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMHistoryMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMHistoryMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMHistoryMethod t DOMHistory, MethodInfo info DOMHistory p) => IsLabelProxy t (DOMHistory -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMHistoryMethod t DOMHistory, MethodInfo info DOMHistory p) => IsLabel t (DOMHistory -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -89,22 +131,21 @@ type AttrSetTypeConstraint DOMHistoryLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMHistoryLengthPropertyInfo = DOMHistoryK type AttrGetType DOMHistoryLengthPropertyInfo = Word64 - type AttrLabel DOMHistoryLengthPropertyInfo = "DOMHistory::length" + type AttrLabel DOMHistoryLengthPropertyInfo = "length" attrGet _ = getDOMHistoryLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMHistory = DOMHistoryAttributeList -type DOMHistoryAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMHistoryLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMHistoryAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMHistoryLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMHistory = DOMHistorySignalList -type DOMHistorySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMHistorySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMHistory::back -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -116,19 +157,22 @@ dOMHistoryBack :: (MonadIO m, DOMHistoryK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHistoryBack _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_history_back _obj' touchManagedPtr _obj return () +data DOMHistoryBackMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHistoryK a) => MethodInfo DOMHistoryBackMethodInfo a signature where + overloadedMethod _ = dOMHistoryBack + -- method DOMHistory::forward -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -140,19 +184,22 @@ dOMHistoryForward :: (MonadIO m, DOMHistoryK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMHistoryForward _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_history_forward _obj' touchManagedPtr _obj return () +data DOMHistoryForwardMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMHistoryK a) => MethodInfo DOMHistoryForwardMethodInfo a signature where + overloadedMethod _ = dOMHistoryForward + -- method DOMHistory::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -164,19 +211,22 @@ dOMHistoryGetLength :: (MonadIO m, DOMHistoryK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMHistoryGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_history_get_length _obj' touchManagedPtr _obj return result +data DOMHistoryGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMHistoryK a) => MethodInfo DOMHistoryGetLengthMethodInfo a signature where + overloadedMethod _ = dOMHistoryGetLength + -- method DOMHistory::go -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "distance", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "distance", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMHistory", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "distance", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -189,13 +239,17 @@ dOMHistoryGo :: (MonadIO m, DOMHistoryK a) => - a -> -- _obj - Int64 -> -- distance - m () + a -- _obj + -> Int64 -- distance + -> m () -- result dOMHistoryGo _obj distance = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_history_go _obj' distance touchManagedPtr _obj return () + +data DOMHistoryGoMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMHistoryK a) => MethodInfo DOMHistoryGoMethodInfo a signature where + overloadedMethod _ = dOMHistoryGo diff --git a/GI/WebKit/Objects/DOMHistory.hs-boot b/GI/WebKit/Objects/DOMHistory.hs-boot --- a/GI/WebKit/Objects/DOMHistory.hs-boot +++ b/GI/WebKit/Objects/DOMHistory.hs-boot @@ -12,3 +12,7 @@ class GObject o => DOMHistoryK o instance (GObject o, IsDescendantOf DOMHistory o) => DOMHistoryK o data DOMHistoryLengthPropertyInfo +data DOMHistoryBackMethodInfo +data DOMHistoryForwardMethodInfo +data DOMHistoryGetLengthMethodInfo +data DOMHistoryGoMethodInfo diff --git a/GI/WebKit/Objects/DOMKeyboardEvent.hs b/GI/WebKit/Objects/DOMKeyboardEvent.hs --- a/GI/WebKit/Objects/DOMKeyboardEvent.hs +++ b/GI/WebKit/Objects/DOMKeyboardEvent.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,38 +18,47 @@ -- * Methods -- ** dOMKeyboardEventGetAltGraphKey + DOMKeyboardEventGetAltGraphKeyMethodInfo, dOMKeyboardEventGetAltGraphKey , -- ** dOMKeyboardEventGetAltKey + DOMKeyboardEventGetAltKeyMethodInfo , dOMKeyboardEventGetAltKey , -- ** dOMKeyboardEventGetCtrlKey + DOMKeyboardEventGetCtrlKeyMethodInfo , dOMKeyboardEventGetCtrlKey , -- ** dOMKeyboardEventGetKeyIdentifier + DOMKeyboardEventGetKeyIdentifierMethodInfo, dOMKeyboardEventGetKeyIdentifier , -- ** dOMKeyboardEventGetKeyLocation + DOMKeyboardEventGetKeyLocationMethodInfo, dOMKeyboardEventGetKeyLocation , -- ** dOMKeyboardEventGetMetaKey + DOMKeyboardEventGetMetaKeyMethodInfo , dOMKeyboardEventGetMetaKey , -- ** dOMKeyboardEventGetModifierState + DOMKeyboardEventGetModifierStateMethodInfo, dOMKeyboardEventGetModifierState , -- ** dOMKeyboardEventGetShiftKey + DOMKeyboardEventGetShiftKeyMethodInfo , dOMKeyboardEventGetShiftKey , -- ** dOMKeyboardEventInitKeyboardEvent + DOMKeyboardEventInitKeyboardEventMethodInfo, dOMKeyboardEventInitKeyboardEvent , @@ -126,6 +136,74 @@ noDOMKeyboardEvent :: Maybe DOMKeyboardEvent noDOMKeyboardEvent = Nothing +type family ResolveDOMKeyboardEventMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMKeyboardEventMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMKeyboardEventMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMKeyboardEventMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMKeyboardEventMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMKeyboardEventMethod "initEvent" o = DOMEventInitEventMethodInfo + ResolveDOMKeyboardEventMethod "initKeyboardEvent" o = DOMKeyboardEventInitKeyboardEventMethodInfo + ResolveDOMKeyboardEventMethod "initUiEvent" o = DOMUIEventInitUiEventMethodInfo + ResolveDOMKeyboardEventMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMKeyboardEventMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMKeyboardEventMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMKeyboardEventMethod "preventDefault" o = DOMEventPreventDefaultMethodInfo + ResolveDOMKeyboardEventMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMKeyboardEventMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMKeyboardEventMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMKeyboardEventMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMKeyboardEventMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMKeyboardEventMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMKeyboardEventMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMKeyboardEventMethod "stopImmediatePropagation" o = DOMEventStopImmediatePropagationMethodInfo + ResolveDOMKeyboardEventMethod "stopPropagation" o = DOMEventStopPropagationMethodInfo + ResolveDOMKeyboardEventMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMKeyboardEventMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMKeyboardEventMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMKeyboardEventMethod "getAltGraphKey" o = DOMKeyboardEventGetAltGraphKeyMethodInfo + ResolveDOMKeyboardEventMethod "getAltKey" o = DOMKeyboardEventGetAltKeyMethodInfo + ResolveDOMKeyboardEventMethod "getBubbles" o = DOMEventGetBubblesMethodInfo + ResolveDOMKeyboardEventMethod "getCancelBubble" o = DOMEventGetCancelBubbleMethodInfo + ResolveDOMKeyboardEventMethod "getCancelable" o = DOMEventGetCancelableMethodInfo + ResolveDOMKeyboardEventMethod "getCharCode" o = DOMUIEventGetCharCodeMethodInfo + ResolveDOMKeyboardEventMethod "getCtrlKey" o = DOMKeyboardEventGetCtrlKeyMethodInfo + ResolveDOMKeyboardEventMethod "getCurrentTarget" o = DOMEventGetCurrentTargetMethodInfo + ResolveDOMKeyboardEventMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMKeyboardEventMethod "getDefaultPrevented" o = DOMEventGetDefaultPreventedMethodInfo + ResolveDOMKeyboardEventMethod "getDetail" o = DOMUIEventGetDetailMethodInfo + ResolveDOMKeyboardEventMethod "getEventPhase" o = DOMEventGetEventPhaseMethodInfo + ResolveDOMKeyboardEventMethod "getKeyCode" o = DOMUIEventGetKeyCodeMethodInfo + ResolveDOMKeyboardEventMethod "getKeyIdentifier" o = DOMKeyboardEventGetKeyIdentifierMethodInfo + ResolveDOMKeyboardEventMethod "getKeyLocation" o = DOMKeyboardEventGetKeyLocationMethodInfo + ResolveDOMKeyboardEventMethod "getLayerX" o = DOMUIEventGetLayerXMethodInfo + ResolveDOMKeyboardEventMethod "getLayerY" o = DOMUIEventGetLayerYMethodInfo + ResolveDOMKeyboardEventMethod "getMetaKey" o = DOMKeyboardEventGetMetaKeyMethodInfo + ResolveDOMKeyboardEventMethod "getModifierState" o = DOMKeyboardEventGetModifierStateMethodInfo + ResolveDOMKeyboardEventMethod "getPageX" o = DOMUIEventGetPageXMethodInfo + ResolveDOMKeyboardEventMethod "getPageY" o = DOMUIEventGetPageYMethodInfo + ResolveDOMKeyboardEventMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMKeyboardEventMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMKeyboardEventMethod "getReturnValue" o = DOMEventGetReturnValueMethodInfo + ResolveDOMKeyboardEventMethod "getShiftKey" o = DOMKeyboardEventGetShiftKeyMethodInfo + ResolveDOMKeyboardEventMethod "getSrcElement" o = DOMEventGetSrcElementMethodInfo + ResolveDOMKeyboardEventMethod "getTarget" o = DOMEventGetTargetMethodInfo + ResolveDOMKeyboardEventMethod "getTimeStamp" o = DOMEventGetTimeStampMethodInfo + ResolveDOMKeyboardEventMethod "getView" o = DOMUIEventGetViewMethodInfo + ResolveDOMKeyboardEventMethod "getWhich" o = DOMUIEventGetWhichMethodInfo + ResolveDOMKeyboardEventMethod "setCancelBubble" o = DOMEventSetCancelBubbleMethodInfo + ResolveDOMKeyboardEventMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMKeyboardEventMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMKeyboardEventMethod "setReturnValue" o = DOMEventSetReturnValueMethodInfo + ResolveDOMKeyboardEventMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMKeyboardEventMethod t DOMKeyboardEvent, MethodInfo info DOMKeyboardEvent p) => IsLabelProxy t (DOMKeyboardEvent -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMKeyboardEventMethod t DOMKeyboardEvent, MethodInfo info DOMKeyboardEvent p) => IsLabel t (DOMKeyboardEvent -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "alt-graph-key" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -139,7 +217,7 @@ type AttrSetTypeConstraint DOMKeyboardEventAltGraphKeyPropertyInfo = (~) () type AttrBaseTypeConstraint DOMKeyboardEventAltGraphKeyPropertyInfo = DOMKeyboardEventK type AttrGetType DOMKeyboardEventAltGraphKeyPropertyInfo = Bool - type AttrLabel DOMKeyboardEventAltGraphKeyPropertyInfo = "DOMKeyboardEvent::alt-graph-key" + type AttrLabel DOMKeyboardEventAltGraphKeyPropertyInfo = "alt-graph-key" attrGet _ = getDOMKeyboardEventAltGraphKey attrSet _ = undefined attrConstruct _ = undefined @@ -157,7 +235,7 @@ type AttrSetTypeConstraint DOMKeyboardEventAltKeyPropertyInfo = (~) () type AttrBaseTypeConstraint DOMKeyboardEventAltKeyPropertyInfo = DOMKeyboardEventK type AttrGetType DOMKeyboardEventAltKeyPropertyInfo = Bool - type AttrLabel DOMKeyboardEventAltKeyPropertyInfo = "DOMKeyboardEvent::alt-key" + type AttrLabel DOMKeyboardEventAltKeyPropertyInfo = "alt-key" attrGet _ = getDOMKeyboardEventAltKey attrSet _ = undefined attrConstruct _ = undefined @@ -175,7 +253,7 @@ type AttrSetTypeConstraint DOMKeyboardEventCtrlKeyPropertyInfo = (~) () type AttrBaseTypeConstraint DOMKeyboardEventCtrlKeyPropertyInfo = DOMKeyboardEventK type AttrGetType DOMKeyboardEventCtrlKeyPropertyInfo = Bool - type AttrLabel DOMKeyboardEventCtrlKeyPropertyInfo = "DOMKeyboardEvent::ctrl-key" + type AttrLabel DOMKeyboardEventCtrlKeyPropertyInfo = "ctrl-key" attrGet _ = getDOMKeyboardEventCtrlKey attrSet _ = undefined attrConstruct _ = undefined @@ -193,7 +271,7 @@ type AttrSetTypeConstraint DOMKeyboardEventKeyIdentifierPropertyInfo = (~) () type AttrBaseTypeConstraint DOMKeyboardEventKeyIdentifierPropertyInfo = DOMKeyboardEventK type AttrGetType DOMKeyboardEventKeyIdentifierPropertyInfo = T.Text - type AttrLabel DOMKeyboardEventKeyIdentifierPropertyInfo = "DOMKeyboardEvent::key-identifier" + type AttrLabel DOMKeyboardEventKeyIdentifierPropertyInfo = "key-identifier" attrGet _ = getDOMKeyboardEventKeyIdentifier attrSet _ = undefined attrConstruct _ = undefined @@ -211,7 +289,7 @@ type AttrSetTypeConstraint DOMKeyboardEventKeyLocationPropertyInfo = (~) () type AttrBaseTypeConstraint DOMKeyboardEventKeyLocationPropertyInfo = DOMKeyboardEventK type AttrGetType DOMKeyboardEventKeyLocationPropertyInfo = Word64 - type AttrLabel DOMKeyboardEventKeyLocationPropertyInfo = "DOMKeyboardEvent::key-location" + type AttrLabel DOMKeyboardEventKeyLocationPropertyInfo = "key-location" attrGet _ = getDOMKeyboardEventKeyLocation attrSet _ = undefined attrConstruct _ = undefined @@ -229,7 +307,7 @@ type AttrSetTypeConstraint DOMKeyboardEventMetaKeyPropertyInfo = (~) () type AttrBaseTypeConstraint DOMKeyboardEventMetaKeyPropertyInfo = DOMKeyboardEventK type AttrGetType DOMKeyboardEventMetaKeyPropertyInfo = Bool - type AttrLabel DOMKeyboardEventMetaKeyPropertyInfo = "DOMKeyboardEvent::meta-key" + type AttrLabel DOMKeyboardEventMetaKeyPropertyInfo = "meta-key" attrGet _ = getDOMKeyboardEventMetaKey attrSet _ = undefined attrConstruct _ = undefined @@ -247,22 +325,21 @@ type AttrSetTypeConstraint DOMKeyboardEventShiftKeyPropertyInfo = (~) () type AttrBaseTypeConstraint DOMKeyboardEventShiftKeyPropertyInfo = DOMKeyboardEventK type AttrGetType DOMKeyboardEventShiftKeyPropertyInfo = Bool - type AttrLabel DOMKeyboardEventShiftKeyPropertyInfo = "DOMKeyboardEvent::shift-key" + type AttrLabel DOMKeyboardEventShiftKeyPropertyInfo = "shift-key" attrGet _ = getDOMKeyboardEventShiftKey attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMKeyboardEvent = DOMKeyboardEventAttributeList -type DOMKeyboardEventAttributeList = ('[ '("alt-graph-key", DOMKeyboardEventAltGraphKeyPropertyInfo), '("alt-key", DOMKeyboardEventAltKeyPropertyInfo), '("bubbles", DOMEventBubblesPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("char-code", DOMUIEventCharCodePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("ctrl-key", DOMKeyboardEventCtrlKeyPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("key-code", DOMUIEventKeyCodePropertyInfo), '("key-identifier", DOMKeyboardEventKeyIdentifierPropertyInfo), '("key-location", DOMKeyboardEventKeyLocationPropertyInfo), '("layer-x", DOMUIEventLayerXPropertyInfo), '("layer-y", DOMUIEventLayerYPropertyInfo), '("meta-key", DOMKeyboardEventMetaKeyPropertyInfo), '("page-x", DOMUIEventPageXPropertyInfo), '("page-y", DOMUIEventPageYPropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("shift-key", DOMKeyboardEventShiftKeyPropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("which", DOMUIEventWhichPropertyInfo)] :: [(Symbol, *)]) +type DOMKeyboardEventAttributeList = ('[ '("altGraphKey", DOMKeyboardEventAltGraphKeyPropertyInfo), '("altKey", DOMKeyboardEventAltKeyPropertyInfo), '("bubbles", DOMEventBubblesPropertyInfo), '("cancelBubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("charCode", DOMUIEventCharCodePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("ctrlKey", DOMKeyboardEventCtrlKeyPropertyInfo), '("currentTarget", DOMEventCurrentTargetPropertyInfo), '("defaultPrevented", DOMEventDefaultPreventedPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("eventPhase", DOMEventEventPhasePropertyInfo), '("keyCode", DOMUIEventKeyCodePropertyInfo), '("keyIdentifier", DOMKeyboardEventKeyIdentifierPropertyInfo), '("keyLocation", DOMKeyboardEventKeyLocationPropertyInfo), '("layerX", DOMUIEventLayerXPropertyInfo), '("layerY", DOMUIEventLayerYPropertyInfo), '("metaKey", DOMKeyboardEventMetaKeyPropertyInfo), '("pageX", DOMUIEventPageXPropertyInfo), '("pageY", DOMUIEventPageYPropertyInfo), '("returnValue", DOMEventReturnValuePropertyInfo), '("shiftKey", DOMKeyboardEventShiftKeyPropertyInfo), '("srcElement", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("timeStamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("which", DOMUIEventWhichPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMKeyboardEvent = DOMKeyboardEventSignalList -type DOMKeyboardEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMKeyboardEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMKeyboardEvent::get_alt_graph_key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -274,8 +351,8 @@ dOMKeyboardEventGetAltGraphKey :: (MonadIO m, DOMKeyboardEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMKeyboardEventGetAltGraphKey _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_keyboard_event_get_alt_graph_key _obj' @@ -283,11 +360,14 @@ touchManagedPtr _obj return result' +data DOMKeyboardEventGetAltGraphKeyMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMKeyboardEventK a) => MethodInfo DOMKeyboardEventGetAltGraphKeyMethodInfo a signature where + overloadedMethod _ = dOMKeyboardEventGetAltGraphKey + -- method DOMKeyboardEvent::get_alt_key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -299,8 +379,8 @@ dOMKeyboardEventGetAltKey :: (MonadIO m, DOMKeyboardEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMKeyboardEventGetAltKey _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_keyboard_event_get_alt_key _obj' @@ -308,11 +388,14 @@ touchManagedPtr _obj return result' +data DOMKeyboardEventGetAltKeyMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMKeyboardEventK a) => MethodInfo DOMKeyboardEventGetAltKeyMethodInfo a signature where + overloadedMethod _ = dOMKeyboardEventGetAltKey + -- method DOMKeyboardEvent::get_ctrl_key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -324,8 +407,8 @@ dOMKeyboardEventGetCtrlKey :: (MonadIO m, DOMKeyboardEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMKeyboardEventGetCtrlKey _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_keyboard_event_get_ctrl_key _obj' @@ -333,11 +416,14 @@ touchManagedPtr _obj return result' +data DOMKeyboardEventGetCtrlKeyMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMKeyboardEventK a) => MethodInfo DOMKeyboardEventGetCtrlKeyMethodInfo a signature where + overloadedMethod _ = dOMKeyboardEventGetCtrlKey + -- method DOMKeyboardEvent::get_key_identifier -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -349,8 +435,8 @@ dOMKeyboardEventGetKeyIdentifier :: (MonadIO m, DOMKeyboardEventK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMKeyboardEventGetKeyIdentifier _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_keyboard_event_get_key_identifier _obj' @@ -360,11 +446,14 @@ touchManagedPtr _obj return result' +data DOMKeyboardEventGetKeyIdentifierMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMKeyboardEventK a) => MethodInfo DOMKeyboardEventGetKeyIdentifierMethodInfo a signature where + overloadedMethod _ = dOMKeyboardEventGetKeyIdentifier + -- method DOMKeyboardEvent::get_key_location -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -376,19 +465,22 @@ dOMKeyboardEventGetKeyLocation :: (MonadIO m, DOMKeyboardEventK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMKeyboardEventGetKeyLocation _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_keyboard_event_get_key_location _obj' touchManagedPtr _obj return result +data DOMKeyboardEventGetKeyLocationMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMKeyboardEventK a) => MethodInfo DOMKeyboardEventGetKeyLocationMethodInfo a signature where + overloadedMethod _ = dOMKeyboardEventGetKeyLocation + -- method DOMKeyboardEvent::get_meta_key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -400,8 +492,8 @@ dOMKeyboardEventGetMetaKey :: (MonadIO m, DOMKeyboardEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMKeyboardEventGetMetaKey _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_keyboard_event_get_meta_key _obj' @@ -409,11 +501,14 @@ touchManagedPtr _obj return result' +data DOMKeyboardEventGetMetaKeyMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMKeyboardEventK a) => MethodInfo DOMKeyboardEventGetMetaKeyMethodInfo a signature where + overloadedMethod _ = dOMKeyboardEventGetMetaKey + -- method DOMKeyboardEvent::get_modifier_state -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "keyIdentifierArg", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "keyIdentifierArg", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "keyIdentifierArg", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -426,9 +521,9 @@ dOMKeyboardEventGetModifierState :: (MonadIO m, DOMKeyboardEventK a) => - a -> -- _obj - T.Text -> -- keyIdentifierArg - m Bool + a -- _obj + -> T.Text -- keyIdentifierArg + -> m Bool -- result dOMKeyboardEventGetModifierState _obj keyIdentifierArg = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj keyIdentifierArg' <- textToCString keyIdentifierArg @@ -438,11 +533,14 @@ freeMem keyIdentifierArg' return result' +data DOMKeyboardEventGetModifierStateMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMKeyboardEventK a) => MethodInfo DOMKeyboardEventGetModifierStateMethodInfo a signature where + overloadedMethod _ = dOMKeyboardEventGetModifierState + -- method DOMKeyboardEvent::get_shift_key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -454,8 +552,8 @@ dOMKeyboardEventGetShiftKey :: (MonadIO m, DOMKeyboardEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMKeyboardEventGetShiftKey _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_keyboard_event_get_shift_key _obj' @@ -463,11 +561,14 @@ touchManagedPtr _obj return result' +data DOMKeyboardEventGetShiftKeyMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMKeyboardEventK a) => MethodInfo DOMKeyboardEventGetShiftKeyMethodInfo a signature where + overloadedMethod _ = dOMKeyboardEventGetShiftKey + -- method DOMKeyboardEvent::init_keyboard_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "canBubble", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cancelable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "keyIdentifier", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "location", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "ctrlKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "altKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "shiftKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "metaKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "altGraphKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "canBubble", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cancelable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "keyIdentifier", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "location", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "ctrlKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "altKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "shiftKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "metaKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "altGraphKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMKeyboardEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "canBubble", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cancelable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "keyIdentifier", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "location", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "ctrlKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "altKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "shiftKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "metaKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "altGraphKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -490,19 +591,19 @@ dOMKeyboardEventInitKeyboardEvent :: (MonadIO m, DOMKeyboardEventK a, DOMDOMWindowK b) => - a -> -- _obj - T.Text -> -- type - Bool -> -- canBubble - Bool -> -- cancelable - b -> -- view - T.Text -> -- keyIdentifier - Word64 -> -- location - Bool -> -- ctrlKey - Bool -> -- altKey - Bool -> -- shiftKey - Bool -> -- metaKey - Bool -> -- altGraphKey - m () + a -- _obj + -> T.Text -- type_ + -> Bool -- canBubble + -> Bool -- cancelable + -> b -- view + -> T.Text -- keyIdentifier + -> Word64 -- location + -> Bool -- ctrlKey + -> Bool -- altKey + -> Bool -- shiftKey + -> Bool -- metaKey + -> Bool -- altGraphKey + -> m () -- result dOMKeyboardEventInitKeyboardEvent _obj type_ canBubble cancelable view keyIdentifier location ctrlKey altKey shiftKey metaKey altGraphKey = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj type_' <- textToCString type_ @@ -521,5 +622,9 @@ freeMem type_' freeMem keyIdentifier' return () + +data DOMKeyboardEventInitKeyboardEventMethodInfo +instance (signature ~ (T.Text -> Bool -> Bool -> b -> T.Text -> Word64 -> Bool -> Bool -> Bool -> Bool -> Bool -> m ()), MonadIO m, DOMKeyboardEventK a, DOMDOMWindowK b) => MethodInfo DOMKeyboardEventInitKeyboardEventMethodInfo a signature where + overloadedMethod _ = dOMKeyboardEventInitKeyboardEvent diff --git a/GI/WebKit/Objects/DOMKeyboardEvent.hs-boot b/GI/WebKit/Objects/DOMKeyboardEvent.hs-boot --- a/GI/WebKit/Objects/DOMKeyboardEvent.hs-boot +++ b/GI/WebKit/Objects/DOMKeyboardEvent.hs-boot @@ -18,3 +18,12 @@ data DOMKeyboardEventKeyLocationPropertyInfo data DOMKeyboardEventMetaKeyPropertyInfo data DOMKeyboardEventShiftKeyPropertyInfo +data DOMKeyboardEventGetAltGraphKeyMethodInfo +data DOMKeyboardEventGetAltKeyMethodInfo +data DOMKeyboardEventGetCtrlKeyMethodInfo +data DOMKeyboardEventGetKeyIdentifierMethodInfo +data DOMKeyboardEventGetKeyLocationMethodInfo +data DOMKeyboardEventGetMetaKeyMethodInfo +data DOMKeyboardEventGetModifierStateMethodInfo +data DOMKeyboardEventGetShiftKeyMethodInfo +data DOMKeyboardEventInitKeyboardEventMethodInfo diff --git a/GI/WebKit/Objects/DOMLocation.hs b/GI/WebKit/Objects/DOMLocation.hs --- a/GI/WebKit/Objects/DOMLocation.hs +++ b/GI/WebKit/Objects/DOMLocation.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,42 +18,52 @@ -- * Methods -- ** dOMLocationGetAncestorOrigins + DOMLocationGetAncestorOriginsMethodInfo , dOMLocationGetAncestorOrigins , -- ** dOMLocationGetHash + DOMLocationGetHashMethodInfo , dOMLocationGetHash , -- ** dOMLocationGetHost + DOMLocationGetHostMethodInfo , dOMLocationGetHost , -- ** dOMLocationGetHostname + DOMLocationGetHostnameMethodInfo , dOMLocationGetHostname , -- ** dOMLocationGetHref + DOMLocationGetHrefMethodInfo , dOMLocationGetHref , -- ** dOMLocationGetOrigin + DOMLocationGetOriginMethodInfo , dOMLocationGetOrigin , -- ** dOMLocationGetPathname + DOMLocationGetPathnameMethodInfo , dOMLocationGetPathname , -- ** dOMLocationGetPort + DOMLocationGetPortMethodInfo , dOMLocationGetPort , -- ** dOMLocationGetProtocol + DOMLocationGetProtocolMethodInfo , dOMLocationGetProtocol , -- ** dOMLocationGetSearch + DOMLocationGetSearchMethodInfo , dOMLocationGetSearch , @@ -145,6 +156,49 @@ noDOMLocation :: Maybe DOMLocation noDOMLocation = Nothing +type family ResolveDOMLocationMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMLocationMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMLocationMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMLocationMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMLocationMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMLocationMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMLocationMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMLocationMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMLocationMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMLocationMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMLocationMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMLocationMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMLocationMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMLocationMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMLocationMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMLocationMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMLocationMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMLocationMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMLocationMethod "getAncestorOrigins" o = DOMLocationGetAncestorOriginsMethodInfo + ResolveDOMLocationMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMLocationMethod "getHash" o = DOMLocationGetHashMethodInfo + ResolveDOMLocationMethod "getHost" o = DOMLocationGetHostMethodInfo + ResolveDOMLocationMethod "getHostname" o = DOMLocationGetHostnameMethodInfo + ResolveDOMLocationMethod "getHref" o = DOMLocationGetHrefMethodInfo + ResolveDOMLocationMethod "getOrigin" o = DOMLocationGetOriginMethodInfo + ResolveDOMLocationMethod "getPathname" o = DOMLocationGetPathnameMethodInfo + ResolveDOMLocationMethod "getPort" o = DOMLocationGetPortMethodInfo + ResolveDOMLocationMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMLocationMethod "getProtocol" o = DOMLocationGetProtocolMethodInfo + ResolveDOMLocationMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMLocationMethod "getSearch" o = DOMLocationGetSearchMethodInfo + ResolveDOMLocationMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMLocationMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMLocationMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMLocationMethod t DOMLocation, MethodInfo info DOMLocation p) => IsLabelProxy t (DOMLocation -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMLocationMethod t DOMLocation, MethodInfo info DOMLocation p) => IsLabel t (DOMLocation -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "ancestor-origins" -- Type: TInterface "WebKit" "DOMDOMStringList" -- Flags: [PropertyReadable] @@ -158,7 +212,7 @@ type AttrSetTypeConstraint DOMLocationAncestorOriginsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMLocationAncestorOriginsPropertyInfo = DOMLocationK type AttrGetType DOMLocationAncestorOriginsPropertyInfo = DOMDOMStringList - type AttrLabel DOMLocationAncestorOriginsPropertyInfo = "DOMLocation::ancestor-origins" + type AttrLabel DOMLocationAncestorOriginsPropertyInfo = "ancestor-origins" attrGet _ = getDOMLocationAncestorOrigins attrSet _ = undefined attrConstruct _ = undefined @@ -176,7 +230,7 @@ type AttrSetTypeConstraint DOMLocationHashPropertyInfo = (~) () type AttrBaseTypeConstraint DOMLocationHashPropertyInfo = DOMLocationK type AttrGetType DOMLocationHashPropertyInfo = T.Text - type AttrLabel DOMLocationHashPropertyInfo = "DOMLocation::hash" + type AttrLabel DOMLocationHashPropertyInfo = "hash" attrGet _ = getDOMLocationHash attrSet _ = undefined attrConstruct _ = undefined @@ -194,7 +248,7 @@ type AttrSetTypeConstraint DOMLocationHostPropertyInfo = (~) () type AttrBaseTypeConstraint DOMLocationHostPropertyInfo = DOMLocationK type AttrGetType DOMLocationHostPropertyInfo = T.Text - type AttrLabel DOMLocationHostPropertyInfo = "DOMLocation::host" + type AttrLabel DOMLocationHostPropertyInfo = "host" attrGet _ = getDOMLocationHost attrSet _ = undefined attrConstruct _ = undefined @@ -212,7 +266,7 @@ type AttrSetTypeConstraint DOMLocationHostnamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMLocationHostnamePropertyInfo = DOMLocationK type AttrGetType DOMLocationHostnamePropertyInfo = T.Text - type AttrLabel DOMLocationHostnamePropertyInfo = "DOMLocation::hostname" + type AttrLabel DOMLocationHostnamePropertyInfo = "hostname" attrGet _ = getDOMLocationHostname attrSet _ = undefined attrConstruct _ = undefined @@ -230,7 +284,7 @@ type AttrSetTypeConstraint DOMLocationHrefPropertyInfo = (~) () type AttrBaseTypeConstraint DOMLocationHrefPropertyInfo = DOMLocationK type AttrGetType DOMLocationHrefPropertyInfo = T.Text - type AttrLabel DOMLocationHrefPropertyInfo = "DOMLocation::href" + type AttrLabel DOMLocationHrefPropertyInfo = "href" attrGet _ = getDOMLocationHref attrSet _ = undefined attrConstruct _ = undefined @@ -248,7 +302,7 @@ type AttrSetTypeConstraint DOMLocationOriginPropertyInfo = (~) () type AttrBaseTypeConstraint DOMLocationOriginPropertyInfo = DOMLocationK type AttrGetType DOMLocationOriginPropertyInfo = T.Text - type AttrLabel DOMLocationOriginPropertyInfo = "DOMLocation::origin" + type AttrLabel DOMLocationOriginPropertyInfo = "origin" attrGet _ = getDOMLocationOrigin attrSet _ = undefined attrConstruct _ = undefined @@ -266,7 +320,7 @@ type AttrSetTypeConstraint DOMLocationPathnamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMLocationPathnamePropertyInfo = DOMLocationK type AttrGetType DOMLocationPathnamePropertyInfo = T.Text - type AttrLabel DOMLocationPathnamePropertyInfo = "DOMLocation::pathname" + type AttrLabel DOMLocationPathnamePropertyInfo = "pathname" attrGet _ = getDOMLocationPathname attrSet _ = undefined attrConstruct _ = undefined @@ -284,7 +338,7 @@ type AttrSetTypeConstraint DOMLocationPortPropertyInfo = (~) () type AttrBaseTypeConstraint DOMLocationPortPropertyInfo = DOMLocationK type AttrGetType DOMLocationPortPropertyInfo = T.Text - type AttrLabel DOMLocationPortPropertyInfo = "DOMLocation::port" + type AttrLabel DOMLocationPortPropertyInfo = "port" attrGet _ = getDOMLocationPort attrSet _ = undefined attrConstruct _ = undefined @@ -302,7 +356,7 @@ type AttrSetTypeConstraint DOMLocationProtocolPropertyInfo = (~) () type AttrBaseTypeConstraint DOMLocationProtocolPropertyInfo = DOMLocationK type AttrGetType DOMLocationProtocolPropertyInfo = T.Text - type AttrLabel DOMLocationProtocolPropertyInfo = "DOMLocation::protocol" + type AttrLabel DOMLocationProtocolPropertyInfo = "protocol" attrGet _ = getDOMLocationProtocol attrSet _ = undefined attrConstruct _ = undefined @@ -320,22 +374,21 @@ type AttrSetTypeConstraint DOMLocationSearchPropertyInfo = (~) () type AttrBaseTypeConstraint DOMLocationSearchPropertyInfo = DOMLocationK type AttrGetType DOMLocationSearchPropertyInfo = T.Text - type AttrLabel DOMLocationSearchPropertyInfo = "DOMLocation::search" + type AttrLabel DOMLocationSearchPropertyInfo = "search" attrGet _ = getDOMLocationSearch attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMLocation = DOMLocationAttributeList -type DOMLocationAttributeList = ('[ '("ancestor-origins", DOMLocationAncestorOriginsPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("hash", DOMLocationHashPropertyInfo), '("host", DOMLocationHostPropertyInfo), '("hostname", DOMLocationHostnamePropertyInfo), '("href", DOMLocationHrefPropertyInfo), '("origin", DOMLocationOriginPropertyInfo), '("pathname", DOMLocationPathnamePropertyInfo), '("port", DOMLocationPortPropertyInfo), '("protocol", DOMLocationProtocolPropertyInfo), '("search", DOMLocationSearchPropertyInfo)] :: [(Symbol, *)]) +type DOMLocationAttributeList = ('[ '("ancestorOrigins", DOMLocationAncestorOriginsPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("hash", DOMLocationHashPropertyInfo), '("host", DOMLocationHostPropertyInfo), '("hostname", DOMLocationHostnamePropertyInfo), '("href", DOMLocationHrefPropertyInfo), '("origin", DOMLocationOriginPropertyInfo), '("pathname", DOMLocationPathnamePropertyInfo), '("port", DOMLocationPortPropertyInfo), '("protocol", DOMLocationProtocolPropertyInfo), '("search", DOMLocationSearchPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMLocation = DOMLocationSignalList -type DOMLocationSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMLocationSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMLocation::get_ancestor_origins -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMStringList" -- throws : False -- Skip return : False @@ -347,8 +400,8 @@ dOMLocationGetAncestorOrigins :: (MonadIO m, DOMLocationK a) => - a -> -- _obj - m DOMDOMStringList + a -- _obj + -> m DOMDOMStringList -- result dOMLocationGetAncestorOrigins _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_location_get_ancestor_origins _obj' @@ -357,11 +410,14 @@ touchManagedPtr _obj return result' +data DOMLocationGetAncestorOriginsMethodInfo +instance (signature ~ (m DOMDOMStringList), MonadIO m, DOMLocationK a) => MethodInfo DOMLocationGetAncestorOriginsMethodInfo a signature where + overloadedMethod _ = dOMLocationGetAncestorOrigins + -- method DOMLocation::get_hash -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -373,8 +429,8 @@ dOMLocationGetHash :: (MonadIO m, DOMLocationK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMLocationGetHash _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_location_get_hash _obj' @@ -384,11 +440,14 @@ touchManagedPtr _obj return result' +data DOMLocationGetHashMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMLocationK a) => MethodInfo DOMLocationGetHashMethodInfo a signature where + overloadedMethod _ = dOMLocationGetHash + -- method DOMLocation::get_host -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -400,8 +459,8 @@ dOMLocationGetHost :: (MonadIO m, DOMLocationK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMLocationGetHost _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_location_get_host _obj' @@ -411,11 +470,14 @@ touchManagedPtr _obj return result' +data DOMLocationGetHostMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMLocationK a) => MethodInfo DOMLocationGetHostMethodInfo a signature where + overloadedMethod _ = dOMLocationGetHost + -- method DOMLocation::get_hostname -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -427,8 +489,8 @@ dOMLocationGetHostname :: (MonadIO m, DOMLocationK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMLocationGetHostname _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_location_get_hostname _obj' @@ -438,11 +500,14 @@ touchManagedPtr _obj return result' +data DOMLocationGetHostnameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMLocationK a) => MethodInfo DOMLocationGetHostnameMethodInfo a signature where + overloadedMethod _ = dOMLocationGetHostname + -- method DOMLocation::get_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -454,8 +519,8 @@ dOMLocationGetHref :: (MonadIO m, DOMLocationK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMLocationGetHref _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_location_get_href _obj' @@ -465,11 +530,14 @@ touchManagedPtr _obj return result' +data DOMLocationGetHrefMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMLocationK a) => MethodInfo DOMLocationGetHrefMethodInfo a signature where + overloadedMethod _ = dOMLocationGetHref + -- method DOMLocation::get_origin -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -481,8 +549,8 @@ dOMLocationGetOrigin :: (MonadIO m, DOMLocationK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMLocationGetOrigin _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_location_get_origin _obj' @@ -492,11 +560,14 @@ touchManagedPtr _obj return result' +data DOMLocationGetOriginMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMLocationK a) => MethodInfo DOMLocationGetOriginMethodInfo a signature where + overloadedMethod _ = dOMLocationGetOrigin + -- method DOMLocation::get_pathname -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -508,8 +579,8 @@ dOMLocationGetPathname :: (MonadIO m, DOMLocationK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMLocationGetPathname _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_location_get_pathname _obj' @@ -519,11 +590,14 @@ touchManagedPtr _obj return result' +data DOMLocationGetPathnameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMLocationK a) => MethodInfo DOMLocationGetPathnameMethodInfo a signature where + overloadedMethod _ = dOMLocationGetPathname + -- method DOMLocation::get_port -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -535,8 +609,8 @@ dOMLocationGetPort :: (MonadIO m, DOMLocationK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMLocationGetPort _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_location_get_port _obj' @@ -546,11 +620,14 @@ touchManagedPtr _obj return result' +data DOMLocationGetPortMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMLocationK a) => MethodInfo DOMLocationGetPortMethodInfo a signature where + overloadedMethod _ = dOMLocationGetPort + -- method DOMLocation::get_protocol -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -562,8 +639,8 @@ dOMLocationGetProtocol :: (MonadIO m, DOMLocationK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMLocationGetProtocol _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_location_get_protocol _obj' @@ -573,11 +650,14 @@ touchManagedPtr _obj return result' +data DOMLocationGetProtocolMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMLocationK a) => MethodInfo DOMLocationGetProtocolMethodInfo a signature where + overloadedMethod _ = dOMLocationGetProtocol + -- method DOMLocation::get_search -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMLocation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -589,8 +669,8 @@ dOMLocationGetSearch :: (MonadIO m, DOMLocationK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMLocationGetSearch _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_location_get_search _obj' @@ -599,5 +679,9 @@ freeMem result touchManagedPtr _obj return result' + +data DOMLocationGetSearchMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMLocationK a) => MethodInfo DOMLocationGetSearchMethodInfo a signature where + overloadedMethod _ = dOMLocationGetSearch diff --git a/GI/WebKit/Objects/DOMLocation.hs-boot b/GI/WebKit/Objects/DOMLocation.hs-boot --- a/GI/WebKit/Objects/DOMLocation.hs-boot +++ b/GI/WebKit/Objects/DOMLocation.hs-boot @@ -21,3 +21,13 @@ data DOMLocationPortPropertyInfo data DOMLocationProtocolPropertyInfo data DOMLocationSearchPropertyInfo +data DOMLocationGetAncestorOriginsMethodInfo +data DOMLocationGetHashMethodInfo +data DOMLocationGetHostMethodInfo +data DOMLocationGetHostnameMethodInfo +data DOMLocationGetHrefMethodInfo +data DOMLocationGetOriginMethodInfo +data DOMLocationGetPathnameMethodInfo +data DOMLocationGetPortMethodInfo +data DOMLocationGetProtocolMethodInfo +data DOMLocationGetSearchMethodInfo diff --git a/GI/WebKit/Objects/DOMMediaController.hs b/GI/WebKit/Objects/DOMMediaController.hs --- a/GI/WebKit/Objects/DOMMediaController.hs +++ b/GI/WebKit/Objects/DOMMediaController.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,78 +18,97 @@ -- * Methods -- ** dOMMediaControllerGetBuffered + DOMMediaControllerGetBufferedMethodInfo , dOMMediaControllerGetBuffered , -- ** dOMMediaControllerGetCurrentTime + DOMMediaControllerGetCurrentTimeMethodInfo, dOMMediaControllerGetCurrentTime , -- ** dOMMediaControllerGetDefaultPlaybackRate + DOMMediaControllerGetDefaultPlaybackRateMethodInfo, dOMMediaControllerGetDefaultPlaybackRate, -- ** dOMMediaControllerGetDuration + DOMMediaControllerGetDurationMethodInfo , dOMMediaControllerGetDuration , -- ** dOMMediaControllerGetMuted + DOMMediaControllerGetMutedMethodInfo , dOMMediaControllerGetMuted , -- ** dOMMediaControllerGetPaused + DOMMediaControllerGetPausedMethodInfo , dOMMediaControllerGetPaused , -- ** dOMMediaControllerGetPlaybackRate + DOMMediaControllerGetPlaybackRateMethodInfo, dOMMediaControllerGetPlaybackRate , -- ** dOMMediaControllerGetPlaybackState + DOMMediaControllerGetPlaybackStateMethodInfo, dOMMediaControllerGetPlaybackState , -- ** dOMMediaControllerGetPlayed + DOMMediaControllerGetPlayedMethodInfo , dOMMediaControllerGetPlayed , -- ** dOMMediaControllerGetSeekable + DOMMediaControllerGetSeekableMethodInfo , dOMMediaControllerGetSeekable , -- ** dOMMediaControllerGetVolume + DOMMediaControllerGetVolumeMethodInfo , dOMMediaControllerGetVolume , -- ** dOMMediaControllerPause + DOMMediaControllerPauseMethodInfo , dOMMediaControllerPause , -- ** dOMMediaControllerPlay + DOMMediaControllerPlayMethodInfo , dOMMediaControllerPlay , -- ** dOMMediaControllerSetCurrentTime + DOMMediaControllerSetCurrentTimeMethodInfo, dOMMediaControllerSetCurrentTime , -- ** dOMMediaControllerSetDefaultPlaybackRate + DOMMediaControllerSetDefaultPlaybackRateMethodInfo, dOMMediaControllerSetDefaultPlaybackRate, -- ** dOMMediaControllerSetMuted + DOMMediaControllerSetMutedMethodInfo , dOMMediaControllerSetMuted , -- ** dOMMediaControllerSetPlaybackRate + DOMMediaControllerSetPlaybackRateMethodInfo, dOMMediaControllerSetPlaybackRate , -- ** dOMMediaControllerSetVolume + DOMMediaControllerSetVolumeMethodInfo , dOMMediaControllerSetVolume , -- ** dOMMediaControllerUnpause + DOMMediaControllerUnpauseMethodInfo , dOMMediaControllerUnpause , @@ -196,6 +216,61 @@ noDOMMediaController :: Maybe DOMMediaController noDOMMediaController = Nothing +type family ResolveDOMMediaControllerMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMMediaControllerMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMMediaControllerMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMMediaControllerMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMMediaControllerMethod "dispatchEvent" o = DOMEventTargetDispatchEventMethodInfo + ResolveDOMMediaControllerMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMMediaControllerMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMMediaControllerMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMMediaControllerMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMMediaControllerMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMMediaControllerMethod "pause" o = DOMMediaControllerPauseMethodInfo + ResolveDOMMediaControllerMethod "play" o = DOMMediaControllerPlayMethodInfo + ResolveDOMMediaControllerMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMMediaControllerMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMMediaControllerMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMMediaControllerMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMMediaControllerMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMMediaControllerMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMMediaControllerMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMMediaControllerMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMMediaControllerMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMMediaControllerMethod "unpause" o = DOMMediaControllerUnpauseMethodInfo + ResolveDOMMediaControllerMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMMediaControllerMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMMediaControllerMethod "getBuffered" o = DOMMediaControllerGetBufferedMethodInfo + ResolveDOMMediaControllerMethod "getCurrentTime" o = DOMMediaControllerGetCurrentTimeMethodInfo + ResolveDOMMediaControllerMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMMediaControllerMethod "getDefaultPlaybackRate" o = DOMMediaControllerGetDefaultPlaybackRateMethodInfo + ResolveDOMMediaControllerMethod "getDuration" o = DOMMediaControllerGetDurationMethodInfo + ResolveDOMMediaControllerMethod "getMuted" o = DOMMediaControllerGetMutedMethodInfo + ResolveDOMMediaControllerMethod "getPaused" o = DOMMediaControllerGetPausedMethodInfo + ResolveDOMMediaControllerMethod "getPlaybackRate" o = DOMMediaControllerGetPlaybackRateMethodInfo + ResolveDOMMediaControllerMethod "getPlaybackState" o = DOMMediaControllerGetPlaybackStateMethodInfo + ResolveDOMMediaControllerMethod "getPlayed" o = DOMMediaControllerGetPlayedMethodInfo + ResolveDOMMediaControllerMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMMediaControllerMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMMediaControllerMethod "getSeekable" o = DOMMediaControllerGetSeekableMethodInfo + ResolveDOMMediaControllerMethod "getVolume" o = DOMMediaControllerGetVolumeMethodInfo + ResolveDOMMediaControllerMethod "setCurrentTime" o = DOMMediaControllerSetCurrentTimeMethodInfo + ResolveDOMMediaControllerMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMMediaControllerMethod "setDefaultPlaybackRate" o = DOMMediaControllerSetDefaultPlaybackRateMethodInfo + ResolveDOMMediaControllerMethod "setMuted" o = DOMMediaControllerSetMutedMethodInfo + ResolveDOMMediaControllerMethod "setPlaybackRate" o = DOMMediaControllerSetPlaybackRateMethodInfo + ResolveDOMMediaControllerMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMMediaControllerMethod "setVolume" o = DOMMediaControllerSetVolumeMethodInfo + ResolveDOMMediaControllerMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMMediaControllerMethod t DOMMediaController, MethodInfo info DOMMediaController p) => IsLabelProxy t (DOMMediaController -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMMediaControllerMethod t DOMMediaController, MethodInfo info DOMMediaController p) => IsLabel t (DOMMediaController -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "buffered" -- Type: TInterface "WebKit" "DOMTimeRanges" -- Flags: [PropertyReadable] @@ -209,7 +284,7 @@ type AttrSetTypeConstraint DOMMediaControllerBufferedPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMediaControllerBufferedPropertyInfo = DOMMediaControllerK type AttrGetType DOMMediaControllerBufferedPropertyInfo = DOMTimeRanges - type AttrLabel DOMMediaControllerBufferedPropertyInfo = "DOMMediaController::buffered" + type AttrLabel DOMMediaControllerBufferedPropertyInfo = "buffered" attrGet _ = getDOMMediaControllerBuffered attrSet _ = undefined attrConstruct _ = undefined @@ -233,7 +308,7 @@ type AttrSetTypeConstraint DOMMediaControllerCurrentTimePropertyInfo = (~) Double type AttrBaseTypeConstraint DOMMediaControllerCurrentTimePropertyInfo = DOMMediaControllerK type AttrGetType DOMMediaControllerCurrentTimePropertyInfo = Double - type AttrLabel DOMMediaControllerCurrentTimePropertyInfo = "DOMMediaController::current-time" + type AttrLabel DOMMediaControllerCurrentTimePropertyInfo = "current-time" attrGet _ = getDOMMediaControllerCurrentTime attrSet _ = setDOMMediaControllerCurrentTime attrConstruct _ = constructDOMMediaControllerCurrentTime @@ -257,7 +332,7 @@ type AttrSetTypeConstraint DOMMediaControllerDefaultPlaybackRatePropertyInfo = (~) Double type AttrBaseTypeConstraint DOMMediaControllerDefaultPlaybackRatePropertyInfo = DOMMediaControllerK type AttrGetType DOMMediaControllerDefaultPlaybackRatePropertyInfo = Double - type AttrLabel DOMMediaControllerDefaultPlaybackRatePropertyInfo = "DOMMediaController::default-playback-rate" + type AttrLabel DOMMediaControllerDefaultPlaybackRatePropertyInfo = "default-playback-rate" attrGet _ = getDOMMediaControllerDefaultPlaybackRate attrSet _ = setDOMMediaControllerDefaultPlaybackRate attrConstruct _ = constructDOMMediaControllerDefaultPlaybackRate @@ -275,7 +350,7 @@ type AttrSetTypeConstraint DOMMediaControllerDurationPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMediaControllerDurationPropertyInfo = DOMMediaControllerK type AttrGetType DOMMediaControllerDurationPropertyInfo = Double - type AttrLabel DOMMediaControllerDurationPropertyInfo = "DOMMediaController::duration" + type AttrLabel DOMMediaControllerDurationPropertyInfo = "duration" attrGet _ = getDOMMediaControllerDuration attrSet _ = undefined attrConstruct _ = undefined @@ -299,7 +374,7 @@ type AttrSetTypeConstraint DOMMediaControllerMutedPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMMediaControllerMutedPropertyInfo = DOMMediaControllerK type AttrGetType DOMMediaControllerMutedPropertyInfo = Bool - type AttrLabel DOMMediaControllerMutedPropertyInfo = "DOMMediaController::muted" + type AttrLabel DOMMediaControllerMutedPropertyInfo = "muted" attrGet _ = getDOMMediaControllerMuted attrSet _ = setDOMMediaControllerMuted attrConstruct _ = constructDOMMediaControllerMuted @@ -317,7 +392,7 @@ type AttrSetTypeConstraint DOMMediaControllerPausedPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMediaControllerPausedPropertyInfo = DOMMediaControllerK type AttrGetType DOMMediaControllerPausedPropertyInfo = Bool - type AttrLabel DOMMediaControllerPausedPropertyInfo = "DOMMediaController::paused" + type AttrLabel DOMMediaControllerPausedPropertyInfo = "paused" attrGet _ = getDOMMediaControllerPaused attrSet _ = undefined attrConstruct _ = undefined @@ -341,7 +416,7 @@ type AttrSetTypeConstraint DOMMediaControllerPlaybackRatePropertyInfo = (~) Double type AttrBaseTypeConstraint DOMMediaControllerPlaybackRatePropertyInfo = DOMMediaControllerK type AttrGetType DOMMediaControllerPlaybackRatePropertyInfo = Double - type AttrLabel DOMMediaControllerPlaybackRatePropertyInfo = "DOMMediaController::playback-rate" + type AttrLabel DOMMediaControllerPlaybackRatePropertyInfo = "playback-rate" attrGet _ = getDOMMediaControllerPlaybackRate attrSet _ = setDOMMediaControllerPlaybackRate attrConstruct _ = constructDOMMediaControllerPlaybackRate @@ -359,7 +434,7 @@ type AttrSetTypeConstraint DOMMediaControllerPlaybackStatePropertyInfo = (~) () type AttrBaseTypeConstraint DOMMediaControllerPlaybackStatePropertyInfo = DOMMediaControllerK type AttrGetType DOMMediaControllerPlaybackStatePropertyInfo = T.Text - type AttrLabel DOMMediaControllerPlaybackStatePropertyInfo = "DOMMediaController::playback-state" + type AttrLabel DOMMediaControllerPlaybackStatePropertyInfo = "playback-state" attrGet _ = getDOMMediaControllerPlaybackState attrSet _ = undefined attrConstruct _ = undefined @@ -377,7 +452,7 @@ type AttrSetTypeConstraint DOMMediaControllerPlayedPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMediaControllerPlayedPropertyInfo = DOMMediaControllerK type AttrGetType DOMMediaControllerPlayedPropertyInfo = DOMTimeRanges - type AttrLabel DOMMediaControllerPlayedPropertyInfo = "DOMMediaController::played" + type AttrLabel DOMMediaControllerPlayedPropertyInfo = "played" attrGet _ = getDOMMediaControllerPlayed attrSet _ = undefined attrConstruct _ = undefined @@ -395,7 +470,7 @@ type AttrSetTypeConstraint DOMMediaControllerSeekablePropertyInfo = (~) () type AttrBaseTypeConstraint DOMMediaControllerSeekablePropertyInfo = DOMMediaControllerK type AttrGetType DOMMediaControllerSeekablePropertyInfo = DOMTimeRanges - type AttrLabel DOMMediaControllerSeekablePropertyInfo = "DOMMediaController::seekable" + type AttrLabel DOMMediaControllerSeekablePropertyInfo = "seekable" attrGet _ = getDOMMediaControllerSeekable attrSet _ = undefined attrConstruct _ = undefined @@ -419,22 +494,21 @@ type AttrSetTypeConstraint DOMMediaControllerVolumePropertyInfo = (~) Double type AttrBaseTypeConstraint DOMMediaControllerVolumePropertyInfo = DOMMediaControllerK type AttrGetType DOMMediaControllerVolumePropertyInfo = Double - type AttrLabel DOMMediaControllerVolumePropertyInfo = "DOMMediaController::volume" + type AttrLabel DOMMediaControllerVolumePropertyInfo = "volume" attrGet _ = getDOMMediaControllerVolume attrSet _ = setDOMMediaControllerVolume attrConstruct _ = constructDOMMediaControllerVolume type instance AttributeList DOMMediaController = DOMMediaControllerAttributeList -type DOMMediaControllerAttributeList = ('[ '("buffered", DOMMediaControllerBufferedPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-time", DOMMediaControllerCurrentTimePropertyInfo), '("default-playback-rate", DOMMediaControllerDefaultPlaybackRatePropertyInfo), '("duration", DOMMediaControllerDurationPropertyInfo), '("muted", DOMMediaControllerMutedPropertyInfo), '("paused", DOMMediaControllerPausedPropertyInfo), '("playback-rate", DOMMediaControllerPlaybackRatePropertyInfo), '("playback-state", DOMMediaControllerPlaybackStatePropertyInfo), '("played", DOMMediaControllerPlayedPropertyInfo), '("seekable", DOMMediaControllerSeekablePropertyInfo), '("volume", DOMMediaControllerVolumePropertyInfo)] :: [(Symbol, *)]) +type DOMMediaControllerAttributeList = ('[ '("buffered", DOMMediaControllerBufferedPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentTime", DOMMediaControllerCurrentTimePropertyInfo), '("defaultPlaybackRate", DOMMediaControllerDefaultPlaybackRatePropertyInfo), '("duration", DOMMediaControllerDurationPropertyInfo), '("muted", DOMMediaControllerMutedPropertyInfo), '("paused", DOMMediaControllerPausedPropertyInfo), '("playbackRate", DOMMediaControllerPlaybackRatePropertyInfo), '("playbackState", DOMMediaControllerPlaybackStatePropertyInfo), '("played", DOMMediaControllerPlayedPropertyInfo), '("seekable", DOMMediaControllerSeekablePropertyInfo), '("volume", DOMMediaControllerVolumePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMMediaController = DOMMediaControllerSignalList -type DOMMediaControllerSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMMediaControllerSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMMediaController::get_buffered -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMTimeRanges" -- throws : False -- Skip return : False @@ -446,8 +520,8 @@ dOMMediaControllerGetBuffered :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m DOMTimeRanges + a -- _obj + -> m DOMTimeRanges -- result dOMMediaControllerGetBuffered _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_controller_get_buffered _obj' @@ -456,11 +530,14 @@ touchManagedPtr _obj return result' +data DOMMediaControllerGetBufferedMethodInfo +instance (signature ~ (m DOMTimeRanges), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerGetBufferedMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerGetBuffered + -- method DOMMediaController::get_current_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -472,8 +549,8 @@ dOMMediaControllerGetCurrentTime :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMMediaControllerGetCurrentTime _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_controller_get_current_time _obj' @@ -481,11 +558,14 @@ touchManagedPtr _obj return result' +data DOMMediaControllerGetCurrentTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerGetCurrentTimeMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerGetCurrentTime + -- method DOMMediaController::get_default_playback_rate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -497,8 +577,8 @@ dOMMediaControllerGetDefaultPlaybackRate :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMMediaControllerGetDefaultPlaybackRate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_controller_get_default_playback_rate _obj' @@ -506,11 +586,14 @@ touchManagedPtr _obj return result' +data DOMMediaControllerGetDefaultPlaybackRateMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerGetDefaultPlaybackRateMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerGetDefaultPlaybackRate + -- method DOMMediaController::get_duration -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -522,8 +605,8 @@ dOMMediaControllerGetDuration :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMMediaControllerGetDuration _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_controller_get_duration _obj' @@ -531,11 +614,14 @@ touchManagedPtr _obj return result' +data DOMMediaControllerGetDurationMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerGetDurationMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerGetDuration + -- method DOMMediaController::get_muted -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -547,8 +633,8 @@ dOMMediaControllerGetMuted :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMMediaControllerGetMuted _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_controller_get_muted _obj' @@ -556,11 +642,14 @@ touchManagedPtr _obj return result' +data DOMMediaControllerGetMutedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerGetMutedMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerGetMuted + -- method DOMMediaController::get_paused -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -572,8 +661,8 @@ dOMMediaControllerGetPaused :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMMediaControllerGetPaused _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_controller_get_paused _obj' @@ -581,11 +670,14 @@ touchManagedPtr _obj return result' +data DOMMediaControllerGetPausedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerGetPausedMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerGetPaused + -- method DOMMediaController::get_playback_rate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -597,8 +689,8 @@ dOMMediaControllerGetPlaybackRate :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMMediaControllerGetPlaybackRate _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_controller_get_playback_rate _obj' @@ -606,11 +698,14 @@ touchManagedPtr _obj return result' +data DOMMediaControllerGetPlaybackRateMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerGetPlaybackRateMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerGetPlaybackRate + -- method DOMMediaController::get_playback_state -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -622,8 +717,8 @@ dOMMediaControllerGetPlaybackState :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMMediaControllerGetPlaybackState _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_controller_get_playback_state _obj' @@ -633,11 +728,14 @@ touchManagedPtr _obj return result' +data DOMMediaControllerGetPlaybackStateMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerGetPlaybackStateMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerGetPlaybackState + -- method DOMMediaController::get_played -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMTimeRanges" -- throws : False -- Skip return : False @@ -649,8 +747,8 @@ dOMMediaControllerGetPlayed :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m DOMTimeRanges + a -- _obj + -> m DOMTimeRanges -- result dOMMediaControllerGetPlayed _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_controller_get_played _obj' @@ -659,11 +757,14 @@ touchManagedPtr _obj return result' +data DOMMediaControllerGetPlayedMethodInfo +instance (signature ~ (m DOMTimeRanges), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerGetPlayedMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerGetPlayed + -- method DOMMediaController::get_seekable -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMTimeRanges" -- throws : False -- Skip return : False @@ -675,8 +776,8 @@ dOMMediaControllerGetSeekable :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m DOMTimeRanges + a -- _obj + -> m DOMTimeRanges -- result dOMMediaControllerGetSeekable _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_controller_get_seekable _obj' @@ -685,11 +786,14 @@ touchManagedPtr _obj return result' +data DOMMediaControllerGetSeekableMethodInfo +instance (signature ~ (m DOMTimeRanges), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerGetSeekableMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerGetSeekable + -- method DOMMediaController::get_volume -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -701,8 +805,8 @@ dOMMediaControllerGetVolume :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMMediaControllerGetVolume _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_controller_get_volume _obj' @@ -710,11 +814,14 @@ touchManagedPtr _obj return result' +data DOMMediaControllerGetVolumeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerGetVolumeMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerGetVolume + -- method DOMMediaController::pause -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -726,19 +833,22 @@ dOMMediaControllerPause :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMMediaControllerPause _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_media_controller_pause _obj' touchManagedPtr _obj return () +data DOMMediaControllerPauseMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerPauseMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerPause + -- method DOMMediaController::play -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -750,19 +860,22 @@ dOMMediaControllerPlay :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMMediaControllerPlay _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_media_controller_play _obj' touchManagedPtr _obj return () +data DOMMediaControllerPlayMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerPlayMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerPlay + -- method DOMMediaController::set_current_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -775,9 +888,9 @@ dOMMediaControllerSetCurrentTime :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - Double -> -- value - m () + a -- _obj + -> Double -- value + -> m () -- result dOMMediaControllerSetCurrentTime _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = realToFrac value @@ -785,11 +898,14 @@ touchManagedPtr _obj return () +data DOMMediaControllerSetCurrentTimeMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerSetCurrentTimeMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerSetCurrentTime + -- method DOMMediaController::set_default_playback_rate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -802,9 +918,9 @@ dOMMediaControllerSetDefaultPlaybackRate :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - Double -> -- value - m () + a -- _obj + -> Double -- value + -> m () -- result dOMMediaControllerSetDefaultPlaybackRate _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = realToFrac value @@ -812,11 +928,14 @@ touchManagedPtr _obj return () +data DOMMediaControllerSetDefaultPlaybackRateMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerSetDefaultPlaybackRateMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerSetDefaultPlaybackRate + -- method DOMMediaController::set_muted -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -829,9 +948,9 @@ dOMMediaControllerSetMuted :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMMediaControllerSetMuted _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -839,11 +958,14 @@ touchManagedPtr _obj return () +data DOMMediaControllerSetMutedMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerSetMutedMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerSetMuted + -- method DOMMediaController::set_playback_rate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -856,9 +978,9 @@ dOMMediaControllerSetPlaybackRate :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - Double -> -- value - m () + a -- _obj + -> Double -- value + -> m () -- result dOMMediaControllerSetPlaybackRate _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = realToFrac value @@ -866,11 +988,14 @@ touchManagedPtr _obj return () +data DOMMediaControllerSetPlaybackRateMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerSetPlaybackRateMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerSetPlaybackRate + -- method DOMMediaController::set_volume -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -884,9 +1009,9 @@ dOMMediaControllerSetVolume :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - Double -> -- value - m () + a -- _obj + -> Double -- value + -> m () -- result dOMMediaControllerSetVolume _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = realToFrac value @@ -898,11 +1023,14 @@ return () ) +data DOMMediaControllerSetVolumeMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerSetVolumeMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerSetVolume + -- method DOMMediaController::unpause -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaController", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -914,12 +1042,16 @@ dOMMediaControllerUnpause :: (MonadIO m, DOMMediaControllerK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMMediaControllerUnpause _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_media_controller_unpause _obj' touchManagedPtr _obj return () + +data DOMMediaControllerUnpauseMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMMediaControllerK a) => MethodInfo DOMMediaControllerUnpauseMethodInfo a signature where + overloadedMethod _ = dOMMediaControllerUnpause diff --git a/GI/WebKit/Objects/DOMMediaController.hs-boot b/GI/WebKit/Objects/DOMMediaController.hs-boot --- a/GI/WebKit/Objects/DOMMediaController.hs-boot +++ b/GI/WebKit/Objects/DOMMediaController.hs-boot @@ -22,3 +22,22 @@ data DOMMediaControllerPlayedPropertyInfo data DOMMediaControllerSeekablePropertyInfo data DOMMediaControllerVolumePropertyInfo +data DOMMediaControllerGetBufferedMethodInfo +data DOMMediaControllerGetCurrentTimeMethodInfo +data DOMMediaControllerGetDefaultPlaybackRateMethodInfo +data DOMMediaControllerGetDurationMethodInfo +data DOMMediaControllerGetMutedMethodInfo +data DOMMediaControllerGetPausedMethodInfo +data DOMMediaControllerGetPlaybackRateMethodInfo +data DOMMediaControllerGetPlaybackStateMethodInfo +data DOMMediaControllerGetPlayedMethodInfo +data DOMMediaControllerGetSeekableMethodInfo +data DOMMediaControllerGetVolumeMethodInfo +data DOMMediaControllerPauseMethodInfo +data DOMMediaControllerPlayMethodInfo +data DOMMediaControllerSetCurrentTimeMethodInfo +data DOMMediaControllerSetDefaultPlaybackRateMethodInfo +data DOMMediaControllerSetMutedMethodInfo +data DOMMediaControllerSetPlaybackRateMethodInfo +data DOMMediaControllerSetVolumeMethodInfo +data DOMMediaControllerUnpauseMethodInfo diff --git a/GI/WebKit/Objects/DOMMediaError.hs b/GI/WebKit/Objects/DOMMediaError.hs --- a/GI/WebKit/Objects/DOMMediaError.hs +++ b/GI/WebKit/Objects/DOMMediaError.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** dOMMediaErrorGetCode + DOMMediaErrorGetCodeMethodInfo , dOMMediaErrorGetCode , @@ -64,6 +66,40 @@ noDOMMediaError :: Maybe DOMMediaError noDOMMediaError = Nothing +type family ResolveDOMMediaErrorMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMMediaErrorMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMMediaErrorMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMMediaErrorMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMMediaErrorMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMMediaErrorMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMMediaErrorMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMMediaErrorMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMMediaErrorMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMMediaErrorMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMMediaErrorMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMMediaErrorMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMMediaErrorMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMMediaErrorMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMMediaErrorMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMMediaErrorMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMMediaErrorMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMMediaErrorMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMMediaErrorMethod "getCode" o = DOMMediaErrorGetCodeMethodInfo + ResolveDOMMediaErrorMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMMediaErrorMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMMediaErrorMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMMediaErrorMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMMediaErrorMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMMediaErrorMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMMediaErrorMethod t DOMMediaError, MethodInfo info DOMMediaError p) => IsLabelProxy t (DOMMediaError -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMMediaErrorMethod t DOMMediaError, MethodInfo info DOMMediaError p) => IsLabel t (DOMMediaError -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "code" -- Type: TBasicType TUInt32 -- Flags: [PropertyReadable] @@ -77,22 +113,21 @@ type AttrSetTypeConstraint DOMMediaErrorCodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMMediaErrorCodePropertyInfo = DOMMediaErrorK type AttrGetType DOMMediaErrorCodePropertyInfo = Word32 - type AttrLabel DOMMediaErrorCodePropertyInfo = "DOMMediaError::code" + type AttrLabel DOMMediaErrorCodePropertyInfo = "code" attrGet _ = getDOMMediaErrorCode attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMMediaError = DOMMediaErrorAttributeList -type DOMMediaErrorAttributeList = ('[ '("code", DOMMediaErrorCodePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMMediaErrorAttributeList = ('[ '("code", DOMMediaErrorCodePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMMediaError = DOMMediaErrorSignalList -type DOMMediaErrorSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMMediaErrorSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMMediaError::get_code -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaError", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaError", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaError", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt16 -- throws : False -- Skip return : False @@ -104,12 +139,16 @@ dOMMediaErrorGetCode :: (MonadIO m, DOMMediaErrorK a) => - a -> -- _obj - m Word16 + a -- _obj + -> m Word16 -- result dOMMediaErrorGetCode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_error_get_code _obj' touchManagedPtr _obj return result + +data DOMMediaErrorGetCodeMethodInfo +instance (signature ~ (m Word16), MonadIO m, DOMMediaErrorK a) => MethodInfo DOMMediaErrorGetCodeMethodInfo a signature where + overloadedMethod _ = dOMMediaErrorGetCode diff --git a/GI/WebKit/Objects/DOMMediaError.hs-boot b/GI/WebKit/Objects/DOMMediaError.hs-boot --- a/GI/WebKit/Objects/DOMMediaError.hs-boot +++ b/GI/WebKit/Objects/DOMMediaError.hs-boot @@ -12,3 +12,4 @@ class GObject o => DOMMediaErrorK o instance (GObject o, IsDescendantOf DOMMediaError o) => DOMMediaErrorK o data DOMMediaErrorCodePropertyInfo +data DOMMediaErrorGetCodeMethodInfo diff --git a/GI/WebKit/Objects/DOMMediaList.hs b/GI/WebKit/Objects/DOMMediaList.hs --- a/GI/WebKit/Objects/DOMMediaList.hs +++ b/GI/WebKit/Objects/DOMMediaList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** dOMMediaListAppendMedium + DOMMediaListAppendMediumMethodInfo , dOMMediaListAppendMedium , -- ** dOMMediaListDeleteMedium + DOMMediaListDeleteMediumMethodInfo , dOMMediaListDeleteMedium , -- ** dOMMediaListGetLength + DOMMediaListGetLengthMethodInfo , dOMMediaListGetLength , -- ** dOMMediaListGetMediaText + DOMMediaListGetMediaTextMethodInfo , dOMMediaListGetMediaText , -- ** dOMMediaListItem + DOMMediaListItemMethodInfo , dOMMediaListItem , -- ** dOMMediaListSetMediaText + DOMMediaListSetMediaTextMethodInfo , dOMMediaListSetMediaText , @@ -91,6 +98,45 @@ noDOMMediaList :: Maybe DOMMediaList noDOMMediaList = Nothing +type family ResolveDOMMediaListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMMediaListMethod "appendMedium" o = DOMMediaListAppendMediumMethodInfo + ResolveDOMMediaListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMMediaListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMMediaListMethod "deleteMedium" o = DOMMediaListDeleteMediumMethodInfo + ResolveDOMMediaListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMMediaListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMMediaListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMMediaListMethod "item" o = DOMMediaListItemMethodInfo + ResolveDOMMediaListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMMediaListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMMediaListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMMediaListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMMediaListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMMediaListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMMediaListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMMediaListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMMediaListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMMediaListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMMediaListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMMediaListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMMediaListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMMediaListMethod "getLength" o = DOMMediaListGetLengthMethodInfo + ResolveDOMMediaListMethod "getMediaText" o = DOMMediaListGetMediaTextMethodInfo + ResolveDOMMediaListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMMediaListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMMediaListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMMediaListMethod "setMediaText" o = DOMMediaListSetMediaTextMethodInfo + ResolveDOMMediaListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMMediaListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMMediaListMethod t DOMMediaList, MethodInfo info DOMMediaList p) => IsLabelProxy t (DOMMediaList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMMediaListMethod t DOMMediaList, MethodInfo info DOMMediaList p) => IsLabel t (DOMMediaList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -104,7 +150,7 @@ type AttrSetTypeConstraint DOMMediaListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMediaListLengthPropertyInfo = DOMMediaListK type AttrGetType DOMMediaListLengthPropertyInfo = Word64 - type AttrLabel DOMMediaListLengthPropertyInfo = "DOMMediaList::length" + type AttrLabel DOMMediaListLengthPropertyInfo = "length" attrGet _ = getDOMMediaListLength attrSet _ = undefined attrConstruct _ = undefined @@ -128,22 +174,21 @@ type AttrSetTypeConstraint DOMMediaListMediaTextPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMMediaListMediaTextPropertyInfo = DOMMediaListK type AttrGetType DOMMediaListMediaTextPropertyInfo = T.Text - type AttrLabel DOMMediaListMediaTextPropertyInfo = "DOMMediaList::media-text" + type AttrLabel DOMMediaListMediaTextPropertyInfo = "media-text" attrGet _ = getDOMMediaListMediaText attrSet _ = setDOMMediaListMediaText attrConstruct _ = constructDOMMediaListMediaText type instance AttributeList DOMMediaList = DOMMediaListAttributeList -type DOMMediaListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMMediaListLengthPropertyInfo), '("media-text", DOMMediaListMediaTextPropertyInfo)] :: [(Symbol, *)]) +type DOMMediaListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMMediaListLengthPropertyInfo), '("mediaText", DOMMediaListMediaTextPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMMediaList = DOMMediaListSignalList -type DOMMediaListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMMediaListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMMediaList::append_medium -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newMedium", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "newMedium", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newMedium", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -157,9 +202,9 @@ dOMMediaListAppendMedium :: (MonadIO m, DOMMediaListK a) => - a -> -- _obj - T.Text -> -- newMedium - m () + a -- _obj + -> T.Text -- newMedium + -> m () -- result dOMMediaListAppendMedium _obj newMedium = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj newMedium' <- textToCString newMedium @@ -172,11 +217,14 @@ freeMem newMedium' ) +data DOMMediaListAppendMediumMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMMediaListK a) => MethodInfo DOMMediaListAppendMediumMethodInfo a signature where + overloadedMethod _ = dOMMediaListAppendMedium + -- method DOMMediaList::delete_medium -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "oldMedium", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "oldMedium", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "oldMedium", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -190,9 +238,9 @@ dOMMediaListDeleteMedium :: (MonadIO m, DOMMediaListK a) => - a -> -- _obj - T.Text -> -- oldMedium - m () + a -- _obj + -> T.Text -- oldMedium + -> m () -- result dOMMediaListDeleteMedium _obj oldMedium = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj oldMedium' <- textToCString oldMedium @@ -205,11 +253,14 @@ freeMem oldMedium' ) +data DOMMediaListDeleteMediumMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMMediaListK a) => MethodInfo DOMMediaListDeleteMediumMethodInfo a signature where + overloadedMethod _ = dOMMediaListDeleteMedium + -- method DOMMediaList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -221,19 +272,22 @@ dOMMediaListGetLength :: (MonadIO m, DOMMediaListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMMediaListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_list_get_length _obj' touchManagedPtr _obj return result +data DOMMediaListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMMediaListK a) => MethodInfo DOMMediaListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMMediaListGetLength + -- method DOMMediaList::get_media_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -245,8 +299,8 @@ dOMMediaListGetMediaText :: (MonadIO m, DOMMediaListK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMMediaListGetMediaText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_list_get_media_text _obj' @@ -256,11 +310,14 @@ touchManagedPtr _obj return result' +data DOMMediaListGetMediaTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMMediaListK a) => MethodInfo DOMMediaListGetMediaTextMethodInfo a signature where + overloadedMethod _ = dOMMediaListGetMediaText + -- method DOMMediaList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -273,9 +330,9 @@ dOMMediaListItem :: (MonadIO m, DOMMediaListK a) => - a -> -- _obj - Word64 -> -- index - m T.Text + a -- _obj + -> Word64 -- index + -> m T.Text -- result dOMMediaListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_list_item _obj' index @@ -285,11 +342,14 @@ touchManagedPtr _obj return result' +data DOMMediaListItemMethodInfo +instance (signature ~ (Word64 -> m T.Text), MonadIO m, DOMMediaListK a) => MethodInfo DOMMediaListItemMethodInfo a signature where + overloadedMethod _ = dOMMediaListItem + -- method DOMMediaList::set_media_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -303,9 +363,9 @@ dOMMediaListSetMediaText :: (MonadIO m, DOMMediaListK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMMediaListSetMediaText _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -317,5 +377,9 @@ ) (do freeMem value' ) + +data DOMMediaListSetMediaTextMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMMediaListK a) => MethodInfo DOMMediaListSetMediaTextMethodInfo a signature where + overloadedMethod _ = dOMMediaListSetMediaText diff --git a/GI/WebKit/Objects/DOMMediaList.hs-boot b/GI/WebKit/Objects/DOMMediaList.hs-boot --- a/GI/WebKit/Objects/DOMMediaList.hs-boot +++ b/GI/WebKit/Objects/DOMMediaList.hs-boot @@ -13,3 +13,9 @@ instance (GObject o, IsDescendantOf DOMMediaList o) => DOMMediaListK o data DOMMediaListLengthPropertyInfo data DOMMediaListMediaTextPropertyInfo +data DOMMediaListAppendMediumMethodInfo +data DOMMediaListDeleteMediumMethodInfo +data DOMMediaListGetLengthMethodInfo +data DOMMediaListGetMediaTextMethodInfo +data DOMMediaListItemMethodInfo +data DOMMediaListSetMediaTextMethodInfo diff --git a/GI/WebKit/Objects/DOMMediaQueryList.hs b/GI/WebKit/Objects/DOMMediaQueryList.hs --- a/GI/WebKit/Objects/DOMMediaQueryList.hs +++ b/GI/WebKit/Objects/DOMMediaQueryList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMMediaQueryListGetMatches + DOMMediaQueryListGetMatchesMethodInfo , dOMMediaQueryListGetMatches , -- ** dOMMediaQueryListGetMedia + DOMMediaQueryListGetMediaMethodInfo , dOMMediaQueryListGetMedia , @@ -73,6 +76,41 @@ noDOMMediaQueryList :: Maybe DOMMediaQueryList noDOMMediaQueryList = Nothing +type family ResolveDOMMediaQueryListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMMediaQueryListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMMediaQueryListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMMediaQueryListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMMediaQueryListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMMediaQueryListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMMediaQueryListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMMediaQueryListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMMediaQueryListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMMediaQueryListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMMediaQueryListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMMediaQueryListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMMediaQueryListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMMediaQueryListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMMediaQueryListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMMediaQueryListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMMediaQueryListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMMediaQueryListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMMediaQueryListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMMediaQueryListMethod "getMatches" o = DOMMediaQueryListGetMatchesMethodInfo + ResolveDOMMediaQueryListMethod "getMedia" o = DOMMediaQueryListGetMediaMethodInfo + ResolveDOMMediaQueryListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMMediaQueryListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMMediaQueryListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMMediaQueryListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMMediaQueryListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMMediaQueryListMethod t DOMMediaQueryList, MethodInfo info DOMMediaQueryList p) => IsLabelProxy t (DOMMediaQueryList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMMediaQueryListMethod t DOMMediaQueryList, MethodInfo info DOMMediaQueryList p) => IsLabel t (DOMMediaQueryList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "matches" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -86,7 +124,7 @@ type AttrSetTypeConstraint DOMMediaQueryListMatchesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMediaQueryListMatchesPropertyInfo = DOMMediaQueryListK type AttrGetType DOMMediaQueryListMatchesPropertyInfo = Bool - type AttrLabel DOMMediaQueryListMatchesPropertyInfo = "DOMMediaQueryList::matches" + type AttrLabel DOMMediaQueryListMatchesPropertyInfo = "matches" attrGet _ = getDOMMediaQueryListMatches attrSet _ = undefined attrConstruct _ = undefined @@ -104,22 +142,21 @@ type AttrSetTypeConstraint DOMMediaQueryListMediaPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMediaQueryListMediaPropertyInfo = DOMMediaQueryListK type AttrGetType DOMMediaQueryListMediaPropertyInfo = T.Text - type AttrLabel DOMMediaQueryListMediaPropertyInfo = "DOMMediaQueryList::media" + type AttrLabel DOMMediaQueryListMediaPropertyInfo = "media" attrGet _ = getDOMMediaQueryListMedia attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMMediaQueryList = DOMMediaQueryListAttributeList -type DOMMediaQueryListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("matches", DOMMediaQueryListMatchesPropertyInfo), '("media", DOMMediaQueryListMediaPropertyInfo)] :: [(Symbol, *)]) +type DOMMediaQueryListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("matches", DOMMediaQueryListMatchesPropertyInfo), '("media", DOMMediaQueryListMediaPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMMediaQueryList = DOMMediaQueryListSignalList -type DOMMediaQueryListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMMediaQueryListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMMediaQueryList::get_matches -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaQueryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaQueryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaQueryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -131,8 +168,8 @@ dOMMediaQueryListGetMatches :: (MonadIO m, DOMMediaQueryListK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMMediaQueryListGetMatches _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_query_list_get_matches _obj' @@ -140,11 +177,14 @@ touchManagedPtr _obj return result' +data DOMMediaQueryListGetMatchesMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMMediaQueryListK a) => MethodInfo DOMMediaQueryListGetMatchesMethodInfo a signature where + overloadedMethod _ = dOMMediaQueryListGetMatches + -- method DOMMediaQueryList::get_media -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaQueryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMediaQueryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMediaQueryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -156,8 +196,8 @@ dOMMediaQueryListGetMedia :: (MonadIO m, DOMMediaQueryListK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMMediaQueryListGetMedia _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_media_query_list_get_media _obj' @@ -166,5 +206,9 @@ freeMem result touchManagedPtr _obj return result' + +data DOMMediaQueryListGetMediaMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMMediaQueryListK a) => MethodInfo DOMMediaQueryListGetMediaMethodInfo a signature where + overloadedMethod _ = dOMMediaQueryListGetMedia diff --git a/GI/WebKit/Objects/DOMMediaQueryList.hs-boot b/GI/WebKit/Objects/DOMMediaQueryList.hs-boot --- a/GI/WebKit/Objects/DOMMediaQueryList.hs-boot +++ b/GI/WebKit/Objects/DOMMediaQueryList.hs-boot @@ -13,3 +13,5 @@ instance (GObject o, IsDescendantOf DOMMediaQueryList o) => DOMMediaQueryListK o data DOMMediaQueryListMatchesPropertyInfo data DOMMediaQueryListMediaPropertyInfo +data DOMMediaQueryListGetMatchesMethodInfo +data DOMMediaQueryListGetMediaMethodInfo diff --git a/GI/WebKit/Objects/DOMMemoryInfo.hs b/GI/WebKit/Objects/DOMMemoryInfo.hs --- a/GI/WebKit/Objects/DOMMemoryInfo.hs +++ b/GI/WebKit/Objects/DOMMemoryInfo.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -82,6 +83,39 @@ noDOMMemoryInfo :: Maybe DOMMemoryInfo noDOMMemoryInfo = Nothing +type family ResolveDOMMemoryInfoMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMMemoryInfoMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMMemoryInfoMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMMemoryInfoMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMMemoryInfoMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMMemoryInfoMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMMemoryInfoMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMMemoryInfoMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMMemoryInfoMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMMemoryInfoMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMMemoryInfoMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMMemoryInfoMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMMemoryInfoMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMMemoryInfoMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMMemoryInfoMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMMemoryInfoMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMMemoryInfoMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMMemoryInfoMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMMemoryInfoMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMMemoryInfoMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMMemoryInfoMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMMemoryInfoMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMMemoryInfoMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMMemoryInfoMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMMemoryInfoMethod t DOMMemoryInfo, MethodInfo info DOMMemoryInfo p) => IsLabelProxy t (DOMMemoryInfo -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMMemoryInfoMethod t DOMMemoryInfo, MethodInfo info DOMMemoryInfo p) => IsLabel t (DOMMemoryInfo -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "js-heap-size-limit" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -95,7 +129,7 @@ type AttrSetTypeConstraint DOMMemoryInfoJsHeapSizeLimitPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMemoryInfoJsHeapSizeLimitPropertyInfo = DOMMemoryInfoK type AttrGetType DOMMemoryInfoJsHeapSizeLimitPropertyInfo = Word64 - type AttrLabel DOMMemoryInfoJsHeapSizeLimitPropertyInfo = "DOMMemoryInfo::js-heap-size-limit" + type AttrLabel DOMMemoryInfoJsHeapSizeLimitPropertyInfo = "js-heap-size-limit" attrGet _ = getDOMMemoryInfoJsHeapSizeLimit attrSet _ = undefined attrConstruct _ = undefined @@ -113,7 +147,7 @@ type AttrSetTypeConstraint DOMMemoryInfoTotalJsHeapSizePropertyInfo = (~) () type AttrBaseTypeConstraint DOMMemoryInfoTotalJsHeapSizePropertyInfo = DOMMemoryInfoK type AttrGetType DOMMemoryInfoTotalJsHeapSizePropertyInfo = Word64 - type AttrLabel DOMMemoryInfoTotalJsHeapSizePropertyInfo = "DOMMemoryInfo::total-js-heap-size" + type AttrLabel DOMMemoryInfoTotalJsHeapSizePropertyInfo = "total-js-heap-size" attrGet _ = getDOMMemoryInfoTotalJsHeapSize attrSet _ = undefined attrConstruct _ = undefined @@ -131,22 +165,21 @@ type AttrSetTypeConstraint DOMMemoryInfoUsedJsHeapSizePropertyInfo = (~) () type AttrBaseTypeConstraint DOMMemoryInfoUsedJsHeapSizePropertyInfo = DOMMemoryInfoK type AttrGetType DOMMemoryInfoUsedJsHeapSizePropertyInfo = Word64 - type AttrLabel DOMMemoryInfoUsedJsHeapSizePropertyInfo = "DOMMemoryInfo::used-js-heap-size" + type AttrLabel DOMMemoryInfoUsedJsHeapSizePropertyInfo = "used-js-heap-size" attrGet _ = getDOMMemoryInfoUsedJsHeapSize attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMMemoryInfo = DOMMemoryInfoAttributeList -type DOMMemoryInfoAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("js-heap-size-limit", DOMMemoryInfoJsHeapSizeLimitPropertyInfo), '("total-js-heap-size", DOMMemoryInfoTotalJsHeapSizePropertyInfo), '("used-js-heap-size", DOMMemoryInfoUsedJsHeapSizePropertyInfo)] :: [(Symbol, *)]) +type DOMMemoryInfoAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("jsHeapSizeLimit", DOMMemoryInfoJsHeapSizeLimitPropertyInfo), '("totalJsHeapSize", DOMMemoryInfoTotalJsHeapSizePropertyInfo), '("usedJsHeapSize", DOMMemoryInfoUsedJsHeapSizePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMMemoryInfo = DOMMemoryInfoSignalList -type DOMMemoryInfoSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMMemoryInfoSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMMemoryInfo::get_js_heap_size_limit -- method type : MemberFunction --- Args : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -158,17 +191,16 @@ {-# DEPRECATED dOMMemoryInfoGetJsHeapSizeLimit ["(Since version 2.2)"]#-} dOMMemoryInfoGetJsHeapSizeLimit :: (MonadIO m) => - Ptr () -> -- self - m Word64 + Ptr () -- self + -> m Word64 -- result dOMMemoryInfoGetJsHeapSizeLimit self = liftIO $ do result <- webkit_dom_memory_info_get_js_heap_size_limit self return result -- method DOMMemoryInfo::get_total_js_heap_size -- method type : MemberFunction --- Args : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -180,17 +212,16 @@ {-# DEPRECATED dOMMemoryInfoGetTotalJsHeapSize ["(Since version 2.2)"]#-} dOMMemoryInfoGetTotalJsHeapSize :: (MonadIO m) => - Ptr () -> -- self - m Word64 + Ptr () -- self + -> m Word64 -- result dOMMemoryInfoGetTotalJsHeapSize self = liftIO $ do result <- webkit_dom_memory_info_get_total_js_heap_size self return result -- method DOMMemoryInfo::get_used_js_heap_size -- method type : MemberFunction --- Args : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -202,8 +233,8 @@ {-# DEPRECATED dOMMemoryInfoGetUsedJsHeapSize ["(Since version 2.2)"]#-} dOMMemoryInfoGetUsedJsHeapSize :: (MonadIO m) => - Ptr () -> -- self - m Word64 + Ptr () -- self + -> m Word64 -- result dOMMemoryInfoGetUsedJsHeapSize self = liftIO $ do result <- webkit_dom_memory_info_get_used_js_heap_size self return result diff --git a/GI/WebKit/Objects/DOMMessagePort.hs b/GI/WebKit/Objects/DOMMessagePort.hs --- a/GI/WebKit/Objects/DOMMessagePort.hs +++ b/GI/WebKit/Objects/DOMMessagePort.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -49,10 +50,46 @@ noDOMMessagePort :: Maybe DOMMessagePort noDOMMessagePort = Nothing +type family ResolveDOMMessagePortMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMMessagePortMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMMessagePortMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMMessagePortMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMMessagePortMethod "dispatchEvent" o = DOMEventTargetDispatchEventMethodInfo + ResolveDOMMessagePortMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMMessagePortMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMMessagePortMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMMessagePortMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMMessagePortMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMMessagePortMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMMessagePortMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMMessagePortMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMMessagePortMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMMessagePortMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMMessagePortMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMMessagePortMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMMessagePortMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMMessagePortMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMMessagePortMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMMessagePortMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMMessagePortMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMMessagePortMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMMessagePortMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMMessagePortMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMMessagePortMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMMessagePortMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMMessagePortMethod t DOMMessagePort, MethodInfo info DOMMessagePort p) => IsLabelProxy t (DOMMessagePort -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMMessagePortMethod t DOMMessagePort, MethodInfo info DOMMessagePort p) => IsLabel t (DOMMessagePort -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMMessagePort = DOMMessagePortAttributeList -type DOMMessagePortAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMMessagePortAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMMessagePort = DOMMessagePortSignalList -type DOMMessagePortSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMMessagePortSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/DOMMicroDataItemValue.hs b/GI/WebKit/Objects/DOMMicroDataItemValue.hs --- a/GI/WebKit/Objects/DOMMicroDataItemValue.hs +++ b/GI/WebKit/Objects/DOMMicroDataItemValue.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -49,10 +50,43 @@ noDOMMicroDataItemValue :: Maybe DOMMicroDataItemValue noDOMMicroDataItemValue = Nothing +type family ResolveDOMMicroDataItemValueMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMMicroDataItemValueMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMMicroDataItemValueMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMMicroDataItemValueMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMMicroDataItemValueMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMMicroDataItemValueMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMMicroDataItemValueMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMMicroDataItemValueMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMMicroDataItemValueMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMMicroDataItemValueMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMMicroDataItemValueMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMMicroDataItemValueMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMMicroDataItemValueMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMMicroDataItemValueMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMMicroDataItemValueMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMMicroDataItemValueMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMMicroDataItemValueMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMMicroDataItemValueMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMMicroDataItemValueMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMMicroDataItemValueMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMMicroDataItemValueMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMMicroDataItemValueMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMMicroDataItemValueMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMMicroDataItemValueMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMMicroDataItemValueMethod t DOMMicroDataItemValue, MethodInfo info DOMMicroDataItemValue p) => IsLabelProxy t (DOMMicroDataItemValue -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMMicroDataItemValueMethod t DOMMicroDataItemValue, MethodInfo info DOMMicroDataItemValue p) => IsLabel t (DOMMicroDataItemValue -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMMicroDataItemValue = DOMMicroDataItemValueAttributeList -type DOMMicroDataItemValueAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMMicroDataItemValueAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMMicroDataItemValue = DOMMicroDataItemValueSignalList -type DOMMicroDataItemValueSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMMicroDataItemValueSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/DOMMouseEvent.hs b/GI/WebKit/Objects/DOMMouseEvent.hs --- a/GI/WebKit/Objects/DOMMouseEvent.hs +++ b/GI/WebKit/Objects/DOMMouseEvent.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,78 +18,97 @@ -- * Methods -- ** dOMMouseEventGetAltKey + DOMMouseEventGetAltKeyMethodInfo , dOMMouseEventGetAltKey , -- ** dOMMouseEventGetButton + DOMMouseEventGetButtonMethodInfo , dOMMouseEventGetButton , -- ** dOMMouseEventGetClientX + DOMMouseEventGetClientXMethodInfo , dOMMouseEventGetClientX , -- ** dOMMouseEventGetClientY + DOMMouseEventGetClientYMethodInfo , dOMMouseEventGetClientY , -- ** dOMMouseEventGetCtrlKey + DOMMouseEventGetCtrlKeyMethodInfo , dOMMouseEventGetCtrlKey , -- ** dOMMouseEventGetFromElement + DOMMouseEventGetFromElementMethodInfo , dOMMouseEventGetFromElement , -- ** dOMMouseEventGetMetaKey + DOMMouseEventGetMetaKeyMethodInfo , dOMMouseEventGetMetaKey , -- ** dOMMouseEventGetOffsetX + DOMMouseEventGetOffsetXMethodInfo , dOMMouseEventGetOffsetX , -- ** dOMMouseEventGetOffsetY + DOMMouseEventGetOffsetYMethodInfo , dOMMouseEventGetOffsetY , -- ** dOMMouseEventGetRelatedTarget + DOMMouseEventGetRelatedTargetMethodInfo , dOMMouseEventGetRelatedTarget , -- ** dOMMouseEventGetScreenX + DOMMouseEventGetScreenXMethodInfo , dOMMouseEventGetScreenX , -- ** dOMMouseEventGetScreenY + DOMMouseEventGetScreenYMethodInfo , dOMMouseEventGetScreenY , -- ** dOMMouseEventGetShiftKey + DOMMouseEventGetShiftKeyMethodInfo , dOMMouseEventGetShiftKey , -- ** dOMMouseEventGetToElement + DOMMouseEventGetToElementMethodInfo , dOMMouseEventGetToElement , -- ** dOMMouseEventGetWebkitMovementX + DOMMouseEventGetWebkitMovementXMethodInfo, dOMMouseEventGetWebkitMovementX , -- ** dOMMouseEventGetWebkitMovementY + DOMMouseEventGetWebkitMovementYMethodInfo, dOMMouseEventGetWebkitMovementY , -- ** dOMMouseEventGetX + DOMMouseEventGetXMethodInfo , dOMMouseEventGetX , -- ** dOMMouseEventGetY + DOMMouseEventGetYMethodInfo , dOMMouseEventGetY , -- ** dOMMouseEventInitMouseEvent + DOMMouseEventInitMouseEventMethodInfo , dOMMouseEventInitMouseEvent , @@ -221,6 +241,84 @@ noDOMMouseEvent :: Maybe DOMMouseEvent noDOMMouseEvent = Nothing +type family ResolveDOMMouseEventMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMMouseEventMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMMouseEventMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMMouseEventMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMMouseEventMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMMouseEventMethod "initEvent" o = DOMEventInitEventMethodInfo + ResolveDOMMouseEventMethod "initMouseEvent" o = DOMMouseEventInitMouseEventMethodInfo + ResolveDOMMouseEventMethod "initUiEvent" o = DOMUIEventInitUiEventMethodInfo + ResolveDOMMouseEventMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMMouseEventMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMMouseEventMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMMouseEventMethod "preventDefault" o = DOMEventPreventDefaultMethodInfo + ResolveDOMMouseEventMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMMouseEventMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMMouseEventMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMMouseEventMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMMouseEventMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMMouseEventMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMMouseEventMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMMouseEventMethod "stopImmediatePropagation" o = DOMEventStopImmediatePropagationMethodInfo + ResolveDOMMouseEventMethod "stopPropagation" o = DOMEventStopPropagationMethodInfo + ResolveDOMMouseEventMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMMouseEventMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMMouseEventMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMMouseEventMethod "getAltKey" o = DOMMouseEventGetAltKeyMethodInfo + ResolveDOMMouseEventMethod "getBubbles" o = DOMEventGetBubblesMethodInfo + ResolveDOMMouseEventMethod "getButton" o = DOMMouseEventGetButtonMethodInfo + ResolveDOMMouseEventMethod "getCancelBubble" o = DOMEventGetCancelBubbleMethodInfo + ResolveDOMMouseEventMethod "getCancelable" o = DOMEventGetCancelableMethodInfo + ResolveDOMMouseEventMethod "getCharCode" o = DOMUIEventGetCharCodeMethodInfo + ResolveDOMMouseEventMethod "getClientX" o = DOMMouseEventGetClientXMethodInfo + ResolveDOMMouseEventMethod "getClientY" o = DOMMouseEventGetClientYMethodInfo + ResolveDOMMouseEventMethod "getCtrlKey" o = DOMMouseEventGetCtrlKeyMethodInfo + ResolveDOMMouseEventMethod "getCurrentTarget" o = DOMEventGetCurrentTargetMethodInfo + ResolveDOMMouseEventMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMMouseEventMethod "getDefaultPrevented" o = DOMEventGetDefaultPreventedMethodInfo + ResolveDOMMouseEventMethod "getDetail" o = DOMUIEventGetDetailMethodInfo + ResolveDOMMouseEventMethod "getEventPhase" o = DOMEventGetEventPhaseMethodInfo + ResolveDOMMouseEventMethod "getFromElement" o = DOMMouseEventGetFromElementMethodInfo + ResolveDOMMouseEventMethod "getKeyCode" o = DOMUIEventGetKeyCodeMethodInfo + ResolveDOMMouseEventMethod "getLayerX" o = DOMUIEventGetLayerXMethodInfo + ResolveDOMMouseEventMethod "getLayerY" o = DOMUIEventGetLayerYMethodInfo + ResolveDOMMouseEventMethod "getMetaKey" o = DOMMouseEventGetMetaKeyMethodInfo + ResolveDOMMouseEventMethod "getOffsetX" o = DOMMouseEventGetOffsetXMethodInfo + ResolveDOMMouseEventMethod "getOffsetY" o = DOMMouseEventGetOffsetYMethodInfo + ResolveDOMMouseEventMethod "getPageX" o = DOMUIEventGetPageXMethodInfo + ResolveDOMMouseEventMethod "getPageY" o = DOMUIEventGetPageYMethodInfo + ResolveDOMMouseEventMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMMouseEventMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMMouseEventMethod "getRelatedTarget" o = DOMMouseEventGetRelatedTargetMethodInfo + ResolveDOMMouseEventMethod "getReturnValue" o = DOMEventGetReturnValueMethodInfo + ResolveDOMMouseEventMethod "getScreenX" o = DOMMouseEventGetScreenXMethodInfo + ResolveDOMMouseEventMethod "getScreenY" o = DOMMouseEventGetScreenYMethodInfo + ResolveDOMMouseEventMethod "getShiftKey" o = DOMMouseEventGetShiftKeyMethodInfo + ResolveDOMMouseEventMethod "getSrcElement" o = DOMEventGetSrcElementMethodInfo + ResolveDOMMouseEventMethod "getTarget" o = DOMEventGetTargetMethodInfo + ResolveDOMMouseEventMethod "getTimeStamp" o = DOMEventGetTimeStampMethodInfo + ResolveDOMMouseEventMethod "getToElement" o = DOMMouseEventGetToElementMethodInfo + ResolveDOMMouseEventMethod "getView" o = DOMUIEventGetViewMethodInfo + ResolveDOMMouseEventMethod "getWebkitMovementX" o = DOMMouseEventGetWebkitMovementXMethodInfo + ResolveDOMMouseEventMethod "getWebkitMovementY" o = DOMMouseEventGetWebkitMovementYMethodInfo + ResolveDOMMouseEventMethod "getWhich" o = DOMUIEventGetWhichMethodInfo + ResolveDOMMouseEventMethod "getX" o = DOMMouseEventGetXMethodInfo + ResolveDOMMouseEventMethod "getY" o = DOMMouseEventGetYMethodInfo + ResolveDOMMouseEventMethod "setCancelBubble" o = DOMEventSetCancelBubbleMethodInfo + ResolveDOMMouseEventMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMMouseEventMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMMouseEventMethod "setReturnValue" o = DOMEventSetReturnValueMethodInfo + ResolveDOMMouseEventMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMMouseEventMethod t DOMMouseEvent, MethodInfo info DOMMouseEvent p) => IsLabelProxy t (DOMMouseEvent -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMMouseEventMethod t DOMMouseEvent, MethodInfo info DOMMouseEvent p) => IsLabel t (DOMMouseEvent -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "alt-key" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -234,7 +332,7 @@ type AttrSetTypeConstraint DOMMouseEventAltKeyPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventAltKeyPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventAltKeyPropertyInfo = Bool - type AttrLabel DOMMouseEventAltKeyPropertyInfo = "DOMMouseEvent::alt-key" + type AttrLabel DOMMouseEventAltKeyPropertyInfo = "alt-key" attrGet _ = getDOMMouseEventAltKey attrSet _ = undefined attrConstruct _ = undefined @@ -252,7 +350,7 @@ type AttrSetTypeConstraint DOMMouseEventButtonPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventButtonPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventButtonPropertyInfo = Word32 - type AttrLabel DOMMouseEventButtonPropertyInfo = "DOMMouseEvent::button" + type AttrLabel DOMMouseEventButtonPropertyInfo = "button" attrGet _ = getDOMMouseEventButton attrSet _ = undefined attrConstruct _ = undefined @@ -270,7 +368,7 @@ type AttrSetTypeConstraint DOMMouseEventClientXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventClientXPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventClientXPropertyInfo = Int64 - type AttrLabel DOMMouseEventClientXPropertyInfo = "DOMMouseEvent::client-x" + type AttrLabel DOMMouseEventClientXPropertyInfo = "client-x" attrGet _ = getDOMMouseEventClientX attrSet _ = undefined attrConstruct _ = undefined @@ -288,7 +386,7 @@ type AttrSetTypeConstraint DOMMouseEventClientYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventClientYPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventClientYPropertyInfo = Int64 - type AttrLabel DOMMouseEventClientYPropertyInfo = "DOMMouseEvent::client-y" + type AttrLabel DOMMouseEventClientYPropertyInfo = "client-y" attrGet _ = getDOMMouseEventClientY attrSet _ = undefined attrConstruct _ = undefined @@ -306,7 +404,7 @@ type AttrSetTypeConstraint DOMMouseEventCtrlKeyPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventCtrlKeyPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventCtrlKeyPropertyInfo = Bool - type AttrLabel DOMMouseEventCtrlKeyPropertyInfo = "DOMMouseEvent::ctrl-key" + type AttrLabel DOMMouseEventCtrlKeyPropertyInfo = "ctrl-key" attrGet _ = getDOMMouseEventCtrlKey attrSet _ = undefined attrConstruct _ = undefined @@ -324,7 +422,7 @@ type AttrSetTypeConstraint DOMMouseEventFromElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventFromElementPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventFromElementPropertyInfo = DOMNode - type AttrLabel DOMMouseEventFromElementPropertyInfo = "DOMMouseEvent::from-element" + type AttrLabel DOMMouseEventFromElementPropertyInfo = "from-element" attrGet _ = getDOMMouseEventFromElement attrSet _ = undefined attrConstruct _ = undefined @@ -342,7 +440,7 @@ type AttrSetTypeConstraint DOMMouseEventMetaKeyPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventMetaKeyPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventMetaKeyPropertyInfo = Bool - type AttrLabel DOMMouseEventMetaKeyPropertyInfo = "DOMMouseEvent::meta-key" + type AttrLabel DOMMouseEventMetaKeyPropertyInfo = "meta-key" attrGet _ = getDOMMouseEventMetaKey attrSet _ = undefined attrConstruct _ = undefined @@ -360,7 +458,7 @@ type AttrSetTypeConstraint DOMMouseEventOffsetXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventOffsetXPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventOffsetXPropertyInfo = Int64 - type AttrLabel DOMMouseEventOffsetXPropertyInfo = "DOMMouseEvent::offset-x" + type AttrLabel DOMMouseEventOffsetXPropertyInfo = "offset-x" attrGet _ = getDOMMouseEventOffsetX attrSet _ = undefined attrConstruct _ = undefined @@ -378,7 +476,7 @@ type AttrSetTypeConstraint DOMMouseEventOffsetYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventOffsetYPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventOffsetYPropertyInfo = Int64 - type AttrLabel DOMMouseEventOffsetYPropertyInfo = "DOMMouseEvent::offset-y" + type AttrLabel DOMMouseEventOffsetYPropertyInfo = "offset-y" attrGet _ = getDOMMouseEventOffsetY attrSet _ = undefined attrConstruct _ = undefined @@ -396,7 +494,7 @@ type AttrSetTypeConstraint DOMMouseEventRelatedTargetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventRelatedTargetPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventRelatedTargetPropertyInfo = DOMEventTarget - type AttrLabel DOMMouseEventRelatedTargetPropertyInfo = "DOMMouseEvent::related-target" + type AttrLabel DOMMouseEventRelatedTargetPropertyInfo = "related-target" attrGet _ = getDOMMouseEventRelatedTarget attrSet _ = undefined attrConstruct _ = undefined @@ -414,7 +512,7 @@ type AttrSetTypeConstraint DOMMouseEventScreenXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventScreenXPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventScreenXPropertyInfo = Int64 - type AttrLabel DOMMouseEventScreenXPropertyInfo = "DOMMouseEvent::screen-x" + type AttrLabel DOMMouseEventScreenXPropertyInfo = "screen-x" attrGet _ = getDOMMouseEventScreenX attrSet _ = undefined attrConstruct _ = undefined @@ -432,7 +530,7 @@ type AttrSetTypeConstraint DOMMouseEventScreenYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventScreenYPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventScreenYPropertyInfo = Int64 - type AttrLabel DOMMouseEventScreenYPropertyInfo = "DOMMouseEvent::screen-y" + type AttrLabel DOMMouseEventScreenYPropertyInfo = "screen-y" attrGet _ = getDOMMouseEventScreenY attrSet _ = undefined attrConstruct _ = undefined @@ -450,7 +548,7 @@ type AttrSetTypeConstraint DOMMouseEventShiftKeyPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventShiftKeyPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventShiftKeyPropertyInfo = Bool - type AttrLabel DOMMouseEventShiftKeyPropertyInfo = "DOMMouseEvent::shift-key" + type AttrLabel DOMMouseEventShiftKeyPropertyInfo = "shift-key" attrGet _ = getDOMMouseEventShiftKey attrSet _ = undefined attrConstruct _ = undefined @@ -468,7 +566,7 @@ type AttrSetTypeConstraint DOMMouseEventToElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventToElementPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventToElementPropertyInfo = DOMNode - type AttrLabel DOMMouseEventToElementPropertyInfo = "DOMMouseEvent::to-element" + type AttrLabel DOMMouseEventToElementPropertyInfo = "to-element" attrGet _ = getDOMMouseEventToElement attrSet _ = undefined attrConstruct _ = undefined @@ -486,7 +584,7 @@ type AttrSetTypeConstraint DOMMouseEventWebkitMovementXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventWebkitMovementXPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventWebkitMovementXPropertyInfo = Int64 - type AttrLabel DOMMouseEventWebkitMovementXPropertyInfo = "DOMMouseEvent::webkit-movement-x" + type AttrLabel DOMMouseEventWebkitMovementXPropertyInfo = "webkit-movement-x" attrGet _ = getDOMMouseEventWebkitMovementX attrSet _ = undefined attrConstruct _ = undefined @@ -504,7 +602,7 @@ type AttrSetTypeConstraint DOMMouseEventWebkitMovementYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventWebkitMovementYPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventWebkitMovementYPropertyInfo = Int64 - type AttrLabel DOMMouseEventWebkitMovementYPropertyInfo = "DOMMouseEvent::webkit-movement-y" + type AttrLabel DOMMouseEventWebkitMovementYPropertyInfo = "webkit-movement-y" attrGet _ = getDOMMouseEventWebkitMovementY attrSet _ = undefined attrConstruct _ = undefined @@ -522,7 +620,7 @@ type AttrSetTypeConstraint DOMMouseEventXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventXPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventXPropertyInfo = Int64 - type AttrLabel DOMMouseEventXPropertyInfo = "DOMMouseEvent::x" + type AttrLabel DOMMouseEventXPropertyInfo = "x" attrGet _ = getDOMMouseEventX attrSet _ = undefined attrConstruct _ = undefined @@ -540,22 +638,21 @@ type AttrSetTypeConstraint DOMMouseEventYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMMouseEventYPropertyInfo = DOMMouseEventK type AttrGetType DOMMouseEventYPropertyInfo = Int64 - type AttrLabel DOMMouseEventYPropertyInfo = "DOMMouseEvent::y" + type AttrLabel DOMMouseEventYPropertyInfo = "y" attrGet _ = getDOMMouseEventY attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMMouseEvent = DOMMouseEventAttributeList -type DOMMouseEventAttributeList = ('[ '("alt-key", DOMMouseEventAltKeyPropertyInfo), '("bubbles", DOMEventBubblesPropertyInfo), '("button", DOMMouseEventButtonPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("char-code", DOMUIEventCharCodePropertyInfo), '("client-x", DOMMouseEventClientXPropertyInfo), '("client-y", DOMMouseEventClientYPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("ctrl-key", DOMMouseEventCtrlKeyPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("from-element", DOMMouseEventFromElementPropertyInfo), '("key-code", DOMUIEventKeyCodePropertyInfo), '("layer-x", DOMUIEventLayerXPropertyInfo), '("layer-y", DOMUIEventLayerYPropertyInfo), '("meta-key", DOMMouseEventMetaKeyPropertyInfo), '("offset-x", DOMMouseEventOffsetXPropertyInfo), '("offset-y", DOMMouseEventOffsetYPropertyInfo), '("page-x", DOMUIEventPageXPropertyInfo), '("page-y", DOMUIEventPageYPropertyInfo), '("related-target", DOMMouseEventRelatedTargetPropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("screen-x", DOMMouseEventScreenXPropertyInfo), '("screen-y", DOMMouseEventScreenYPropertyInfo), '("shift-key", DOMMouseEventShiftKeyPropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("to-element", DOMMouseEventToElementPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("webkit-movement-x", DOMMouseEventWebkitMovementXPropertyInfo), '("webkit-movement-y", DOMMouseEventWebkitMovementYPropertyInfo), '("which", DOMUIEventWhichPropertyInfo), '("x", DOMMouseEventXPropertyInfo), '("y", DOMMouseEventYPropertyInfo)] :: [(Symbol, *)]) +type DOMMouseEventAttributeList = ('[ '("altKey", DOMMouseEventAltKeyPropertyInfo), '("bubbles", DOMEventBubblesPropertyInfo), '("button", DOMMouseEventButtonPropertyInfo), '("cancelBubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("charCode", DOMUIEventCharCodePropertyInfo), '("clientX", DOMMouseEventClientXPropertyInfo), '("clientY", DOMMouseEventClientYPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("ctrlKey", DOMMouseEventCtrlKeyPropertyInfo), '("currentTarget", DOMEventCurrentTargetPropertyInfo), '("defaultPrevented", DOMEventDefaultPreventedPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("eventPhase", DOMEventEventPhasePropertyInfo), '("fromElement", DOMMouseEventFromElementPropertyInfo), '("keyCode", DOMUIEventKeyCodePropertyInfo), '("layerX", DOMUIEventLayerXPropertyInfo), '("layerY", DOMUIEventLayerYPropertyInfo), '("metaKey", DOMMouseEventMetaKeyPropertyInfo), '("offsetX", DOMMouseEventOffsetXPropertyInfo), '("offsetY", DOMMouseEventOffsetYPropertyInfo), '("pageX", DOMUIEventPageXPropertyInfo), '("pageY", DOMUIEventPageYPropertyInfo), '("relatedTarget", DOMMouseEventRelatedTargetPropertyInfo), '("returnValue", DOMEventReturnValuePropertyInfo), '("screenX", DOMMouseEventScreenXPropertyInfo), '("screenY", DOMMouseEventScreenYPropertyInfo), '("shiftKey", DOMMouseEventShiftKeyPropertyInfo), '("srcElement", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("timeStamp", DOMEventTimeStampPropertyInfo), '("toElement", DOMMouseEventToElementPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("webkitMovementX", DOMMouseEventWebkitMovementXPropertyInfo), '("webkitMovementY", DOMMouseEventWebkitMovementYPropertyInfo), '("which", DOMUIEventWhichPropertyInfo), '("x", DOMMouseEventXPropertyInfo), '("y", DOMMouseEventYPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMMouseEvent = DOMMouseEventSignalList -type DOMMouseEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMMouseEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMMouseEvent::get_alt_key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -567,8 +664,8 @@ dOMMouseEventGetAltKey :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMMouseEventGetAltKey _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_alt_key _obj' @@ -576,11 +673,14 @@ touchManagedPtr _obj return result' +data DOMMouseEventGetAltKeyMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetAltKeyMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetAltKey + -- method DOMMouseEvent::get_button -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt16 -- throws : False -- Skip return : False @@ -592,19 +692,22 @@ dOMMouseEventGetButton :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Word16 + a -- _obj + -> m Word16 -- result dOMMouseEventGetButton _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_button _obj' touchManagedPtr _obj return result +data DOMMouseEventGetButtonMethodInfo +instance (signature ~ (m Word16), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetButtonMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetButton + -- method DOMMouseEvent::get_client_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -616,19 +719,22 @@ dOMMouseEventGetClientX :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMMouseEventGetClientX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_client_x _obj' touchManagedPtr _obj return result +data DOMMouseEventGetClientXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetClientXMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetClientX + -- method DOMMouseEvent::get_client_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -640,19 +746,22 @@ dOMMouseEventGetClientY :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMMouseEventGetClientY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_client_y _obj' touchManagedPtr _obj return result +data DOMMouseEventGetClientYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetClientYMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetClientY + -- method DOMMouseEvent::get_ctrl_key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -664,8 +773,8 @@ dOMMouseEventGetCtrlKey :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMMouseEventGetCtrlKey _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_ctrl_key _obj' @@ -673,11 +782,14 @@ touchManagedPtr _obj return result' +data DOMMouseEventGetCtrlKeyMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetCtrlKeyMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetCtrlKey + -- method DOMMouseEvent::get_from_element -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -689,8 +801,8 @@ dOMMouseEventGetFromElement :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMMouseEventGetFromElement _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_from_element _obj' @@ -699,11 +811,14 @@ touchManagedPtr _obj return result' +data DOMMouseEventGetFromElementMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetFromElementMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetFromElement + -- method DOMMouseEvent::get_meta_key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -715,8 +830,8 @@ dOMMouseEventGetMetaKey :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMMouseEventGetMetaKey _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_meta_key _obj' @@ -724,11 +839,14 @@ touchManagedPtr _obj return result' +data DOMMouseEventGetMetaKeyMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetMetaKeyMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetMetaKey + -- method DOMMouseEvent::get_offset_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -740,19 +858,22 @@ dOMMouseEventGetOffsetX :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMMouseEventGetOffsetX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_offset_x _obj' touchManagedPtr _obj return result +data DOMMouseEventGetOffsetXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetOffsetXMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetOffsetX + -- method DOMMouseEvent::get_offset_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -764,19 +885,22 @@ dOMMouseEventGetOffsetY :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMMouseEventGetOffsetY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_offset_y _obj' touchManagedPtr _obj return result +data DOMMouseEventGetOffsetYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetOffsetYMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetOffsetY + -- method DOMMouseEvent::get_related_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMEventTarget" -- throws : False -- Skip return : False @@ -788,8 +912,8 @@ dOMMouseEventGetRelatedTarget :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m DOMEventTarget + a -- _obj + -> m DOMEventTarget -- result dOMMouseEventGetRelatedTarget _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_related_target _obj' @@ -798,11 +922,14 @@ touchManagedPtr _obj return result' +data DOMMouseEventGetRelatedTargetMethodInfo +instance (signature ~ (m DOMEventTarget), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetRelatedTargetMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetRelatedTarget + -- method DOMMouseEvent::get_screen_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -814,19 +941,22 @@ dOMMouseEventGetScreenX :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMMouseEventGetScreenX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_screen_x _obj' touchManagedPtr _obj return result +data DOMMouseEventGetScreenXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetScreenXMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetScreenX + -- method DOMMouseEvent::get_screen_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -838,19 +968,22 @@ dOMMouseEventGetScreenY :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMMouseEventGetScreenY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_screen_y _obj' touchManagedPtr _obj return result +data DOMMouseEventGetScreenYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetScreenYMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetScreenY + -- method DOMMouseEvent::get_shift_key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -862,8 +995,8 @@ dOMMouseEventGetShiftKey :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMMouseEventGetShiftKey _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_shift_key _obj' @@ -871,11 +1004,14 @@ touchManagedPtr _obj return result' +data DOMMouseEventGetShiftKeyMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetShiftKeyMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetShiftKey + -- method DOMMouseEvent::get_to_element -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -887,8 +1023,8 @@ dOMMouseEventGetToElement :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMMouseEventGetToElement _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_to_element _obj' @@ -897,11 +1033,14 @@ touchManagedPtr _obj return result' +data DOMMouseEventGetToElementMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetToElementMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetToElement + -- method DOMMouseEvent::get_webkit_movement_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -913,19 +1052,22 @@ dOMMouseEventGetWebkitMovementX :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMMouseEventGetWebkitMovementX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_webkit_movement_x _obj' touchManagedPtr _obj return result +data DOMMouseEventGetWebkitMovementXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetWebkitMovementXMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetWebkitMovementX + -- method DOMMouseEvent::get_webkit_movement_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -937,19 +1079,22 @@ dOMMouseEventGetWebkitMovementY :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMMouseEventGetWebkitMovementY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_webkit_movement_y _obj' touchManagedPtr _obj return result +data DOMMouseEventGetWebkitMovementYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetWebkitMovementYMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetWebkitMovementY + -- method DOMMouseEvent::get_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -961,19 +1106,22 @@ dOMMouseEventGetX :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMMouseEventGetX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_x _obj' touchManagedPtr _obj return result +data DOMMouseEventGetXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetXMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetX + -- method DOMMouseEvent::get_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -985,19 +1133,22 @@ dOMMouseEventGetY :: (MonadIO m, DOMMouseEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMMouseEventGetY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_mouse_event_get_y _obj' touchManagedPtr _obj return result +data DOMMouseEventGetYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMMouseEventK a) => MethodInfo DOMMouseEventGetYMethodInfo a signature where + overloadedMethod _ = dOMMouseEventGetY + -- method DOMMouseEvent::init_mouse_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "canBubble", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cancelable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "detail", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "clientX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "clientY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "ctrlKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "altKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "shiftKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "metaKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "button", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "relatedTarget", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "canBubble", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cancelable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "detail", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "screenX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "screenY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "clientX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "clientY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "ctrlKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "altKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "shiftKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "metaKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "button", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "relatedTarget", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMMouseEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "canBubble", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cancelable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "detail", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "clientX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "clientY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "ctrlKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "altKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "shiftKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "metaKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "button", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "relatedTarget", argType = TInterface "WebKit" "DOMEventTarget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1024,23 +1175,23 @@ dOMMouseEventInitMouseEvent :: (MonadIO m, DOMMouseEventK a, DOMDOMWindowK b, DOMEventTargetK c) => - a -> -- _obj - T.Text -> -- type - Bool -> -- canBubble - Bool -> -- cancelable - b -> -- view - Int64 -> -- detail - Int64 -> -- screenX - Int64 -> -- screenY - Int64 -> -- clientX - Int64 -> -- clientY - Bool -> -- ctrlKey - Bool -> -- altKey - Bool -> -- shiftKey - Bool -> -- metaKey - Word16 -> -- button - c -> -- relatedTarget - m () + a -- _obj + -> T.Text -- type_ + -> Bool -- canBubble + -> Bool -- cancelable + -> b -- view + -> Int64 -- detail + -> Int64 -- screenX + -> Int64 -- screenY + -> Int64 -- clientX + -> Int64 -- clientY + -> Bool -- ctrlKey + -> Bool -- altKey + -> Bool -- shiftKey + -> Bool -- metaKey + -> Word16 -- button + -> c -- relatedTarget + -> m () -- result dOMMouseEventInitMouseEvent _obj type_ canBubble cancelable view detail screenX screenY clientX clientY ctrlKey altKey shiftKey metaKey button relatedTarget = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj type_' <- textToCString type_ @@ -1058,5 +1209,9 @@ touchManagedPtr relatedTarget freeMem type_' return () + +data DOMMouseEventInitMouseEventMethodInfo +instance (signature ~ (T.Text -> Bool -> Bool -> b -> Int64 -> Int64 -> Int64 -> Int64 -> Int64 -> Bool -> Bool -> Bool -> Bool -> Word16 -> c -> m ()), MonadIO m, DOMMouseEventK a, DOMDOMWindowK b, DOMEventTargetK c) => MethodInfo DOMMouseEventInitMouseEventMethodInfo a signature where + overloadedMethod _ = dOMMouseEventInitMouseEvent diff --git a/GI/WebKit/Objects/DOMMouseEvent.hs-boot b/GI/WebKit/Objects/DOMMouseEvent.hs-boot --- a/GI/WebKit/Objects/DOMMouseEvent.hs-boot +++ b/GI/WebKit/Objects/DOMMouseEvent.hs-boot @@ -29,3 +29,22 @@ data DOMMouseEventWebkitMovementYPropertyInfo data DOMMouseEventXPropertyInfo data DOMMouseEventYPropertyInfo +data DOMMouseEventGetAltKeyMethodInfo +data DOMMouseEventGetButtonMethodInfo +data DOMMouseEventGetClientXMethodInfo +data DOMMouseEventGetClientYMethodInfo +data DOMMouseEventGetCtrlKeyMethodInfo +data DOMMouseEventGetFromElementMethodInfo +data DOMMouseEventGetMetaKeyMethodInfo +data DOMMouseEventGetOffsetXMethodInfo +data DOMMouseEventGetOffsetYMethodInfo +data DOMMouseEventGetRelatedTargetMethodInfo +data DOMMouseEventGetScreenXMethodInfo +data DOMMouseEventGetScreenYMethodInfo +data DOMMouseEventGetShiftKeyMethodInfo +data DOMMouseEventGetToElementMethodInfo +data DOMMouseEventGetWebkitMovementXMethodInfo +data DOMMouseEventGetWebkitMovementYMethodInfo +data DOMMouseEventGetXMethodInfo +data DOMMouseEventGetYMethodInfo +data DOMMouseEventInitMouseEventMethodInfo diff --git a/GI/WebKit/Objects/DOMNamedNodeMap.hs b/GI/WebKit/Objects/DOMNamedNodeMap.hs --- a/GI/WebKit/Objects/DOMNamedNodeMap.hs +++ b/GI/WebKit/Objects/DOMNamedNodeMap.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,34 +18,42 @@ -- * Methods -- ** dOMNamedNodeMapGetLength + DOMNamedNodeMapGetLengthMethodInfo , dOMNamedNodeMapGetLength , -- ** dOMNamedNodeMapGetNamedItem + DOMNamedNodeMapGetNamedItemMethodInfo , dOMNamedNodeMapGetNamedItem , -- ** dOMNamedNodeMapGetNamedItemNs + DOMNamedNodeMapGetNamedItemNsMethodInfo , dOMNamedNodeMapGetNamedItemNs , -- ** dOMNamedNodeMapItem + DOMNamedNodeMapItemMethodInfo , dOMNamedNodeMapItem , -- ** dOMNamedNodeMapRemoveNamedItem + DOMNamedNodeMapRemoveNamedItemMethodInfo, dOMNamedNodeMapRemoveNamedItem , -- ** dOMNamedNodeMapRemoveNamedItemNs + DOMNamedNodeMapRemoveNamedItemNsMethodInfo, dOMNamedNodeMapRemoveNamedItemNs , -- ** dOMNamedNodeMapSetNamedItem + DOMNamedNodeMapSetNamedItemMethodInfo , dOMNamedNodeMapSetNamedItem , -- ** dOMNamedNodeMapSetNamedItemNs + DOMNamedNodeMapSetNamedItemNsMethodInfo , dOMNamedNodeMapSetNamedItemNs , @@ -92,6 +101,47 @@ noDOMNamedNodeMap :: Maybe DOMNamedNodeMap noDOMNamedNodeMap = Nothing +type family ResolveDOMNamedNodeMapMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMNamedNodeMapMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMNamedNodeMapMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMNamedNodeMapMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMNamedNodeMapMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMNamedNodeMapMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMNamedNodeMapMethod "item" o = DOMNamedNodeMapItemMethodInfo + ResolveDOMNamedNodeMapMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMNamedNodeMapMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMNamedNodeMapMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMNamedNodeMapMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMNamedNodeMapMethod "removeNamedItem" o = DOMNamedNodeMapRemoveNamedItemMethodInfo + ResolveDOMNamedNodeMapMethod "removeNamedItemNs" o = DOMNamedNodeMapRemoveNamedItemNsMethodInfo + ResolveDOMNamedNodeMapMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMNamedNodeMapMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMNamedNodeMapMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMNamedNodeMapMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMNamedNodeMapMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMNamedNodeMapMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMNamedNodeMapMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMNamedNodeMapMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMNamedNodeMapMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMNamedNodeMapMethod "getLength" o = DOMNamedNodeMapGetLengthMethodInfo + ResolveDOMNamedNodeMapMethod "getNamedItem" o = DOMNamedNodeMapGetNamedItemMethodInfo + ResolveDOMNamedNodeMapMethod "getNamedItemNs" o = DOMNamedNodeMapGetNamedItemNsMethodInfo + ResolveDOMNamedNodeMapMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMNamedNodeMapMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMNamedNodeMapMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMNamedNodeMapMethod "setNamedItem" o = DOMNamedNodeMapSetNamedItemMethodInfo + ResolveDOMNamedNodeMapMethod "setNamedItemNs" o = DOMNamedNodeMapSetNamedItemNsMethodInfo + ResolveDOMNamedNodeMapMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMNamedNodeMapMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMNamedNodeMapMethod t DOMNamedNodeMap, MethodInfo info DOMNamedNodeMap p) => IsLabelProxy t (DOMNamedNodeMap -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMNamedNodeMapMethod t DOMNamedNodeMap, MethodInfo info DOMNamedNodeMap p) => IsLabel t (DOMNamedNodeMap -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -105,22 +155,21 @@ type AttrSetTypeConstraint DOMNamedNodeMapLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNamedNodeMapLengthPropertyInfo = DOMNamedNodeMapK type AttrGetType DOMNamedNodeMapLengthPropertyInfo = Word64 - type AttrLabel DOMNamedNodeMapLengthPropertyInfo = "DOMNamedNodeMap::length" + type AttrLabel DOMNamedNodeMapLengthPropertyInfo = "length" attrGet _ = getDOMNamedNodeMapLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMNamedNodeMap = DOMNamedNodeMapAttributeList -type DOMNamedNodeMapAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMNamedNodeMapLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMNamedNodeMapAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMNamedNodeMapLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMNamedNodeMap = DOMNamedNodeMapSignalList -type DOMNamedNodeMapSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMNamedNodeMapSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMNamedNodeMap::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -132,19 +181,22 @@ dOMNamedNodeMapGetLength :: (MonadIO m, DOMNamedNodeMapK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMNamedNodeMapGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_named_node_map_get_length _obj' touchManagedPtr _obj return result +data DOMNamedNodeMapGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMNamedNodeMapK a) => MethodInfo DOMNamedNodeMapGetLengthMethodInfo a signature where + overloadedMethod _ = dOMNamedNodeMapGetLength + -- method DOMNamedNodeMap::get_named_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -157,9 +209,9 @@ dOMNamedNodeMapGetNamedItem :: (MonadIO m, DOMNamedNodeMapK a) => - a -> -- _obj - T.Text -> -- name - m DOMNode + a -- _obj + -> T.Text -- name + -> m DOMNode -- result dOMNamedNodeMapGetNamedItem _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -170,11 +222,14 @@ freeMem name' return result' +data DOMNamedNodeMapGetNamedItemMethodInfo +instance (signature ~ (T.Text -> m DOMNode), MonadIO m, DOMNamedNodeMapK a) => MethodInfo DOMNamedNodeMapGetNamedItemMethodInfo a signature where + overloadedMethod _ = dOMNamedNodeMapGetNamedItem + -- method DOMNamedNodeMap::get_named_item_ns -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -188,10 +243,10 @@ dOMNamedNodeMapGetNamedItemNs :: (MonadIO m, DOMNamedNodeMapK a) => - a -> -- _obj - T.Text -> -- namespaceURI - T.Text -> -- localName - m DOMNode + a -- _obj + -> T.Text -- namespaceURI + -> T.Text -- localName + -> m DOMNode -- result dOMNamedNodeMapGetNamedItemNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI @@ -204,11 +259,14 @@ freeMem localName' return result' +data DOMNamedNodeMapGetNamedItemNsMethodInfo +instance (signature ~ (T.Text -> T.Text -> m DOMNode), MonadIO m, DOMNamedNodeMapK a) => MethodInfo DOMNamedNodeMapGetNamedItemNsMethodInfo a signature where + overloadedMethod _ = dOMNamedNodeMapGetNamedItemNs + -- method DOMNamedNodeMap::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -221,9 +279,9 @@ dOMNamedNodeMapItem :: (MonadIO m, DOMNamedNodeMapK a) => - a -> -- _obj - Word64 -> -- index - m DOMNode + a -- _obj + -> Word64 -- index + -> m DOMNode -- result dOMNamedNodeMapItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_named_node_map_item _obj' index @@ -232,11 +290,14 @@ touchManagedPtr _obj return result' +data DOMNamedNodeMapItemMethodInfo +instance (signature ~ (Word64 -> m DOMNode), MonadIO m, DOMNamedNodeMapK a) => MethodInfo DOMNamedNodeMapItemMethodInfo a signature where + overloadedMethod _ = dOMNamedNodeMapItem + -- method DOMNamedNodeMap::remove_named_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -250,9 +311,9 @@ dOMNamedNodeMapRemoveNamedItem :: (MonadIO m, DOMNamedNodeMapK a) => - a -> -- _obj - T.Text -> -- name - m DOMNode + a -- _obj + -> T.Text -- name + -> m DOMNode -- result dOMNamedNodeMapRemoveNamedItem _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -267,11 +328,14 @@ freeMem name' ) +data DOMNamedNodeMapRemoveNamedItemMethodInfo +instance (signature ~ (T.Text -> m DOMNode), MonadIO m, DOMNamedNodeMapK a) => MethodInfo DOMNamedNodeMapRemoveNamedItemMethodInfo a signature where + overloadedMethod _ = dOMNamedNodeMapRemoveNamedItem + -- method DOMNamedNodeMap::remove_named_item_ns -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -286,10 +350,10 @@ dOMNamedNodeMapRemoveNamedItemNs :: (MonadIO m, DOMNamedNodeMapK a) => - a -> -- _obj - T.Text -> -- namespaceURI - T.Text -> -- localName - m DOMNode + a -- _obj + -> T.Text -- namespaceURI + -> T.Text -- localName + -> m DOMNode -- result dOMNamedNodeMapRemoveNamedItemNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI @@ -307,11 +371,14 @@ freeMem localName' ) +data DOMNamedNodeMapRemoveNamedItemNsMethodInfo +instance (signature ~ (T.Text -> T.Text -> m DOMNode), MonadIO m, DOMNamedNodeMapK a) => MethodInfo DOMNamedNodeMapRemoveNamedItemNsMethodInfo a signature where + overloadedMethod _ = dOMNamedNodeMapRemoveNamedItemNs + -- method DOMNamedNodeMap::set_named_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -325,9 +392,9 @@ dOMNamedNodeMapSetNamedItem :: (MonadIO m, DOMNamedNodeMapK a, DOMNodeK b) => - a -> -- _obj - b -> -- node - m DOMNode + a -- _obj + -> b -- node + -> m DOMNode -- result dOMNamedNodeMapSetNamedItem _obj node = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let node' = unsafeManagedPtrCastPtr node @@ -342,11 +409,14 @@ return () ) +data DOMNamedNodeMapSetNamedItemMethodInfo +instance (signature ~ (b -> m DOMNode), MonadIO m, DOMNamedNodeMapK a, DOMNodeK b) => MethodInfo DOMNamedNodeMapSetNamedItemMethodInfo a signature where + overloadedMethod _ = dOMNamedNodeMapSetNamedItem + -- method DOMNamedNodeMap::set_named_item_ns -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNamedNodeMap", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -360,9 +430,9 @@ dOMNamedNodeMapSetNamedItemNs :: (MonadIO m, DOMNamedNodeMapK a, DOMNodeK b) => - a -> -- _obj - b -> -- node - m DOMNode + a -- _obj + -> b -- node + -> m DOMNode -- result dOMNamedNodeMapSetNamedItemNs _obj node = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let node' = unsafeManagedPtrCastPtr node @@ -376,5 +446,9 @@ ) (do return () ) + +data DOMNamedNodeMapSetNamedItemNsMethodInfo +instance (signature ~ (b -> m DOMNode), MonadIO m, DOMNamedNodeMapK a, DOMNodeK b) => MethodInfo DOMNamedNodeMapSetNamedItemNsMethodInfo a signature where + overloadedMethod _ = dOMNamedNodeMapSetNamedItemNs diff --git a/GI/WebKit/Objects/DOMNamedNodeMap.hs-boot b/GI/WebKit/Objects/DOMNamedNodeMap.hs-boot --- a/GI/WebKit/Objects/DOMNamedNodeMap.hs-boot +++ b/GI/WebKit/Objects/DOMNamedNodeMap.hs-boot @@ -12,3 +12,11 @@ class GObject o => DOMNamedNodeMapK o instance (GObject o, IsDescendantOf DOMNamedNodeMap o) => DOMNamedNodeMapK o data DOMNamedNodeMapLengthPropertyInfo +data DOMNamedNodeMapGetLengthMethodInfo +data DOMNamedNodeMapGetNamedItemMethodInfo +data DOMNamedNodeMapGetNamedItemNsMethodInfo +data DOMNamedNodeMapItemMethodInfo +data DOMNamedNodeMapRemoveNamedItemMethodInfo +data DOMNamedNodeMapRemoveNamedItemNsMethodInfo +data DOMNamedNodeMapSetNamedItemMethodInfo +data DOMNamedNodeMapSetNamedItemNsMethodInfo diff --git a/GI/WebKit/Objects/DOMNavigator.hs b/GI/WebKit/Objects/DOMNavigator.hs --- a/GI/WebKit/Objects/DOMNavigator.hs +++ b/GI/WebKit/Objects/DOMNavigator.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,98 +18,122 @@ -- * Methods -- ** dOMNavigatorGetAppCodeName + DOMNavigatorGetAppCodeNameMethodInfo , dOMNavigatorGetAppCodeName , -- ** dOMNavigatorGetAppName + DOMNavigatorGetAppNameMethodInfo , dOMNavigatorGetAppName , -- ** dOMNavigatorGetAppVersion + DOMNavigatorGetAppVersionMethodInfo , dOMNavigatorGetAppVersion , -- ** dOMNavigatorGetCookieEnabled + DOMNavigatorGetCookieEnabledMethodInfo , dOMNavigatorGetCookieEnabled , -- ** dOMNavigatorGetGeolocation + DOMNavigatorGetGeolocationMethodInfo , dOMNavigatorGetGeolocation , -- ** dOMNavigatorGetLanguage + DOMNavigatorGetLanguageMethodInfo , dOMNavigatorGetLanguage , -- ** dOMNavigatorGetMimeTypes + DOMNavigatorGetMimeTypesMethodInfo , dOMNavigatorGetMimeTypes , -- ** dOMNavigatorGetOnLine + DOMNavigatorGetOnLineMethodInfo , dOMNavigatorGetOnLine , -- ** dOMNavigatorGetPlatform + DOMNavigatorGetPlatformMethodInfo , dOMNavigatorGetPlatform , -- ** dOMNavigatorGetPlugins + DOMNavigatorGetPluginsMethodInfo , dOMNavigatorGetPlugins , -- ** dOMNavigatorGetProduct + DOMNavigatorGetProductMethodInfo , dOMNavigatorGetProduct , -- ** dOMNavigatorGetProductSub + DOMNavigatorGetProductSubMethodInfo , dOMNavigatorGetProductSub , -- ** dOMNavigatorGetStorageUpdates + DOMNavigatorGetStorageUpdatesMethodInfo , dOMNavigatorGetStorageUpdates , -- ** dOMNavigatorGetUserAgent + DOMNavigatorGetUserAgentMethodInfo , dOMNavigatorGetUserAgent , -- ** dOMNavigatorGetVendor + DOMNavigatorGetVendorMethodInfo , dOMNavigatorGetVendor , -- ** dOMNavigatorGetVendorSub + DOMNavigatorGetVendorSubMethodInfo , dOMNavigatorGetVendorSub , -- ** dOMNavigatorGetWebkitBattery + DOMNavigatorGetWebkitBatteryMethodInfo , dOMNavigatorGetWebkitBattery , -- ** dOMNavigatorGetWebkitPersistentStorage + DOMNavigatorGetWebkitPersistentStorageMethodInfo, dOMNavigatorGetWebkitPersistentStorage , -- ** dOMNavigatorGetWebkitTemporaryStorage + DOMNavigatorGetWebkitTemporaryStorageMethodInfo, dOMNavigatorGetWebkitTemporaryStorage , -- ** dOMNavigatorIsProtocolHandlerRegistered + DOMNavigatorIsProtocolHandlerRegisteredMethodInfo, dOMNavigatorIsProtocolHandlerRegistered , -- ** dOMNavigatorJavaEnabled + DOMNavigatorJavaEnabledMethodInfo , dOMNavigatorJavaEnabled , -- ** dOMNavigatorRegisterProtocolHandler + DOMNavigatorRegisterProtocolHandlerMethodInfo, dOMNavigatorRegisterProtocolHandler , -- ** dOMNavigatorUnregisterProtocolHandler + DOMNavigatorUnregisterProtocolHandlerMethodInfo, dOMNavigatorUnregisterProtocolHandler , -- ** dOMNavigatorWebkitGetGamepads + DOMNavigatorWebkitGetGamepadsMethodInfo , dOMNavigatorWebkitGetGamepads , @@ -241,6 +266,63 @@ noDOMNavigator :: Maybe DOMNavigator noDOMNavigator = Nothing +type family ResolveDOMNavigatorMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMNavigatorMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMNavigatorMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMNavigatorMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMNavigatorMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMNavigatorMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMNavigatorMethod "isProtocolHandlerRegistered" o = DOMNavigatorIsProtocolHandlerRegisteredMethodInfo + ResolveDOMNavigatorMethod "javaEnabled" o = DOMNavigatorJavaEnabledMethodInfo + ResolveDOMNavigatorMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMNavigatorMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMNavigatorMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMNavigatorMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMNavigatorMethod "registerProtocolHandler" o = DOMNavigatorRegisterProtocolHandlerMethodInfo + ResolveDOMNavigatorMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMNavigatorMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMNavigatorMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMNavigatorMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMNavigatorMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMNavigatorMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMNavigatorMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMNavigatorMethod "unregisterProtocolHandler" o = DOMNavigatorUnregisterProtocolHandlerMethodInfo + ResolveDOMNavigatorMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMNavigatorMethod "webkitGetGamepads" o = DOMNavigatorWebkitGetGamepadsMethodInfo + ResolveDOMNavigatorMethod "getAppCodeName" o = DOMNavigatorGetAppCodeNameMethodInfo + ResolveDOMNavigatorMethod "getAppName" o = DOMNavigatorGetAppNameMethodInfo + ResolveDOMNavigatorMethod "getAppVersion" o = DOMNavigatorGetAppVersionMethodInfo + ResolveDOMNavigatorMethod "getCookieEnabled" o = DOMNavigatorGetCookieEnabledMethodInfo + ResolveDOMNavigatorMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMNavigatorMethod "getGeolocation" o = DOMNavigatorGetGeolocationMethodInfo + ResolveDOMNavigatorMethod "getLanguage" o = DOMNavigatorGetLanguageMethodInfo + ResolveDOMNavigatorMethod "getMimeTypes" o = DOMNavigatorGetMimeTypesMethodInfo + ResolveDOMNavigatorMethod "getOnLine" o = DOMNavigatorGetOnLineMethodInfo + ResolveDOMNavigatorMethod "getPlatform" o = DOMNavigatorGetPlatformMethodInfo + ResolveDOMNavigatorMethod "getPlugins" o = DOMNavigatorGetPluginsMethodInfo + ResolveDOMNavigatorMethod "getProduct" o = DOMNavigatorGetProductMethodInfo + ResolveDOMNavigatorMethod "getProductSub" o = DOMNavigatorGetProductSubMethodInfo + ResolveDOMNavigatorMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMNavigatorMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMNavigatorMethod "getStorageUpdates" o = DOMNavigatorGetStorageUpdatesMethodInfo + ResolveDOMNavigatorMethod "getUserAgent" o = DOMNavigatorGetUserAgentMethodInfo + ResolveDOMNavigatorMethod "getVendor" o = DOMNavigatorGetVendorMethodInfo + ResolveDOMNavigatorMethod "getVendorSub" o = DOMNavigatorGetVendorSubMethodInfo + ResolveDOMNavigatorMethod "getWebkitBattery" o = DOMNavigatorGetWebkitBatteryMethodInfo + ResolveDOMNavigatorMethod "getWebkitPersistentStorage" o = DOMNavigatorGetWebkitPersistentStorageMethodInfo + ResolveDOMNavigatorMethod "getWebkitTemporaryStorage" o = DOMNavigatorGetWebkitTemporaryStorageMethodInfo + ResolveDOMNavigatorMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMNavigatorMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMNavigatorMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMNavigatorMethod t DOMNavigator, MethodInfo info DOMNavigator p) => IsLabelProxy t (DOMNavigator -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMNavigatorMethod t DOMNavigator, MethodInfo info DOMNavigator p) => IsLabel t (DOMNavigator -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "app-code-name" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -254,7 +336,7 @@ type AttrSetTypeConstraint DOMNavigatorAppCodeNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorAppCodeNamePropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorAppCodeNamePropertyInfo = T.Text - type AttrLabel DOMNavigatorAppCodeNamePropertyInfo = "DOMNavigator::app-code-name" + type AttrLabel DOMNavigatorAppCodeNamePropertyInfo = "app-code-name" attrGet _ = getDOMNavigatorAppCodeName attrSet _ = undefined attrConstruct _ = undefined @@ -272,7 +354,7 @@ type AttrSetTypeConstraint DOMNavigatorAppNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorAppNamePropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorAppNamePropertyInfo = T.Text - type AttrLabel DOMNavigatorAppNamePropertyInfo = "DOMNavigator::app-name" + type AttrLabel DOMNavigatorAppNamePropertyInfo = "app-name" attrGet _ = getDOMNavigatorAppName attrSet _ = undefined attrConstruct _ = undefined @@ -290,7 +372,7 @@ type AttrSetTypeConstraint DOMNavigatorAppVersionPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorAppVersionPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorAppVersionPropertyInfo = T.Text - type AttrLabel DOMNavigatorAppVersionPropertyInfo = "DOMNavigator::app-version" + type AttrLabel DOMNavigatorAppVersionPropertyInfo = "app-version" attrGet _ = getDOMNavigatorAppVersion attrSet _ = undefined attrConstruct _ = undefined @@ -308,7 +390,7 @@ type AttrSetTypeConstraint DOMNavigatorCookieEnabledPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorCookieEnabledPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorCookieEnabledPropertyInfo = Bool - type AttrLabel DOMNavigatorCookieEnabledPropertyInfo = "DOMNavigator::cookie-enabled" + type AttrLabel DOMNavigatorCookieEnabledPropertyInfo = "cookie-enabled" attrGet _ = getDOMNavigatorCookieEnabled attrSet _ = undefined attrConstruct _ = undefined @@ -326,7 +408,7 @@ type AttrSetTypeConstraint DOMNavigatorGeolocationPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorGeolocationPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorGeolocationPropertyInfo = DOMGeolocation - type AttrLabel DOMNavigatorGeolocationPropertyInfo = "DOMNavigator::geolocation" + type AttrLabel DOMNavigatorGeolocationPropertyInfo = "geolocation" attrGet _ = getDOMNavigatorGeolocation attrSet _ = undefined attrConstruct _ = undefined @@ -344,7 +426,7 @@ type AttrSetTypeConstraint DOMNavigatorLanguagePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorLanguagePropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorLanguagePropertyInfo = T.Text - type AttrLabel DOMNavigatorLanguagePropertyInfo = "DOMNavigator::language" + type AttrLabel DOMNavigatorLanguagePropertyInfo = "language" attrGet _ = getDOMNavigatorLanguage attrSet _ = undefined attrConstruct _ = undefined @@ -362,7 +444,7 @@ type AttrSetTypeConstraint DOMNavigatorMimeTypesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorMimeTypesPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorMimeTypesPropertyInfo = DOMDOMMimeTypeArray - type AttrLabel DOMNavigatorMimeTypesPropertyInfo = "DOMNavigator::mime-types" + type AttrLabel DOMNavigatorMimeTypesPropertyInfo = "mime-types" attrGet _ = getDOMNavigatorMimeTypes attrSet _ = undefined attrConstruct _ = undefined @@ -380,7 +462,7 @@ type AttrSetTypeConstraint DOMNavigatorOnLinePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorOnLinePropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorOnLinePropertyInfo = Bool - type AttrLabel DOMNavigatorOnLinePropertyInfo = "DOMNavigator::on-line" + type AttrLabel DOMNavigatorOnLinePropertyInfo = "on-line" attrGet _ = getDOMNavigatorOnLine attrSet _ = undefined attrConstruct _ = undefined @@ -398,7 +480,7 @@ type AttrSetTypeConstraint DOMNavigatorPlatformPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorPlatformPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorPlatformPropertyInfo = T.Text - type AttrLabel DOMNavigatorPlatformPropertyInfo = "DOMNavigator::platform" + type AttrLabel DOMNavigatorPlatformPropertyInfo = "platform" attrGet _ = getDOMNavigatorPlatform attrSet _ = undefined attrConstruct _ = undefined @@ -416,7 +498,7 @@ type AttrSetTypeConstraint DOMNavigatorPluginsPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorPluginsPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorPluginsPropertyInfo = DOMDOMPluginArray - type AttrLabel DOMNavigatorPluginsPropertyInfo = "DOMNavigator::plugins" + type AttrLabel DOMNavigatorPluginsPropertyInfo = "plugins" attrGet _ = getDOMNavigatorPlugins attrSet _ = undefined attrConstruct _ = undefined @@ -434,7 +516,7 @@ type AttrSetTypeConstraint DOMNavigatorProductPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorProductPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorProductPropertyInfo = T.Text - type AttrLabel DOMNavigatorProductPropertyInfo = "DOMNavigator::product" + type AttrLabel DOMNavigatorProductPropertyInfo = "product" attrGet _ = getDOMNavigatorProduct attrSet _ = undefined attrConstruct _ = undefined @@ -452,7 +534,7 @@ type AttrSetTypeConstraint DOMNavigatorProductSubPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorProductSubPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorProductSubPropertyInfo = T.Text - type AttrLabel DOMNavigatorProductSubPropertyInfo = "DOMNavigator::product-sub" + type AttrLabel DOMNavigatorProductSubPropertyInfo = "product-sub" attrGet _ = getDOMNavigatorProductSub attrSet _ = undefined attrConstruct _ = undefined @@ -470,7 +552,7 @@ type AttrSetTypeConstraint DOMNavigatorUserAgentPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorUserAgentPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorUserAgentPropertyInfo = T.Text - type AttrLabel DOMNavigatorUserAgentPropertyInfo = "DOMNavigator::user-agent" + type AttrLabel DOMNavigatorUserAgentPropertyInfo = "user-agent" attrGet _ = getDOMNavigatorUserAgent attrSet _ = undefined attrConstruct _ = undefined @@ -488,7 +570,7 @@ type AttrSetTypeConstraint DOMNavigatorVendorPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorVendorPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorVendorPropertyInfo = T.Text - type AttrLabel DOMNavigatorVendorPropertyInfo = "DOMNavigator::vendor" + type AttrLabel DOMNavigatorVendorPropertyInfo = "vendor" attrGet _ = getDOMNavigatorVendor attrSet _ = undefined attrConstruct _ = undefined @@ -506,7 +588,7 @@ type AttrSetTypeConstraint DOMNavigatorVendorSubPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorVendorSubPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorVendorSubPropertyInfo = T.Text - type AttrLabel DOMNavigatorVendorSubPropertyInfo = "DOMNavigator::vendor-sub" + type AttrLabel DOMNavigatorVendorSubPropertyInfo = "vendor-sub" attrGet _ = getDOMNavigatorVendorSub attrSet _ = undefined attrConstruct _ = undefined @@ -524,7 +606,7 @@ type AttrSetTypeConstraint DOMNavigatorWebkitBatteryPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorWebkitBatteryPropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorWebkitBatteryPropertyInfo = DOMBatteryManager - type AttrLabel DOMNavigatorWebkitBatteryPropertyInfo = "DOMNavigator::webkit-battery" + type AttrLabel DOMNavigatorWebkitBatteryPropertyInfo = "webkit-battery" attrGet _ = getDOMNavigatorWebkitBattery attrSet _ = undefined attrConstruct _ = undefined @@ -542,7 +624,7 @@ type AttrSetTypeConstraint DOMNavigatorWebkitPersistentStoragePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorWebkitPersistentStoragePropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorWebkitPersistentStoragePropertyInfo = DOMStorageQuota - type AttrLabel DOMNavigatorWebkitPersistentStoragePropertyInfo = "DOMNavigator::webkit-persistent-storage" + type AttrLabel DOMNavigatorWebkitPersistentStoragePropertyInfo = "webkit-persistent-storage" attrGet _ = getDOMNavigatorWebkitPersistentStorage attrSet _ = undefined attrConstruct _ = undefined @@ -560,22 +642,21 @@ type AttrSetTypeConstraint DOMNavigatorWebkitTemporaryStoragePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNavigatorWebkitTemporaryStoragePropertyInfo = DOMNavigatorK type AttrGetType DOMNavigatorWebkitTemporaryStoragePropertyInfo = DOMStorageQuota - type AttrLabel DOMNavigatorWebkitTemporaryStoragePropertyInfo = "DOMNavigator::webkit-temporary-storage" + type AttrLabel DOMNavigatorWebkitTemporaryStoragePropertyInfo = "webkit-temporary-storage" attrGet _ = getDOMNavigatorWebkitTemporaryStorage attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMNavigator = DOMNavigatorAttributeList -type DOMNavigatorAttributeList = ('[ '("app-code-name", DOMNavigatorAppCodeNamePropertyInfo), '("app-name", DOMNavigatorAppNamePropertyInfo), '("app-version", DOMNavigatorAppVersionPropertyInfo), '("cookie-enabled", DOMNavigatorCookieEnabledPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("geolocation", DOMNavigatorGeolocationPropertyInfo), '("language", DOMNavigatorLanguagePropertyInfo), '("mime-types", DOMNavigatorMimeTypesPropertyInfo), '("on-line", DOMNavigatorOnLinePropertyInfo), '("platform", DOMNavigatorPlatformPropertyInfo), '("plugins", DOMNavigatorPluginsPropertyInfo), '("product", DOMNavigatorProductPropertyInfo), '("product-sub", DOMNavigatorProductSubPropertyInfo), '("user-agent", DOMNavigatorUserAgentPropertyInfo), '("vendor", DOMNavigatorVendorPropertyInfo), '("vendor-sub", DOMNavigatorVendorSubPropertyInfo), '("webkit-battery", DOMNavigatorWebkitBatteryPropertyInfo), '("webkit-persistent-storage", DOMNavigatorWebkitPersistentStoragePropertyInfo), '("webkit-temporary-storage", DOMNavigatorWebkitTemporaryStoragePropertyInfo)] :: [(Symbol, *)]) +type DOMNavigatorAttributeList = ('[ '("appCodeName", DOMNavigatorAppCodeNamePropertyInfo), '("appName", DOMNavigatorAppNamePropertyInfo), '("appVersion", DOMNavigatorAppVersionPropertyInfo), '("cookieEnabled", DOMNavigatorCookieEnabledPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("geolocation", DOMNavigatorGeolocationPropertyInfo), '("language", DOMNavigatorLanguagePropertyInfo), '("mimeTypes", DOMNavigatorMimeTypesPropertyInfo), '("onLine", DOMNavigatorOnLinePropertyInfo), '("platform", DOMNavigatorPlatformPropertyInfo), '("plugins", DOMNavigatorPluginsPropertyInfo), '("product", DOMNavigatorProductPropertyInfo), '("productSub", DOMNavigatorProductSubPropertyInfo), '("userAgent", DOMNavigatorUserAgentPropertyInfo), '("vendor", DOMNavigatorVendorPropertyInfo), '("vendorSub", DOMNavigatorVendorSubPropertyInfo), '("webkitBattery", DOMNavigatorWebkitBatteryPropertyInfo), '("webkitPersistentStorage", DOMNavigatorWebkitPersistentStoragePropertyInfo), '("webkitTemporaryStorage", DOMNavigatorWebkitTemporaryStoragePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMNavigator = DOMNavigatorSignalList -type DOMNavigatorSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMNavigatorSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMNavigator::get_app_code_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -587,8 +668,8 @@ dOMNavigatorGetAppCodeName :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNavigatorGetAppCodeName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_app_code_name _obj' @@ -598,11 +679,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetAppCodeNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetAppCodeNameMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetAppCodeName + -- method DOMNavigator::get_app_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -614,8 +698,8 @@ dOMNavigatorGetAppName :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNavigatorGetAppName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_app_name _obj' @@ -625,11 +709,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetAppNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetAppNameMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetAppName + -- method DOMNavigator::get_app_version -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -641,8 +728,8 @@ dOMNavigatorGetAppVersion :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNavigatorGetAppVersion _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_app_version _obj' @@ -652,11 +739,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetAppVersionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetAppVersionMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetAppVersion + -- method DOMNavigator::get_cookie_enabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -668,8 +758,8 @@ dOMNavigatorGetCookieEnabled :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMNavigatorGetCookieEnabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_cookie_enabled _obj' @@ -677,11 +767,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetCookieEnabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetCookieEnabledMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetCookieEnabled + -- method DOMNavigator::get_geolocation -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMGeolocation" -- throws : False -- Skip return : False @@ -693,8 +786,8 @@ dOMNavigatorGetGeolocation :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m DOMGeolocation + a -- _obj + -> m DOMGeolocation -- result dOMNavigatorGetGeolocation _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_geolocation _obj' @@ -703,11 +796,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetGeolocationMethodInfo +instance (signature ~ (m DOMGeolocation), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetGeolocationMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetGeolocation + -- method DOMNavigator::get_language -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -719,8 +815,8 @@ dOMNavigatorGetLanguage :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNavigatorGetLanguage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_language _obj' @@ -730,11 +826,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetLanguageMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetLanguageMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetLanguage + -- method DOMNavigator::get_mime_types -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMMimeTypeArray" -- throws : False -- Skip return : False @@ -746,8 +845,8 @@ dOMNavigatorGetMimeTypes :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m DOMDOMMimeTypeArray + a -- _obj + -> m DOMDOMMimeTypeArray -- result dOMNavigatorGetMimeTypes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_mime_types _obj' @@ -756,11 +855,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetMimeTypesMethodInfo +instance (signature ~ (m DOMDOMMimeTypeArray), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetMimeTypesMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetMimeTypes + -- method DOMNavigator::get_on_line -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -772,8 +874,8 @@ dOMNavigatorGetOnLine :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMNavigatorGetOnLine _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_on_line _obj' @@ -781,11 +883,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetOnLineMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetOnLineMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetOnLine + -- method DOMNavigator::get_platform -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -797,8 +902,8 @@ dOMNavigatorGetPlatform :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNavigatorGetPlatform _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_platform _obj' @@ -808,11 +913,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetPlatformMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetPlatformMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetPlatform + -- method DOMNavigator::get_plugins -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMPluginArray" -- throws : False -- Skip return : False @@ -824,8 +932,8 @@ dOMNavigatorGetPlugins :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m DOMDOMPluginArray + a -- _obj + -> m DOMDOMPluginArray -- result dOMNavigatorGetPlugins _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_plugins _obj' @@ -834,11 +942,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetPluginsMethodInfo +instance (signature ~ (m DOMDOMPluginArray), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetPluginsMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetPlugins + -- method DOMNavigator::get_product -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -850,8 +961,8 @@ dOMNavigatorGetProduct :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNavigatorGetProduct _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_product _obj' @@ -861,11 +972,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetProductMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetProductMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetProduct + -- method DOMNavigator::get_product_sub -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -877,8 +991,8 @@ dOMNavigatorGetProductSub :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNavigatorGetProductSub _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_product_sub _obj' @@ -888,11 +1002,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetProductSubMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetProductSubMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetProductSub + -- method DOMNavigator::get_storage_updates -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -904,19 +1021,22 @@ dOMNavigatorGetStorageUpdates :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMNavigatorGetStorageUpdates _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_navigator_get_storage_updates _obj' touchManagedPtr _obj return () +data DOMNavigatorGetStorageUpdatesMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetStorageUpdatesMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetStorageUpdates + -- method DOMNavigator::get_user_agent -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -928,8 +1048,8 @@ dOMNavigatorGetUserAgent :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNavigatorGetUserAgent _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_user_agent _obj' @@ -939,11 +1059,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetUserAgentMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetUserAgentMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetUserAgent + -- method DOMNavigator::get_vendor -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -955,8 +1078,8 @@ dOMNavigatorGetVendor :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNavigatorGetVendor _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_vendor _obj' @@ -966,11 +1089,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetVendorMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetVendorMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetVendor + -- method DOMNavigator::get_vendor_sub -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -982,8 +1108,8 @@ dOMNavigatorGetVendorSub :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNavigatorGetVendorSub _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_vendor_sub _obj' @@ -993,11 +1119,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetVendorSubMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetVendorSubMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetVendorSub + -- method DOMNavigator::get_webkit_battery -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMBatteryManager" -- throws : False -- Skip return : False @@ -1009,8 +1138,8 @@ dOMNavigatorGetWebkitBattery :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m DOMBatteryManager + a -- _obj + -> m DOMBatteryManager -- result dOMNavigatorGetWebkitBattery _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_webkit_battery _obj' @@ -1019,11 +1148,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetWebkitBatteryMethodInfo +instance (signature ~ (m DOMBatteryManager), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetWebkitBatteryMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetWebkitBattery + -- method DOMNavigator::get_webkit_persistent_storage -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMStorageQuota" -- throws : False -- Skip return : False @@ -1035,8 +1167,8 @@ dOMNavigatorGetWebkitPersistentStorage :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m DOMStorageQuota + a -- _obj + -> m DOMStorageQuota -- result dOMNavigatorGetWebkitPersistentStorage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_webkit_persistent_storage _obj' @@ -1045,11 +1177,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetWebkitPersistentStorageMethodInfo +instance (signature ~ (m DOMStorageQuota), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetWebkitPersistentStorageMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetWebkitPersistentStorage + -- method DOMNavigator::get_webkit_temporary_storage -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMStorageQuota" -- throws : False -- Skip return : False @@ -1061,8 +1196,8 @@ dOMNavigatorGetWebkitTemporaryStorage :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m DOMStorageQuota + a -- _obj + -> m DOMStorageQuota -- result dOMNavigatorGetWebkitTemporaryStorage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_get_webkit_temporary_storage _obj' @@ -1071,11 +1206,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorGetWebkitTemporaryStorageMethodInfo +instance (signature ~ (m DOMStorageQuota), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorGetWebkitTemporaryStorageMethodInfo a signature where + overloadedMethod _ = dOMNavigatorGetWebkitTemporaryStorage + -- method DOMNavigator::is_protocol_handler_registered -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : True -- Skip return : False @@ -1090,10 +1228,10 @@ dOMNavigatorIsProtocolHandlerRegistered :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - T.Text -> -- scheme - T.Text -> -- url - m T.Text + a -- _obj + -> T.Text -- scheme + -> T.Text -- url + -> m T.Text -- result dOMNavigatorIsProtocolHandlerRegistered _obj scheme url = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj scheme' <- textToCString scheme @@ -1112,11 +1250,14 @@ freeMem url' ) +data DOMNavigatorIsProtocolHandlerRegisteredMethodInfo +instance (signature ~ (T.Text -> T.Text -> m T.Text), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorIsProtocolHandlerRegisteredMethodInfo a signature where + overloadedMethod _ = dOMNavigatorIsProtocolHandlerRegistered + -- method DOMNavigator::java_enabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1128,8 +1269,8 @@ dOMNavigatorJavaEnabled :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMNavigatorJavaEnabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_java_enabled _obj' @@ -1137,11 +1278,14 @@ touchManagedPtr _obj return result' +data DOMNavigatorJavaEnabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorJavaEnabledMethodInfo a signature where + overloadedMethod _ = dOMNavigatorJavaEnabled + -- method DOMNavigator::register_protocol_handler -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1157,11 +1301,11 @@ dOMNavigatorRegisterProtocolHandler :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - T.Text -> -- scheme - T.Text -> -- url - T.Text -> -- title - m () + a -- _obj + -> T.Text -- scheme + -> T.Text -- url + -> T.Text -- title + -> m () -- result dOMNavigatorRegisterProtocolHandler _obj scheme url title = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj scheme' <- textToCString scheme @@ -1180,11 +1324,14 @@ freeMem title' ) +data DOMNavigatorRegisterProtocolHandlerMethodInfo +instance (signature ~ (T.Text -> T.Text -> T.Text -> m ()), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorRegisterProtocolHandlerMethodInfo a signature where + overloadedMethod _ = dOMNavigatorRegisterProtocolHandler + -- method DOMNavigator::unregister_protocol_handler -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "scheme", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1199,10 +1346,10 @@ dOMNavigatorUnregisterProtocolHandler :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - T.Text -> -- scheme - T.Text -> -- url - m () + a -- _obj + -> T.Text -- scheme + -> T.Text -- url + -> m () -- result dOMNavigatorUnregisterProtocolHandler _obj scheme url = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj scheme' <- textToCString scheme @@ -1218,11 +1365,14 @@ freeMem url' ) +data DOMNavigatorUnregisterProtocolHandlerMethodInfo +instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorUnregisterProtocolHandlerMethodInfo a signature where + overloadedMethod _ = dOMNavigatorUnregisterProtocolHandler + -- method DOMNavigator::webkit_get_gamepads -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNavigator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMGamepadList" -- throws : False -- Skip return : False @@ -1234,8 +1384,8 @@ dOMNavigatorWebkitGetGamepads :: (MonadIO m, DOMNavigatorK a) => - a -> -- _obj - m DOMGamepadList + a -- _obj + -> m DOMGamepadList -- result dOMNavigatorWebkitGetGamepads _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_navigator_webkit_get_gamepads _obj' @@ -1243,5 +1393,9 @@ result' <- (wrapObject DOMGamepadList) result touchManagedPtr _obj return result' + +data DOMNavigatorWebkitGetGamepadsMethodInfo +instance (signature ~ (m DOMGamepadList), MonadIO m, DOMNavigatorK a) => MethodInfo DOMNavigatorWebkitGetGamepadsMethodInfo a signature where + overloadedMethod _ = dOMNavigatorWebkitGetGamepads diff --git a/GI/WebKit/Objects/DOMNavigator.hs-boot b/GI/WebKit/Objects/DOMNavigator.hs-boot --- a/GI/WebKit/Objects/DOMNavigator.hs-boot +++ b/GI/WebKit/Objects/DOMNavigator.hs-boot @@ -29,3 +29,27 @@ data DOMNavigatorWebkitBatteryPropertyInfo data DOMNavigatorWebkitPersistentStoragePropertyInfo data DOMNavigatorWebkitTemporaryStoragePropertyInfo +data DOMNavigatorGetAppCodeNameMethodInfo +data DOMNavigatorGetAppNameMethodInfo +data DOMNavigatorGetAppVersionMethodInfo +data DOMNavigatorGetCookieEnabledMethodInfo +data DOMNavigatorGetGeolocationMethodInfo +data DOMNavigatorGetLanguageMethodInfo +data DOMNavigatorGetMimeTypesMethodInfo +data DOMNavigatorGetOnLineMethodInfo +data DOMNavigatorGetPlatformMethodInfo +data DOMNavigatorGetPluginsMethodInfo +data DOMNavigatorGetProductMethodInfo +data DOMNavigatorGetProductSubMethodInfo +data DOMNavigatorGetStorageUpdatesMethodInfo +data DOMNavigatorGetUserAgentMethodInfo +data DOMNavigatorGetVendorMethodInfo +data DOMNavigatorGetVendorSubMethodInfo +data DOMNavigatorGetWebkitBatteryMethodInfo +data DOMNavigatorGetWebkitPersistentStorageMethodInfo +data DOMNavigatorGetWebkitTemporaryStorageMethodInfo +data DOMNavigatorIsProtocolHandlerRegisteredMethodInfo +data DOMNavigatorJavaEnabledMethodInfo +data DOMNavigatorRegisterProtocolHandlerMethodInfo +data DOMNavigatorUnregisterProtocolHandlerMethodInfo +data DOMNavigatorWebkitGetGamepadsMethodInfo diff --git a/GI/WebKit/Objects/DOMNode.hs b/GI/WebKit/Objects/DOMNode.hs --- a/GI/WebKit/Objects/DOMNode.hs +++ b/GI/WebKit/Objects/DOMNode.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,150 +18,187 @@ -- * Methods -- ** dOMNodeAppendChild + DOMNodeAppendChildMethodInfo , dOMNodeAppendChild , -- ** dOMNodeCloneNode + DOMNodeCloneNodeMethodInfo , dOMNodeCloneNode , -- ** dOMNodeCompareDocumentPosition + DOMNodeCompareDocumentPositionMethodInfo, dOMNodeCompareDocumentPosition , -- ** dOMNodeContains + DOMNodeContainsMethodInfo , dOMNodeContains , -- ** dOMNodeDispatchEvent + DOMNodeDispatchEventMethodInfo , dOMNodeDispatchEvent , -- ** dOMNodeGetAttributes + DOMNodeGetAttributesMethodInfo , dOMNodeGetAttributes , -- ** dOMNodeGetBaseUri + DOMNodeGetBaseUriMethodInfo , dOMNodeGetBaseUri , -- ** dOMNodeGetChildNodes + DOMNodeGetChildNodesMethodInfo , dOMNodeGetChildNodes , -- ** dOMNodeGetFirstChild + DOMNodeGetFirstChildMethodInfo , dOMNodeGetFirstChild , -- ** dOMNodeGetLastChild + DOMNodeGetLastChildMethodInfo , dOMNodeGetLastChild , -- ** dOMNodeGetLocalName + DOMNodeGetLocalNameMethodInfo , dOMNodeGetLocalName , -- ** dOMNodeGetNamespaceUri + DOMNodeGetNamespaceUriMethodInfo , dOMNodeGetNamespaceUri , -- ** dOMNodeGetNextSibling + DOMNodeGetNextSiblingMethodInfo , dOMNodeGetNextSibling , -- ** dOMNodeGetNodeName + DOMNodeGetNodeNameMethodInfo , dOMNodeGetNodeName , -- ** dOMNodeGetNodeType + DOMNodeGetNodeTypeMethodInfo , dOMNodeGetNodeType , -- ** dOMNodeGetNodeValue + DOMNodeGetNodeValueMethodInfo , dOMNodeGetNodeValue , -- ** dOMNodeGetOwnerDocument + DOMNodeGetOwnerDocumentMethodInfo , dOMNodeGetOwnerDocument , -- ** dOMNodeGetParentElement + DOMNodeGetParentElementMethodInfo , dOMNodeGetParentElement , -- ** dOMNodeGetParentNode + DOMNodeGetParentNodeMethodInfo , dOMNodeGetParentNode , -- ** dOMNodeGetPrefix + DOMNodeGetPrefixMethodInfo , dOMNodeGetPrefix , -- ** dOMNodeGetPreviousSibling + DOMNodeGetPreviousSiblingMethodInfo , dOMNodeGetPreviousSibling , -- ** dOMNodeGetTextContent + DOMNodeGetTextContentMethodInfo , dOMNodeGetTextContent , -- ** dOMNodeHasAttributes + DOMNodeHasAttributesMethodInfo , dOMNodeHasAttributes , -- ** dOMNodeHasChildNodes + DOMNodeHasChildNodesMethodInfo , dOMNodeHasChildNodes , -- ** dOMNodeInsertBefore + DOMNodeInsertBeforeMethodInfo , dOMNodeInsertBefore , -- ** dOMNodeIsDefaultNamespace + DOMNodeIsDefaultNamespaceMethodInfo , dOMNodeIsDefaultNamespace , -- ** dOMNodeIsEqualNode + DOMNodeIsEqualNodeMethodInfo , dOMNodeIsEqualNode , -- ** dOMNodeIsSameNode + DOMNodeIsSameNodeMethodInfo , dOMNodeIsSameNode , -- ** dOMNodeIsSupported + DOMNodeIsSupportedMethodInfo , dOMNodeIsSupported , -- ** dOMNodeLookupNamespaceUri + DOMNodeLookupNamespaceUriMethodInfo , dOMNodeLookupNamespaceUri , -- ** dOMNodeLookupPrefix + DOMNodeLookupPrefixMethodInfo , dOMNodeLookupPrefix , -- ** dOMNodeNormalize + DOMNodeNormalizeMethodInfo , dOMNodeNormalize , -- ** dOMNodeRemoveChild + DOMNodeRemoveChildMethodInfo , dOMNodeRemoveChild , -- ** dOMNodeReplaceChild + DOMNodeReplaceChildMethodInfo , dOMNodeReplaceChild , -- ** dOMNodeSetNodeValue + DOMNodeSetNodeValueMethodInfo , dOMNodeSetNodeValue , -- ** dOMNodeSetPrefix + DOMNodeSetPrefixMethodInfo , dOMNodeSetPrefix , -- ** dOMNodeSetTextContent + DOMNodeSetTextContentMethodInfo , dOMNodeSetTextContent , @@ -289,6 +327,77 @@ noDOMNode :: Maybe DOMNode noDOMNode = Nothing +type family ResolveDOMNodeMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMNodeMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMNodeMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMNodeMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMNodeMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMNodeMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMNodeMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMNodeMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMNodeMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMNodeMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMNodeMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMNodeMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMNodeMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMNodeMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMNodeMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMNodeMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMNodeMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMNodeMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMNodeMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMNodeMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMNodeMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMNodeMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMNodeMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMNodeMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMNodeMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMNodeMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMNodeMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMNodeMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMNodeMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMNodeMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMNodeMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMNodeMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMNodeMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMNodeMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMNodeMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMNodeMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMNodeMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMNodeMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMNodeMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMNodeMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMNodeMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMNodeMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMNodeMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMNodeMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMNodeMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMNodeMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMNodeMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMNodeMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMNodeMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMNodeMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMNodeMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMNodeMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMNodeMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMNodeMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMNodeMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMNodeMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMNodeMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMNodeMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMNodeMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMNodeMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMNodeMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMNodeMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMNodeMethod t DOMNode, MethodInfo info DOMNode p) => IsLabelProxy t (DOMNode -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMNodeMethod t DOMNode, MethodInfo info DOMNode p) => IsLabel t (DOMNode -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "base-uri" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -302,7 +411,7 @@ type AttrSetTypeConstraint DOMNodeBaseUriPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeBaseUriPropertyInfo = DOMNodeK type AttrGetType DOMNodeBaseUriPropertyInfo = T.Text - type AttrLabel DOMNodeBaseUriPropertyInfo = "DOMNode::base-uri" + type AttrLabel DOMNodeBaseUriPropertyInfo = "base-uri" attrGet _ = getDOMNodeBaseUri attrSet _ = undefined attrConstruct _ = undefined @@ -320,7 +429,7 @@ type AttrSetTypeConstraint DOMNodeChildNodesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeChildNodesPropertyInfo = DOMNodeK type AttrGetType DOMNodeChildNodesPropertyInfo = DOMNodeList - type AttrLabel DOMNodeChildNodesPropertyInfo = "DOMNode::child-nodes" + type AttrLabel DOMNodeChildNodesPropertyInfo = "child-nodes" attrGet _ = getDOMNodeChildNodes attrSet _ = undefined attrConstruct _ = undefined @@ -338,7 +447,7 @@ type AttrSetTypeConstraint DOMNodeFirstChildPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeFirstChildPropertyInfo = DOMNodeK type AttrGetType DOMNodeFirstChildPropertyInfo = DOMNode - type AttrLabel DOMNodeFirstChildPropertyInfo = "DOMNode::first-child" + type AttrLabel DOMNodeFirstChildPropertyInfo = "first-child" attrGet _ = getDOMNodeFirstChild attrSet _ = undefined attrConstruct _ = undefined @@ -356,7 +465,7 @@ type AttrSetTypeConstraint DOMNodeLastChildPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeLastChildPropertyInfo = DOMNodeK type AttrGetType DOMNodeLastChildPropertyInfo = DOMNode - type AttrLabel DOMNodeLastChildPropertyInfo = "DOMNode::last-child" + type AttrLabel DOMNodeLastChildPropertyInfo = "last-child" attrGet _ = getDOMNodeLastChild attrSet _ = undefined attrConstruct _ = undefined @@ -374,7 +483,7 @@ type AttrSetTypeConstraint DOMNodeLocalNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeLocalNamePropertyInfo = DOMNodeK type AttrGetType DOMNodeLocalNamePropertyInfo = T.Text - type AttrLabel DOMNodeLocalNamePropertyInfo = "DOMNode::local-name" + type AttrLabel DOMNodeLocalNamePropertyInfo = "local-name" attrGet _ = getDOMNodeLocalName attrSet _ = undefined attrConstruct _ = undefined @@ -392,7 +501,7 @@ type AttrSetTypeConstraint DOMNodeNamespaceUriPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeNamespaceUriPropertyInfo = DOMNodeK type AttrGetType DOMNodeNamespaceUriPropertyInfo = T.Text - type AttrLabel DOMNodeNamespaceUriPropertyInfo = "DOMNode::namespace-uri" + type AttrLabel DOMNodeNamespaceUriPropertyInfo = "namespace-uri" attrGet _ = getDOMNodeNamespaceUri attrSet _ = undefined attrConstruct _ = undefined @@ -410,7 +519,7 @@ type AttrSetTypeConstraint DOMNodeNextSiblingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeNextSiblingPropertyInfo = DOMNodeK type AttrGetType DOMNodeNextSiblingPropertyInfo = DOMNode - type AttrLabel DOMNodeNextSiblingPropertyInfo = "DOMNode::next-sibling" + type AttrLabel DOMNodeNextSiblingPropertyInfo = "next-sibling" attrGet _ = getDOMNodeNextSibling attrSet _ = undefined attrConstruct _ = undefined @@ -428,7 +537,7 @@ type AttrSetTypeConstraint DOMNodeNodeNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeNodeNamePropertyInfo = DOMNodeK type AttrGetType DOMNodeNodeNamePropertyInfo = T.Text - type AttrLabel DOMNodeNodeNamePropertyInfo = "DOMNode::node-name" + type AttrLabel DOMNodeNodeNamePropertyInfo = "node-name" attrGet _ = getDOMNodeNodeName attrSet _ = undefined attrConstruct _ = undefined @@ -446,7 +555,7 @@ type AttrSetTypeConstraint DOMNodeNodeTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeNodeTypePropertyInfo = DOMNodeK type AttrGetType DOMNodeNodeTypePropertyInfo = Word32 - type AttrLabel DOMNodeNodeTypePropertyInfo = "DOMNode::node-type" + type AttrLabel DOMNodeNodeTypePropertyInfo = "node-type" attrGet _ = getDOMNodeNodeType attrSet _ = undefined attrConstruct _ = undefined @@ -470,7 +579,7 @@ type AttrSetTypeConstraint DOMNodeNodeValuePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMNodeNodeValuePropertyInfo = DOMNodeK type AttrGetType DOMNodeNodeValuePropertyInfo = T.Text - type AttrLabel DOMNodeNodeValuePropertyInfo = "DOMNode::node-value" + type AttrLabel DOMNodeNodeValuePropertyInfo = "node-value" attrGet _ = getDOMNodeNodeValue attrSet _ = setDOMNodeNodeValue attrConstruct _ = constructDOMNodeNodeValue @@ -488,7 +597,7 @@ type AttrSetTypeConstraint DOMNodeOwnerDocumentPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeOwnerDocumentPropertyInfo = DOMNodeK type AttrGetType DOMNodeOwnerDocumentPropertyInfo = DOMDocument - type AttrLabel DOMNodeOwnerDocumentPropertyInfo = "DOMNode::owner-document" + type AttrLabel DOMNodeOwnerDocumentPropertyInfo = "owner-document" attrGet _ = getDOMNodeOwnerDocument attrSet _ = undefined attrConstruct _ = undefined @@ -506,7 +615,7 @@ type AttrSetTypeConstraint DOMNodeParentElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeParentElementPropertyInfo = DOMNodeK type AttrGetType DOMNodeParentElementPropertyInfo = DOMElement - type AttrLabel DOMNodeParentElementPropertyInfo = "DOMNode::parent-element" + type AttrLabel DOMNodeParentElementPropertyInfo = "parent-element" attrGet _ = getDOMNodeParentElement attrSet _ = undefined attrConstruct _ = undefined @@ -524,7 +633,7 @@ type AttrSetTypeConstraint DOMNodeParentNodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeParentNodePropertyInfo = DOMNodeK type AttrGetType DOMNodeParentNodePropertyInfo = DOMNode - type AttrLabel DOMNodeParentNodePropertyInfo = "DOMNode::parent-node" + type AttrLabel DOMNodeParentNodePropertyInfo = "parent-node" attrGet _ = getDOMNodeParentNode attrSet _ = undefined attrConstruct _ = undefined @@ -548,7 +657,7 @@ type AttrSetTypeConstraint DOMNodePrefixPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMNodePrefixPropertyInfo = DOMNodeK type AttrGetType DOMNodePrefixPropertyInfo = T.Text - type AttrLabel DOMNodePrefixPropertyInfo = "DOMNode::prefix" + type AttrLabel DOMNodePrefixPropertyInfo = "prefix" attrGet _ = getDOMNodePrefix attrSet _ = setDOMNodePrefix attrConstruct _ = constructDOMNodePrefix @@ -566,7 +675,7 @@ type AttrSetTypeConstraint DOMNodePreviousSiblingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodePreviousSiblingPropertyInfo = DOMNodeK type AttrGetType DOMNodePreviousSiblingPropertyInfo = DOMNode - type AttrLabel DOMNodePreviousSiblingPropertyInfo = "DOMNode::previous-sibling" + type AttrLabel DOMNodePreviousSiblingPropertyInfo = "previous-sibling" attrGet _ = getDOMNodePreviousSibling attrSet _ = undefined attrConstruct _ = undefined @@ -590,22 +699,21 @@ type AttrSetTypeConstraint DOMNodeTextContentPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMNodeTextContentPropertyInfo = DOMNodeK type AttrGetType DOMNodeTextContentPropertyInfo = T.Text - type AttrLabel DOMNodeTextContentPropertyInfo = "DOMNode::text-content" + type AttrLabel DOMNodeTextContentPropertyInfo = "text-content" attrGet _ = getDOMNodeTextContent attrSet _ = setDOMNodeTextContent attrConstruct _ = constructDOMNodeTextContent type instance AttributeList DOMNode = DOMNodeAttributeList -type DOMNodeAttributeList = ('[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) +type DOMNodeAttributeList = ('[ '("baseUri", DOMNodeBaseUriPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMNode = DOMNodeSignalList -type DOMNodeSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMNodeSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMNode::append_child -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "newChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -619,9 +727,9 @@ dOMNodeAppendChild :: (MonadIO m, DOMNodeK a, DOMNodeK b) => - a -> -- _obj - b -> -- newChild - m DOMNode + a -- _obj + -> b -- newChild + -> m DOMNode -- result dOMNodeAppendChild _obj newChild = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let newChild' = unsafeManagedPtrCastPtr newChild @@ -636,11 +744,14 @@ return () ) +data DOMNodeAppendChildMethodInfo +instance (signature ~ (b -> m DOMNode), MonadIO m, DOMNodeK a, DOMNodeK b) => MethodInfo DOMNodeAppendChildMethodInfo a signature where + overloadedMethod _ = dOMNodeAppendChild + -- method DOMNode::clone_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "deep", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "deep", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "deep", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -653,9 +764,9 @@ dOMNodeCloneNode :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - Bool -> -- deep - m DOMNode + a -- _obj + -> Bool -- deep + -> m DOMNode -- result dOMNodeCloneNode _obj deep = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let deep' = (fromIntegral . fromEnum) deep @@ -665,11 +776,14 @@ touchManagedPtr _obj return result' +data DOMNodeCloneNodeMethodInfo +instance (signature ~ (Bool -> m DOMNode), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeCloneNodeMethodInfo a signature where + overloadedMethod _ = dOMNodeCloneNode + -- method DOMNode::compare_document_position -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt16 -- throws : False -- Skip return : False @@ -682,9 +796,9 @@ dOMNodeCompareDocumentPosition :: (MonadIO m, DOMNodeK a, DOMNodeK b) => - a -> -- _obj - b -> -- other - m Word16 + a -- _obj + -> b -- other + -> m Word16 -- result dOMNodeCompareDocumentPosition _obj other = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let other' = unsafeManagedPtrCastPtr other @@ -693,11 +807,14 @@ touchManagedPtr other return result +data DOMNodeCompareDocumentPositionMethodInfo +instance (signature ~ (b -> m Word16), MonadIO m, DOMNodeK a, DOMNodeK b) => MethodInfo DOMNodeCompareDocumentPositionMethodInfo a signature where + overloadedMethod _ = dOMNodeCompareDocumentPosition + -- method DOMNode::contains -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -710,9 +827,9 @@ dOMNodeContains :: (MonadIO m, DOMNodeK a, DOMNodeK b) => - a -> -- _obj - b -> -- other - m Bool + a -- _obj + -> b -- other + -> m Bool -- result dOMNodeContains _obj other = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let other' = unsafeManagedPtrCastPtr other @@ -722,11 +839,14 @@ touchManagedPtr other return result' +data DOMNodeContainsMethodInfo +instance (signature ~ (b -> m Bool), MonadIO m, DOMNodeK a, DOMNodeK b) => MethodInfo DOMNodeContainsMethodInfo a signature where + overloadedMethod _ = dOMNodeContains + -- method DOMNode::dispatch_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -740,9 +860,9 @@ {-# DEPRECATED dOMNodeDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-} dOMNodeDispatchEvent :: (MonadIO m, DOMNodeK a, DOMEventK b) => - a -> -- _obj - b -> -- event - m () + a -- _obj + -> b -- event + -> m () -- result dOMNodeDispatchEvent _obj event = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let event' = unsafeManagedPtrCastPtr event @@ -755,11 +875,14 @@ return () ) +data DOMNodeDispatchEventMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMNodeK a, DOMEventK b) => MethodInfo DOMNodeDispatchEventMethodInfo a signature where + overloadedMethod _ = dOMNodeDispatchEvent + -- method DOMNode::get_attributes -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNamedNodeMap" -- throws : False -- Skip return : False @@ -771,8 +894,8 @@ {-# DEPRECATED dOMNodeGetAttributes ["(Since version 2.2)"]#-} dOMNodeGetAttributes :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m DOMNamedNodeMap + a -- _obj + -> m DOMNamedNodeMap -- result dOMNodeGetAttributes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_attributes _obj' @@ -781,11 +904,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetAttributesMethodInfo +instance (signature ~ (m DOMNamedNodeMap), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetAttributesMethodInfo a signature where + overloadedMethod _ = dOMNodeGetAttributes + -- method DOMNode::get_base_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -797,8 +923,8 @@ dOMNodeGetBaseUri :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNodeGetBaseUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_base_uri _obj' @@ -808,11 +934,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetBaseUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetBaseUriMethodInfo a signature where + overloadedMethod _ = dOMNodeGetBaseUri + -- method DOMNode::get_child_nodes -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -824,8 +953,8 @@ dOMNodeGetChildNodes :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m DOMNodeList + a -- _obj + -> m DOMNodeList -- result dOMNodeGetChildNodes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_child_nodes _obj' @@ -834,11 +963,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetChildNodesMethodInfo +instance (signature ~ (m DOMNodeList), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetChildNodesMethodInfo a signature where + overloadedMethod _ = dOMNodeGetChildNodes + -- method DOMNode::get_first_child -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -850,8 +982,8 @@ dOMNodeGetFirstChild :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMNodeGetFirstChild _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_first_child _obj' @@ -860,11 +992,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetFirstChildMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetFirstChildMethodInfo a signature where + overloadedMethod _ = dOMNodeGetFirstChild + -- method DOMNode::get_last_child -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -876,8 +1011,8 @@ dOMNodeGetLastChild :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMNodeGetLastChild _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_last_child _obj' @@ -886,11 +1021,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetLastChildMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetLastChildMethodInfo a signature where + overloadedMethod _ = dOMNodeGetLastChild + -- method DOMNode::get_local_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -902,8 +1040,8 @@ dOMNodeGetLocalName :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNodeGetLocalName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_local_name _obj' @@ -913,11 +1051,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetLocalNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetLocalNameMethodInfo a signature where + overloadedMethod _ = dOMNodeGetLocalName + -- method DOMNode::get_namespace_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -929,8 +1070,8 @@ dOMNodeGetNamespaceUri :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNodeGetNamespaceUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_namespace_uri _obj' @@ -940,11 +1081,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetNamespaceUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetNamespaceUriMethodInfo a signature where + overloadedMethod _ = dOMNodeGetNamespaceUri + -- method DOMNode::get_next_sibling -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -956,8 +1100,8 @@ dOMNodeGetNextSibling :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMNodeGetNextSibling _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_next_sibling _obj' @@ -966,11 +1110,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetNextSiblingMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetNextSiblingMethodInfo a signature where + overloadedMethod _ = dOMNodeGetNextSibling + -- method DOMNode::get_node_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -982,8 +1129,8 @@ dOMNodeGetNodeName :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNodeGetNodeName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_node_name _obj' @@ -993,11 +1140,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetNodeNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetNodeNameMethodInfo a signature where + overloadedMethod _ = dOMNodeGetNodeName + -- method DOMNode::get_node_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt16 -- throws : False -- Skip return : False @@ -1009,19 +1159,22 @@ dOMNodeGetNodeType :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m Word16 + a -- _obj + -> m Word16 -- result dOMNodeGetNodeType _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_node_type _obj' touchManagedPtr _obj return result +data DOMNodeGetNodeTypeMethodInfo +instance (signature ~ (m Word16), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetNodeTypeMethodInfo a signature where + overloadedMethod _ = dOMNodeGetNodeType + -- method DOMNode::get_node_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1033,8 +1186,8 @@ dOMNodeGetNodeValue :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNodeGetNodeValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_node_value _obj' @@ -1044,11 +1197,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetNodeValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetNodeValueMethodInfo a signature where + overloadedMethod _ = dOMNodeGetNodeValue + -- method DOMNode::get_owner_document -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDocument" -- throws : False -- Skip return : False @@ -1060,8 +1216,8 @@ dOMNodeGetOwnerDocument :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m DOMDocument + a -- _obj + -> m DOMDocument -- result dOMNodeGetOwnerDocument _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_owner_document _obj' @@ -1070,11 +1226,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetOwnerDocumentMethodInfo +instance (signature ~ (m DOMDocument), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetOwnerDocumentMethodInfo a signature where + overloadedMethod _ = dOMNodeGetOwnerDocument + -- method DOMNode::get_parent_element -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : False -- Skip return : False @@ -1086,8 +1245,8 @@ dOMNodeGetParentElement :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m DOMElement + a -- _obj + -> m DOMElement -- result dOMNodeGetParentElement _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_parent_element _obj' @@ -1096,11 +1255,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetParentElementMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetParentElementMethodInfo a signature where + overloadedMethod _ = dOMNodeGetParentElement + -- method DOMNode::get_parent_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -1112,8 +1274,8 @@ dOMNodeGetParentNode :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMNodeGetParentNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_parent_node _obj' @@ -1122,11 +1284,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetParentNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetParentNodeMethodInfo a signature where + overloadedMethod _ = dOMNodeGetParentNode + -- method DOMNode::get_prefix -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1138,8 +1303,8 @@ dOMNodeGetPrefix :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNodeGetPrefix _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_prefix _obj' @@ -1149,11 +1314,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetPrefixMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetPrefixMethodInfo a signature where + overloadedMethod _ = dOMNodeGetPrefix + -- method DOMNode::get_previous_sibling -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -1165,8 +1333,8 @@ dOMNodeGetPreviousSibling :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMNodeGetPreviousSibling _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_previous_sibling _obj' @@ -1175,11 +1343,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetPreviousSiblingMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetPreviousSiblingMethodInfo a signature where + overloadedMethod _ = dOMNodeGetPreviousSibling + -- method DOMNode::get_text_content -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1191,8 +1362,8 @@ dOMNodeGetTextContent :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMNodeGetTextContent _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_get_text_content _obj' @@ -1202,11 +1373,14 @@ touchManagedPtr _obj return result' +data DOMNodeGetTextContentMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeGetTextContentMethodInfo a signature where + overloadedMethod _ = dOMNodeGetTextContent + -- method DOMNode::has_attributes -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1218,8 +1392,8 @@ {-# DEPRECATED dOMNodeHasAttributes ["(Since version 2.2)"]#-} dOMNodeHasAttributes :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMNodeHasAttributes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_has_attributes _obj' @@ -1227,11 +1401,14 @@ touchManagedPtr _obj return result' +data DOMNodeHasAttributesMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeHasAttributesMethodInfo a signature where + overloadedMethod _ = dOMNodeHasAttributes + -- method DOMNode::has_child_nodes -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1243,8 +1420,8 @@ dOMNodeHasChildNodes :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMNodeHasChildNodes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_has_child_nodes _obj' @@ -1252,11 +1429,14 @@ touchManagedPtr _obj return result' +data DOMNodeHasChildNodesMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeHasChildNodesMethodInfo a signature where + overloadedMethod _ = dOMNodeHasChildNodes + -- method DOMNode::insert_before -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "newChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -1271,10 +1451,10 @@ dOMNodeInsertBefore :: (MonadIO m, DOMNodeK a, DOMNodeK b, DOMNodeK c) => - a -> -- _obj - b -> -- newChild - Maybe (c) -> -- refChild - m DOMNode + a -- _obj + -> b -- newChild + -> Maybe (c) -- refChild + -> m DOMNode -- result dOMNodeInsertBefore _obj newChild refChild = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let newChild' = unsafeManagedPtrCastPtr newChild @@ -1295,11 +1475,14 @@ return () ) +data DOMNodeInsertBeforeMethodInfo +instance (signature ~ (b -> Maybe (c) -> m DOMNode), MonadIO m, DOMNodeK a, DOMNodeK b, DOMNodeK c) => MethodInfo DOMNodeInsertBeforeMethodInfo a signature where + overloadedMethod _ = dOMNodeInsertBefore + -- method DOMNode::is_default_namespace -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1312,9 +1495,9 @@ dOMNodeIsDefaultNamespace :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - T.Text -> -- namespaceURI - m Bool + a -- _obj + -> T.Text -- namespaceURI + -> m Bool -- result dOMNodeIsDefaultNamespace _obj namespaceURI = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI @@ -1324,11 +1507,14 @@ freeMem namespaceURI' return result' +data DOMNodeIsDefaultNamespaceMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeIsDefaultNamespaceMethodInfo a signature where + overloadedMethod _ = dOMNodeIsDefaultNamespace + -- method DOMNode::is_equal_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1341,9 +1527,9 @@ dOMNodeIsEqualNode :: (MonadIO m, DOMNodeK a, DOMNodeK b) => - a -> -- _obj - b -> -- other - m Bool + a -- _obj + -> b -- other + -> m Bool -- result dOMNodeIsEqualNode _obj other = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let other' = unsafeManagedPtrCastPtr other @@ -1353,11 +1539,14 @@ touchManagedPtr other return result' +data DOMNodeIsEqualNodeMethodInfo +instance (signature ~ (b -> m Bool), MonadIO m, DOMNodeK a, DOMNodeK b) => MethodInfo DOMNodeIsEqualNodeMethodInfo a signature where + overloadedMethod _ = dOMNodeIsEqualNode + -- method DOMNode::is_same_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "other", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1370,9 +1559,9 @@ dOMNodeIsSameNode :: (MonadIO m, DOMNodeK a, DOMNodeK b) => - a -> -- _obj - b -> -- other - m Bool + a -- _obj + -> b -- other + -> m Bool -- result dOMNodeIsSameNode _obj other = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let other' = unsafeManagedPtrCastPtr other @@ -1382,11 +1571,14 @@ touchManagedPtr other return result' +data DOMNodeIsSameNodeMethodInfo +instance (signature ~ (b -> m Bool), MonadIO m, DOMNodeK a, DOMNodeK b) => MethodInfo DOMNodeIsSameNodeMethodInfo a signature where + overloadedMethod _ = dOMNodeIsSameNode + -- method DOMNode::is_supported -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "feature", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "version", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "feature", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "version", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "feature", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "version", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -1400,10 +1592,10 @@ dOMNodeIsSupported :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - T.Text -> -- feature - T.Text -> -- version - m Bool + a -- _obj + -> T.Text -- feature + -> T.Text -- version + -> m Bool -- result dOMNodeIsSupported _obj feature version = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj feature' <- textToCString feature @@ -1415,11 +1607,14 @@ freeMem version' return result' +data DOMNodeIsSupportedMethodInfo +instance (signature ~ (T.Text -> T.Text -> m Bool), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeIsSupportedMethodInfo a signature where + overloadedMethod _ = dOMNodeIsSupported + -- method DOMNode::lookup_namespace_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "prefix", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "prefix", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "prefix", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1432,9 +1627,9 @@ dOMNodeLookupNamespaceUri :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - T.Text -> -- prefix - m T.Text + a -- _obj + -> T.Text -- prefix + -> m T.Text -- result dOMNodeLookupNamespaceUri _obj prefix = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj prefix' <- textToCString prefix @@ -1446,11 +1641,14 @@ freeMem prefix' return result' +data DOMNodeLookupNamespaceUriMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeLookupNamespaceUriMethodInfo a signature where + overloadedMethod _ = dOMNodeLookupNamespaceUri + -- method DOMNode::lookup_prefix -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1463,9 +1661,9 @@ dOMNodeLookupPrefix :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - T.Text -> -- namespaceURI - m T.Text + a -- _obj + -> T.Text -- namespaceURI + -> m T.Text -- result dOMNodeLookupPrefix _obj namespaceURI = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI @@ -1477,11 +1675,14 @@ freeMem namespaceURI' return result' +data DOMNodeLookupPrefixMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeLookupPrefixMethodInfo a signature where + overloadedMethod _ = dOMNodeLookupPrefix + -- method DOMNode::normalize -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1493,19 +1694,22 @@ dOMNodeNormalize :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMNodeNormalize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_node_normalize _obj' touchManagedPtr _obj return () +data DOMNodeNormalizeMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeNormalizeMethodInfo a signature where + overloadedMethod _ = dOMNodeNormalize + -- method DOMNode::remove_child -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "oldChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "oldChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "oldChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -1519,9 +1723,9 @@ dOMNodeRemoveChild :: (MonadIO m, DOMNodeK a, DOMNodeK b) => - a -> -- _obj - b -> -- oldChild - m DOMNode + a -- _obj + -> b -- oldChild + -> m DOMNode -- result dOMNodeRemoveChild _obj oldChild = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let oldChild' = unsafeManagedPtrCastPtr oldChild @@ -1536,11 +1740,14 @@ return () ) +data DOMNodeRemoveChildMethodInfo +instance (signature ~ (b -> m DOMNode), MonadIO m, DOMNodeK a, DOMNodeK b) => MethodInfo DOMNodeRemoveChildMethodInfo a signature where + overloadedMethod _ = dOMNodeRemoveChild + -- method DOMNode::replace_child -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "oldChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "newChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "oldChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "oldChild", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -1555,10 +1762,10 @@ dOMNodeReplaceChild :: (MonadIO m, DOMNodeK a, DOMNodeK b, DOMNodeK c) => - a -> -- _obj - b -> -- newChild - c -> -- oldChild - m DOMNode + a -- _obj + -> b -- newChild + -> c -- oldChild + -> m DOMNode -- result dOMNodeReplaceChild _obj newChild oldChild = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let newChild' = unsafeManagedPtrCastPtr newChild @@ -1575,11 +1782,14 @@ return () ) +data DOMNodeReplaceChildMethodInfo +instance (signature ~ (b -> c -> m DOMNode), MonadIO m, DOMNodeK a, DOMNodeK b, DOMNodeK c) => MethodInfo DOMNodeReplaceChildMethodInfo a signature where + overloadedMethod _ = dOMNodeReplaceChild + -- method DOMNode::set_node_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1593,9 +1803,9 @@ dOMNodeSetNodeValue :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMNodeSetNodeValue _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1608,11 +1818,14 @@ freeMem value' ) +data DOMNodeSetNodeValueMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeSetNodeValueMethodInfo a signature where + overloadedMethod _ = dOMNodeSetNodeValue + -- method DOMNode::set_prefix -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1626,9 +1839,9 @@ dOMNodeSetPrefix :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMNodeSetPrefix _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1641,11 +1854,14 @@ freeMem value' ) +data DOMNodeSetPrefixMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeSetPrefixMethodInfo a signature where + overloadedMethod _ = dOMNodeSetPrefix + -- method DOMNode::set_text_content -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1659,9 +1875,9 @@ dOMNodeSetTextContent :: (MonadIO m, DOMNodeK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMNodeSetTextContent _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1673,5 +1889,9 @@ ) (do freeMem value' ) + +data DOMNodeSetTextContentMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMNodeK a) => MethodInfo DOMNodeSetTextContentMethodInfo a signature where + overloadedMethod _ = dOMNodeSetTextContent diff --git a/GI/WebKit/Objects/DOMNode.hs-boot b/GI/WebKit/Objects/DOMNode.hs-boot --- a/GI/WebKit/Objects/DOMNode.hs-boot +++ b/GI/WebKit/Objects/DOMNode.hs-boot @@ -27,3 +27,40 @@ data DOMNodePrefixPropertyInfo data DOMNodePreviousSiblingPropertyInfo data DOMNodeTextContentPropertyInfo +data DOMNodeAppendChildMethodInfo +data DOMNodeCloneNodeMethodInfo +data DOMNodeCompareDocumentPositionMethodInfo +data DOMNodeContainsMethodInfo +data DOMNodeDispatchEventMethodInfo +data DOMNodeGetAttributesMethodInfo +data DOMNodeGetBaseUriMethodInfo +data DOMNodeGetChildNodesMethodInfo +data DOMNodeGetFirstChildMethodInfo +data DOMNodeGetLastChildMethodInfo +data DOMNodeGetLocalNameMethodInfo +data DOMNodeGetNamespaceUriMethodInfo +data DOMNodeGetNextSiblingMethodInfo +data DOMNodeGetNodeNameMethodInfo +data DOMNodeGetNodeTypeMethodInfo +data DOMNodeGetNodeValueMethodInfo +data DOMNodeGetOwnerDocumentMethodInfo +data DOMNodeGetParentElementMethodInfo +data DOMNodeGetParentNodeMethodInfo +data DOMNodeGetPrefixMethodInfo +data DOMNodeGetPreviousSiblingMethodInfo +data DOMNodeGetTextContentMethodInfo +data DOMNodeHasAttributesMethodInfo +data DOMNodeHasChildNodesMethodInfo +data DOMNodeInsertBeforeMethodInfo +data DOMNodeIsDefaultNamespaceMethodInfo +data DOMNodeIsEqualNodeMethodInfo +data DOMNodeIsSameNodeMethodInfo +data DOMNodeIsSupportedMethodInfo +data DOMNodeLookupNamespaceUriMethodInfo +data DOMNodeLookupPrefixMethodInfo +data DOMNodeNormalizeMethodInfo +data DOMNodeRemoveChildMethodInfo +data DOMNodeReplaceChildMethodInfo +data DOMNodeSetNodeValueMethodInfo +data DOMNodeSetPrefixMethodInfo +data DOMNodeSetTextContentMethodInfo diff --git a/GI/WebKit/Objects/DOMNodeFilter.hs b/GI/WebKit/Objects/DOMNodeFilter.hs --- a/GI/WebKit/Objects/DOMNodeFilter.hs +++ b/GI/WebKit/Objects/DOMNodeFilter.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** dOMNodeFilterAcceptNode + DOMNodeFilterAcceptNodeMethodInfo , dOMNodeFilterAcceptNode , @@ -56,17 +58,50 @@ noDOMNodeFilter :: Maybe DOMNodeFilter noDOMNodeFilter = Nothing +type family ResolveDOMNodeFilterMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMNodeFilterMethod "acceptNode" o = DOMNodeFilterAcceptNodeMethodInfo + ResolveDOMNodeFilterMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMNodeFilterMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMNodeFilterMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMNodeFilterMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMNodeFilterMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMNodeFilterMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMNodeFilterMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMNodeFilterMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMNodeFilterMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMNodeFilterMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMNodeFilterMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMNodeFilterMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMNodeFilterMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMNodeFilterMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMNodeFilterMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMNodeFilterMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMNodeFilterMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMNodeFilterMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMNodeFilterMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMNodeFilterMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMNodeFilterMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMNodeFilterMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMNodeFilterMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMNodeFilterMethod t DOMNodeFilter, MethodInfo info DOMNodeFilter p) => IsLabelProxy t (DOMNodeFilter -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMNodeFilterMethod t DOMNodeFilter, MethodInfo info DOMNodeFilter p) => IsLabel t (DOMNodeFilter -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMNodeFilter = DOMNodeFilterAttributeList -type DOMNodeFilterAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMNodeFilterAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMNodeFilter = DOMNodeFilterSignalList -type DOMNodeFilterSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMNodeFilterSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMNodeFilter::accept_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeFilter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "n", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeFilter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "n", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeFilter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "n", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt16 -- throws : False -- Skip return : False @@ -79,9 +114,9 @@ dOMNodeFilterAcceptNode :: (MonadIO m, DOMNodeFilterK a, DOMNodeK b) => - a -> -- _obj - b -> -- n - m Int16 + a -- _obj + -> b -- n + -> m Int16 -- result dOMNodeFilterAcceptNode _obj n = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let n' = unsafeManagedPtrCastPtr n @@ -89,5 +124,9 @@ touchManagedPtr _obj touchManagedPtr n return result + +data DOMNodeFilterAcceptNodeMethodInfo +instance (signature ~ (b -> m Int16), MonadIO m, DOMNodeFilterK a, DOMNodeK b) => MethodInfo DOMNodeFilterAcceptNodeMethodInfo a signature where + overloadedMethod _ = dOMNodeFilterAcceptNode diff --git a/GI/WebKit/Objects/DOMNodeFilter.hs-boot b/GI/WebKit/Objects/DOMNodeFilter.hs-boot --- a/GI/WebKit/Objects/DOMNodeFilter.hs-boot +++ b/GI/WebKit/Objects/DOMNodeFilter.hs-boot @@ -11,3 +11,4 @@ instance GObject DOMNodeFilter where class GObject o => DOMNodeFilterK o instance (GObject o, IsDescendantOf DOMNodeFilter o) => DOMNodeFilterK o +data DOMNodeFilterAcceptNodeMethodInfo diff --git a/GI/WebKit/Objects/DOMNodeIterator.hs b/GI/WebKit/Objects/DOMNodeIterator.hs --- a/GI/WebKit/Objects/DOMNodeIterator.hs +++ b/GI/WebKit/Objects/DOMNodeIterator.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,38 +18,47 @@ -- * Methods -- ** dOMNodeIteratorDetach + DOMNodeIteratorDetachMethodInfo , dOMNodeIteratorDetach , -- ** dOMNodeIteratorGetExpandEntityReferences + DOMNodeIteratorGetExpandEntityReferencesMethodInfo, dOMNodeIteratorGetExpandEntityReferences, -- ** dOMNodeIteratorGetFilter + DOMNodeIteratorGetFilterMethodInfo , dOMNodeIteratorGetFilter , -- ** dOMNodeIteratorGetPointerBeforeReferenceNode + DOMNodeIteratorGetPointerBeforeReferenceNodeMethodInfo, dOMNodeIteratorGetPointerBeforeReferenceNode, -- ** dOMNodeIteratorGetReferenceNode + DOMNodeIteratorGetReferenceNodeMethodInfo, dOMNodeIteratorGetReferenceNode , -- ** dOMNodeIteratorGetRoot + DOMNodeIteratorGetRootMethodInfo , dOMNodeIteratorGetRoot , -- ** dOMNodeIteratorGetWhatToShow + DOMNodeIteratorGetWhatToShowMethodInfo , dOMNodeIteratorGetWhatToShow , -- ** dOMNodeIteratorNextNode + DOMNodeIteratorNextNodeMethodInfo , dOMNodeIteratorNextNode , -- ** dOMNodeIteratorPreviousNode + DOMNodeIteratorPreviousNodeMethodInfo , dOMNodeIteratorPreviousNode , @@ -121,6 +131,48 @@ noDOMNodeIterator :: Maybe DOMNodeIterator noDOMNodeIterator = Nothing +type family ResolveDOMNodeIteratorMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMNodeIteratorMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMNodeIteratorMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMNodeIteratorMethod "detach" o = DOMNodeIteratorDetachMethodInfo + ResolveDOMNodeIteratorMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMNodeIteratorMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMNodeIteratorMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMNodeIteratorMethod "nextNode" o = DOMNodeIteratorNextNodeMethodInfo + ResolveDOMNodeIteratorMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMNodeIteratorMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMNodeIteratorMethod "previousNode" o = DOMNodeIteratorPreviousNodeMethodInfo + ResolveDOMNodeIteratorMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMNodeIteratorMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMNodeIteratorMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMNodeIteratorMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMNodeIteratorMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMNodeIteratorMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMNodeIteratorMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMNodeIteratorMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMNodeIteratorMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMNodeIteratorMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMNodeIteratorMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMNodeIteratorMethod "getExpandEntityReferences" o = DOMNodeIteratorGetExpandEntityReferencesMethodInfo + ResolveDOMNodeIteratorMethod "getFilter" o = DOMNodeIteratorGetFilterMethodInfo + ResolveDOMNodeIteratorMethod "getPointerBeforeReferenceNode" o = DOMNodeIteratorGetPointerBeforeReferenceNodeMethodInfo + ResolveDOMNodeIteratorMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMNodeIteratorMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMNodeIteratorMethod "getReferenceNode" o = DOMNodeIteratorGetReferenceNodeMethodInfo + ResolveDOMNodeIteratorMethod "getRoot" o = DOMNodeIteratorGetRootMethodInfo + ResolveDOMNodeIteratorMethod "getWhatToShow" o = DOMNodeIteratorGetWhatToShowMethodInfo + ResolveDOMNodeIteratorMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMNodeIteratorMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMNodeIteratorMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMNodeIteratorMethod t DOMNodeIterator, MethodInfo info DOMNodeIterator p) => IsLabelProxy t (DOMNodeIterator -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMNodeIteratorMethod t DOMNodeIterator, MethodInfo info DOMNodeIterator p) => IsLabel t (DOMNodeIterator -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "expand-entity-references" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -134,7 +186,7 @@ type AttrSetTypeConstraint DOMNodeIteratorExpandEntityReferencesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeIteratorExpandEntityReferencesPropertyInfo = DOMNodeIteratorK type AttrGetType DOMNodeIteratorExpandEntityReferencesPropertyInfo = Bool - type AttrLabel DOMNodeIteratorExpandEntityReferencesPropertyInfo = "DOMNodeIterator::expand-entity-references" + type AttrLabel DOMNodeIteratorExpandEntityReferencesPropertyInfo = "expand-entity-references" attrGet _ = getDOMNodeIteratorExpandEntityReferences attrSet _ = undefined attrConstruct _ = undefined @@ -152,7 +204,7 @@ type AttrSetTypeConstraint DOMNodeIteratorFilterPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeIteratorFilterPropertyInfo = DOMNodeIteratorK type AttrGetType DOMNodeIteratorFilterPropertyInfo = DOMNodeFilter - type AttrLabel DOMNodeIteratorFilterPropertyInfo = "DOMNodeIterator::filter" + type AttrLabel DOMNodeIteratorFilterPropertyInfo = "filter" attrGet _ = getDOMNodeIteratorFilter attrSet _ = undefined attrConstruct _ = undefined @@ -170,7 +222,7 @@ type AttrSetTypeConstraint DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = DOMNodeIteratorK type AttrGetType DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = Bool - type AttrLabel DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = "DOMNodeIterator::pointer-before-reference-node" + type AttrLabel DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo = "pointer-before-reference-node" attrGet _ = getDOMNodeIteratorPointerBeforeReferenceNode attrSet _ = undefined attrConstruct _ = undefined @@ -188,7 +240,7 @@ type AttrSetTypeConstraint DOMNodeIteratorReferenceNodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeIteratorReferenceNodePropertyInfo = DOMNodeIteratorK type AttrGetType DOMNodeIteratorReferenceNodePropertyInfo = DOMNode - type AttrLabel DOMNodeIteratorReferenceNodePropertyInfo = "DOMNodeIterator::reference-node" + type AttrLabel DOMNodeIteratorReferenceNodePropertyInfo = "reference-node" attrGet _ = getDOMNodeIteratorReferenceNode attrSet _ = undefined attrConstruct _ = undefined @@ -206,7 +258,7 @@ type AttrSetTypeConstraint DOMNodeIteratorRootPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeIteratorRootPropertyInfo = DOMNodeIteratorK type AttrGetType DOMNodeIteratorRootPropertyInfo = DOMNode - type AttrLabel DOMNodeIteratorRootPropertyInfo = "DOMNodeIterator::root" + type AttrLabel DOMNodeIteratorRootPropertyInfo = "root" attrGet _ = getDOMNodeIteratorRoot attrSet _ = undefined attrConstruct _ = undefined @@ -224,22 +276,21 @@ type AttrSetTypeConstraint DOMNodeIteratorWhatToShowPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeIteratorWhatToShowPropertyInfo = DOMNodeIteratorK type AttrGetType DOMNodeIteratorWhatToShowPropertyInfo = Word64 - type AttrLabel DOMNodeIteratorWhatToShowPropertyInfo = "DOMNodeIterator::what-to-show" + type AttrLabel DOMNodeIteratorWhatToShowPropertyInfo = "what-to-show" attrGet _ = getDOMNodeIteratorWhatToShow attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMNodeIterator = DOMNodeIteratorAttributeList -type DOMNodeIteratorAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("expand-entity-references", DOMNodeIteratorExpandEntityReferencesPropertyInfo), '("filter", DOMNodeIteratorFilterPropertyInfo), '("pointer-before-reference-node", DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo), '("reference-node", DOMNodeIteratorReferenceNodePropertyInfo), '("root", DOMNodeIteratorRootPropertyInfo), '("what-to-show", DOMNodeIteratorWhatToShowPropertyInfo)] :: [(Symbol, *)]) +type DOMNodeIteratorAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("expandEntityReferences", DOMNodeIteratorExpandEntityReferencesPropertyInfo), '("filter", DOMNodeIteratorFilterPropertyInfo), '("pointerBeforeReferenceNode", DOMNodeIteratorPointerBeforeReferenceNodePropertyInfo), '("referenceNode", DOMNodeIteratorReferenceNodePropertyInfo), '("root", DOMNodeIteratorRootPropertyInfo), '("whatToShow", DOMNodeIteratorWhatToShowPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMNodeIterator = DOMNodeIteratorSignalList -type DOMNodeIteratorSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMNodeIteratorSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMNodeIterator::detach -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -251,19 +302,22 @@ dOMNodeIteratorDetach :: (MonadIO m, DOMNodeIteratorK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMNodeIteratorDetach _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_node_iterator_detach _obj' touchManagedPtr _obj return () +data DOMNodeIteratorDetachMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMNodeIteratorK a) => MethodInfo DOMNodeIteratorDetachMethodInfo a signature where + overloadedMethod _ = dOMNodeIteratorDetach + -- method DOMNodeIterator::get_expand_entity_references -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -275,8 +329,8 @@ dOMNodeIteratorGetExpandEntityReferences :: (MonadIO m, DOMNodeIteratorK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMNodeIteratorGetExpandEntityReferences _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_iterator_get_expand_entity_references _obj' @@ -284,11 +338,14 @@ touchManagedPtr _obj return result' +data DOMNodeIteratorGetExpandEntityReferencesMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMNodeIteratorK a) => MethodInfo DOMNodeIteratorGetExpandEntityReferencesMethodInfo a signature where + overloadedMethod _ = dOMNodeIteratorGetExpandEntityReferences + -- method DOMNodeIterator::get_filter -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeFilter" -- throws : False -- Skip return : False @@ -300,8 +357,8 @@ dOMNodeIteratorGetFilter :: (MonadIO m, DOMNodeIteratorK a) => - a -> -- _obj - m DOMNodeFilter + a -- _obj + -> m DOMNodeFilter -- result dOMNodeIteratorGetFilter _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_iterator_get_filter _obj' @@ -310,11 +367,14 @@ touchManagedPtr _obj return result' +data DOMNodeIteratorGetFilterMethodInfo +instance (signature ~ (m DOMNodeFilter), MonadIO m, DOMNodeIteratorK a) => MethodInfo DOMNodeIteratorGetFilterMethodInfo a signature where + overloadedMethod _ = dOMNodeIteratorGetFilter + -- method DOMNodeIterator::get_pointer_before_reference_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -326,8 +386,8 @@ dOMNodeIteratorGetPointerBeforeReferenceNode :: (MonadIO m, DOMNodeIteratorK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMNodeIteratorGetPointerBeforeReferenceNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_iterator_get_pointer_before_reference_node _obj' @@ -335,11 +395,14 @@ touchManagedPtr _obj return result' +data DOMNodeIteratorGetPointerBeforeReferenceNodeMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMNodeIteratorK a) => MethodInfo DOMNodeIteratorGetPointerBeforeReferenceNodeMethodInfo a signature where + overloadedMethod _ = dOMNodeIteratorGetPointerBeforeReferenceNode + -- method DOMNodeIterator::get_reference_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -351,8 +414,8 @@ dOMNodeIteratorGetReferenceNode :: (MonadIO m, DOMNodeIteratorK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMNodeIteratorGetReferenceNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_iterator_get_reference_node _obj' @@ -361,11 +424,14 @@ touchManagedPtr _obj return result' +data DOMNodeIteratorGetReferenceNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMNodeIteratorK a) => MethodInfo DOMNodeIteratorGetReferenceNodeMethodInfo a signature where + overloadedMethod _ = dOMNodeIteratorGetReferenceNode + -- method DOMNodeIterator::get_root -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -377,8 +443,8 @@ dOMNodeIteratorGetRoot :: (MonadIO m, DOMNodeIteratorK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMNodeIteratorGetRoot _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_iterator_get_root _obj' @@ -387,11 +453,14 @@ touchManagedPtr _obj return result' +data DOMNodeIteratorGetRootMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMNodeIteratorK a) => MethodInfo DOMNodeIteratorGetRootMethodInfo a signature where + overloadedMethod _ = dOMNodeIteratorGetRoot + -- method DOMNodeIterator::get_what_to_show -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -403,19 +472,22 @@ dOMNodeIteratorGetWhatToShow :: (MonadIO m, DOMNodeIteratorK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMNodeIteratorGetWhatToShow _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_iterator_get_what_to_show _obj' touchManagedPtr _obj return result +data DOMNodeIteratorGetWhatToShowMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMNodeIteratorK a) => MethodInfo DOMNodeIteratorGetWhatToShowMethodInfo a signature where + overloadedMethod _ = dOMNodeIteratorGetWhatToShow + -- method DOMNodeIterator::next_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -428,8 +500,8 @@ dOMNodeIteratorNextNode :: (MonadIO m, DOMNodeIteratorK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMNodeIteratorNextNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -442,11 +514,14 @@ return () ) +data DOMNodeIteratorNextNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMNodeIteratorK a) => MethodInfo DOMNodeIteratorNextNodeMethodInfo a signature where + overloadedMethod _ = dOMNodeIteratorNextNode + -- method DOMNodeIterator::previous_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeIterator", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -459,8 +534,8 @@ dOMNodeIteratorPreviousNode :: (MonadIO m, DOMNodeIteratorK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMNodeIteratorPreviousNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -472,5 +547,9 @@ ) (do return () ) + +data DOMNodeIteratorPreviousNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMNodeIteratorK a) => MethodInfo DOMNodeIteratorPreviousNodeMethodInfo a signature where + overloadedMethod _ = dOMNodeIteratorPreviousNode diff --git a/GI/WebKit/Objects/DOMNodeIterator.hs-boot b/GI/WebKit/Objects/DOMNodeIterator.hs-boot --- a/GI/WebKit/Objects/DOMNodeIterator.hs-boot +++ b/GI/WebKit/Objects/DOMNodeIterator.hs-boot @@ -17,3 +17,12 @@ data DOMNodeIteratorReferenceNodePropertyInfo data DOMNodeIteratorRootPropertyInfo data DOMNodeIteratorWhatToShowPropertyInfo +data DOMNodeIteratorDetachMethodInfo +data DOMNodeIteratorGetExpandEntityReferencesMethodInfo +data DOMNodeIteratorGetFilterMethodInfo +data DOMNodeIteratorGetPointerBeforeReferenceNodeMethodInfo +data DOMNodeIteratorGetReferenceNodeMethodInfo +data DOMNodeIteratorGetRootMethodInfo +data DOMNodeIteratorGetWhatToShowMethodInfo +data DOMNodeIteratorNextNodeMethodInfo +data DOMNodeIteratorPreviousNodeMethodInfo diff --git a/GI/WebKit/Objects/DOMNodeList.hs b/GI/WebKit/Objects/DOMNodeList.hs --- a/GI/WebKit/Objects/DOMNodeList.hs +++ b/GI/WebKit/Objects/DOMNodeList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMNodeListGetLength + DOMNodeListGetLengthMethodInfo , dOMNodeListGetLength , -- ** dOMNodeListItem + DOMNodeListItemMethodInfo , dOMNodeListItem , @@ -68,6 +71,41 @@ noDOMNodeList :: Maybe DOMNodeList noDOMNodeList = Nothing +type family ResolveDOMNodeListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMNodeListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMNodeListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMNodeListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMNodeListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMNodeListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMNodeListMethod "item" o = DOMNodeListItemMethodInfo + ResolveDOMNodeListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMNodeListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMNodeListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMNodeListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMNodeListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMNodeListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMNodeListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMNodeListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMNodeListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMNodeListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMNodeListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMNodeListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMNodeListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMNodeListMethod "getLength" o = DOMNodeListGetLengthMethodInfo + ResolveDOMNodeListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMNodeListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMNodeListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMNodeListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMNodeListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMNodeListMethod t DOMNodeList, MethodInfo info DOMNodeList p) => IsLabelProxy t (DOMNodeList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMNodeListMethod t DOMNodeList, MethodInfo info DOMNodeList p) => IsLabel t (DOMNodeList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -81,22 +119,21 @@ type AttrSetTypeConstraint DOMNodeListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMNodeListLengthPropertyInfo = DOMNodeListK type AttrGetType DOMNodeListLengthPropertyInfo = Word64 - type AttrLabel DOMNodeListLengthPropertyInfo = "DOMNodeList::length" + type AttrLabel DOMNodeListLengthPropertyInfo = "length" attrGet _ = getDOMNodeListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMNodeList = DOMNodeListAttributeList -type DOMNodeListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMNodeListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMNodeListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMNodeListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMNodeList = DOMNodeListSignalList -type DOMNodeListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMNodeListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMNodeList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -108,19 +145,22 @@ dOMNodeListGetLength :: (MonadIO m, DOMNodeListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMNodeListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_list_get_length _obj' touchManagedPtr _obj return result +data DOMNodeListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMNodeListK a) => MethodInfo DOMNodeListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMNodeListGetLength + -- method DOMNodeList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMNodeList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMNodeList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -133,9 +173,9 @@ dOMNodeListItem :: (MonadIO m, DOMNodeListK a) => - a -> -- _obj - Word64 -> -- index - m DOMNode + a -- _obj + -> Word64 -- index + -> m DOMNode -- result dOMNodeListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_node_list_item _obj' index @@ -143,5 +183,9 @@ result' <- (newObject DOMNode) result touchManagedPtr _obj return result' + +data DOMNodeListItemMethodInfo +instance (signature ~ (Word64 -> m DOMNode), MonadIO m, DOMNodeListK a) => MethodInfo DOMNodeListItemMethodInfo a signature where + overloadedMethod _ = dOMNodeListItem diff --git a/GI/WebKit/Objects/DOMNodeList.hs-boot b/GI/WebKit/Objects/DOMNodeList.hs-boot --- a/GI/WebKit/Objects/DOMNodeList.hs-boot +++ b/GI/WebKit/Objects/DOMNodeList.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMNodeListK o instance (GObject o, IsDescendantOf DOMNodeList o) => DOMNodeListK o data DOMNodeListLengthPropertyInfo +data DOMNodeListGetLengthMethodInfo +data DOMNodeListItemMethodInfo diff --git a/GI/WebKit/Objects/DOMObject.hs b/GI/WebKit/Objects/DOMObject.hs --- a/GI/WebKit/Objects/DOMObject.hs +++ b/GI/WebKit/Objects/DOMObject.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -57,6 +58,39 @@ noDOMObject :: Maybe DOMObject noDOMObject = Nothing +type family ResolveDOMObjectMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMObjectMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMObjectMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMObjectMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMObjectMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMObjectMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMObjectMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMObjectMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMObjectMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMObjectMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMObjectMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMObjectMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMObjectMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMObjectMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMObjectMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMObjectMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMObjectMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMObjectMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMObjectMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMObjectMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMObjectMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMObjectMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMObjectMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMObjectMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMObjectMethod t DOMObject, MethodInfo info DOMObject p) => IsLabelProxy t (DOMObject -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMObjectMethod t DOMObject, MethodInfo info DOMObject p) => IsLabel t (DOMObject -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "core-object" -- Type: TBasicType TVoid -- Flags: [PropertyWritable,PropertyConstructOnly] @@ -70,15 +104,15 @@ type AttrSetTypeConstraint DOMObjectCoreObjectPropertyInfo = (~) (Ptr ()) type AttrBaseTypeConstraint DOMObjectCoreObjectPropertyInfo = DOMObjectK type AttrGetType DOMObjectCoreObjectPropertyInfo = () - type AttrLabel DOMObjectCoreObjectPropertyInfo = "DOMObject::core-object" + type AttrLabel DOMObjectCoreObjectPropertyInfo = "core-object" attrGet _ = undefined attrSet _ = undefined attrConstruct _ = constructDOMObjectCoreObject type instance AttributeList DOMObject = DOMObjectAttributeList -type DOMObjectAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMObjectAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMObject = DOMObjectSignalList -type DOMObjectSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMObjectSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/DOMPerformance.hs b/GI/WebKit/Objects/DOMPerformance.hs --- a/GI/WebKit/Objects/DOMPerformance.hs +++ b/GI/WebKit/Objects/DOMPerformance.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMPerformanceGetMemory + DOMPerformanceGetMemoryMethodInfo , dOMPerformanceGetMemory , -- ** dOMPerformanceGetNavigation + DOMPerformanceGetNavigationMethodInfo , dOMPerformanceGetNavigation , -- ** dOMPerformanceGetTiming + DOMPerformanceGetTimingMethodInfo , dOMPerformanceGetTiming , -- ** dOMPerformanceNow + DOMPerformanceNowMethodInfo , dOMPerformanceNow , @@ -81,6 +86,46 @@ noDOMPerformance :: Maybe DOMPerformance noDOMPerformance = Nothing +type family ResolveDOMPerformanceMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMPerformanceMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMPerformanceMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMPerformanceMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMPerformanceMethod "dispatchEvent" o = DOMEventTargetDispatchEventMethodInfo + ResolveDOMPerformanceMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMPerformanceMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMPerformanceMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMPerformanceMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMPerformanceMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMPerformanceMethod "now" o = DOMPerformanceNowMethodInfo + ResolveDOMPerformanceMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMPerformanceMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMPerformanceMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMPerformanceMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMPerformanceMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMPerformanceMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMPerformanceMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMPerformanceMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMPerformanceMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMPerformanceMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMPerformanceMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMPerformanceMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMPerformanceMethod "getMemory" o = DOMPerformanceGetMemoryMethodInfo + ResolveDOMPerformanceMethod "getNavigation" o = DOMPerformanceGetNavigationMethodInfo + ResolveDOMPerformanceMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMPerformanceMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMPerformanceMethod "getTiming" o = DOMPerformanceGetTimingMethodInfo + ResolveDOMPerformanceMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMPerformanceMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMPerformanceMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMPerformanceMethod t DOMPerformance, MethodInfo info DOMPerformance p) => IsLabelProxy t (DOMPerformance -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMPerformanceMethod t DOMPerformance, MethodInfo info DOMPerformance p) => IsLabel t (DOMPerformance -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "navigation" -- Type: TInterface "WebKit" "DOMPerformanceNavigation" -- Flags: [PropertyReadable] @@ -94,7 +139,7 @@ type AttrSetTypeConstraint DOMPerformanceNavigationPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceNavigationPropertyInfo = DOMPerformanceK type AttrGetType DOMPerformanceNavigationPropertyInfo = DOMPerformanceNavigation - type AttrLabel DOMPerformanceNavigationPropertyInfo = "DOMPerformance::navigation" + type AttrLabel DOMPerformanceNavigationPropertyInfo = "navigation" attrGet _ = getDOMPerformanceNavigation attrSet _ = undefined attrConstruct _ = undefined @@ -112,22 +157,21 @@ type AttrSetTypeConstraint DOMPerformanceTimingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingPropertyInfo = DOMPerformanceK type AttrGetType DOMPerformanceTimingPropertyInfo = DOMPerformanceTiming - type AttrLabel DOMPerformanceTimingPropertyInfo = "DOMPerformance::timing" + type AttrLabel DOMPerformanceTimingPropertyInfo = "timing" attrGet _ = getDOMPerformanceTiming attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMPerformance = DOMPerformanceAttributeList -type DOMPerformanceAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("navigation", DOMPerformanceNavigationPropertyInfo), '("timing", DOMPerformanceTimingPropertyInfo)] :: [(Symbol, *)]) +type DOMPerformanceAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("navigation", DOMPerformanceNavigationPropertyInfo), '("timing", DOMPerformanceTimingPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMPerformance = DOMPerformanceSignalList -type DOMPerformanceSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMPerformanceSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMPerformance::get_memory -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -139,19 +183,22 @@ {-# DEPRECATED dOMPerformanceGetMemory ["(Since version 2.2)"]#-} dOMPerformanceGetMemory :: (MonadIO m, DOMPerformanceK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMPerformanceGetMemory _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_dom_performance_get_memory _obj' touchManagedPtr _obj return () +data DOMPerformanceGetMemoryMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMPerformanceK a) => MethodInfo DOMPerformanceGetMemoryMethodInfo a signature where + overloadedMethod _ = dOMPerformanceGetMemory + -- method DOMPerformance::get_navigation -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMPerformanceNavigation" -- throws : False -- Skip return : False @@ -163,8 +210,8 @@ dOMPerformanceGetNavigation :: (MonadIO m, DOMPerformanceK a) => - a -> -- _obj - m DOMPerformanceNavigation + a -- _obj + -> m DOMPerformanceNavigation -- result dOMPerformanceGetNavigation _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_get_navigation _obj' @@ -173,11 +220,14 @@ touchManagedPtr _obj return result' +data DOMPerformanceGetNavigationMethodInfo +instance (signature ~ (m DOMPerformanceNavigation), MonadIO m, DOMPerformanceK a) => MethodInfo DOMPerformanceGetNavigationMethodInfo a signature where + overloadedMethod _ = dOMPerformanceGetNavigation + -- method DOMPerformance::get_timing -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMPerformanceTiming" -- throws : False -- Skip return : False @@ -189,8 +239,8 @@ dOMPerformanceGetTiming :: (MonadIO m, DOMPerformanceK a) => - a -> -- _obj - m DOMPerformanceTiming + a -- _obj + -> m DOMPerformanceTiming -- result dOMPerformanceGetTiming _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_get_timing _obj' @@ -199,11 +249,14 @@ touchManagedPtr _obj return result' +data DOMPerformanceGetTimingMethodInfo +instance (signature ~ (m DOMPerformanceTiming), MonadIO m, DOMPerformanceK a) => MethodInfo DOMPerformanceGetTimingMethodInfo a signature where + overloadedMethod _ = dOMPerformanceGetTiming + -- method DOMPerformance::now -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformance", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -215,13 +268,17 @@ dOMPerformanceNow :: (MonadIO m, DOMPerformanceK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMPerformanceNow _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_now _obj' let result' = realToFrac result touchManagedPtr _obj return result' + +data DOMPerformanceNowMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMPerformanceK a) => MethodInfo DOMPerformanceNowMethodInfo a signature where + overloadedMethod _ = dOMPerformanceNow diff --git a/GI/WebKit/Objects/DOMPerformance.hs-boot b/GI/WebKit/Objects/DOMPerformance.hs-boot --- a/GI/WebKit/Objects/DOMPerformance.hs-boot +++ b/GI/WebKit/Objects/DOMPerformance.hs-boot @@ -13,3 +13,7 @@ instance (GObject o, IsDescendantOf DOMPerformance o) => DOMPerformanceK o data DOMPerformanceNavigationPropertyInfo data DOMPerformanceTimingPropertyInfo +data DOMPerformanceGetMemoryMethodInfo +data DOMPerformanceGetNavigationMethodInfo +data DOMPerformanceGetTimingMethodInfo +data DOMPerformanceNowMethodInfo diff --git a/GI/WebKit/Objects/DOMPerformanceEntry.hs b/GI/WebKit/Objects/DOMPerformanceEntry.hs --- a/GI/WebKit/Objects/DOMPerformanceEntry.hs +++ b/GI/WebKit/Objects/DOMPerformanceEntry.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMPerformanceEntryGetDuration + DOMPerformanceEntryGetDurationMethodInfo, dOMPerformanceEntryGetDuration , -- ** dOMPerformanceEntryGetEntryType + DOMPerformanceEntryGetEntryTypeMethodInfo, dOMPerformanceEntryGetEntryType , -- ** dOMPerformanceEntryGetName + DOMPerformanceEntryGetNameMethodInfo , dOMPerformanceEntryGetName , -- ** dOMPerformanceEntryGetStartTime + DOMPerformanceEntryGetStartTimeMethodInfo, dOMPerformanceEntryGetStartTime , @@ -91,6 +96,43 @@ noDOMPerformanceEntry :: Maybe DOMPerformanceEntry noDOMPerformanceEntry = Nothing +type family ResolveDOMPerformanceEntryMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMPerformanceEntryMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMPerformanceEntryMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMPerformanceEntryMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMPerformanceEntryMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMPerformanceEntryMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMPerformanceEntryMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMPerformanceEntryMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMPerformanceEntryMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMPerformanceEntryMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMPerformanceEntryMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMPerformanceEntryMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMPerformanceEntryMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMPerformanceEntryMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMPerformanceEntryMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMPerformanceEntryMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMPerformanceEntryMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMPerformanceEntryMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMPerformanceEntryMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMPerformanceEntryMethod "getDuration" o = DOMPerformanceEntryGetDurationMethodInfo + ResolveDOMPerformanceEntryMethod "getEntryType" o = DOMPerformanceEntryGetEntryTypeMethodInfo + ResolveDOMPerformanceEntryMethod "getName" o = DOMPerformanceEntryGetNameMethodInfo + ResolveDOMPerformanceEntryMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMPerformanceEntryMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMPerformanceEntryMethod "getStartTime" o = DOMPerformanceEntryGetStartTimeMethodInfo + ResolveDOMPerformanceEntryMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMPerformanceEntryMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMPerformanceEntryMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMPerformanceEntryMethod t DOMPerformanceEntry, MethodInfo info DOMPerformanceEntry p) => IsLabelProxy t (DOMPerformanceEntry -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMPerformanceEntryMethod t DOMPerformanceEntry, MethodInfo info DOMPerformanceEntry p) => IsLabel t (DOMPerformanceEntry -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "duration" -- Type: TBasicType TDouble -- Flags: [PropertyReadable] @@ -104,7 +146,7 @@ type AttrSetTypeConstraint DOMPerformanceEntryDurationPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceEntryDurationPropertyInfo = DOMPerformanceEntryK type AttrGetType DOMPerformanceEntryDurationPropertyInfo = Double - type AttrLabel DOMPerformanceEntryDurationPropertyInfo = "DOMPerformanceEntry::duration" + type AttrLabel DOMPerformanceEntryDurationPropertyInfo = "duration" attrGet _ = getDOMPerformanceEntryDuration attrSet _ = undefined attrConstruct _ = undefined @@ -122,7 +164,7 @@ type AttrSetTypeConstraint DOMPerformanceEntryEntryTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceEntryEntryTypePropertyInfo = DOMPerformanceEntryK type AttrGetType DOMPerformanceEntryEntryTypePropertyInfo = T.Text - type AttrLabel DOMPerformanceEntryEntryTypePropertyInfo = "DOMPerformanceEntry::entry-type" + type AttrLabel DOMPerformanceEntryEntryTypePropertyInfo = "entry-type" attrGet _ = getDOMPerformanceEntryEntryType attrSet _ = undefined attrConstruct _ = undefined @@ -140,7 +182,7 @@ type AttrSetTypeConstraint DOMPerformanceEntryNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceEntryNamePropertyInfo = DOMPerformanceEntryK type AttrGetType DOMPerformanceEntryNamePropertyInfo = T.Text - type AttrLabel DOMPerformanceEntryNamePropertyInfo = "DOMPerformanceEntry::name" + type AttrLabel DOMPerformanceEntryNamePropertyInfo = "name" attrGet _ = getDOMPerformanceEntryName attrSet _ = undefined attrConstruct _ = undefined @@ -158,22 +200,21 @@ type AttrSetTypeConstraint DOMPerformanceEntryStartTimePropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceEntryStartTimePropertyInfo = DOMPerformanceEntryK type AttrGetType DOMPerformanceEntryStartTimePropertyInfo = Double - type AttrLabel DOMPerformanceEntryStartTimePropertyInfo = "DOMPerformanceEntry::start-time" + type AttrLabel DOMPerformanceEntryStartTimePropertyInfo = "start-time" attrGet _ = getDOMPerformanceEntryStartTime attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMPerformanceEntry = DOMPerformanceEntryAttributeList -type DOMPerformanceEntryAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("duration", DOMPerformanceEntryDurationPropertyInfo), '("entry-type", DOMPerformanceEntryEntryTypePropertyInfo), '("name", DOMPerformanceEntryNamePropertyInfo), '("start-time", DOMPerformanceEntryStartTimePropertyInfo)] :: [(Symbol, *)]) +type DOMPerformanceEntryAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("duration", DOMPerformanceEntryDurationPropertyInfo), '("entryType", DOMPerformanceEntryEntryTypePropertyInfo), '("name", DOMPerformanceEntryNamePropertyInfo), '("startTime", DOMPerformanceEntryStartTimePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMPerformanceEntry = DOMPerformanceEntrySignalList -type DOMPerformanceEntrySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMPerformanceEntrySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMPerformanceEntry::get_duration -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -185,8 +226,8 @@ dOMPerformanceEntryGetDuration :: (MonadIO m, DOMPerformanceEntryK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMPerformanceEntryGetDuration _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_entry_get_duration _obj' @@ -194,11 +235,14 @@ touchManagedPtr _obj return result' +data DOMPerformanceEntryGetDurationMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMPerformanceEntryK a) => MethodInfo DOMPerformanceEntryGetDurationMethodInfo a signature where + overloadedMethod _ = dOMPerformanceEntryGetDuration + -- method DOMPerformanceEntry::get_entry_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -210,8 +254,8 @@ dOMPerformanceEntryGetEntryType :: (MonadIO m, DOMPerformanceEntryK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMPerformanceEntryGetEntryType _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_entry_get_entry_type _obj' @@ -221,11 +265,14 @@ touchManagedPtr _obj return result' +data DOMPerformanceEntryGetEntryTypeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMPerformanceEntryK a) => MethodInfo DOMPerformanceEntryGetEntryTypeMethodInfo a signature where + overloadedMethod _ = dOMPerformanceEntryGetEntryType + -- method DOMPerformanceEntry::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -237,8 +284,8 @@ dOMPerformanceEntryGetName :: (MonadIO m, DOMPerformanceEntryK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMPerformanceEntryGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_entry_get_name _obj' @@ -248,11 +295,14 @@ touchManagedPtr _obj return result' +data DOMPerformanceEntryGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMPerformanceEntryK a) => MethodInfo DOMPerformanceEntryGetNameMethodInfo a signature where + overloadedMethod _ = dOMPerformanceEntryGetName + -- method DOMPerformanceEntry::get_start_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntry", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -264,13 +314,17 @@ dOMPerformanceEntryGetStartTime :: (MonadIO m, DOMPerformanceEntryK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMPerformanceEntryGetStartTime _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_entry_get_start_time _obj' let result' = realToFrac result touchManagedPtr _obj return result' + +data DOMPerformanceEntryGetStartTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMPerformanceEntryK a) => MethodInfo DOMPerformanceEntryGetStartTimeMethodInfo a signature where + overloadedMethod _ = dOMPerformanceEntryGetStartTime diff --git a/GI/WebKit/Objects/DOMPerformanceEntry.hs-boot b/GI/WebKit/Objects/DOMPerformanceEntry.hs-boot --- a/GI/WebKit/Objects/DOMPerformanceEntry.hs-boot +++ b/GI/WebKit/Objects/DOMPerformanceEntry.hs-boot @@ -15,3 +15,7 @@ data DOMPerformanceEntryEntryTypePropertyInfo data DOMPerformanceEntryNamePropertyInfo data DOMPerformanceEntryStartTimePropertyInfo +data DOMPerformanceEntryGetDurationMethodInfo +data DOMPerformanceEntryGetEntryTypeMethodInfo +data DOMPerformanceEntryGetNameMethodInfo +data DOMPerformanceEntryGetStartTimeMethodInfo diff --git a/GI/WebKit/Objects/DOMPerformanceEntryList.hs b/GI/WebKit/Objects/DOMPerformanceEntryList.hs --- a/GI/WebKit/Objects/DOMPerformanceEntryList.hs +++ b/GI/WebKit/Objects/DOMPerformanceEntryList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMPerformanceEntryListGetLength + DOMPerformanceEntryListGetLengthMethodInfo, dOMPerformanceEntryListGetLength , -- ** dOMPerformanceEntryListItem + DOMPerformanceEntryListItemMethodInfo , dOMPerformanceEntryListItem , @@ -68,6 +71,41 @@ noDOMPerformanceEntryList :: Maybe DOMPerformanceEntryList noDOMPerformanceEntryList = Nothing +type family ResolveDOMPerformanceEntryListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMPerformanceEntryListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMPerformanceEntryListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMPerformanceEntryListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMPerformanceEntryListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMPerformanceEntryListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMPerformanceEntryListMethod "item" o = DOMPerformanceEntryListItemMethodInfo + ResolveDOMPerformanceEntryListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMPerformanceEntryListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMPerformanceEntryListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMPerformanceEntryListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMPerformanceEntryListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMPerformanceEntryListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMPerformanceEntryListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMPerformanceEntryListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMPerformanceEntryListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMPerformanceEntryListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMPerformanceEntryListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMPerformanceEntryListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMPerformanceEntryListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMPerformanceEntryListMethod "getLength" o = DOMPerformanceEntryListGetLengthMethodInfo + ResolveDOMPerformanceEntryListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMPerformanceEntryListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMPerformanceEntryListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMPerformanceEntryListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMPerformanceEntryListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMPerformanceEntryListMethod t DOMPerformanceEntryList, MethodInfo info DOMPerformanceEntryList p) => IsLabelProxy t (DOMPerformanceEntryList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMPerformanceEntryListMethod t DOMPerformanceEntryList, MethodInfo info DOMPerformanceEntryList p) => IsLabel t (DOMPerformanceEntryList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -81,22 +119,21 @@ type AttrSetTypeConstraint DOMPerformanceEntryListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceEntryListLengthPropertyInfo = DOMPerformanceEntryListK type AttrGetType DOMPerformanceEntryListLengthPropertyInfo = Word64 - type AttrLabel DOMPerformanceEntryListLengthPropertyInfo = "DOMPerformanceEntryList::length" + type AttrLabel DOMPerformanceEntryListLengthPropertyInfo = "length" attrGet _ = getDOMPerformanceEntryListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMPerformanceEntryList = DOMPerformanceEntryListAttributeList -type DOMPerformanceEntryListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMPerformanceEntryListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMPerformanceEntryListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMPerformanceEntryListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMPerformanceEntryList = DOMPerformanceEntryListSignalList -type DOMPerformanceEntryListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMPerformanceEntryListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMPerformanceEntryList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -108,19 +145,22 @@ dOMPerformanceEntryListGetLength :: (MonadIO m, DOMPerformanceEntryListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceEntryListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_entry_list_get_length _obj' touchManagedPtr _obj return result +data DOMPerformanceEntryListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceEntryListK a) => MethodInfo DOMPerformanceEntryListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMPerformanceEntryListGetLength + -- method DOMPerformanceEntryList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceEntryList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMPerformanceEntry" -- throws : False -- Skip return : False @@ -133,9 +173,9 @@ dOMPerformanceEntryListItem :: (MonadIO m, DOMPerformanceEntryListK a) => - a -> -- _obj - Word64 -> -- index - m DOMPerformanceEntry + a -- _obj + -> Word64 -- index + -> m DOMPerformanceEntry -- result dOMPerformanceEntryListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_entry_list_item _obj' index @@ -143,5 +183,9 @@ result' <- (wrapObject DOMPerformanceEntry) result touchManagedPtr _obj return result' + +data DOMPerformanceEntryListItemMethodInfo +instance (signature ~ (Word64 -> m DOMPerformanceEntry), MonadIO m, DOMPerformanceEntryListK a) => MethodInfo DOMPerformanceEntryListItemMethodInfo a signature where + overloadedMethod _ = dOMPerformanceEntryListItem diff --git a/GI/WebKit/Objects/DOMPerformanceEntryList.hs-boot b/GI/WebKit/Objects/DOMPerformanceEntryList.hs-boot --- a/GI/WebKit/Objects/DOMPerformanceEntryList.hs-boot +++ b/GI/WebKit/Objects/DOMPerformanceEntryList.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMPerformanceEntryListK o instance (GObject o, IsDescendantOf DOMPerformanceEntryList o) => DOMPerformanceEntryListK o data DOMPerformanceEntryListLengthPropertyInfo +data DOMPerformanceEntryListGetLengthMethodInfo +data DOMPerformanceEntryListItemMethodInfo diff --git a/GI/WebKit/Objects/DOMPerformanceNavigation.hs b/GI/WebKit/Objects/DOMPerformanceNavigation.hs --- a/GI/WebKit/Objects/DOMPerformanceNavigation.hs +++ b/GI/WebKit/Objects/DOMPerformanceNavigation.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** dOMPerformanceNavigationGetRedirectCount + DOMPerformanceNavigationGetRedirectCountMethodInfo, dOMPerformanceNavigationGetRedirectCount, @@ -69,6 +71,40 @@ noDOMPerformanceNavigation :: Maybe DOMPerformanceNavigation noDOMPerformanceNavigation = Nothing +type family ResolveDOMPerformanceNavigationMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMPerformanceNavigationMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMPerformanceNavigationMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMPerformanceNavigationMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMPerformanceNavigationMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMPerformanceNavigationMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMPerformanceNavigationMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMPerformanceNavigationMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMPerformanceNavigationMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMPerformanceNavigationMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMPerformanceNavigationMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMPerformanceNavigationMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMPerformanceNavigationMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMPerformanceNavigationMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMPerformanceNavigationMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMPerformanceNavigationMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMPerformanceNavigationMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMPerformanceNavigationMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMPerformanceNavigationMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMPerformanceNavigationMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMPerformanceNavigationMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMPerformanceNavigationMethod "getRedirectCount" o = DOMPerformanceNavigationGetRedirectCountMethodInfo + ResolveDOMPerformanceNavigationMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMPerformanceNavigationMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMPerformanceNavigationMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMPerformanceNavigationMethod t DOMPerformanceNavigation, MethodInfo info DOMPerformanceNavigation p) => IsLabelProxy t (DOMPerformanceNavigation -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMPerformanceNavigationMethod t DOMPerformanceNavigation, MethodInfo info DOMPerformanceNavigation p) => IsLabel t (DOMPerformanceNavigation -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "redirect-count" -- Type: TBasicType TUInt32 -- Flags: [PropertyReadable] @@ -82,7 +118,7 @@ type AttrSetTypeConstraint DOMPerformanceNavigationRedirectCountPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceNavigationRedirectCountPropertyInfo = DOMPerformanceNavigationK type AttrGetType DOMPerformanceNavigationRedirectCountPropertyInfo = Word32 - type AttrLabel DOMPerformanceNavigationRedirectCountPropertyInfo = "DOMPerformanceNavigation::redirect-count" + type AttrLabel DOMPerformanceNavigationRedirectCountPropertyInfo = "redirect-count" attrGet _ = getDOMPerformanceNavigationRedirectCount attrSet _ = undefined attrConstruct _ = undefined @@ -100,22 +136,21 @@ type AttrSetTypeConstraint DOMPerformanceNavigationTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceNavigationTypePropertyInfo = DOMPerformanceNavigationK type AttrGetType DOMPerformanceNavigationTypePropertyInfo = Word32 - type AttrLabel DOMPerformanceNavigationTypePropertyInfo = "DOMPerformanceNavigation::type" + type AttrLabel DOMPerformanceNavigationTypePropertyInfo = "type" attrGet _ = getDOMPerformanceNavigationType attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMPerformanceNavigation = DOMPerformanceNavigationAttributeList -type DOMPerformanceNavigationAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("redirect-count", DOMPerformanceNavigationRedirectCountPropertyInfo), '("type", DOMPerformanceNavigationTypePropertyInfo)] :: [(Symbol, *)]) +type DOMPerformanceNavigationAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("redirectCount", DOMPerformanceNavigationRedirectCountPropertyInfo), '("type", DOMPerformanceNavigationTypePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMPerformanceNavigation = DOMPerformanceNavigationSignalList -type DOMPerformanceNavigationSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMPerformanceNavigationSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMPerformanceNavigation::get_redirect_count -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceNavigation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceNavigation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceNavigation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt16 -- throws : False -- Skip return : False @@ -127,12 +162,16 @@ dOMPerformanceNavigationGetRedirectCount :: (MonadIO m, DOMPerformanceNavigationK a) => - a -> -- _obj - m Word16 + a -- _obj + -> m Word16 -- result dOMPerformanceNavigationGetRedirectCount _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_navigation_get_redirect_count _obj' touchManagedPtr _obj return result + +data DOMPerformanceNavigationGetRedirectCountMethodInfo +instance (signature ~ (m Word16), MonadIO m, DOMPerformanceNavigationK a) => MethodInfo DOMPerformanceNavigationGetRedirectCountMethodInfo a signature where + overloadedMethod _ = dOMPerformanceNavigationGetRedirectCount diff --git a/GI/WebKit/Objects/DOMPerformanceNavigation.hs-boot b/GI/WebKit/Objects/DOMPerformanceNavigation.hs-boot --- a/GI/WebKit/Objects/DOMPerformanceNavigation.hs-boot +++ b/GI/WebKit/Objects/DOMPerformanceNavigation.hs-boot @@ -13,3 +13,4 @@ instance (GObject o, IsDescendantOf DOMPerformanceNavigation o) => DOMPerformanceNavigationK o data DOMPerformanceNavigationRedirectCountPropertyInfo data DOMPerformanceNavigationTypePropertyInfo +data DOMPerformanceNavigationGetRedirectCountMethodInfo diff --git a/GI/WebKit/Objects/DOMPerformanceTiming.hs b/GI/WebKit/Objects/DOMPerformanceTiming.hs --- a/GI/WebKit/Objects/DOMPerformanceTiming.hs +++ b/GI/WebKit/Objects/DOMPerformanceTiming.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,86 +18,107 @@ -- * Methods -- ** dOMPerformanceTimingGetConnectEnd + DOMPerformanceTimingGetConnectEndMethodInfo, dOMPerformanceTimingGetConnectEnd , -- ** dOMPerformanceTimingGetConnectStart + DOMPerformanceTimingGetConnectStartMethodInfo, dOMPerformanceTimingGetConnectStart , -- ** dOMPerformanceTimingGetDomComplete + DOMPerformanceTimingGetDomCompleteMethodInfo, dOMPerformanceTimingGetDomComplete , -- ** dOMPerformanceTimingGetDomContentLoadedEventEnd + DOMPerformanceTimingGetDomContentLoadedEventEndMethodInfo, dOMPerformanceTimingGetDomContentLoadedEventEnd, -- ** dOMPerformanceTimingGetDomContentLoadedEventStart + DOMPerformanceTimingGetDomContentLoadedEventStartMethodInfo, dOMPerformanceTimingGetDomContentLoadedEventStart, -- ** dOMPerformanceTimingGetDomInteractive + DOMPerformanceTimingGetDomInteractiveMethodInfo, dOMPerformanceTimingGetDomInteractive , -- ** dOMPerformanceTimingGetDomLoading + DOMPerformanceTimingGetDomLoadingMethodInfo, dOMPerformanceTimingGetDomLoading , -- ** dOMPerformanceTimingGetDomainLookupEnd + DOMPerformanceTimingGetDomainLookupEndMethodInfo, dOMPerformanceTimingGetDomainLookupEnd , -- ** dOMPerformanceTimingGetDomainLookupStart + DOMPerformanceTimingGetDomainLookupStartMethodInfo, dOMPerformanceTimingGetDomainLookupStart, -- ** dOMPerformanceTimingGetFetchStart + DOMPerformanceTimingGetFetchStartMethodInfo, dOMPerformanceTimingGetFetchStart , -- ** dOMPerformanceTimingGetLoadEventEnd + DOMPerformanceTimingGetLoadEventEndMethodInfo, dOMPerformanceTimingGetLoadEventEnd , -- ** dOMPerformanceTimingGetLoadEventStart + DOMPerformanceTimingGetLoadEventStartMethodInfo, dOMPerformanceTimingGetLoadEventStart , -- ** dOMPerformanceTimingGetNavigationStart + DOMPerformanceTimingGetNavigationStartMethodInfo, dOMPerformanceTimingGetNavigationStart , -- ** dOMPerformanceTimingGetRedirectEnd + DOMPerformanceTimingGetRedirectEndMethodInfo, dOMPerformanceTimingGetRedirectEnd , -- ** dOMPerformanceTimingGetRedirectStart + DOMPerformanceTimingGetRedirectStartMethodInfo, dOMPerformanceTimingGetRedirectStart , -- ** dOMPerformanceTimingGetRequestStart + DOMPerformanceTimingGetRequestStartMethodInfo, dOMPerformanceTimingGetRequestStart , -- ** dOMPerformanceTimingGetResponseEnd + DOMPerformanceTimingGetResponseEndMethodInfo, dOMPerformanceTimingGetResponseEnd , -- ** dOMPerformanceTimingGetResponseStart + DOMPerformanceTimingGetResponseStartMethodInfo, dOMPerformanceTimingGetResponseStart , -- ** dOMPerformanceTimingGetSecureConnectionStart + DOMPerformanceTimingGetSecureConnectionStartMethodInfo, dOMPerformanceTimingGetSecureConnectionStart, -- ** dOMPerformanceTimingGetUnloadEventEnd + DOMPerformanceTimingGetUnloadEventEndMethodInfo, dOMPerformanceTimingGetUnloadEventEnd , -- ** dOMPerformanceTimingGetUnloadEventStart + DOMPerformanceTimingGetUnloadEventStartMethodInfo, dOMPerformanceTimingGetUnloadEventStart , @@ -244,6 +266,60 @@ noDOMPerformanceTiming :: Maybe DOMPerformanceTiming noDOMPerformanceTiming = Nothing +type family ResolveDOMPerformanceTimingMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMPerformanceTimingMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMPerformanceTimingMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMPerformanceTimingMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMPerformanceTimingMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMPerformanceTimingMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMPerformanceTimingMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMPerformanceTimingMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMPerformanceTimingMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMPerformanceTimingMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMPerformanceTimingMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMPerformanceTimingMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMPerformanceTimingMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMPerformanceTimingMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMPerformanceTimingMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMPerformanceTimingMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMPerformanceTimingMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMPerformanceTimingMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMPerformanceTimingMethod "getConnectEnd" o = DOMPerformanceTimingGetConnectEndMethodInfo + ResolveDOMPerformanceTimingMethod "getConnectStart" o = DOMPerformanceTimingGetConnectStartMethodInfo + ResolveDOMPerformanceTimingMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMPerformanceTimingMethod "getDomComplete" o = DOMPerformanceTimingGetDomCompleteMethodInfo + ResolveDOMPerformanceTimingMethod "getDomContentLoadedEventEnd" o = DOMPerformanceTimingGetDomContentLoadedEventEndMethodInfo + ResolveDOMPerformanceTimingMethod "getDomContentLoadedEventStart" o = DOMPerformanceTimingGetDomContentLoadedEventStartMethodInfo + ResolveDOMPerformanceTimingMethod "getDomInteractive" o = DOMPerformanceTimingGetDomInteractiveMethodInfo + ResolveDOMPerformanceTimingMethod "getDomLoading" o = DOMPerformanceTimingGetDomLoadingMethodInfo + ResolveDOMPerformanceTimingMethod "getDomainLookupEnd" o = DOMPerformanceTimingGetDomainLookupEndMethodInfo + ResolveDOMPerformanceTimingMethod "getDomainLookupStart" o = DOMPerformanceTimingGetDomainLookupStartMethodInfo + ResolveDOMPerformanceTimingMethod "getFetchStart" o = DOMPerformanceTimingGetFetchStartMethodInfo + ResolveDOMPerformanceTimingMethod "getLoadEventEnd" o = DOMPerformanceTimingGetLoadEventEndMethodInfo + ResolveDOMPerformanceTimingMethod "getLoadEventStart" o = DOMPerformanceTimingGetLoadEventStartMethodInfo + ResolveDOMPerformanceTimingMethod "getNavigationStart" o = DOMPerformanceTimingGetNavigationStartMethodInfo + ResolveDOMPerformanceTimingMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMPerformanceTimingMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMPerformanceTimingMethod "getRedirectEnd" o = DOMPerformanceTimingGetRedirectEndMethodInfo + ResolveDOMPerformanceTimingMethod "getRedirectStart" o = DOMPerformanceTimingGetRedirectStartMethodInfo + ResolveDOMPerformanceTimingMethod "getRequestStart" o = DOMPerformanceTimingGetRequestStartMethodInfo + ResolveDOMPerformanceTimingMethod "getResponseEnd" o = DOMPerformanceTimingGetResponseEndMethodInfo + ResolveDOMPerformanceTimingMethod "getResponseStart" o = DOMPerformanceTimingGetResponseStartMethodInfo + ResolveDOMPerformanceTimingMethod "getSecureConnectionStart" o = DOMPerformanceTimingGetSecureConnectionStartMethodInfo + ResolveDOMPerformanceTimingMethod "getUnloadEventEnd" o = DOMPerformanceTimingGetUnloadEventEndMethodInfo + ResolveDOMPerformanceTimingMethod "getUnloadEventStart" o = DOMPerformanceTimingGetUnloadEventStartMethodInfo + ResolveDOMPerformanceTimingMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMPerformanceTimingMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMPerformanceTimingMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMPerformanceTimingMethod t DOMPerformanceTiming, MethodInfo info DOMPerformanceTiming p) => IsLabelProxy t (DOMPerformanceTiming -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMPerformanceTimingMethod t DOMPerformanceTiming, MethodInfo info DOMPerformanceTiming p) => IsLabel t (DOMPerformanceTiming -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "connect-end" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -257,7 +333,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingConnectEndPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingConnectEndPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingConnectEndPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingConnectEndPropertyInfo = "DOMPerformanceTiming::connect-end" + type AttrLabel DOMPerformanceTimingConnectEndPropertyInfo = "connect-end" attrGet _ = getDOMPerformanceTimingConnectEnd attrSet _ = undefined attrConstruct _ = undefined @@ -275,7 +351,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingConnectStartPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingConnectStartPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingConnectStartPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingConnectStartPropertyInfo = "DOMPerformanceTiming::connect-start" + type AttrLabel DOMPerformanceTimingConnectStartPropertyInfo = "connect-start" attrGet _ = getDOMPerformanceTimingConnectStart attrSet _ = undefined attrConstruct _ = undefined @@ -293,7 +369,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingDomCompletePropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingDomCompletePropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingDomCompletePropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingDomCompletePropertyInfo = "DOMPerformanceTiming::dom-complete" + type AttrLabel DOMPerformanceTimingDomCompletePropertyInfo = "dom-complete" attrGet _ = getDOMPerformanceTimingDomComplete attrSet _ = undefined attrConstruct _ = undefined @@ -311,7 +387,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo = "DOMPerformanceTiming::dom-content-loaded-event-end" + type AttrLabel DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo = "dom-content-loaded-event-end" attrGet _ = getDOMPerformanceTimingDomContentLoadedEventEnd attrSet _ = undefined attrConstruct _ = undefined @@ -329,7 +405,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo = "DOMPerformanceTiming::dom-content-loaded-event-start" + type AttrLabel DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo = "dom-content-loaded-event-start" attrGet _ = getDOMPerformanceTimingDomContentLoadedEventStart attrSet _ = undefined attrConstruct _ = undefined @@ -347,7 +423,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingDomInteractivePropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingDomInteractivePropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingDomInteractivePropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingDomInteractivePropertyInfo = "DOMPerformanceTiming::dom-interactive" + type AttrLabel DOMPerformanceTimingDomInteractivePropertyInfo = "dom-interactive" attrGet _ = getDOMPerformanceTimingDomInteractive attrSet _ = undefined attrConstruct _ = undefined @@ -365,7 +441,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingDomLoadingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingDomLoadingPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingDomLoadingPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingDomLoadingPropertyInfo = "DOMPerformanceTiming::dom-loading" + type AttrLabel DOMPerformanceTimingDomLoadingPropertyInfo = "dom-loading" attrGet _ = getDOMPerformanceTimingDomLoading attrSet _ = undefined attrConstruct _ = undefined @@ -383,7 +459,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingDomainLookupEndPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingDomainLookupEndPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingDomainLookupEndPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingDomainLookupEndPropertyInfo = "DOMPerformanceTiming::domain-lookup-end" + type AttrLabel DOMPerformanceTimingDomainLookupEndPropertyInfo = "domain-lookup-end" attrGet _ = getDOMPerformanceTimingDomainLookupEnd attrSet _ = undefined attrConstruct _ = undefined @@ -401,7 +477,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingDomainLookupStartPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingDomainLookupStartPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingDomainLookupStartPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingDomainLookupStartPropertyInfo = "DOMPerformanceTiming::domain-lookup-start" + type AttrLabel DOMPerformanceTimingDomainLookupStartPropertyInfo = "domain-lookup-start" attrGet _ = getDOMPerformanceTimingDomainLookupStart attrSet _ = undefined attrConstruct _ = undefined @@ -419,7 +495,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingFetchStartPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingFetchStartPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingFetchStartPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingFetchStartPropertyInfo = "DOMPerformanceTiming::fetch-start" + type AttrLabel DOMPerformanceTimingFetchStartPropertyInfo = "fetch-start" attrGet _ = getDOMPerformanceTimingFetchStart attrSet _ = undefined attrConstruct _ = undefined @@ -437,7 +513,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingLoadEventEndPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingLoadEventEndPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingLoadEventEndPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingLoadEventEndPropertyInfo = "DOMPerformanceTiming::load-event-end" + type AttrLabel DOMPerformanceTimingLoadEventEndPropertyInfo = "load-event-end" attrGet _ = getDOMPerformanceTimingLoadEventEnd attrSet _ = undefined attrConstruct _ = undefined @@ -455,7 +531,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingLoadEventStartPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingLoadEventStartPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingLoadEventStartPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingLoadEventStartPropertyInfo = "DOMPerformanceTiming::load-event-start" + type AttrLabel DOMPerformanceTimingLoadEventStartPropertyInfo = "load-event-start" attrGet _ = getDOMPerformanceTimingLoadEventStart attrSet _ = undefined attrConstruct _ = undefined @@ -473,7 +549,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingNavigationStartPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingNavigationStartPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingNavigationStartPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingNavigationStartPropertyInfo = "DOMPerformanceTiming::navigation-start" + type AttrLabel DOMPerformanceTimingNavigationStartPropertyInfo = "navigation-start" attrGet _ = getDOMPerformanceTimingNavigationStart attrSet _ = undefined attrConstruct _ = undefined @@ -491,7 +567,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingRedirectEndPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingRedirectEndPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingRedirectEndPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingRedirectEndPropertyInfo = "DOMPerformanceTiming::redirect-end" + type AttrLabel DOMPerformanceTimingRedirectEndPropertyInfo = "redirect-end" attrGet _ = getDOMPerformanceTimingRedirectEnd attrSet _ = undefined attrConstruct _ = undefined @@ -509,7 +585,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingRedirectStartPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingRedirectStartPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingRedirectStartPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingRedirectStartPropertyInfo = "DOMPerformanceTiming::redirect-start" + type AttrLabel DOMPerformanceTimingRedirectStartPropertyInfo = "redirect-start" attrGet _ = getDOMPerformanceTimingRedirectStart attrSet _ = undefined attrConstruct _ = undefined @@ -527,7 +603,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingRequestStartPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingRequestStartPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingRequestStartPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingRequestStartPropertyInfo = "DOMPerformanceTiming::request-start" + type AttrLabel DOMPerformanceTimingRequestStartPropertyInfo = "request-start" attrGet _ = getDOMPerformanceTimingRequestStart attrSet _ = undefined attrConstruct _ = undefined @@ -545,7 +621,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingResponseEndPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingResponseEndPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingResponseEndPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingResponseEndPropertyInfo = "DOMPerformanceTiming::response-end" + type AttrLabel DOMPerformanceTimingResponseEndPropertyInfo = "response-end" attrGet _ = getDOMPerformanceTimingResponseEnd attrSet _ = undefined attrConstruct _ = undefined @@ -563,7 +639,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingResponseStartPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingResponseStartPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingResponseStartPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingResponseStartPropertyInfo = "DOMPerformanceTiming::response-start" + type AttrLabel DOMPerformanceTimingResponseStartPropertyInfo = "response-start" attrGet _ = getDOMPerformanceTimingResponseStart attrSet _ = undefined attrConstruct _ = undefined @@ -581,7 +657,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingSecureConnectionStartPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingSecureConnectionStartPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingSecureConnectionStartPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingSecureConnectionStartPropertyInfo = "DOMPerformanceTiming::secure-connection-start" + type AttrLabel DOMPerformanceTimingSecureConnectionStartPropertyInfo = "secure-connection-start" attrGet _ = getDOMPerformanceTimingSecureConnectionStart attrSet _ = undefined attrConstruct _ = undefined @@ -599,7 +675,7 @@ type AttrSetTypeConstraint DOMPerformanceTimingUnloadEventEndPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingUnloadEventEndPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingUnloadEventEndPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingUnloadEventEndPropertyInfo = "DOMPerformanceTiming::unload-event-end" + type AttrLabel DOMPerformanceTimingUnloadEventEndPropertyInfo = "unload-event-end" attrGet _ = getDOMPerformanceTimingUnloadEventEnd attrSet _ = undefined attrConstruct _ = undefined @@ -617,22 +693,21 @@ type AttrSetTypeConstraint DOMPerformanceTimingUnloadEventStartPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPerformanceTimingUnloadEventStartPropertyInfo = DOMPerformanceTimingK type AttrGetType DOMPerformanceTimingUnloadEventStartPropertyInfo = Word64 - type AttrLabel DOMPerformanceTimingUnloadEventStartPropertyInfo = "DOMPerformanceTiming::unload-event-start" + type AttrLabel DOMPerformanceTimingUnloadEventStartPropertyInfo = "unload-event-start" attrGet _ = getDOMPerformanceTimingUnloadEventStart attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMPerformanceTiming = DOMPerformanceTimingAttributeList -type DOMPerformanceTimingAttributeList = ('[ '("connect-end", DOMPerformanceTimingConnectEndPropertyInfo), '("connect-start", DOMPerformanceTimingConnectStartPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("dom-complete", DOMPerformanceTimingDomCompletePropertyInfo), '("dom-content-loaded-event-end", DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo), '("dom-content-loaded-event-start", DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo), '("dom-interactive", DOMPerformanceTimingDomInteractivePropertyInfo), '("dom-loading", DOMPerformanceTimingDomLoadingPropertyInfo), '("domain-lookup-end", DOMPerformanceTimingDomainLookupEndPropertyInfo), '("domain-lookup-start", DOMPerformanceTimingDomainLookupStartPropertyInfo), '("fetch-start", DOMPerformanceTimingFetchStartPropertyInfo), '("load-event-end", DOMPerformanceTimingLoadEventEndPropertyInfo), '("load-event-start", DOMPerformanceTimingLoadEventStartPropertyInfo), '("navigation-start", DOMPerformanceTimingNavigationStartPropertyInfo), '("redirect-end", DOMPerformanceTimingRedirectEndPropertyInfo), '("redirect-start", DOMPerformanceTimingRedirectStartPropertyInfo), '("request-start", DOMPerformanceTimingRequestStartPropertyInfo), '("response-end", DOMPerformanceTimingResponseEndPropertyInfo), '("response-start", DOMPerformanceTimingResponseStartPropertyInfo), '("secure-connection-start", DOMPerformanceTimingSecureConnectionStartPropertyInfo), '("unload-event-end", DOMPerformanceTimingUnloadEventEndPropertyInfo), '("unload-event-start", DOMPerformanceTimingUnloadEventStartPropertyInfo)] :: [(Symbol, *)]) +type DOMPerformanceTimingAttributeList = ('[ '("connectEnd", DOMPerformanceTimingConnectEndPropertyInfo), '("connectStart", DOMPerformanceTimingConnectStartPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("domComplete", DOMPerformanceTimingDomCompletePropertyInfo), '("domContentLoadedEventEnd", DOMPerformanceTimingDomContentLoadedEventEndPropertyInfo), '("domContentLoadedEventStart", DOMPerformanceTimingDomContentLoadedEventStartPropertyInfo), '("domInteractive", DOMPerformanceTimingDomInteractivePropertyInfo), '("domLoading", DOMPerformanceTimingDomLoadingPropertyInfo), '("domainLookupEnd", DOMPerformanceTimingDomainLookupEndPropertyInfo), '("domainLookupStart", DOMPerformanceTimingDomainLookupStartPropertyInfo), '("fetchStart", DOMPerformanceTimingFetchStartPropertyInfo), '("loadEventEnd", DOMPerformanceTimingLoadEventEndPropertyInfo), '("loadEventStart", DOMPerformanceTimingLoadEventStartPropertyInfo), '("navigationStart", DOMPerformanceTimingNavigationStartPropertyInfo), '("redirectEnd", DOMPerformanceTimingRedirectEndPropertyInfo), '("redirectStart", DOMPerformanceTimingRedirectStartPropertyInfo), '("requestStart", DOMPerformanceTimingRequestStartPropertyInfo), '("responseEnd", DOMPerformanceTimingResponseEndPropertyInfo), '("responseStart", DOMPerformanceTimingResponseStartPropertyInfo), '("secureConnectionStart", DOMPerformanceTimingSecureConnectionStartPropertyInfo), '("unloadEventEnd", DOMPerformanceTimingUnloadEventEndPropertyInfo), '("unloadEventStart", DOMPerformanceTimingUnloadEventStartPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMPerformanceTiming = DOMPerformanceTimingSignalList -type DOMPerformanceTimingSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMPerformanceTimingSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMPerformanceTiming::get_connect_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -644,19 +719,22 @@ dOMPerformanceTimingGetConnectEnd :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetConnectEnd _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_connect_end _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetConnectEndMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetConnectEndMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetConnectEnd + -- method DOMPerformanceTiming::get_connect_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -668,19 +746,22 @@ dOMPerformanceTimingGetConnectStart :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetConnectStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_connect_start _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetConnectStartMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetConnectStartMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetConnectStart + -- method DOMPerformanceTiming::get_dom_complete -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -692,19 +773,22 @@ dOMPerformanceTimingGetDomComplete :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetDomComplete _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_dom_complete _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetDomCompleteMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetDomCompleteMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetDomComplete + -- method DOMPerformanceTiming::get_dom_content_loaded_event_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -716,19 +800,22 @@ dOMPerformanceTimingGetDomContentLoadedEventEnd :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetDomContentLoadedEventEnd _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_dom_content_loaded_event_end _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetDomContentLoadedEventEndMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetDomContentLoadedEventEndMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetDomContentLoadedEventEnd + -- method DOMPerformanceTiming::get_dom_content_loaded_event_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -740,19 +827,22 @@ dOMPerformanceTimingGetDomContentLoadedEventStart :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetDomContentLoadedEventStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_dom_content_loaded_event_start _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetDomContentLoadedEventStartMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetDomContentLoadedEventStartMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetDomContentLoadedEventStart + -- method DOMPerformanceTiming::get_dom_interactive -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -764,19 +854,22 @@ dOMPerformanceTimingGetDomInteractive :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetDomInteractive _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_dom_interactive _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetDomInteractiveMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetDomInteractiveMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetDomInteractive + -- method DOMPerformanceTiming::get_dom_loading -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -788,19 +881,22 @@ dOMPerformanceTimingGetDomLoading :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetDomLoading _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_dom_loading _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetDomLoadingMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetDomLoadingMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetDomLoading + -- method DOMPerformanceTiming::get_domain_lookup_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -812,19 +908,22 @@ dOMPerformanceTimingGetDomainLookupEnd :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetDomainLookupEnd _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_domain_lookup_end _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetDomainLookupEndMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetDomainLookupEndMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetDomainLookupEnd + -- method DOMPerformanceTiming::get_domain_lookup_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -836,19 +935,22 @@ dOMPerformanceTimingGetDomainLookupStart :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetDomainLookupStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_domain_lookup_start _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetDomainLookupStartMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetDomainLookupStartMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetDomainLookupStart + -- method DOMPerformanceTiming::get_fetch_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -860,19 +962,22 @@ dOMPerformanceTimingGetFetchStart :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetFetchStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_fetch_start _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetFetchStartMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetFetchStartMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetFetchStart + -- method DOMPerformanceTiming::get_load_event_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -884,19 +989,22 @@ dOMPerformanceTimingGetLoadEventEnd :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetLoadEventEnd _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_load_event_end _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetLoadEventEndMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetLoadEventEndMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetLoadEventEnd + -- method DOMPerformanceTiming::get_load_event_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -908,19 +1016,22 @@ dOMPerformanceTimingGetLoadEventStart :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetLoadEventStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_load_event_start _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetLoadEventStartMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetLoadEventStartMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetLoadEventStart + -- method DOMPerformanceTiming::get_navigation_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -932,19 +1043,22 @@ dOMPerformanceTimingGetNavigationStart :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetNavigationStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_navigation_start _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetNavigationStartMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetNavigationStartMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetNavigationStart + -- method DOMPerformanceTiming::get_redirect_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -956,19 +1070,22 @@ dOMPerformanceTimingGetRedirectEnd :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetRedirectEnd _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_redirect_end _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetRedirectEndMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetRedirectEndMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetRedirectEnd + -- method DOMPerformanceTiming::get_redirect_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -980,19 +1097,22 @@ dOMPerformanceTimingGetRedirectStart :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetRedirectStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_redirect_start _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetRedirectStartMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetRedirectStartMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetRedirectStart + -- method DOMPerformanceTiming::get_request_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -1004,19 +1124,22 @@ dOMPerformanceTimingGetRequestStart :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetRequestStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_request_start _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetRequestStartMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetRequestStartMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetRequestStart + -- method DOMPerformanceTiming::get_response_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -1028,19 +1151,22 @@ dOMPerformanceTimingGetResponseEnd :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetResponseEnd _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_response_end _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetResponseEndMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetResponseEndMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetResponseEnd + -- method DOMPerformanceTiming::get_response_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -1052,19 +1178,22 @@ dOMPerformanceTimingGetResponseStart :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetResponseStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_response_start _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetResponseStartMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetResponseStartMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetResponseStart + -- method DOMPerformanceTiming::get_secure_connection_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -1076,19 +1205,22 @@ dOMPerformanceTimingGetSecureConnectionStart :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetSecureConnectionStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_secure_connection_start _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetSecureConnectionStartMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetSecureConnectionStartMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetSecureConnectionStart + -- method DOMPerformanceTiming::get_unload_event_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -1100,19 +1232,22 @@ dOMPerformanceTimingGetUnloadEventEnd :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetUnloadEventEnd _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_unload_event_end _obj' touchManagedPtr _obj return result +data DOMPerformanceTimingGetUnloadEventEndMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetUnloadEventEndMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetUnloadEventEnd + -- method DOMPerformanceTiming::get_unload_event_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMPerformanceTiming", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -1124,12 +1259,16 @@ dOMPerformanceTimingGetUnloadEventStart :: (MonadIO m, DOMPerformanceTimingK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMPerformanceTimingGetUnloadEventStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_performance_timing_get_unload_event_start _obj' touchManagedPtr _obj return result + +data DOMPerformanceTimingGetUnloadEventStartMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMPerformanceTimingK a) => MethodInfo DOMPerformanceTimingGetUnloadEventStartMethodInfo a signature where + overloadedMethod _ = dOMPerformanceTimingGetUnloadEventStart diff --git a/GI/WebKit/Objects/DOMPerformanceTiming.hs-boot b/GI/WebKit/Objects/DOMPerformanceTiming.hs-boot --- a/GI/WebKit/Objects/DOMPerformanceTiming.hs-boot +++ b/GI/WebKit/Objects/DOMPerformanceTiming.hs-boot @@ -32,3 +32,24 @@ data DOMPerformanceTimingSecureConnectionStartPropertyInfo data DOMPerformanceTimingUnloadEventEndPropertyInfo data DOMPerformanceTimingUnloadEventStartPropertyInfo +data DOMPerformanceTimingGetConnectEndMethodInfo +data DOMPerformanceTimingGetConnectStartMethodInfo +data DOMPerformanceTimingGetDomCompleteMethodInfo +data DOMPerformanceTimingGetDomContentLoadedEventEndMethodInfo +data DOMPerformanceTimingGetDomContentLoadedEventStartMethodInfo +data DOMPerformanceTimingGetDomInteractiveMethodInfo +data DOMPerformanceTimingGetDomLoadingMethodInfo +data DOMPerformanceTimingGetDomainLookupEndMethodInfo +data DOMPerformanceTimingGetDomainLookupStartMethodInfo +data DOMPerformanceTimingGetFetchStartMethodInfo +data DOMPerformanceTimingGetLoadEventEndMethodInfo +data DOMPerformanceTimingGetLoadEventStartMethodInfo +data DOMPerformanceTimingGetNavigationStartMethodInfo +data DOMPerformanceTimingGetRedirectEndMethodInfo +data DOMPerformanceTimingGetRedirectStartMethodInfo +data DOMPerformanceTimingGetRequestStartMethodInfo +data DOMPerformanceTimingGetResponseEndMethodInfo +data DOMPerformanceTimingGetResponseStartMethodInfo +data DOMPerformanceTimingGetSecureConnectionStartMethodInfo +data DOMPerformanceTimingGetUnloadEventEndMethodInfo +data DOMPerformanceTimingGetUnloadEventStartMethodInfo diff --git a/GI/WebKit/Objects/DOMProcessingInstruction.hs b/GI/WebKit/Objects/DOMProcessingInstruction.hs --- a/GI/WebKit/Objects/DOMProcessingInstruction.hs +++ b/GI/WebKit/Objects/DOMProcessingInstruction.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMProcessingInstructionGetData + DOMProcessingInstructionGetDataMethodInfo, dOMProcessingInstructionGetData , -- ** dOMProcessingInstructionGetSheet + DOMProcessingInstructionGetSheetMethodInfo, dOMProcessingInstructionGetSheet , -- ** dOMProcessingInstructionGetTarget + DOMProcessingInstructionGetTargetMethodInfo, dOMProcessingInstructionGetTarget , -- ** dOMProcessingInstructionSetData + DOMProcessingInstructionSetDataMethodInfo, dOMProcessingInstructionSetData , @@ -81,6 +86,82 @@ noDOMProcessingInstruction :: Maybe DOMProcessingInstruction noDOMProcessingInstruction = Nothing +type family ResolveDOMProcessingInstructionMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMProcessingInstructionMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMProcessingInstructionMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMProcessingInstructionMethod "appendData" o = DOMCharacterDataAppendDataMethodInfo + ResolveDOMProcessingInstructionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMProcessingInstructionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMProcessingInstructionMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMProcessingInstructionMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMProcessingInstructionMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMProcessingInstructionMethod "deleteData" o = DOMCharacterDataDeleteDataMethodInfo + ResolveDOMProcessingInstructionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMProcessingInstructionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMProcessingInstructionMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMProcessingInstructionMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMProcessingInstructionMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMProcessingInstructionMethod "insertData" o = DOMCharacterDataInsertDataMethodInfo + ResolveDOMProcessingInstructionMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMProcessingInstructionMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMProcessingInstructionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMProcessingInstructionMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMProcessingInstructionMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMProcessingInstructionMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMProcessingInstructionMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMProcessingInstructionMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMProcessingInstructionMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMProcessingInstructionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMProcessingInstructionMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMProcessingInstructionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMProcessingInstructionMethod "remove" o = DOMCharacterDataRemoveMethodInfo + ResolveDOMProcessingInstructionMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMProcessingInstructionMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMProcessingInstructionMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMProcessingInstructionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMProcessingInstructionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMProcessingInstructionMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMProcessingInstructionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMProcessingInstructionMethod "substringData" o = DOMCharacterDataSubstringDataMethodInfo + ResolveDOMProcessingInstructionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMProcessingInstructionMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMProcessingInstructionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMProcessingInstructionMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMProcessingInstructionMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMProcessingInstructionMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMProcessingInstructionMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMProcessingInstructionMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMProcessingInstructionMethod "getLength" o = DOMCharacterDataGetLengthMethodInfo + ResolveDOMProcessingInstructionMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMProcessingInstructionMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMProcessingInstructionMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMProcessingInstructionMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMProcessingInstructionMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMProcessingInstructionMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMProcessingInstructionMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMProcessingInstructionMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMProcessingInstructionMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMProcessingInstructionMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMProcessingInstructionMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMProcessingInstructionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMProcessingInstructionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMProcessingInstructionMethod "getSheet" o = DOMProcessingInstructionGetSheetMethodInfo + ResolveDOMProcessingInstructionMethod "getTarget" o = DOMProcessingInstructionGetTargetMethodInfo + ResolveDOMProcessingInstructionMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMProcessingInstructionMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMProcessingInstructionMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMProcessingInstructionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMProcessingInstructionMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMProcessingInstructionMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMProcessingInstructionMethod t DOMProcessingInstruction, MethodInfo info DOMProcessingInstruction p) => IsLabelProxy t (DOMProcessingInstruction -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMProcessingInstructionMethod t DOMProcessingInstruction, MethodInfo info DOMProcessingInstruction p) => IsLabel t (DOMProcessingInstruction -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "sheet" -- Type: TInterface "WebKit" "DOMStyleSheet" -- Flags: [PropertyReadable] @@ -94,7 +175,7 @@ type AttrSetTypeConstraint DOMProcessingInstructionSheetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMProcessingInstructionSheetPropertyInfo = DOMProcessingInstructionK type AttrGetType DOMProcessingInstructionSheetPropertyInfo = DOMStyleSheet - type AttrLabel DOMProcessingInstructionSheetPropertyInfo = "DOMProcessingInstruction::sheet" + type AttrLabel DOMProcessingInstructionSheetPropertyInfo = "sheet" attrGet _ = getDOMProcessingInstructionSheet attrSet _ = undefined attrConstruct _ = undefined @@ -112,22 +193,21 @@ type AttrSetTypeConstraint DOMProcessingInstructionTargetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMProcessingInstructionTargetPropertyInfo = DOMProcessingInstructionK type AttrGetType DOMProcessingInstructionTargetPropertyInfo = T.Text - type AttrLabel DOMProcessingInstructionTargetPropertyInfo = "DOMProcessingInstruction::target" + type AttrLabel DOMProcessingInstructionTargetPropertyInfo = "target" attrGet _ = getDOMProcessingInstructionTarget attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMProcessingInstruction = DOMProcessingInstructionAttributeList -type DOMProcessingInstructionAttributeList = ('[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("sheet", DOMProcessingInstructionSheetPropertyInfo), '("target", DOMProcessingInstructionTargetPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) +type DOMProcessingInstructionAttributeList = ('[ '("baseUri", DOMNodeBaseUriPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("sheet", DOMProcessingInstructionSheetPropertyInfo), '("target", DOMProcessingInstructionTargetPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMProcessingInstruction = DOMProcessingInstructionSignalList -type DOMProcessingInstructionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMProcessingInstructionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMProcessingInstruction::get_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -139,8 +219,8 @@ {-# DEPRECATED dOMProcessingInstructionGetData ["(Since version 2.4)"]#-} dOMProcessingInstructionGetData :: (MonadIO m, DOMProcessingInstructionK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMProcessingInstructionGetData _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_processing_instruction_get_data _obj' @@ -150,11 +230,14 @@ touchManagedPtr _obj return result' +data DOMProcessingInstructionGetDataMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMProcessingInstructionK a) => MethodInfo DOMProcessingInstructionGetDataMethodInfo a signature where + overloadedMethod _ = dOMProcessingInstructionGetData + -- method DOMProcessingInstruction::get_sheet -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMStyleSheet" -- throws : False -- Skip return : False @@ -166,8 +249,8 @@ dOMProcessingInstructionGetSheet :: (MonadIO m, DOMProcessingInstructionK a) => - a -> -- _obj - m DOMStyleSheet + a -- _obj + -> m DOMStyleSheet -- result dOMProcessingInstructionGetSheet _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_processing_instruction_get_sheet _obj' @@ -176,11 +259,14 @@ touchManagedPtr _obj return result' +data DOMProcessingInstructionGetSheetMethodInfo +instance (signature ~ (m DOMStyleSheet), MonadIO m, DOMProcessingInstructionK a) => MethodInfo DOMProcessingInstructionGetSheetMethodInfo a signature where + overloadedMethod _ = dOMProcessingInstructionGetSheet + -- method DOMProcessingInstruction::get_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -192,8 +278,8 @@ dOMProcessingInstructionGetTarget :: (MonadIO m, DOMProcessingInstructionK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMProcessingInstructionGetTarget _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_processing_instruction_get_target _obj' @@ -203,11 +289,14 @@ touchManagedPtr _obj return result' +data DOMProcessingInstructionGetTargetMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMProcessingInstructionK a) => MethodInfo DOMProcessingInstructionGetTargetMethodInfo a signature where + overloadedMethod _ = dOMProcessingInstructionGetTarget + -- method DOMProcessingInstruction::set_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMProcessingInstruction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -221,9 +310,9 @@ {-# DEPRECATED dOMProcessingInstructionSetData ["(Since version 2.4)"]#-} dOMProcessingInstructionSetData :: (MonadIO m, DOMProcessingInstructionK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMProcessingInstructionSetData _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -235,5 +324,9 @@ ) (do freeMem value' ) + +data DOMProcessingInstructionSetDataMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMProcessingInstructionK a) => MethodInfo DOMProcessingInstructionSetDataMethodInfo a signature where + overloadedMethod _ = dOMProcessingInstructionSetData diff --git a/GI/WebKit/Objects/DOMProcessingInstruction.hs-boot b/GI/WebKit/Objects/DOMProcessingInstruction.hs-boot --- a/GI/WebKit/Objects/DOMProcessingInstruction.hs-boot +++ b/GI/WebKit/Objects/DOMProcessingInstruction.hs-boot @@ -13,3 +13,7 @@ instance (GObject o, IsDescendantOf DOMProcessingInstruction o) => DOMProcessingInstructionK o data DOMProcessingInstructionSheetPropertyInfo data DOMProcessingInstructionTargetPropertyInfo +data DOMProcessingInstructionGetDataMethodInfo +data DOMProcessingInstructionGetSheetMethodInfo +data DOMProcessingInstructionGetTargetMethodInfo +data DOMProcessingInstructionSetDataMethodInfo diff --git a/GI/WebKit/Objects/DOMPropertyNodeList.hs b/GI/WebKit/Objects/DOMPropertyNodeList.hs --- a/GI/WebKit/Objects/DOMPropertyNodeList.hs +++ b/GI/WebKit/Objects/DOMPropertyNodeList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -68,6 +69,39 @@ noDOMPropertyNodeList :: Maybe DOMPropertyNodeList noDOMPropertyNodeList = Nothing +type family ResolveDOMPropertyNodeListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMPropertyNodeListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMPropertyNodeListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMPropertyNodeListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMPropertyNodeListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMPropertyNodeListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMPropertyNodeListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMPropertyNodeListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMPropertyNodeListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMPropertyNodeListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMPropertyNodeListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMPropertyNodeListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMPropertyNodeListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMPropertyNodeListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMPropertyNodeListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMPropertyNodeListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMPropertyNodeListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMPropertyNodeListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMPropertyNodeListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMPropertyNodeListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMPropertyNodeListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMPropertyNodeListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMPropertyNodeListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMPropertyNodeListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMPropertyNodeListMethod t DOMPropertyNodeList, MethodInfo info DOMPropertyNodeList p) => IsLabelProxy t (DOMPropertyNodeList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMPropertyNodeListMethod t DOMPropertyNodeList, MethodInfo info DOMPropertyNodeList p) => IsLabel t (DOMPropertyNodeList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -81,22 +115,21 @@ type AttrSetTypeConstraint DOMPropertyNodeListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMPropertyNodeListLengthPropertyInfo = DOMPropertyNodeListK type AttrGetType DOMPropertyNodeListLengthPropertyInfo = Word64 - type AttrLabel DOMPropertyNodeListLengthPropertyInfo = "DOMPropertyNodeList::length" + type AttrLabel DOMPropertyNodeListLengthPropertyInfo = "length" attrGet _ = getDOMPropertyNodeListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMPropertyNodeList = DOMPropertyNodeListAttributeList -type DOMPropertyNodeListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMPropertyNodeListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMPropertyNodeListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMPropertyNodeListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMPropertyNodeList = DOMPropertyNodeListSignalList -type DOMPropertyNodeListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMPropertyNodeListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMPropertyNodeList::get_length -- method type : MemberFunction --- Args : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -108,17 +141,16 @@ {-# DEPRECATED dOMPropertyNodeListGetLength ["(Since version 2.2)"]#-} dOMPropertyNodeListGetLength :: (MonadIO m) => - Ptr () -> -- self - m Word64 + Ptr () -- self + -> m Word64 -- result dOMPropertyNodeListGetLength self = liftIO $ do result <- webkit_dom_property_node_list_get_length self return result -- method DOMPropertyNodeList::item -- method type : MemberFunction --- Args : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "self", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -131,9 +163,9 @@ {-# DEPRECATED dOMPropertyNodeListItem ["(Since version 2.2)"]#-} dOMPropertyNodeListItem :: (MonadIO m) => - Ptr () -> -- self - Word64 -> -- index - m DOMNode + Ptr () -- self + -> Word64 -- index + -> m DOMNode -- result dOMPropertyNodeListItem self index = liftIO $ do result <- webkit_dom_property_node_list_item self index checkUnexpectedReturnNULL "webkit_dom_property_node_list_item" result diff --git a/GI/WebKit/Objects/DOMRange.hs b/GI/WebKit/Objects/DOMRange.hs --- a/GI/WebKit/Objects/DOMRange.hs +++ b/GI/WebKit/Objects/DOMRange.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,126 +18,157 @@ -- * Methods -- ** dOMRangeCloneContents + DOMRangeCloneContentsMethodInfo , dOMRangeCloneContents , -- ** dOMRangeCloneRange + DOMRangeCloneRangeMethodInfo , dOMRangeCloneRange , -- ** dOMRangeCollapse + DOMRangeCollapseMethodInfo , dOMRangeCollapse , -- ** dOMRangeCompareBoundaryPoints + DOMRangeCompareBoundaryPointsMethodInfo , dOMRangeCompareBoundaryPoints , -- ** dOMRangeCompareNode + DOMRangeCompareNodeMethodInfo , dOMRangeCompareNode , -- ** dOMRangeComparePoint + DOMRangeComparePointMethodInfo , dOMRangeComparePoint , -- ** dOMRangeCreateContextualFragment + DOMRangeCreateContextualFragmentMethodInfo, dOMRangeCreateContextualFragment , -- ** dOMRangeDeleteContents + DOMRangeDeleteContentsMethodInfo , dOMRangeDeleteContents , -- ** dOMRangeDetach + DOMRangeDetachMethodInfo , dOMRangeDetach , -- ** dOMRangeExpand + DOMRangeExpandMethodInfo , dOMRangeExpand , -- ** dOMRangeExtractContents + DOMRangeExtractContentsMethodInfo , dOMRangeExtractContents , -- ** dOMRangeGetCollapsed + DOMRangeGetCollapsedMethodInfo , dOMRangeGetCollapsed , -- ** dOMRangeGetCommonAncestorContainer + DOMRangeGetCommonAncestorContainerMethodInfo, dOMRangeGetCommonAncestorContainer , -- ** dOMRangeGetEndContainer + DOMRangeGetEndContainerMethodInfo , dOMRangeGetEndContainer , -- ** dOMRangeGetEndOffset + DOMRangeGetEndOffsetMethodInfo , dOMRangeGetEndOffset , -- ** dOMRangeGetStartContainer + DOMRangeGetStartContainerMethodInfo , dOMRangeGetStartContainer , -- ** dOMRangeGetStartOffset + DOMRangeGetStartOffsetMethodInfo , dOMRangeGetStartOffset , -- ** dOMRangeGetText + DOMRangeGetTextMethodInfo , dOMRangeGetText , -- ** dOMRangeInsertNode + DOMRangeInsertNodeMethodInfo , dOMRangeInsertNode , -- ** dOMRangeIntersectsNode + DOMRangeIntersectsNodeMethodInfo , dOMRangeIntersectsNode , -- ** dOMRangeIsPointInRange + DOMRangeIsPointInRangeMethodInfo , dOMRangeIsPointInRange , -- ** dOMRangeSelectNode + DOMRangeSelectNodeMethodInfo , dOMRangeSelectNode , -- ** dOMRangeSelectNodeContents + DOMRangeSelectNodeContentsMethodInfo , dOMRangeSelectNodeContents , -- ** dOMRangeSetEnd + DOMRangeSetEndMethodInfo , dOMRangeSetEnd , -- ** dOMRangeSetEndAfter + DOMRangeSetEndAfterMethodInfo , dOMRangeSetEndAfter , -- ** dOMRangeSetEndBefore + DOMRangeSetEndBeforeMethodInfo , dOMRangeSetEndBefore , -- ** dOMRangeSetStart + DOMRangeSetStartMethodInfo , dOMRangeSetStart , -- ** dOMRangeSetStartAfter + DOMRangeSetStartAfterMethodInfo , dOMRangeSetStartAfter , -- ** dOMRangeSetStartBefore + DOMRangeSetStartBeforeMethodInfo , dOMRangeSetStartBefore , -- ** dOMRangeSurroundContents + DOMRangeSurroundContentsMethodInfo , dOMRangeSurroundContents , -- ** dOMRangeToString + DOMRangeToStringMethodInfo , dOMRangeToString , @@ -214,6 +246,70 @@ noDOMRange :: Maybe DOMRange noDOMRange = Nothing +type family ResolveDOMRangeMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMRangeMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMRangeMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMRangeMethod "cloneContents" o = DOMRangeCloneContentsMethodInfo + ResolveDOMRangeMethod "cloneRange" o = DOMRangeCloneRangeMethodInfo + ResolveDOMRangeMethod "collapse" o = DOMRangeCollapseMethodInfo + ResolveDOMRangeMethod "compareBoundaryPoints" o = DOMRangeCompareBoundaryPointsMethodInfo + ResolveDOMRangeMethod "compareNode" o = DOMRangeCompareNodeMethodInfo + ResolveDOMRangeMethod "comparePoint" o = DOMRangeComparePointMethodInfo + ResolveDOMRangeMethod "createContextualFragment" o = DOMRangeCreateContextualFragmentMethodInfo + ResolveDOMRangeMethod "deleteContents" o = DOMRangeDeleteContentsMethodInfo + ResolveDOMRangeMethod "detach" o = DOMRangeDetachMethodInfo + ResolveDOMRangeMethod "expand" o = DOMRangeExpandMethodInfo + ResolveDOMRangeMethod "extractContents" o = DOMRangeExtractContentsMethodInfo + ResolveDOMRangeMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMRangeMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMRangeMethod "insertNode" o = DOMRangeInsertNodeMethodInfo + ResolveDOMRangeMethod "intersectsNode" o = DOMRangeIntersectsNodeMethodInfo + ResolveDOMRangeMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMRangeMethod "isPointInRange" o = DOMRangeIsPointInRangeMethodInfo + ResolveDOMRangeMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMRangeMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMRangeMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMRangeMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMRangeMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMRangeMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMRangeMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMRangeMethod "selectNode" o = DOMRangeSelectNodeMethodInfo + ResolveDOMRangeMethod "selectNodeContents" o = DOMRangeSelectNodeContentsMethodInfo + ResolveDOMRangeMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMRangeMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMRangeMethod "surroundContents" o = DOMRangeSurroundContentsMethodInfo + ResolveDOMRangeMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMRangeMethod "toString" o = DOMRangeToStringMethodInfo + ResolveDOMRangeMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMRangeMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMRangeMethod "getCollapsed" o = DOMRangeGetCollapsedMethodInfo + ResolveDOMRangeMethod "getCommonAncestorContainer" o = DOMRangeGetCommonAncestorContainerMethodInfo + ResolveDOMRangeMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMRangeMethod "getEndContainer" o = DOMRangeGetEndContainerMethodInfo + ResolveDOMRangeMethod "getEndOffset" o = DOMRangeGetEndOffsetMethodInfo + ResolveDOMRangeMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMRangeMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMRangeMethod "getStartContainer" o = DOMRangeGetStartContainerMethodInfo + ResolveDOMRangeMethod "getStartOffset" o = DOMRangeGetStartOffsetMethodInfo + ResolveDOMRangeMethod "getText" o = DOMRangeGetTextMethodInfo + ResolveDOMRangeMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMRangeMethod "setEnd" o = DOMRangeSetEndMethodInfo + ResolveDOMRangeMethod "setEndAfter" o = DOMRangeSetEndAfterMethodInfo + ResolveDOMRangeMethod "setEndBefore" o = DOMRangeSetEndBeforeMethodInfo + ResolveDOMRangeMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMRangeMethod "setStart" o = DOMRangeSetStartMethodInfo + ResolveDOMRangeMethod "setStartAfter" o = DOMRangeSetStartAfterMethodInfo + ResolveDOMRangeMethod "setStartBefore" o = DOMRangeSetStartBeforeMethodInfo + ResolveDOMRangeMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMRangeMethod t DOMRange, MethodInfo info DOMRange p) => IsLabelProxy t (DOMRange -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMRangeMethod t DOMRange, MethodInfo info DOMRange p) => IsLabel t (DOMRange -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "collapsed" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -227,7 +323,7 @@ type AttrSetTypeConstraint DOMRangeCollapsedPropertyInfo = (~) () type AttrBaseTypeConstraint DOMRangeCollapsedPropertyInfo = DOMRangeK type AttrGetType DOMRangeCollapsedPropertyInfo = Bool - type AttrLabel DOMRangeCollapsedPropertyInfo = "DOMRange::collapsed" + type AttrLabel DOMRangeCollapsedPropertyInfo = "collapsed" attrGet _ = getDOMRangeCollapsed attrSet _ = undefined attrConstruct _ = undefined @@ -245,7 +341,7 @@ type AttrSetTypeConstraint DOMRangeCommonAncestorContainerPropertyInfo = (~) () type AttrBaseTypeConstraint DOMRangeCommonAncestorContainerPropertyInfo = DOMRangeK type AttrGetType DOMRangeCommonAncestorContainerPropertyInfo = DOMNode - type AttrLabel DOMRangeCommonAncestorContainerPropertyInfo = "DOMRange::common-ancestor-container" + type AttrLabel DOMRangeCommonAncestorContainerPropertyInfo = "common-ancestor-container" attrGet _ = getDOMRangeCommonAncestorContainer attrSet _ = undefined attrConstruct _ = undefined @@ -263,7 +359,7 @@ type AttrSetTypeConstraint DOMRangeEndContainerPropertyInfo = (~) () type AttrBaseTypeConstraint DOMRangeEndContainerPropertyInfo = DOMRangeK type AttrGetType DOMRangeEndContainerPropertyInfo = DOMNode - type AttrLabel DOMRangeEndContainerPropertyInfo = "DOMRange::end-container" + type AttrLabel DOMRangeEndContainerPropertyInfo = "end-container" attrGet _ = getDOMRangeEndContainer attrSet _ = undefined attrConstruct _ = undefined @@ -281,7 +377,7 @@ type AttrSetTypeConstraint DOMRangeEndOffsetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMRangeEndOffsetPropertyInfo = DOMRangeK type AttrGetType DOMRangeEndOffsetPropertyInfo = Int64 - type AttrLabel DOMRangeEndOffsetPropertyInfo = "DOMRange::end-offset" + type AttrLabel DOMRangeEndOffsetPropertyInfo = "end-offset" attrGet _ = getDOMRangeEndOffset attrSet _ = undefined attrConstruct _ = undefined @@ -299,7 +395,7 @@ type AttrSetTypeConstraint DOMRangeStartContainerPropertyInfo = (~) () type AttrBaseTypeConstraint DOMRangeStartContainerPropertyInfo = DOMRangeK type AttrGetType DOMRangeStartContainerPropertyInfo = DOMNode - type AttrLabel DOMRangeStartContainerPropertyInfo = "DOMRange::start-container" + type AttrLabel DOMRangeStartContainerPropertyInfo = "start-container" attrGet _ = getDOMRangeStartContainer attrSet _ = undefined attrConstruct _ = undefined @@ -317,7 +413,7 @@ type AttrSetTypeConstraint DOMRangeStartOffsetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMRangeStartOffsetPropertyInfo = DOMRangeK type AttrGetType DOMRangeStartOffsetPropertyInfo = Int64 - type AttrLabel DOMRangeStartOffsetPropertyInfo = "DOMRange::start-offset" + type AttrLabel DOMRangeStartOffsetPropertyInfo = "start-offset" attrGet _ = getDOMRangeStartOffset attrSet _ = undefined attrConstruct _ = undefined @@ -335,22 +431,21 @@ type AttrSetTypeConstraint DOMRangeTextPropertyInfo = (~) () type AttrBaseTypeConstraint DOMRangeTextPropertyInfo = DOMRangeK type AttrGetType DOMRangeTextPropertyInfo = T.Text - type AttrLabel DOMRangeTextPropertyInfo = "DOMRange::text" + type AttrLabel DOMRangeTextPropertyInfo = "text" attrGet _ = getDOMRangeText attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMRange = DOMRangeAttributeList -type DOMRangeAttributeList = ('[ '("collapsed", DOMRangeCollapsedPropertyInfo), '("common-ancestor-container", DOMRangeCommonAncestorContainerPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("end-container", DOMRangeEndContainerPropertyInfo), '("end-offset", DOMRangeEndOffsetPropertyInfo), '("start-container", DOMRangeStartContainerPropertyInfo), '("start-offset", DOMRangeStartOffsetPropertyInfo), '("text", DOMRangeTextPropertyInfo)] :: [(Symbol, *)]) +type DOMRangeAttributeList = ('[ '("collapsed", DOMRangeCollapsedPropertyInfo), '("commonAncestorContainer", DOMRangeCommonAncestorContainerPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("endContainer", DOMRangeEndContainerPropertyInfo), '("endOffset", DOMRangeEndOffsetPropertyInfo), '("startContainer", DOMRangeStartContainerPropertyInfo), '("startOffset", DOMRangeStartOffsetPropertyInfo), '("text", DOMRangeTextPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMRange = DOMRangeSignalList -type DOMRangeSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMRangeSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMRange::clone_contents -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDocumentFragment" -- throws : True -- Skip return : False @@ -363,8 +458,8 @@ dOMRangeCloneContents :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m DOMDocumentFragment + a -- _obj + -> m DOMDocumentFragment -- result dOMRangeCloneContents _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -377,11 +472,14 @@ return () ) +data DOMRangeCloneContentsMethodInfo +instance (signature ~ (m DOMDocumentFragment), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeCloneContentsMethodInfo a signature where + overloadedMethod _ = dOMRangeCloneContents + -- method DOMRange::clone_range -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMRange" -- throws : True -- Skip return : False @@ -394,8 +492,8 @@ dOMRangeCloneRange :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m DOMRange + a -- _obj + -> m DOMRange -- result dOMRangeCloneRange _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -408,11 +506,14 @@ return () ) +data DOMRangeCloneRangeMethodInfo +instance (signature ~ (m DOMRange), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeCloneRangeMethodInfo a signature where + overloadedMethod _ = dOMRangeCloneRange + -- method DOMRange::collapse -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "toStart", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "toStart", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "toStart", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -426,9 +527,9 @@ dOMRangeCollapse :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - Bool -> -- toStart - m () + a -- _obj + -> Bool -- toStart + -> m () -- result dOMRangeCollapse _obj toStart = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let toStart' = (fromIntegral . fromEnum) toStart @@ -440,11 +541,14 @@ return () ) +data DOMRangeCollapseMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeCollapseMethodInfo a signature where + overloadedMethod _ = dOMRangeCollapse + -- method DOMRange::compare_boundary_points -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "how", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "sourceRange", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "how", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "sourceRange", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "how", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "sourceRange", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt16 -- throws : True -- Skip return : False @@ -459,10 +563,10 @@ dOMRangeCompareBoundaryPoints :: (MonadIO m, DOMRangeK a, DOMRangeK b) => - a -> -- _obj - Word16 -> -- how - b -> -- sourceRange - m Int16 + a -- _obj + -> Word16 -- how + -> b -- sourceRange + -> m Int16 -- result dOMRangeCompareBoundaryPoints _obj how sourceRange = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let sourceRange' = unsafeManagedPtrCastPtr sourceRange @@ -475,11 +579,14 @@ return () ) +data DOMRangeCompareBoundaryPointsMethodInfo +instance (signature ~ (Word16 -> b -> m Int16), MonadIO m, DOMRangeK a, DOMRangeK b) => MethodInfo DOMRangeCompareBoundaryPointsMethodInfo a signature where + overloadedMethod _ = dOMRangeCompareBoundaryPoints + -- method DOMRange::compare_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt16 -- throws : True -- Skip return : False @@ -493,9 +600,9 @@ dOMRangeCompareNode :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - m Int16 + a -- _obj + -> b -- refNode + -> m Int16 -- result dOMRangeCompareNode _obj refNode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -508,11 +615,14 @@ return () ) +data DOMRangeCompareNodeMethodInfo +instance (signature ~ (b -> m Int16), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeCompareNodeMethodInfo a signature where + overloadedMethod _ = dOMRangeCompareNode + -- method DOMRange::compare_point -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt16 -- throws : True -- Skip return : False @@ -527,10 +637,10 @@ dOMRangeComparePoint :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - Int64 -> -- offset - m Int16 + a -- _obj + -> b -- refNode + -> Int64 -- offset + -> m Int16 -- result dOMRangeComparePoint _obj refNode offset = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -543,11 +653,14 @@ return () ) +data DOMRangeComparePointMethodInfo +instance (signature ~ (b -> Int64 -> m Int16), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeComparePointMethodInfo a signature where + overloadedMethod _ = dOMRangeComparePoint + -- method DOMRange::create_contextual_fragment -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "html", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "html", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "html", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDocumentFragment" -- throws : True -- Skip return : False @@ -561,9 +674,9 @@ dOMRangeCreateContextualFragment :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - T.Text -> -- html - m DOMDocumentFragment + a -- _obj + -> T.Text -- html + -> m DOMDocumentFragment -- result dOMRangeCreateContextualFragment _obj html = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj html' <- textToCString html @@ -578,11 +691,14 @@ freeMem html' ) +data DOMRangeCreateContextualFragmentMethodInfo +instance (signature ~ (T.Text -> m DOMDocumentFragment), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeCreateContextualFragmentMethodInfo a signature where + overloadedMethod _ = dOMRangeCreateContextualFragment + -- method DOMRange::delete_contents -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -595,8 +711,8 @@ dOMRangeDeleteContents :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMRangeDeleteContents _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -607,11 +723,14 @@ return () ) +data DOMRangeDeleteContentsMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeDeleteContentsMethodInfo a signature where + overloadedMethod _ = dOMRangeDeleteContents + -- method DOMRange::detach -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -624,8 +743,8 @@ dOMRangeDetach :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMRangeDetach _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -636,11 +755,14 @@ return () ) +data DOMRangeDetachMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeDetachMethodInfo a signature where + overloadedMethod _ = dOMRangeDetach + -- method DOMRange::expand -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "unit", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "unit", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -654,9 +776,9 @@ dOMRangeExpand :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - T.Text -> -- unit - m () + a -- _obj + -> T.Text -- unit + -> m () -- result dOMRangeExpand _obj unit = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj unit' <- textToCString unit @@ -669,11 +791,14 @@ freeMem unit' ) +data DOMRangeExpandMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeExpandMethodInfo a signature where + overloadedMethod _ = dOMRangeExpand + -- method DOMRange::extract_contents -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDocumentFragment" -- throws : True -- Skip return : False @@ -686,8 +811,8 @@ dOMRangeExtractContents :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m DOMDocumentFragment + a -- _obj + -> m DOMDocumentFragment -- result dOMRangeExtractContents _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -700,11 +825,14 @@ return () ) +data DOMRangeExtractContentsMethodInfo +instance (signature ~ (m DOMDocumentFragment), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeExtractContentsMethodInfo a signature where + overloadedMethod _ = dOMRangeExtractContents + -- method DOMRange::get_collapsed -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -717,8 +845,8 @@ dOMRangeGetCollapsed :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMRangeGetCollapsed _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -729,11 +857,14 @@ return () ) +data DOMRangeGetCollapsedMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeGetCollapsedMethodInfo a signature where + overloadedMethod _ = dOMRangeGetCollapsed + -- method DOMRange::get_common_ancestor_container -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -746,8 +877,8 @@ dOMRangeGetCommonAncestorContainer :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMRangeGetCommonAncestorContainer _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -760,11 +891,14 @@ return () ) +data DOMRangeGetCommonAncestorContainerMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeGetCommonAncestorContainerMethodInfo a signature where + overloadedMethod _ = dOMRangeGetCommonAncestorContainer + -- method DOMRange::get_end_container -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -777,8 +911,8 @@ dOMRangeGetEndContainer :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMRangeGetEndContainer _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -791,11 +925,14 @@ return () ) +data DOMRangeGetEndContainerMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeGetEndContainerMethodInfo a signature where + overloadedMethod _ = dOMRangeGetEndContainer + -- method DOMRange::get_end_offset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : True -- Skip return : False @@ -808,8 +945,8 @@ dOMRangeGetEndOffset :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMRangeGetEndOffset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -820,11 +957,14 @@ return () ) +data DOMRangeGetEndOffsetMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeGetEndOffsetMethodInfo a signature where + overloadedMethod _ = dOMRangeGetEndOffset + -- method DOMRange::get_start_container -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -837,8 +977,8 @@ dOMRangeGetStartContainer :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMRangeGetStartContainer _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -851,11 +991,14 @@ return () ) +data DOMRangeGetStartContainerMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeGetStartContainerMethodInfo a signature where + overloadedMethod _ = dOMRangeGetStartContainer + -- method DOMRange::get_start_offset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : True -- Skip return : False @@ -868,8 +1011,8 @@ dOMRangeGetStartOffset :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMRangeGetStartOffset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -880,11 +1023,14 @@ return () ) +data DOMRangeGetStartOffsetMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeGetStartOffsetMethodInfo a signature where + overloadedMethod _ = dOMRangeGetStartOffset + -- method DOMRange::get_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -896,8 +1042,8 @@ dOMRangeGetText :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMRangeGetText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_range_get_text _obj' @@ -907,11 +1053,14 @@ touchManagedPtr _obj return result' +data DOMRangeGetTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeGetTextMethodInfo a signature where + overloadedMethod _ = dOMRangeGetText + -- method DOMRange::insert_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "newNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -925,9 +1074,9 @@ dOMRangeInsertNode :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- newNode - m () + a -- _obj + -> b -- newNode + -> m () -- result dOMRangeInsertNode _obj newNode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let newNode' = unsafeManagedPtrCastPtr newNode @@ -940,11 +1089,14 @@ return () ) +data DOMRangeInsertNodeMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeInsertNodeMethodInfo a signature where + overloadedMethod _ = dOMRangeInsertNode + -- method DOMRange::intersects_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -958,9 +1110,9 @@ dOMRangeIntersectsNode :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - m () + a -- _obj + -> b -- refNode + -> m () -- result dOMRangeIntersectsNode _obj refNode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -973,11 +1125,14 @@ return () ) +data DOMRangeIntersectsNodeMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeIntersectsNodeMethodInfo a signature where + overloadedMethod _ = dOMRangeIntersectsNode + -- method DOMRange::is_point_in_range -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -992,10 +1147,10 @@ dOMRangeIsPointInRange :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - Int64 -> -- offset - m () + a -- _obj + -> b -- refNode + -> Int64 -- offset + -> m () -- result dOMRangeIsPointInRange _obj refNode offset = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -1008,11 +1163,14 @@ return () ) +data DOMRangeIsPointInRangeMethodInfo +instance (signature ~ (b -> Int64 -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeIsPointInRangeMethodInfo a signature where + overloadedMethod _ = dOMRangeIsPointInRange + -- method DOMRange::select_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1026,9 +1184,9 @@ dOMRangeSelectNode :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - m () + a -- _obj + -> b -- refNode + -> m () -- result dOMRangeSelectNode _obj refNode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -1041,11 +1199,14 @@ return () ) +data DOMRangeSelectNodeMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeSelectNodeMethodInfo a signature where + overloadedMethod _ = dOMRangeSelectNode + -- method DOMRange::select_node_contents -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1059,9 +1220,9 @@ dOMRangeSelectNodeContents :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - m () + a -- _obj + -> b -- refNode + -> m () -- result dOMRangeSelectNodeContents _obj refNode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -1074,11 +1235,14 @@ return () ) +data DOMRangeSelectNodeContentsMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeSelectNodeContentsMethodInfo a signature where + overloadedMethod _ = dOMRangeSelectNodeContents + -- method DOMRange::set_end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1093,10 +1257,10 @@ dOMRangeSetEnd :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - Int64 -> -- offset - m () + a -- _obj + -> b -- refNode + -> Int64 -- offset + -> m () -- result dOMRangeSetEnd _obj refNode offset = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -1109,11 +1273,14 @@ return () ) +data DOMRangeSetEndMethodInfo +instance (signature ~ (b -> Int64 -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeSetEndMethodInfo a signature where + overloadedMethod _ = dOMRangeSetEnd + -- method DOMRange::set_end_after -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1127,9 +1294,9 @@ dOMRangeSetEndAfter :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - m () + a -- _obj + -> b -- refNode + -> m () -- result dOMRangeSetEndAfter _obj refNode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -1142,11 +1309,14 @@ return () ) +data DOMRangeSetEndAfterMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeSetEndAfterMethodInfo a signature where + overloadedMethod _ = dOMRangeSetEndAfter + -- method DOMRange::set_end_before -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1160,9 +1330,9 @@ dOMRangeSetEndBefore :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - m () + a -- _obj + -> b -- refNode + -> m () -- result dOMRangeSetEndBefore _obj refNode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -1175,11 +1345,14 @@ return () ) +data DOMRangeSetEndBeforeMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeSetEndBeforeMethodInfo a signature where + overloadedMethod _ = dOMRangeSetEndBefore + -- method DOMRange::set_start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1194,10 +1367,10 @@ dOMRangeSetStart :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - Int64 -> -- offset - m () + a -- _obj + -> b -- refNode + -> Int64 -- offset + -> m () -- result dOMRangeSetStart _obj refNode offset = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -1210,11 +1383,14 @@ return () ) +data DOMRangeSetStartMethodInfo +instance (signature ~ (b -> Int64 -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeSetStartMethodInfo a signature where + overloadedMethod _ = dOMRangeSetStart + -- method DOMRange::set_start_after -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1228,9 +1404,9 @@ dOMRangeSetStartAfter :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - m () + a -- _obj + -> b -- refNode + -> m () -- result dOMRangeSetStartAfter _obj refNode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -1243,11 +1419,14 @@ return () ) +data DOMRangeSetStartAfterMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeSetStartAfterMethodInfo a signature where + overloadedMethod _ = dOMRangeSetStartAfter + -- method DOMRange::set_start_before -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "refNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1261,9 +1440,9 @@ dOMRangeSetStartBefore :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- refNode - m () + a -- _obj + -> b -- refNode + -> m () -- result dOMRangeSetStartBefore _obj refNode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let refNode' = unsafeManagedPtrCastPtr refNode @@ -1276,11 +1455,14 @@ return () ) +data DOMRangeSetStartBeforeMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeSetStartBeforeMethodInfo a signature where + overloadedMethod _ = dOMRangeSetStartBefore + -- method DOMRange::surround_contents -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newParent", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "newParent", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "newParent", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1294,9 +1476,9 @@ dOMRangeSurroundContents :: (MonadIO m, DOMRangeK a, DOMNodeK b) => - a -> -- _obj - b -> -- newParent - m () + a -- _obj + -> b -- newParent + -> m () -- result dOMRangeSurroundContents _obj newParent = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let newParent' = unsafeManagedPtrCastPtr newParent @@ -1309,11 +1491,14 @@ return () ) +data DOMRangeSurroundContentsMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMRangeK a, DOMNodeK b) => MethodInfo DOMRangeSurroundContentsMethodInfo a signature where + overloadedMethod _ = dOMRangeSurroundContents + -- method DOMRange::to_string -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMRange", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : True -- Skip return : False @@ -1326,8 +1511,8 @@ dOMRangeToString :: (MonadIO m, DOMRangeK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMRangeToString _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -1340,5 +1525,9 @@ ) (do return () ) + +data DOMRangeToStringMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMRangeK a) => MethodInfo DOMRangeToStringMethodInfo a signature where + overloadedMethod _ = dOMRangeToString diff --git a/GI/WebKit/Objects/DOMRange.hs-boot b/GI/WebKit/Objects/DOMRange.hs-boot --- a/GI/WebKit/Objects/DOMRange.hs-boot +++ b/GI/WebKit/Objects/DOMRange.hs-boot @@ -18,3 +18,34 @@ data DOMRangeStartContainerPropertyInfo data DOMRangeStartOffsetPropertyInfo data DOMRangeTextPropertyInfo +data DOMRangeCloneContentsMethodInfo +data DOMRangeCloneRangeMethodInfo +data DOMRangeCollapseMethodInfo +data DOMRangeCompareBoundaryPointsMethodInfo +data DOMRangeCompareNodeMethodInfo +data DOMRangeComparePointMethodInfo +data DOMRangeCreateContextualFragmentMethodInfo +data DOMRangeDeleteContentsMethodInfo +data DOMRangeDetachMethodInfo +data DOMRangeExpandMethodInfo +data DOMRangeExtractContentsMethodInfo +data DOMRangeGetCollapsedMethodInfo +data DOMRangeGetCommonAncestorContainerMethodInfo +data DOMRangeGetEndContainerMethodInfo +data DOMRangeGetEndOffsetMethodInfo +data DOMRangeGetStartContainerMethodInfo +data DOMRangeGetStartOffsetMethodInfo +data DOMRangeGetTextMethodInfo +data DOMRangeInsertNodeMethodInfo +data DOMRangeIntersectsNodeMethodInfo +data DOMRangeIsPointInRangeMethodInfo +data DOMRangeSelectNodeMethodInfo +data DOMRangeSelectNodeContentsMethodInfo +data DOMRangeSetEndMethodInfo +data DOMRangeSetEndAfterMethodInfo +data DOMRangeSetEndBeforeMethodInfo +data DOMRangeSetStartMethodInfo +data DOMRangeSetStartAfterMethodInfo +data DOMRangeSetStartBeforeMethodInfo +data DOMRangeSurroundContentsMethodInfo +data DOMRangeToStringMethodInfo diff --git a/GI/WebKit/Objects/DOMScreen.hs b/GI/WebKit/Objects/DOMScreen.hs --- a/GI/WebKit/Objects/DOMScreen.hs +++ b/GI/WebKit/Objects/DOMScreen.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,34 +18,42 @@ -- * Methods -- ** dOMScreenGetAvailHeight + DOMScreenGetAvailHeightMethodInfo , dOMScreenGetAvailHeight , -- ** dOMScreenGetAvailLeft + DOMScreenGetAvailLeftMethodInfo , dOMScreenGetAvailLeft , -- ** dOMScreenGetAvailTop + DOMScreenGetAvailTopMethodInfo , dOMScreenGetAvailTop , -- ** dOMScreenGetAvailWidth + DOMScreenGetAvailWidthMethodInfo , dOMScreenGetAvailWidth , -- ** dOMScreenGetColorDepth + DOMScreenGetColorDepthMethodInfo , dOMScreenGetColorDepth , -- ** dOMScreenGetHeight + DOMScreenGetHeightMethodInfo , dOMScreenGetHeight , -- ** dOMScreenGetPixelDepth + DOMScreenGetPixelDepthMethodInfo , dOMScreenGetPixelDepth , -- ** dOMScreenGetWidth + DOMScreenGetWidthMethodInfo , dOMScreenGetWidth , @@ -127,6 +136,47 @@ noDOMScreen :: Maybe DOMScreen noDOMScreen = Nothing +type family ResolveDOMScreenMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMScreenMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMScreenMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMScreenMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMScreenMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMScreenMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMScreenMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMScreenMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMScreenMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMScreenMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMScreenMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMScreenMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMScreenMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMScreenMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMScreenMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMScreenMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMScreenMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMScreenMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMScreenMethod "getAvailHeight" o = DOMScreenGetAvailHeightMethodInfo + ResolveDOMScreenMethod "getAvailLeft" o = DOMScreenGetAvailLeftMethodInfo + ResolveDOMScreenMethod "getAvailTop" o = DOMScreenGetAvailTopMethodInfo + ResolveDOMScreenMethod "getAvailWidth" o = DOMScreenGetAvailWidthMethodInfo + ResolveDOMScreenMethod "getColorDepth" o = DOMScreenGetColorDepthMethodInfo + ResolveDOMScreenMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMScreenMethod "getHeight" o = DOMScreenGetHeightMethodInfo + ResolveDOMScreenMethod "getPixelDepth" o = DOMScreenGetPixelDepthMethodInfo + ResolveDOMScreenMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMScreenMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMScreenMethod "getWidth" o = DOMScreenGetWidthMethodInfo + ResolveDOMScreenMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMScreenMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMScreenMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMScreenMethod t DOMScreen, MethodInfo info DOMScreen p) => IsLabelProxy t (DOMScreen -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMScreenMethod t DOMScreen, MethodInfo info DOMScreen p) => IsLabel t (DOMScreen -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "avail-height" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -140,7 +190,7 @@ type AttrSetTypeConstraint DOMScreenAvailHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMScreenAvailHeightPropertyInfo = DOMScreenK type AttrGetType DOMScreenAvailHeightPropertyInfo = Word64 - type AttrLabel DOMScreenAvailHeightPropertyInfo = "DOMScreen::avail-height" + type AttrLabel DOMScreenAvailHeightPropertyInfo = "avail-height" attrGet _ = getDOMScreenAvailHeight attrSet _ = undefined attrConstruct _ = undefined @@ -158,7 +208,7 @@ type AttrSetTypeConstraint DOMScreenAvailLeftPropertyInfo = (~) () type AttrBaseTypeConstraint DOMScreenAvailLeftPropertyInfo = DOMScreenK type AttrGetType DOMScreenAvailLeftPropertyInfo = Int64 - type AttrLabel DOMScreenAvailLeftPropertyInfo = "DOMScreen::avail-left" + type AttrLabel DOMScreenAvailLeftPropertyInfo = "avail-left" attrGet _ = getDOMScreenAvailLeft attrSet _ = undefined attrConstruct _ = undefined @@ -176,7 +226,7 @@ type AttrSetTypeConstraint DOMScreenAvailTopPropertyInfo = (~) () type AttrBaseTypeConstraint DOMScreenAvailTopPropertyInfo = DOMScreenK type AttrGetType DOMScreenAvailTopPropertyInfo = Int64 - type AttrLabel DOMScreenAvailTopPropertyInfo = "DOMScreen::avail-top" + type AttrLabel DOMScreenAvailTopPropertyInfo = "avail-top" attrGet _ = getDOMScreenAvailTop attrSet _ = undefined attrConstruct _ = undefined @@ -194,7 +244,7 @@ type AttrSetTypeConstraint DOMScreenAvailWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMScreenAvailWidthPropertyInfo = DOMScreenK type AttrGetType DOMScreenAvailWidthPropertyInfo = Word64 - type AttrLabel DOMScreenAvailWidthPropertyInfo = "DOMScreen::avail-width" + type AttrLabel DOMScreenAvailWidthPropertyInfo = "avail-width" attrGet _ = getDOMScreenAvailWidth attrSet _ = undefined attrConstruct _ = undefined @@ -212,7 +262,7 @@ type AttrSetTypeConstraint DOMScreenColorDepthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMScreenColorDepthPropertyInfo = DOMScreenK type AttrGetType DOMScreenColorDepthPropertyInfo = Word64 - type AttrLabel DOMScreenColorDepthPropertyInfo = "DOMScreen::color-depth" + type AttrLabel DOMScreenColorDepthPropertyInfo = "color-depth" attrGet _ = getDOMScreenColorDepth attrSet _ = undefined attrConstruct _ = undefined @@ -230,7 +280,7 @@ type AttrSetTypeConstraint DOMScreenHeightPropertyInfo = (~) () type AttrBaseTypeConstraint DOMScreenHeightPropertyInfo = DOMScreenK type AttrGetType DOMScreenHeightPropertyInfo = Word64 - type AttrLabel DOMScreenHeightPropertyInfo = "DOMScreen::height" + type AttrLabel DOMScreenHeightPropertyInfo = "height" attrGet _ = getDOMScreenHeight attrSet _ = undefined attrConstruct _ = undefined @@ -248,7 +298,7 @@ type AttrSetTypeConstraint DOMScreenPixelDepthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMScreenPixelDepthPropertyInfo = DOMScreenK type AttrGetType DOMScreenPixelDepthPropertyInfo = Word64 - type AttrLabel DOMScreenPixelDepthPropertyInfo = "DOMScreen::pixel-depth" + type AttrLabel DOMScreenPixelDepthPropertyInfo = "pixel-depth" attrGet _ = getDOMScreenPixelDepth attrSet _ = undefined attrConstruct _ = undefined @@ -266,22 +316,21 @@ type AttrSetTypeConstraint DOMScreenWidthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMScreenWidthPropertyInfo = DOMScreenK type AttrGetType DOMScreenWidthPropertyInfo = Word64 - type AttrLabel DOMScreenWidthPropertyInfo = "DOMScreen::width" + type AttrLabel DOMScreenWidthPropertyInfo = "width" attrGet _ = getDOMScreenWidth attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMScreen = DOMScreenAttributeList -type DOMScreenAttributeList = ('[ '("avail-height", DOMScreenAvailHeightPropertyInfo), '("avail-left", DOMScreenAvailLeftPropertyInfo), '("avail-top", DOMScreenAvailTopPropertyInfo), '("avail-width", DOMScreenAvailWidthPropertyInfo), '("color-depth", DOMScreenColorDepthPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("height", DOMScreenHeightPropertyInfo), '("pixel-depth", DOMScreenPixelDepthPropertyInfo), '("width", DOMScreenWidthPropertyInfo)] :: [(Symbol, *)]) +type DOMScreenAttributeList = ('[ '("availHeight", DOMScreenAvailHeightPropertyInfo), '("availLeft", DOMScreenAvailLeftPropertyInfo), '("availTop", DOMScreenAvailTopPropertyInfo), '("availWidth", DOMScreenAvailWidthPropertyInfo), '("colorDepth", DOMScreenColorDepthPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("height", DOMScreenHeightPropertyInfo), '("pixelDepth", DOMScreenPixelDepthPropertyInfo), '("width", DOMScreenWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMScreen = DOMScreenSignalList -type DOMScreenSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMScreenSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMScreen::get_avail_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -293,19 +342,22 @@ dOMScreenGetAvailHeight :: (MonadIO m, DOMScreenK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMScreenGetAvailHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_screen_get_avail_height _obj' touchManagedPtr _obj return result +data DOMScreenGetAvailHeightMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMScreenK a) => MethodInfo DOMScreenGetAvailHeightMethodInfo a signature where + overloadedMethod _ = dOMScreenGetAvailHeight + -- method DOMScreen::get_avail_left -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -317,19 +369,22 @@ dOMScreenGetAvailLeft :: (MonadIO m, DOMScreenK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMScreenGetAvailLeft _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_screen_get_avail_left _obj' touchManagedPtr _obj return result +data DOMScreenGetAvailLeftMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMScreenK a) => MethodInfo DOMScreenGetAvailLeftMethodInfo a signature where + overloadedMethod _ = dOMScreenGetAvailLeft + -- method DOMScreen::get_avail_top -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -341,19 +396,22 @@ dOMScreenGetAvailTop :: (MonadIO m, DOMScreenK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMScreenGetAvailTop _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_screen_get_avail_top _obj' touchManagedPtr _obj return result +data DOMScreenGetAvailTopMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMScreenK a) => MethodInfo DOMScreenGetAvailTopMethodInfo a signature where + overloadedMethod _ = dOMScreenGetAvailTop + -- method DOMScreen::get_avail_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -365,19 +423,22 @@ dOMScreenGetAvailWidth :: (MonadIO m, DOMScreenK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMScreenGetAvailWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_screen_get_avail_width _obj' touchManagedPtr _obj return result +data DOMScreenGetAvailWidthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMScreenK a) => MethodInfo DOMScreenGetAvailWidthMethodInfo a signature where + overloadedMethod _ = dOMScreenGetAvailWidth + -- method DOMScreen::get_color_depth -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -389,19 +450,22 @@ dOMScreenGetColorDepth :: (MonadIO m, DOMScreenK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMScreenGetColorDepth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_screen_get_color_depth _obj' touchManagedPtr _obj return result +data DOMScreenGetColorDepthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMScreenK a) => MethodInfo DOMScreenGetColorDepthMethodInfo a signature where + overloadedMethod _ = dOMScreenGetColorDepth + -- method DOMScreen::get_height -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -413,19 +477,22 @@ dOMScreenGetHeight :: (MonadIO m, DOMScreenK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMScreenGetHeight _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_screen_get_height _obj' touchManagedPtr _obj return result +data DOMScreenGetHeightMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMScreenK a) => MethodInfo DOMScreenGetHeightMethodInfo a signature where + overloadedMethod _ = dOMScreenGetHeight + -- method DOMScreen::get_pixel_depth -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -437,19 +504,22 @@ dOMScreenGetPixelDepth :: (MonadIO m, DOMScreenK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMScreenGetPixelDepth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_screen_get_pixel_depth _obj' touchManagedPtr _obj return result +data DOMScreenGetPixelDepthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMScreenK a) => MethodInfo DOMScreenGetPixelDepthMethodInfo a signature where + overloadedMethod _ = dOMScreenGetPixelDepth + -- method DOMScreen::get_width -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMScreen", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -461,12 +531,16 @@ dOMScreenGetWidth :: (MonadIO m, DOMScreenK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMScreenGetWidth _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_screen_get_width _obj' touchManagedPtr _obj return result + +data DOMScreenGetWidthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMScreenK a) => MethodInfo DOMScreenGetWidthMethodInfo a signature where + overloadedMethod _ = dOMScreenGetWidth diff --git a/GI/WebKit/Objects/DOMScreen.hs-boot b/GI/WebKit/Objects/DOMScreen.hs-boot --- a/GI/WebKit/Objects/DOMScreen.hs-boot +++ b/GI/WebKit/Objects/DOMScreen.hs-boot @@ -19,3 +19,11 @@ data DOMScreenHeightPropertyInfo data DOMScreenPixelDepthPropertyInfo data DOMScreenWidthPropertyInfo +data DOMScreenGetAvailHeightMethodInfo +data DOMScreenGetAvailLeftMethodInfo +data DOMScreenGetAvailTopMethodInfo +data DOMScreenGetAvailWidthMethodInfo +data DOMScreenGetColorDepthMethodInfo +data DOMScreenGetHeightMethodInfo +data DOMScreenGetPixelDepthMethodInfo +data DOMScreenGetWidthMethodInfo diff --git a/GI/WebKit/Objects/DOMShadowRoot.hs b/GI/WebKit/Objects/DOMShadowRoot.hs --- a/GI/WebKit/Objects/DOMShadowRoot.hs +++ b/GI/WebKit/Objects/DOMShadowRoot.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,54 +18,67 @@ -- * Methods -- ** dOMShadowRootElementFromPoint + DOMShadowRootElementFromPointMethodInfo , dOMShadowRootElementFromPoint , -- ** dOMShadowRootGetActiveElement + DOMShadowRootGetActiveElementMethodInfo , dOMShadowRootGetActiveElement , -- ** dOMShadowRootGetApplyAuthorStyles + DOMShadowRootGetApplyAuthorStylesMethodInfo, dOMShadowRootGetApplyAuthorStyles , -- ** dOMShadowRootGetElementById + DOMShadowRootGetElementByIdMethodInfo , dOMShadowRootGetElementById , -- ** dOMShadowRootGetElementsByClassName + DOMShadowRootGetElementsByClassNameMethodInfo, dOMShadowRootGetElementsByClassName , -- ** dOMShadowRootGetElementsByTagName + DOMShadowRootGetElementsByTagNameMethodInfo, dOMShadowRootGetElementsByTagName , -- ** dOMShadowRootGetElementsByTagNameNs + DOMShadowRootGetElementsByTagNameNsMethodInfo, dOMShadowRootGetElementsByTagNameNs , -- ** dOMShadowRootGetInnerHtml + DOMShadowRootGetInnerHtmlMethodInfo , dOMShadowRootGetInnerHtml , -- ** dOMShadowRootGetResetStyleInheritance + DOMShadowRootGetResetStyleInheritanceMethodInfo, dOMShadowRootGetResetStyleInheritance , -- ** dOMShadowRootGetSelection + DOMShadowRootGetSelectionMethodInfo , dOMShadowRootGetSelection , -- ** dOMShadowRootSetApplyAuthorStyles + DOMShadowRootSetApplyAuthorStylesMethodInfo, dOMShadowRootSetApplyAuthorStyles , -- ** dOMShadowRootSetInnerHtml + DOMShadowRootSetInnerHtmlMethodInfo , dOMShadowRootSetInnerHtml , -- ** dOMShadowRootSetResetStyleInheritance + DOMShadowRootSetResetStyleInheritanceMethodInfo, dOMShadowRootSetResetStyleInheritance , @@ -133,6 +147,92 @@ noDOMShadowRoot :: Maybe DOMShadowRoot noDOMShadowRoot = Nothing +type family ResolveDOMShadowRootMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMShadowRootMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMShadowRootMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMShadowRootMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMShadowRootMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMShadowRootMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMShadowRootMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMShadowRootMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMShadowRootMethod "elementFromPoint" o = DOMShadowRootElementFromPointMethodInfo + ResolveDOMShadowRootMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMShadowRootMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMShadowRootMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMShadowRootMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMShadowRootMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMShadowRootMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMShadowRootMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMShadowRootMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMShadowRootMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMShadowRootMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMShadowRootMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMShadowRootMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMShadowRootMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMShadowRootMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMShadowRootMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMShadowRootMethod "querySelector" o = DOMDocumentFragmentQuerySelectorMethodInfo + ResolveDOMShadowRootMethod "querySelectorAll" o = DOMDocumentFragmentQuerySelectorAllMethodInfo + ResolveDOMShadowRootMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMShadowRootMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMShadowRootMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMShadowRootMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMShadowRootMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMShadowRootMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMShadowRootMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMShadowRootMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMShadowRootMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMShadowRootMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMShadowRootMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMShadowRootMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMShadowRootMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMShadowRootMethod "getActiveElement" o = DOMShadowRootGetActiveElementMethodInfo + ResolveDOMShadowRootMethod "getApplyAuthorStyles" o = DOMShadowRootGetApplyAuthorStylesMethodInfo + ResolveDOMShadowRootMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMShadowRootMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMShadowRootMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMShadowRootMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMShadowRootMethod "getElementById" o = DOMShadowRootGetElementByIdMethodInfo + ResolveDOMShadowRootMethod "getElementsByClassName" o = DOMShadowRootGetElementsByClassNameMethodInfo + ResolveDOMShadowRootMethod "getElementsByTagName" o = DOMShadowRootGetElementsByTagNameMethodInfo + ResolveDOMShadowRootMethod "getElementsByTagNameNs" o = DOMShadowRootGetElementsByTagNameNsMethodInfo + ResolveDOMShadowRootMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMShadowRootMethod "getInnerHtml" o = DOMShadowRootGetInnerHtmlMethodInfo + ResolveDOMShadowRootMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMShadowRootMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMShadowRootMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMShadowRootMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMShadowRootMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMShadowRootMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMShadowRootMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMShadowRootMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMShadowRootMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMShadowRootMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMShadowRootMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMShadowRootMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMShadowRootMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMShadowRootMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMShadowRootMethod "getResetStyleInheritance" o = DOMShadowRootGetResetStyleInheritanceMethodInfo + ResolveDOMShadowRootMethod "getSelection" o = DOMShadowRootGetSelectionMethodInfo + ResolveDOMShadowRootMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMShadowRootMethod "setApplyAuthorStyles" o = DOMShadowRootSetApplyAuthorStylesMethodInfo + ResolveDOMShadowRootMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMShadowRootMethod "setInnerHtml" o = DOMShadowRootSetInnerHtmlMethodInfo + ResolveDOMShadowRootMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMShadowRootMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMShadowRootMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMShadowRootMethod "setResetStyleInheritance" o = DOMShadowRootSetResetStyleInheritanceMethodInfo + ResolveDOMShadowRootMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMShadowRootMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMShadowRootMethod t DOMShadowRoot, MethodInfo info DOMShadowRoot p) => IsLabelProxy t (DOMShadowRoot -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMShadowRootMethod t DOMShadowRoot, MethodInfo info DOMShadowRoot p) => IsLabel t (DOMShadowRoot -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "active-element" -- Type: TInterface "WebKit" "DOMElement" -- Flags: [PropertyReadable] @@ -146,7 +246,7 @@ type AttrSetTypeConstraint DOMShadowRootActiveElementPropertyInfo = (~) () type AttrBaseTypeConstraint DOMShadowRootActiveElementPropertyInfo = DOMShadowRootK type AttrGetType DOMShadowRootActiveElementPropertyInfo = DOMElement - type AttrLabel DOMShadowRootActiveElementPropertyInfo = "DOMShadowRoot::active-element" + type AttrLabel DOMShadowRootActiveElementPropertyInfo = "active-element" attrGet _ = getDOMShadowRootActiveElement attrSet _ = undefined attrConstruct _ = undefined @@ -170,7 +270,7 @@ type AttrSetTypeConstraint DOMShadowRootApplyAuthorStylesPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMShadowRootApplyAuthorStylesPropertyInfo = DOMShadowRootK type AttrGetType DOMShadowRootApplyAuthorStylesPropertyInfo = Bool - type AttrLabel DOMShadowRootApplyAuthorStylesPropertyInfo = "DOMShadowRoot::apply-author-styles" + type AttrLabel DOMShadowRootApplyAuthorStylesPropertyInfo = "apply-author-styles" attrGet _ = getDOMShadowRootApplyAuthorStyles attrSet _ = setDOMShadowRootApplyAuthorStyles attrConstruct _ = constructDOMShadowRootApplyAuthorStyles @@ -194,7 +294,7 @@ type AttrSetTypeConstraint DOMShadowRootInnerHtmlPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMShadowRootInnerHtmlPropertyInfo = DOMShadowRootK type AttrGetType DOMShadowRootInnerHtmlPropertyInfo = T.Text - type AttrLabel DOMShadowRootInnerHtmlPropertyInfo = "DOMShadowRoot::inner-html" + type AttrLabel DOMShadowRootInnerHtmlPropertyInfo = "inner-html" attrGet _ = getDOMShadowRootInnerHtml attrSet _ = setDOMShadowRootInnerHtml attrConstruct _ = constructDOMShadowRootInnerHtml @@ -218,22 +318,21 @@ type AttrSetTypeConstraint DOMShadowRootResetStyleInheritancePropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMShadowRootResetStyleInheritancePropertyInfo = DOMShadowRootK type AttrGetType DOMShadowRootResetStyleInheritancePropertyInfo = Bool - type AttrLabel DOMShadowRootResetStyleInheritancePropertyInfo = "DOMShadowRoot::reset-style-inheritance" + type AttrLabel DOMShadowRootResetStyleInheritancePropertyInfo = "reset-style-inheritance" attrGet _ = getDOMShadowRootResetStyleInheritance attrSet _ = setDOMShadowRootResetStyleInheritance attrConstruct _ = constructDOMShadowRootResetStyleInheritance type instance AttributeList DOMShadowRoot = DOMShadowRootAttributeList -type DOMShadowRootAttributeList = ('[ '("active-element", DOMShadowRootActiveElementPropertyInfo), '("apply-author-styles", DOMShadowRootApplyAuthorStylesPropertyInfo), '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("inner-html", DOMShadowRootInnerHtmlPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("reset-style-inheritance", DOMShadowRootResetStyleInheritancePropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) +type DOMShadowRootAttributeList = ('[ '("activeElement", DOMShadowRootActiveElementPropertyInfo), '("applyAuthorStyles", DOMShadowRootApplyAuthorStylesPropertyInfo), '("baseUri", DOMNodeBaseUriPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("innerHtml", DOMShadowRootInnerHtmlPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("resetStyleInheritance", DOMShadowRootResetStyleInheritancePropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMShadowRoot = DOMShadowRootSignalList -type DOMShadowRootSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMShadowRootSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMShadowRoot::element_from_point -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : False -- Skip return : False @@ -247,10 +346,10 @@ dOMShadowRootElementFromPoint :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - Int64 -> -- x - Int64 -> -- y - m DOMElement + a -- _obj + -> Int64 -- x + -> Int64 -- y + -> m DOMElement -- result dOMShadowRootElementFromPoint _obj x y = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_shadow_root_element_from_point _obj' x y @@ -259,11 +358,14 @@ touchManagedPtr _obj return result' +data DOMShadowRootElementFromPointMethodInfo +instance (signature ~ (Int64 -> Int64 -> m DOMElement), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootElementFromPointMethodInfo a signature where + overloadedMethod _ = dOMShadowRootElementFromPoint + -- method DOMShadowRoot::get_active_element -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : False -- Skip return : False @@ -275,8 +377,8 @@ dOMShadowRootGetActiveElement :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - m DOMElement + a -- _obj + -> m DOMElement -- result dOMShadowRootGetActiveElement _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_shadow_root_get_active_element _obj' @@ -285,11 +387,14 @@ touchManagedPtr _obj return result' +data DOMShadowRootGetActiveElementMethodInfo +instance (signature ~ (m DOMElement), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootGetActiveElementMethodInfo a signature where + overloadedMethod _ = dOMShadowRootGetActiveElement + -- method DOMShadowRoot::get_apply_author_styles -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -301,8 +406,8 @@ dOMShadowRootGetApplyAuthorStyles :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMShadowRootGetApplyAuthorStyles _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_shadow_root_get_apply_author_styles _obj' @@ -310,11 +415,14 @@ touchManagedPtr _obj return result' +data DOMShadowRootGetApplyAuthorStylesMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootGetApplyAuthorStylesMethodInfo a signature where + overloadedMethod _ = dOMShadowRootGetApplyAuthorStyles + -- method DOMShadowRoot::get_element_by_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "elementId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "elementId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "elementId", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMElement" -- throws : False -- Skip return : False @@ -327,9 +435,9 @@ dOMShadowRootGetElementById :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - T.Text -> -- elementId - m DOMElement + a -- _obj + -> T.Text -- elementId + -> m DOMElement -- result dOMShadowRootGetElementById _obj elementId = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj elementId' <- textToCString elementId @@ -340,11 +448,14 @@ freeMem elementId' return result' +data DOMShadowRootGetElementByIdMethodInfo +instance (signature ~ (T.Text -> m DOMElement), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootGetElementByIdMethodInfo a signature where + overloadedMethod _ = dOMShadowRootGetElementById + -- method DOMShadowRoot::get_elements_by_class_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "className", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "className", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "className", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -357,9 +468,9 @@ dOMShadowRootGetElementsByClassName :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - T.Text -> -- className - m DOMNodeList + a -- _obj + -> T.Text -- className + -> m DOMNodeList -- result dOMShadowRootGetElementsByClassName _obj className = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj className' <- textToCString className @@ -370,11 +481,14 @@ freeMem className' return result' +data DOMShadowRootGetElementsByClassNameMethodInfo +instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootGetElementsByClassNameMethodInfo a signature where + overloadedMethod _ = dOMShadowRootGetElementsByClassName + -- method DOMShadowRoot::get_elements_by_tag_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tagName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tagName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "tagName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -387,9 +501,9 @@ dOMShadowRootGetElementsByTagName :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - T.Text -> -- tagName - m DOMNodeList + a -- _obj + -> T.Text -- tagName + -> m DOMNodeList -- result dOMShadowRootGetElementsByTagName _obj tagName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj tagName' <- textToCString tagName @@ -400,11 +514,14 @@ freeMem tagName' return result' +data DOMShadowRootGetElementsByTagNameMethodInfo +instance (signature ~ (T.Text -> m DOMNodeList), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootGetElementsByTagNameMethodInfo a signature where + overloadedMethod _ = dOMShadowRootGetElementsByTagName + -- method DOMShadowRoot::get_elements_by_tag_name_ns -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "namespaceURI", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "localName", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -418,10 +535,10 @@ dOMShadowRootGetElementsByTagNameNs :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - T.Text -> -- namespaceURI - T.Text -> -- localName - m DOMNodeList + a -- _obj + -> T.Text -- namespaceURI + -> T.Text -- localName + -> m DOMNodeList -- result dOMShadowRootGetElementsByTagNameNs _obj namespaceURI localName = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj namespaceURI' <- textToCString namespaceURI @@ -434,11 +551,14 @@ freeMem localName' return result' +data DOMShadowRootGetElementsByTagNameNsMethodInfo +instance (signature ~ (T.Text -> T.Text -> m DOMNodeList), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootGetElementsByTagNameNsMethodInfo a signature where + overloadedMethod _ = dOMShadowRootGetElementsByTagNameNs + -- method DOMShadowRoot::get_inner_html -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -450,8 +570,8 @@ dOMShadowRootGetInnerHtml :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMShadowRootGetInnerHtml _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_shadow_root_get_inner_html _obj' @@ -461,11 +581,14 @@ touchManagedPtr _obj return result' +data DOMShadowRootGetInnerHtmlMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootGetInnerHtmlMethodInfo a signature where + overloadedMethod _ = dOMShadowRootGetInnerHtml + -- method DOMShadowRoot::get_reset_style_inheritance -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -477,8 +600,8 @@ dOMShadowRootGetResetStyleInheritance :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMShadowRootGetResetStyleInheritance _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_shadow_root_get_reset_style_inheritance _obj' @@ -486,11 +609,14 @@ touchManagedPtr _obj return result' +data DOMShadowRootGetResetStyleInheritanceMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootGetResetStyleInheritanceMethodInfo a signature where + overloadedMethod _ = dOMShadowRootGetResetStyleInheritance + -- method DOMShadowRoot::get_selection -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMSelection" -- throws : False -- Skip return : False @@ -502,8 +628,8 @@ dOMShadowRootGetSelection :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - m DOMDOMSelection + a -- _obj + -> m DOMDOMSelection -- result dOMShadowRootGetSelection _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_shadow_root_get_selection _obj' @@ -512,11 +638,14 @@ touchManagedPtr _obj return result' +data DOMShadowRootGetSelectionMethodInfo +instance (signature ~ (m DOMDOMSelection), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootGetSelectionMethodInfo a signature where + overloadedMethod _ = dOMShadowRootGetSelection + -- method DOMShadowRoot::set_apply_author_styles -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -529,9 +658,9 @@ dOMShadowRootSetApplyAuthorStyles :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMShadowRootSetApplyAuthorStyles _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -539,11 +668,14 @@ touchManagedPtr _obj return () +data DOMShadowRootSetApplyAuthorStylesMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootSetApplyAuthorStylesMethodInfo a signature where + overloadedMethod _ = dOMShadowRootSetApplyAuthorStyles + -- method DOMShadowRoot::set_inner_html -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -557,9 +689,9 @@ dOMShadowRootSetInnerHtml :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMShadowRootSetInnerHtml _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -572,11 +704,14 @@ freeMem value' ) +data DOMShadowRootSetInnerHtmlMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootSetInnerHtmlMethodInfo a signature where + overloadedMethod _ = dOMShadowRootSetInnerHtml + -- method DOMShadowRoot::set_reset_style_inheritance -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMShadowRoot", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -589,14 +724,18 @@ dOMShadowRootSetResetStyleInheritance :: (MonadIO m, DOMShadowRootK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMShadowRootSetResetStyleInheritance _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_shadow_root_set_reset_style_inheritance _obj' value' touchManagedPtr _obj return () + +data DOMShadowRootSetResetStyleInheritanceMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMShadowRootK a) => MethodInfo DOMShadowRootSetResetStyleInheritanceMethodInfo a signature where + overloadedMethod _ = dOMShadowRootSetResetStyleInheritance diff --git a/GI/WebKit/Objects/DOMShadowRoot.hs-boot b/GI/WebKit/Objects/DOMShadowRoot.hs-boot --- a/GI/WebKit/Objects/DOMShadowRoot.hs-boot +++ b/GI/WebKit/Objects/DOMShadowRoot.hs-boot @@ -15,3 +15,16 @@ data DOMShadowRootApplyAuthorStylesPropertyInfo data DOMShadowRootInnerHtmlPropertyInfo data DOMShadowRootResetStyleInheritancePropertyInfo +data DOMShadowRootElementFromPointMethodInfo +data DOMShadowRootGetActiveElementMethodInfo +data DOMShadowRootGetApplyAuthorStylesMethodInfo +data DOMShadowRootGetElementByIdMethodInfo +data DOMShadowRootGetElementsByClassNameMethodInfo +data DOMShadowRootGetElementsByTagNameMethodInfo +data DOMShadowRootGetElementsByTagNameNsMethodInfo +data DOMShadowRootGetInnerHtmlMethodInfo +data DOMShadowRootGetResetStyleInheritanceMethodInfo +data DOMShadowRootGetSelectionMethodInfo +data DOMShadowRootSetApplyAuthorStylesMethodInfo +data DOMShadowRootSetInnerHtmlMethodInfo +data DOMShadowRootSetResetStyleInheritanceMethodInfo diff --git a/GI/WebKit/Objects/DOMStorage.hs b/GI/WebKit/Objects/DOMStorage.hs --- a/GI/WebKit/Objects/DOMStorage.hs +++ b/GI/WebKit/Objects/DOMStorage.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** dOMStorageClear + DOMStorageClearMethodInfo , dOMStorageClear , -- ** dOMStorageGetItem + DOMStorageGetItemMethodInfo , dOMStorageGetItem , -- ** dOMStorageGetLength + DOMStorageGetLengthMethodInfo , dOMStorageGetLength , -- ** dOMStorageKey + DOMStorageKeyMethodInfo , dOMStorageKey , -- ** dOMStorageRemoveItem + DOMStorageRemoveItemMethodInfo , dOMStorageRemoveItem , -- ** dOMStorageSetItem + DOMStorageSetItemMethodInfo , dOMStorageSetItem , @@ -84,6 +91,45 @@ noDOMStorage :: Maybe DOMStorage noDOMStorage = Nothing +type family ResolveDOMStorageMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMStorageMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMStorageMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMStorageMethod "clear" o = DOMStorageClearMethodInfo + ResolveDOMStorageMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMStorageMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMStorageMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMStorageMethod "key" o = DOMStorageKeyMethodInfo + ResolveDOMStorageMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMStorageMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMStorageMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMStorageMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMStorageMethod "removeItem" o = DOMStorageRemoveItemMethodInfo + ResolveDOMStorageMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMStorageMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMStorageMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMStorageMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMStorageMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMStorageMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMStorageMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMStorageMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMStorageMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMStorageMethod "getItem" o = DOMStorageGetItemMethodInfo + ResolveDOMStorageMethod "getLength" o = DOMStorageGetLengthMethodInfo + ResolveDOMStorageMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMStorageMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMStorageMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMStorageMethod "setItem" o = DOMStorageSetItemMethodInfo + ResolveDOMStorageMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMStorageMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMStorageMethod t DOMStorage, MethodInfo info DOMStorage p) => IsLabelProxy t (DOMStorage -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMStorageMethod t DOMStorage, MethodInfo info DOMStorage p) => IsLabel t (DOMStorage -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -97,22 +143,21 @@ type AttrSetTypeConstraint DOMStorageLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMStorageLengthPropertyInfo = DOMStorageK type AttrGetType DOMStorageLengthPropertyInfo = Word64 - type AttrLabel DOMStorageLengthPropertyInfo = "DOMStorage::length" + type AttrLabel DOMStorageLengthPropertyInfo = "length" attrGet _ = getDOMStorageLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMStorage = DOMStorageAttributeList -type DOMStorageAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMStorageLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMStorageAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMStorageLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMStorage = DOMStorageSignalList -type DOMStorageSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMStorageSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMStorage::clear -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -125,8 +170,8 @@ dOMStorageClear :: (MonadIO m, DOMStorageK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMStorageClear _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -137,11 +182,14 @@ return () ) +data DOMStorageClearMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMStorageK a) => MethodInfo DOMStorageClearMethodInfo a signature where + overloadedMethod _ = dOMStorageClear + -- method DOMStorage::get_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : True -- Skip return : False @@ -155,9 +203,9 @@ dOMStorageGetItem :: (MonadIO m, DOMStorageK a) => - a -> -- _obj - T.Text -> -- key - m T.Text + a -- _obj + -> T.Text -- key + -> m T.Text -- result dOMStorageGetItem _obj key = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj key' <- textToCString key @@ -173,11 +221,14 @@ freeMem key' ) +data DOMStorageGetItemMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMStorageK a) => MethodInfo DOMStorageGetItemMethodInfo a signature where + overloadedMethod _ = dOMStorageGetItem + -- method DOMStorage::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : True -- Skip return : False @@ -190,8 +241,8 @@ dOMStorageGetLength :: (MonadIO m, DOMStorageK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMStorageGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -202,11 +253,14 @@ return () ) +data DOMStorageGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMStorageK a) => MethodInfo DOMStorageGetLengthMethodInfo a signature where + overloadedMethod _ = dOMStorageGetLength + -- method DOMStorage::key -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : True -- Skip return : False @@ -220,9 +274,9 @@ dOMStorageKey :: (MonadIO m, DOMStorageK a) => - a -> -- _obj - Word64 -> -- index - m T.Text + a -- _obj + -> Word64 -- index + -> m T.Text -- result dOMStorageKey _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -236,11 +290,14 @@ return () ) +data DOMStorageKeyMethodInfo +instance (signature ~ (Word64 -> m T.Text), MonadIO m, DOMStorageK a) => MethodInfo DOMStorageKeyMethodInfo a signature where + overloadedMethod _ = dOMStorageKey + -- method DOMStorage::remove_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -254,9 +311,9 @@ dOMStorageRemoveItem :: (MonadIO m, DOMStorageK a) => - a -> -- _obj - T.Text -> -- key - m () + a -- _obj + -> T.Text -- key + -> m () -- result dOMStorageRemoveItem _obj key = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj key' <- textToCString key @@ -269,11 +326,14 @@ freeMem key' ) +data DOMStorageRemoveItemMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMStorageK a) => MethodInfo DOMStorageRemoveItemMethodInfo a signature where + overloadedMethod _ = dOMStorageRemoveItem + -- method DOMStorage::set_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStorage", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "key", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -288,10 +348,10 @@ dOMStorageSetItem :: (MonadIO m, DOMStorageK a) => - a -> -- _obj - T.Text -> -- key - T.Text -> -- data - m () + a -- _obj + -> T.Text -- key + -> T.Text -- data_ + -> m () -- result dOMStorageSetItem _obj key data_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj key' <- textToCString key @@ -306,5 +366,9 @@ freeMem key' freeMem data_' ) + +data DOMStorageSetItemMethodInfo +instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, DOMStorageK a) => MethodInfo DOMStorageSetItemMethodInfo a signature where + overloadedMethod _ = dOMStorageSetItem diff --git a/GI/WebKit/Objects/DOMStorage.hs-boot b/GI/WebKit/Objects/DOMStorage.hs-boot --- a/GI/WebKit/Objects/DOMStorage.hs-boot +++ b/GI/WebKit/Objects/DOMStorage.hs-boot @@ -12,3 +12,9 @@ class GObject o => DOMStorageK o instance (GObject o, IsDescendantOf DOMStorage o) => DOMStorageK o data DOMStorageLengthPropertyInfo +data DOMStorageClearMethodInfo +data DOMStorageGetItemMethodInfo +data DOMStorageGetLengthMethodInfo +data DOMStorageKeyMethodInfo +data DOMStorageRemoveItemMethodInfo +data DOMStorageSetItemMethodInfo diff --git a/GI/WebKit/Objects/DOMStorageInfo.hs b/GI/WebKit/Objects/DOMStorageInfo.hs --- a/GI/WebKit/Objects/DOMStorageInfo.hs +++ b/GI/WebKit/Objects/DOMStorageInfo.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -49,10 +50,43 @@ noDOMStorageInfo :: Maybe DOMStorageInfo noDOMStorageInfo = Nothing +type family ResolveDOMStorageInfoMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMStorageInfoMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMStorageInfoMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMStorageInfoMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMStorageInfoMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMStorageInfoMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMStorageInfoMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMStorageInfoMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMStorageInfoMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMStorageInfoMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMStorageInfoMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMStorageInfoMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMStorageInfoMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMStorageInfoMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMStorageInfoMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMStorageInfoMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMStorageInfoMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMStorageInfoMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMStorageInfoMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMStorageInfoMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMStorageInfoMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMStorageInfoMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMStorageInfoMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMStorageInfoMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMStorageInfoMethod t DOMStorageInfo, MethodInfo info DOMStorageInfo p) => IsLabelProxy t (DOMStorageInfo -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMStorageInfoMethod t DOMStorageInfo, MethodInfo info DOMStorageInfo p) => IsLabel t (DOMStorageInfo -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMStorageInfo = DOMStorageInfoAttributeList -type DOMStorageInfoAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMStorageInfoAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMStorageInfo = DOMStorageInfoSignalList -type DOMStorageInfoSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMStorageInfoSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/DOMStorageQuota.hs b/GI/WebKit/Objects/DOMStorageQuota.hs --- a/GI/WebKit/Objects/DOMStorageQuota.hs +++ b/GI/WebKit/Objects/DOMStorageQuota.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -49,10 +50,43 @@ noDOMStorageQuota :: Maybe DOMStorageQuota noDOMStorageQuota = Nothing +type family ResolveDOMStorageQuotaMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMStorageQuotaMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMStorageQuotaMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMStorageQuotaMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMStorageQuotaMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMStorageQuotaMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMStorageQuotaMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMStorageQuotaMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMStorageQuotaMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMStorageQuotaMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMStorageQuotaMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMStorageQuotaMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMStorageQuotaMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMStorageQuotaMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMStorageQuotaMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMStorageQuotaMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMStorageQuotaMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMStorageQuotaMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMStorageQuotaMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMStorageQuotaMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMStorageQuotaMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMStorageQuotaMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMStorageQuotaMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMStorageQuotaMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMStorageQuotaMethod t DOMStorageQuota, MethodInfo info DOMStorageQuota p) => IsLabelProxy t (DOMStorageQuota -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMStorageQuotaMethod t DOMStorageQuota, MethodInfo info DOMStorageQuota p) => IsLabel t (DOMStorageQuota -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMStorageQuota = DOMStorageQuotaAttributeList -type DOMStorageQuotaAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMStorageQuotaAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMStorageQuota = DOMStorageQuotaSignalList -type DOMStorageQuotaSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMStorageQuotaSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/DOMStyleMedia.hs b/GI/WebKit/Objects/DOMStyleMedia.hs --- a/GI/WebKit/Objects/DOMStyleMedia.hs +++ b/GI/WebKit/Objects/DOMStyleMedia.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** dOMStyleMediaMatchMedium + DOMStyleMediaMatchMediumMethodInfo , dOMStyleMediaMatchMedium , @@ -64,6 +66,40 @@ noDOMStyleMedia :: Maybe DOMStyleMedia noDOMStyleMedia = Nothing +type family ResolveDOMStyleMediaMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMStyleMediaMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMStyleMediaMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMStyleMediaMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMStyleMediaMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMStyleMediaMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMStyleMediaMethod "matchMedium" o = DOMStyleMediaMatchMediumMethodInfo + ResolveDOMStyleMediaMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMStyleMediaMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMStyleMediaMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMStyleMediaMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMStyleMediaMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMStyleMediaMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMStyleMediaMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMStyleMediaMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMStyleMediaMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMStyleMediaMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMStyleMediaMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMStyleMediaMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMStyleMediaMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMStyleMediaMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMStyleMediaMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMStyleMediaMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMStyleMediaMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMStyleMediaMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMStyleMediaMethod t DOMStyleMedia, MethodInfo info DOMStyleMedia p) => IsLabelProxy t (DOMStyleMedia -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMStyleMediaMethod t DOMStyleMedia, MethodInfo info DOMStyleMedia p) => IsLabel t (DOMStyleMedia -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "type" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -77,22 +113,21 @@ type AttrSetTypeConstraint DOMStyleMediaTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMStyleMediaTypePropertyInfo = DOMStyleMediaK type AttrGetType DOMStyleMediaTypePropertyInfo = T.Text - type AttrLabel DOMStyleMediaTypePropertyInfo = "DOMStyleMedia::type" + type AttrLabel DOMStyleMediaTypePropertyInfo = "type" attrGet _ = getDOMStyleMediaType attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMStyleMedia = DOMStyleMediaAttributeList -type DOMStyleMediaAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("type", DOMStyleMediaTypePropertyInfo)] :: [(Symbol, *)]) +type DOMStyleMediaAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("type", DOMStyleMediaTypePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMStyleMedia = DOMStyleMediaSignalList -type DOMStyleMediaSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMStyleMediaSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMStyleMedia::match_medium -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleMedia", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mediaquery", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStyleMedia", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "mediaquery", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleMedia", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mediaquery", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -105,9 +140,9 @@ dOMStyleMediaMatchMedium :: (MonadIO m, DOMStyleMediaK a) => - a -> -- _obj - T.Text -> -- mediaquery - m Bool + a -- _obj + -> T.Text -- mediaquery + -> m Bool -- result dOMStyleMediaMatchMedium _obj mediaquery = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj mediaquery' <- textToCString mediaquery @@ -116,5 +151,9 @@ touchManagedPtr _obj freeMem mediaquery' return result' + +data DOMStyleMediaMatchMediumMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, DOMStyleMediaK a) => MethodInfo DOMStyleMediaMatchMediumMethodInfo a signature where + overloadedMethod _ = dOMStyleMediaMatchMedium diff --git a/GI/WebKit/Objects/DOMStyleMedia.hs-boot b/GI/WebKit/Objects/DOMStyleMedia.hs-boot --- a/GI/WebKit/Objects/DOMStyleMedia.hs-boot +++ b/GI/WebKit/Objects/DOMStyleMedia.hs-boot @@ -12,3 +12,4 @@ class GObject o => DOMStyleMediaK o instance (GObject o, IsDescendantOf DOMStyleMedia o) => DOMStyleMediaK o data DOMStyleMediaTypePropertyInfo +data DOMStyleMediaMatchMediumMethodInfo diff --git a/GI/WebKit/Objects/DOMStyleSheet.hs b/GI/WebKit/Objects/DOMStyleSheet.hs --- a/GI/WebKit/Objects/DOMStyleSheet.hs +++ b/GI/WebKit/Objects/DOMStyleSheet.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,30 +18,37 @@ -- * Methods -- ** dOMStyleSheetGetDisabled + DOMStyleSheetGetDisabledMethodInfo , dOMStyleSheetGetDisabled , -- ** dOMStyleSheetGetHref + DOMStyleSheetGetHrefMethodInfo , dOMStyleSheetGetHref , -- ** dOMStyleSheetGetMedia + DOMStyleSheetGetMediaMethodInfo , dOMStyleSheetGetMedia , -- ** dOMStyleSheetGetOwnerNode + DOMStyleSheetGetOwnerNodeMethodInfo , dOMStyleSheetGetOwnerNode , -- ** dOMStyleSheetGetParentStyleSheet + DOMStyleSheetGetParentStyleSheetMethodInfo, dOMStyleSheetGetParentStyleSheet , -- ** dOMStyleSheetGetTitle + DOMStyleSheetGetTitleMethodInfo , dOMStyleSheetGetTitle , -- ** dOMStyleSheetSetDisabled + DOMStyleSheetSetDisabledMethodInfo , dOMStyleSheetSetDisabled , @@ -120,6 +128,46 @@ noDOMStyleSheet :: Maybe DOMStyleSheet noDOMStyleSheet = Nothing +type family ResolveDOMStyleSheetMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMStyleSheetMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMStyleSheetMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMStyleSheetMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMStyleSheetMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMStyleSheetMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMStyleSheetMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMStyleSheetMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMStyleSheetMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMStyleSheetMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMStyleSheetMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMStyleSheetMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMStyleSheetMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMStyleSheetMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMStyleSheetMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMStyleSheetMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMStyleSheetMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMStyleSheetMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMStyleSheetMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMStyleSheetMethod "getDisabled" o = DOMStyleSheetGetDisabledMethodInfo + ResolveDOMStyleSheetMethod "getHref" o = DOMStyleSheetGetHrefMethodInfo + ResolveDOMStyleSheetMethod "getMedia" o = DOMStyleSheetGetMediaMethodInfo + ResolveDOMStyleSheetMethod "getOwnerNode" o = DOMStyleSheetGetOwnerNodeMethodInfo + ResolveDOMStyleSheetMethod "getParentStyleSheet" o = DOMStyleSheetGetParentStyleSheetMethodInfo + ResolveDOMStyleSheetMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMStyleSheetMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMStyleSheetMethod "getTitle" o = DOMStyleSheetGetTitleMethodInfo + ResolveDOMStyleSheetMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMStyleSheetMethod "setDisabled" o = DOMStyleSheetSetDisabledMethodInfo + ResolveDOMStyleSheetMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMStyleSheetMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMStyleSheetMethod t DOMStyleSheet, MethodInfo info DOMStyleSheet p) => IsLabelProxy t (DOMStyleSheet -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMStyleSheetMethod t DOMStyleSheet, MethodInfo info DOMStyleSheet p) => IsLabel t (DOMStyleSheet -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "disabled" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -139,7 +187,7 @@ type AttrSetTypeConstraint DOMStyleSheetDisabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMStyleSheetDisabledPropertyInfo = DOMStyleSheetK type AttrGetType DOMStyleSheetDisabledPropertyInfo = Bool - type AttrLabel DOMStyleSheetDisabledPropertyInfo = "DOMStyleSheet::disabled" + type AttrLabel DOMStyleSheetDisabledPropertyInfo = "disabled" attrGet _ = getDOMStyleSheetDisabled attrSet _ = setDOMStyleSheetDisabled attrConstruct _ = constructDOMStyleSheetDisabled @@ -157,7 +205,7 @@ type AttrSetTypeConstraint DOMStyleSheetHrefPropertyInfo = (~) () type AttrBaseTypeConstraint DOMStyleSheetHrefPropertyInfo = DOMStyleSheetK type AttrGetType DOMStyleSheetHrefPropertyInfo = T.Text - type AttrLabel DOMStyleSheetHrefPropertyInfo = "DOMStyleSheet::href" + type AttrLabel DOMStyleSheetHrefPropertyInfo = "href" attrGet _ = getDOMStyleSheetHref attrSet _ = undefined attrConstruct _ = undefined @@ -175,7 +223,7 @@ type AttrSetTypeConstraint DOMStyleSheetMediaPropertyInfo = (~) () type AttrBaseTypeConstraint DOMStyleSheetMediaPropertyInfo = DOMStyleSheetK type AttrGetType DOMStyleSheetMediaPropertyInfo = DOMMediaList - type AttrLabel DOMStyleSheetMediaPropertyInfo = "DOMStyleSheet::media" + type AttrLabel DOMStyleSheetMediaPropertyInfo = "media" attrGet _ = getDOMStyleSheetMedia attrSet _ = undefined attrConstruct _ = undefined @@ -193,7 +241,7 @@ type AttrSetTypeConstraint DOMStyleSheetOwnerNodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMStyleSheetOwnerNodePropertyInfo = DOMStyleSheetK type AttrGetType DOMStyleSheetOwnerNodePropertyInfo = DOMNode - type AttrLabel DOMStyleSheetOwnerNodePropertyInfo = "DOMStyleSheet::owner-node" + type AttrLabel DOMStyleSheetOwnerNodePropertyInfo = "owner-node" attrGet _ = getDOMStyleSheetOwnerNode attrSet _ = undefined attrConstruct _ = undefined @@ -211,7 +259,7 @@ type AttrSetTypeConstraint DOMStyleSheetParentStyleSheetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMStyleSheetParentStyleSheetPropertyInfo = DOMStyleSheetK type AttrGetType DOMStyleSheetParentStyleSheetPropertyInfo = DOMStyleSheet - type AttrLabel DOMStyleSheetParentStyleSheetPropertyInfo = "DOMStyleSheet::parent-style-sheet" + type AttrLabel DOMStyleSheetParentStyleSheetPropertyInfo = "parent-style-sheet" attrGet _ = getDOMStyleSheetParentStyleSheet attrSet _ = undefined attrConstruct _ = undefined @@ -229,7 +277,7 @@ type AttrSetTypeConstraint DOMStyleSheetTitlePropertyInfo = (~) () type AttrBaseTypeConstraint DOMStyleSheetTitlePropertyInfo = DOMStyleSheetK type AttrGetType DOMStyleSheetTitlePropertyInfo = T.Text - type AttrLabel DOMStyleSheetTitlePropertyInfo = "DOMStyleSheet::title" + type AttrLabel DOMStyleSheetTitlePropertyInfo = "title" attrGet _ = getDOMStyleSheetTitle attrSet _ = undefined attrConstruct _ = undefined @@ -247,22 +295,21 @@ type AttrSetTypeConstraint DOMStyleSheetTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMStyleSheetTypePropertyInfo = DOMStyleSheetK type AttrGetType DOMStyleSheetTypePropertyInfo = T.Text - type AttrLabel DOMStyleSheetTypePropertyInfo = "DOMStyleSheet::type" + type AttrLabel DOMStyleSheetTypePropertyInfo = "type" attrGet _ = getDOMStyleSheetType attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMStyleSheet = DOMStyleSheetAttributeList -type DOMStyleSheetAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("disabled", DOMStyleSheetDisabledPropertyInfo), '("href", DOMStyleSheetHrefPropertyInfo), '("media", DOMStyleSheetMediaPropertyInfo), '("owner-node", DOMStyleSheetOwnerNodePropertyInfo), '("parent-style-sheet", DOMStyleSheetParentStyleSheetPropertyInfo), '("title", DOMStyleSheetTitlePropertyInfo), '("type", DOMStyleSheetTypePropertyInfo)] :: [(Symbol, *)]) +type DOMStyleSheetAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("disabled", DOMStyleSheetDisabledPropertyInfo), '("href", DOMStyleSheetHrefPropertyInfo), '("media", DOMStyleSheetMediaPropertyInfo), '("ownerNode", DOMStyleSheetOwnerNodePropertyInfo), '("parentStyleSheet", DOMStyleSheetParentStyleSheetPropertyInfo), '("title", DOMStyleSheetTitlePropertyInfo), '("type", DOMStyleSheetTypePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMStyleSheet = DOMStyleSheetSignalList -type DOMStyleSheetSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMStyleSheetSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMStyleSheet::get_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -274,8 +321,8 @@ dOMStyleSheetGetDisabled :: (MonadIO m, DOMStyleSheetK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMStyleSheetGetDisabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_style_sheet_get_disabled _obj' @@ -283,11 +330,14 @@ touchManagedPtr _obj return result' +data DOMStyleSheetGetDisabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMStyleSheetK a) => MethodInfo DOMStyleSheetGetDisabledMethodInfo a signature where + overloadedMethod _ = dOMStyleSheetGetDisabled + -- method DOMStyleSheet::get_href -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -299,8 +349,8 @@ dOMStyleSheetGetHref :: (MonadIO m, DOMStyleSheetK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMStyleSheetGetHref _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_style_sheet_get_href _obj' @@ -310,11 +360,14 @@ touchManagedPtr _obj return result' +data DOMStyleSheetGetHrefMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMStyleSheetK a) => MethodInfo DOMStyleSheetGetHrefMethodInfo a signature where + overloadedMethod _ = dOMStyleSheetGetHref + -- method DOMStyleSheet::get_media -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMMediaList" -- throws : False -- Skip return : False @@ -326,8 +379,8 @@ dOMStyleSheetGetMedia :: (MonadIO m, DOMStyleSheetK a) => - a -> -- _obj - m DOMMediaList + a -- _obj + -> m DOMMediaList -- result dOMStyleSheetGetMedia _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_style_sheet_get_media _obj' @@ -336,11 +389,14 @@ touchManagedPtr _obj return result' +data DOMStyleSheetGetMediaMethodInfo +instance (signature ~ (m DOMMediaList), MonadIO m, DOMStyleSheetK a) => MethodInfo DOMStyleSheetGetMediaMethodInfo a signature where + overloadedMethod _ = dOMStyleSheetGetMedia + -- method DOMStyleSheet::get_owner_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -352,8 +408,8 @@ dOMStyleSheetGetOwnerNode :: (MonadIO m, DOMStyleSheetK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMStyleSheetGetOwnerNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_style_sheet_get_owner_node _obj' @@ -362,11 +418,14 @@ touchManagedPtr _obj return result' +data DOMStyleSheetGetOwnerNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMStyleSheetK a) => MethodInfo DOMStyleSheetGetOwnerNodeMethodInfo a signature where + overloadedMethod _ = dOMStyleSheetGetOwnerNode + -- method DOMStyleSheet::get_parent_style_sheet -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMStyleSheet" -- throws : False -- Skip return : False @@ -378,8 +437,8 @@ dOMStyleSheetGetParentStyleSheet :: (MonadIO m, DOMStyleSheetK a) => - a -> -- _obj - m DOMStyleSheet + a -- _obj + -> m DOMStyleSheet -- result dOMStyleSheetGetParentStyleSheet _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_style_sheet_get_parent_style_sheet _obj' @@ -388,11 +447,14 @@ touchManagedPtr _obj return result' +data DOMStyleSheetGetParentStyleSheetMethodInfo +instance (signature ~ (m DOMStyleSheet), MonadIO m, DOMStyleSheetK a) => MethodInfo DOMStyleSheetGetParentStyleSheetMethodInfo a signature where + overloadedMethod _ = dOMStyleSheetGetParentStyleSheet + -- method DOMStyleSheet::get_title -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -404,8 +466,8 @@ dOMStyleSheetGetTitle :: (MonadIO m, DOMStyleSheetK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMStyleSheetGetTitle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_style_sheet_get_title _obj' @@ -415,11 +477,14 @@ touchManagedPtr _obj return result' +data DOMStyleSheetGetTitleMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMStyleSheetK a) => MethodInfo DOMStyleSheetGetTitleMethodInfo a signature where + overloadedMethod _ = dOMStyleSheetGetTitle + -- method DOMStyleSheet::set_disabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheet", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -432,14 +497,18 @@ dOMStyleSheetSetDisabled :: (MonadIO m, DOMStyleSheetK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMStyleSheetSetDisabled _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_style_sheet_set_disabled _obj' value' touchManagedPtr _obj return () + +data DOMStyleSheetSetDisabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMStyleSheetK a) => MethodInfo DOMStyleSheetSetDisabledMethodInfo a signature where + overloadedMethod _ = dOMStyleSheetSetDisabled diff --git a/GI/WebKit/Objects/DOMStyleSheet.hs-boot b/GI/WebKit/Objects/DOMStyleSheet.hs-boot --- a/GI/WebKit/Objects/DOMStyleSheet.hs-boot +++ b/GI/WebKit/Objects/DOMStyleSheet.hs-boot @@ -18,3 +18,10 @@ data DOMStyleSheetParentStyleSheetPropertyInfo data DOMStyleSheetTitlePropertyInfo data DOMStyleSheetTypePropertyInfo +data DOMStyleSheetGetDisabledMethodInfo +data DOMStyleSheetGetHrefMethodInfo +data DOMStyleSheetGetMediaMethodInfo +data DOMStyleSheetGetOwnerNodeMethodInfo +data DOMStyleSheetGetParentStyleSheetMethodInfo +data DOMStyleSheetGetTitleMethodInfo +data DOMStyleSheetSetDisabledMethodInfo diff --git a/GI/WebKit/Objects/DOMStyleSheetList.hs b/GI/WebKit/Objects/DOMStyleSheetList.hs --- a/GI/WebKit/Objects/DOMStyleSheetList.hs +++ b/GI/WebKit/Objects/DOMStyleSheetList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** dOMStyleSheetListGetLength + DOMStyleSheetListGetLengthMethodInfo , dOMStyleSheetListGetLength , -- ** dOMStyleSheetListItem + DOMStyleSheetListItemMethodInfo , dOMStyleSheetListItem , @@ -68,6 +71,41 @@ noDOMStyleSheetList :: Maybe DOMStyleSheetList noDOMStyleSheetList = Nothing +type family ResolveDOMStyleSheetListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMStyleSheetListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMStyleSheetListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMStyleSheetListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMStyleSheetListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMStyleSheetListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMStyleSheetListMethod "item" o = DOMStyleSheetListItemMethodInfo + ResolveDOMStyleSheetListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMStyleSheetListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMStyleSheetListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMStyleSheetListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMStyleSheetListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMStyleSheetListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMStyleSheetListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMStyleSheetListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMStyleSheetListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMStyleSheetListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMStyleSheetListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMStyleSheetListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMStyleSheetListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMStyleSheetListMethod "getLength" o = DOMStyleSheetListGetLengthMethodInfo + ResolveDOMStyleSheetListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMStyleSheetListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMStyleSheetListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMStyleSheetListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMStyleSheetListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMStyleSheetListMethod t DOMStyleSheetList, MethodInfo info DOMStyleSheetList p) => IsLabelProxy t (DOMStyleSheetList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMStyleSheetListMethod t DOMStyleSheetList, MethodInfo info DOMStyleSheetList p) => IsLabel t (DOMStyleSheetList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -81,22 +119,21 @@ type AttrSetTypeConstraint DOMStyleSheetListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMStyleSheetListLengthPropertyInfo = DOMStyleSheetListK type AttrGetType DOMStyleSheetListLengthPropertyInfo = Word64 - type AttrLabel DOMStyleSheetListLengthPropertyInfo = "DOMStyleSheetList::length" + type AttrLabel DOMStyleSheetListLengthPropertyInfo = "length" attrGet _ = getDOMStyleSheetListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMStyleSheetList = DOMStyleSheetListAttributeList -type DOMStyleSheetListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMStyleSheetListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMStyleSheetListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMStyleSheetListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMStyleSheetList = DOMStyleSheetListSignalList -type DOMStyleSheetListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMStyleSheetListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMStyleSheetList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheetList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStyleSheetList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheetList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -108,19 +145,22 @@ dOMStyleSheetListGetLength :: (MonadIO m, DOMStyleSheetListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMStyleSheetListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_style_sheet_list_get_length _obj' touchManagedPtr _obj return result +data DOMStyleSheetListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMStyleSheetListK a) => MethodInfo DOMStyleSheetListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMStyleSheetListGetLength + -- method DOMStyleSheetList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheetList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMStyleSheetList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMStyleSheetList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMStyleSheet" -- throws : False -- Skip return : False @@ -133,9 +173,9 @@ dOMStyleSheetListItem :: (MonadIO m, DOMStyleSheetListK a) => - a -> -- _obj - Word64 -> -- index - m DOMStyleSheet + a -- _obj + -> Word64 -- index + -> m DOMStyleSheet -- result dOMStyleSheetListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_style_sheet_list_item _obj' index @@ -143,5 +183,9 @@ result' <- (wrapObject DOMStyleSheet) result touchManagedPtr _obj return result' + +data DOMStyleSheetListItemMethodInfo +instance (signature ~ (Word64 -> m DOMStyleSheet), MonadIO m, DOMStyleSheetListK a) => MethodInfo DOMStyleSheetListItemMethodInfo a signature where + overloadedMethod _ = dOMStyleSheetListItem diff --git a/GI/WebKit/Objects/DOMStyleSheetList.hs-boot b/GI/WebKit/Objects/DOMStyleSheetList.hs-boot --- a/GI/WebKit/Objects/DOMStyleSheetList.hs-boot +++ b/GI/WebKit/Objects/DOMStyleSheetList.hs-boot @@ -12,3 +12,5 @@ class GObject o => DOMStyleSheetListK o instance (GObject o, IsDescendantOf DOMStyleSheetList o) => DOMStyleSheetListK o data DOMStyleSheetListLengthPropertyInfo +data DOMStyleSheetListGetLengthMethodInfo +data DOMStyleSheetListItemMethodInfo diff --git a/GI/WebKit/Objects/DOMText.hs b/GI/WebKit/Objects/DOMText.hs --- a/GI/WebKit/Objects/DOMText.hs +++ b/GI/WebKit/Objects/DOMText.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMTextGetWholeText + DOMTextGetWholeTextMethodInfo , dOMTextGetWholeText , -- ** dOMTextReplaceWholeText + DOMTextReplaceWholeTextMethodInfo , dOMTextReplaceWholeText , -- ** dOMTextSplitText + DOMTextSplitTextMethodInfo , dOMTextSplitText , @@ -72,6 +76,83 @@ noDOMText :: Maybe DOMText noDOMText = Nothing +type family ResolveDOMTextMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMTextMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMTextMethod "appendChild" o = DOMNodeAppendChildMethodInfo + ResolveDOMTextMethod "appendData" o = DOMCharacterDataAppendDataMethodInfo + ResolveDOMTextMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMTextMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMTextMethod "cloneNode" o = DOMNodeCloneNodeMethodInfo + ResolveDOMTextMethod "compareDocumentPosition" o = DOMNodeCompareDocumentPositionMethodInfo + ResolveDOMTextMethod "contains" o = DOMNodeContainsMethodInfo + ResolveDOMTextMethod "deleteData" o = DOMCharacterDataDeleteDataMethodInfo + ResolveDOMTextMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMTextMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMTextMethod "hasAttributes" o = DOMNodeHasAttributesMethodInfo + ResolveDOMTextMethod "hasChildNodes" o = DOMNodeHasChildNodesMethodInfo + ResolveDOMTextMethod "insertBefore" o = DOMNodeInsertBeforeMethodInfo + ResolveDOMTextMethod "insertData" o = DOMCharacterDataInsertDataMethodInfo + ResolveDOMTextMethod "isDefaultNamespace" o = DOMNodeIsDefaultNamespaceMethodInfo + ResolveDOMTextMethod "isEqualNode" o = DOMNodeIsEqualNodeMethodInfo + ResolveDOMTextMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMTextMethod "isSameNode" o = DOMNodeIsSameNodeMethodInfo + ResolveDOMTextMethod "isSupported" o = DOMNodeIsSupportedMethodInfo + ResolveDOMTextMethod "lookupNamespaceUri" o = DOMNodeLookupNamespaceUriMethodInfo + ResolveDOMTextMethod "lookupPrefix" o = DOMNodeLookupPrefixMethodInfo + ResolveDOMTextMethod "normalize" o = DOMNodeNormalizeMethodInfo + ResolveDOMTextMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMTextMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMTextMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMTextMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMTextMethod "remove" o = DOMCharacterDataRemoveMethodInfo + ResolveDOMTextMethod "removeChild" o = DOMNodeRemoveChildMethodInfo + ResolveDOMTextMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMTextMethod "replaceChild" o = DOMNodeReplaceChildMethodInfo + ResolveDOMTextMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMTextMethod "replaceWholeText" o = DOMTextReplaceWholeTextMethodInfo + ResolveDOMTextMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMTextMethod "splitText" o = DOMTextSplitTextMethodInfo + ResolveDOMTextMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMTextMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMTextMethod "substringData" o = DOMCharacterDataSubstringDataMethodInfo + ResolveDOMTextMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMTextMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMTextMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMTextMethod "getAttributes" o = DOMNodeGetAttributesMethodInfo + ResolveDOMTextMethod "getBaseUri" o = DOMNodeGetBaseUriMethodInfo + ResolveDOMTextMethod "getChildNodes" o = DOMNodeGetChildNodesMethodInfo + ResolveDOMTextMethod "getFirstChild" o = DOMNodeGetFirstChildMethodInfo + ResolveDOMTextMethod "getLastChild" o = DOMNodeGetLastChildMethodInfo + ResolveDOMTextMethod "getLength" o = DOMCharacterDataGetLengthMethodInfo + ResolveDOMTextMethod "getLocalName" o = DOMNodeGetLocalNameMethodInfo + ResolveDOMTextMethod "getNamespaceUri" o = DOMNodeGetNamespaceUriMethodInfo + ResolveDOMTextMethod "getNextSibling" o = DOMNodeGetNextSiblingMethodInfo + ResolveDOMTextMethod "getNodeName" o = DOMNodeGetNodeNameMethodInfo + ResolveDOMTextMethod "getNodeType" o = DOMNodeGetNodeTypeMethodInfo + ResolveDOMTextMethod "getNodeValue" o = DOMNodeGetNodeValueMethodInfo + ResolveDOMTextMethod "getOwnerDocument" o = DOMNodeGetOwnerDocumentMethodInfo + ResolveDOMTextMethod "getParentElement" o = DOMNodeGetParentElementMethodInfo + ResolveDOMTextMethod "getParentNode" o = DOMNodeGetParentNodeMethodInfo + ResolveDOMTextMethod "getPrefix" o = DOMNodeGetPrefixMethodInfo + ResolveDOMTextMethod "getPreviousSibling" o = DOMNodeGetPreviousSiblingMethodInfo + ResolveDOMTextMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMTextMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMTextMethod "getTextContent" o = DOMNodeGetTextContentMethodInfo + ResolveDOMTextMethod "getWholeText" o = DOMTextGetWholeTextMethodInfo + ResolveDOMTextMethod "setNodeValue" o = DOMNodeSetNodeValueMethodInfo + ResolveDOMTextMethod "setPrefix" o = DOMNodeSetPrefixMethodInfo + ResolveDOMTextMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMTextMethod "setTextContent" o = DOMNodeSetTextContentMethodInfo + ResolveDOMTextMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMTextMethod t DOMText, MethodInfo info DOMText p) => IsLabelProxy t (DOMText -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMTextMethod t DOMText, MethodInfo info DOMText p) => IsLabel t (DOMText -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "whole-text" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -85,22 +166,21 @@ type AttrSetTypeConstraint DOMTextWholeTextPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTextWholeTextPropertyInfo = DOMTextK type AttrGetType DOMTextWholeTextPropertyInfo = T.Text - type AttrLabel DOMTextWholeTextPropertyInfo = "DOMText::whole-text" + type AttrLabel DOMTextWholeTextPropertyInfo = "whole-text" attrGet _ = getDOMTextWholeText attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMText = DOMTextAttributeList -type DOMTextAttributeList = ('[ '("base-uri", DOMNodeBaseUriPropertyInfo), '("child-nodes", DOMNodeChildNodesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("first-child", DOMNodeFirstChildPropertyInfo), '("last-child", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("local-name", DOMNodeLocalNamePropertyInfo), '("namespace-uri", DOMNodeNamespaceUriPropertyInfo), '("next-sibling", DOMNodeNextSiblingPropertyInfo), '("node-name", DOMNodeNodeNamePropertyInfo), '("node-type", DOMNodeNodeTypePropertyInfo), '("node-value", DOMNodeNodeValuePropertyInfo), '("owner-document", DOMNodeOwnerDocumentPropertyInfo), '("parent-element", DOMNodeParentElementPropertyInfo), '("parent-node", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previous-sibling", DOMNodePreviousSiblingPropertyInfo), '("text-content", DOMNodeTextContentPropertyInfo), '("whole-text", DOMTextWholeTextPropertyInfo)] :: [(Symbol, *)]) +type DOMTextAttributeList = ('[ '("baseUri", DOMNodeBaseUriPropertyInfo), '("childNodes", DOMNodeChildNodesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("data", DOMCharacterDataDataPropertyInfo), '("firstChild", DOMNodeFirstChildPropertyInfo), '("lastChild", DOMNodeLastChildPropertyInfo), '("length", DOMCharacterDataLengthPropertyInfo), '("localName", DOMNodeLocalNamePropertyInfo), '("namespaceUri", DOMNodeNamespaceUriPropertyInfo), '("nextSibling", DOMNodeNextSiblingPropertyInfo), '("nodeName", DOMNodeNodeNamePropertyInfo), '("nodeType", DOMNodeNodeTypePropertyInfo), '("nodeValue", DOMNodeNodeValuePropertyInfo), '("ownerDocument", DOMNodeOwnerDocumentPropertyInfo), '("parentElement", DOMNodeParentElementPropertyInfo), '("parentNode", DOMNodeParentNodePropertyInfo), '("prefix", DOMNodePrefixPropertyInfo), '("previousSibling", DOMNodePreviousSiblingPropertyInfo), '("textContent", DOMNodeTextContentPropertyInfo), '("wholeText", DOMTextWholeTextPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMText = DOMTextSignalList -type DOMTextSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMTextSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMText::get_whole_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMText", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMText", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMText", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -112,8 +192,8 @@ dOMTextGetWholeText :: (MonadIO m, DOMTextK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMTextGetWholeText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_get_whole_text _obj' @@ -123,11 +203,14 @@ touchManagedPtr _obj return result' +data DOMTextGetWholeTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMTextK a) => MethodInfo DOMTextGetWholeTextMethodInfo a signature where + overloadedMethod _ = dOMTextGetWholeText + -- method DOMText::replace_whole_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMText", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMText", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMText", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMText" -- throws : True -- Skip return : False @@ -141,9 +224,9 @@ dOMTextReplaceWholeText :: (MonadIO m, DOMTextK a) => - a -> -- _obj - T.Text -> -- content - m DOMText + a -- _obj + -> T.Text -- content + -> m DOMText -- result dOMTextReplaceWholeText _obj content = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj content' <- textToCString content @@ -158,11 +241,14 @@ freeMem content' ) +data DOMTextReplaceWholeTextMethodInfo +instance (signature ~ (T.Text -> m DOMText), MonadIO m, DOMTextK a) => MethodInfo DOMTextReplaceWholeTextMethodInfo a signature where + overloadedMethod _ = dOMTextReplaceWholeText + -- method DOMText::split_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMText", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMText", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMText", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "offset", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMText" -- throws : True -- Skip return : False @@ -176,9 +262,9 @@ dOMTextSplitText :: (MonadIO m, DOMTextK a) => - a -> -- _obj - Word64 -> -- offset - m DOMText + a -- _obj + -> Word64 -- offset + -> m DOMText -- result dOMTextSplitText _obj offset = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -190,5 +276,9 @@ ) (do return () ) + +data DOMTextSplitTextMethodInfo +instance (signature ~ (Word64 -> m DOMText), MonadIO m, DOMTextK a) => MethodInfo DOMTextSplitTextMethodInfo a signature where + overloadedMethod _ = dOMTextSplitText diff --git a/GI/WebKit/Objects/DOMText.hs-boot b/GI/WebKit/Objects/DOMText.hs-boot --- a/GI/WebKit/Objects/DOMText.hs-boot +++ b/GI/WebKit/Objects/DOMText.hs-boot @@ -12,3 +12,6 @@ class GObject o => DOMTextK o instance (GObject o, IsDescendantOf DOMText o) => DOMTextK o data DOMTextWholeTextPropertyInfo +data DOMTextGetWholeTextMethodInfo +data DOMTextReplaceWholeTextMethodInfo +data DOMTextSplitTextMethodInfo diff --git a/GI/WebKit/Objects/DOMTextTrack.hs b/GI/WebKit/Objects/DOMTextTrack.hs --- a/GI/WebKit/Objects/DOMTextTrack.hs +++ b/GI/WebKit/Objects/DOMTextTrack.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,46 +18,57 @@ -- * Methods -- ** dOMTextTrackAddCue + DOMTextTrackAddCueMethodInfo , dOMTextTrackAddCue , -- ** dOMTextTrackDispatchEvent + DOMTextTrackDispatchEventMethodInfo , dOMTextTrackDispatchEvent , -- ** dOMTextTrackGetActiveCues + DOMTextTrackGetActiveCuesMethodInfo , dOMTextTrackGetActiveCues , -- ** dOMTextTrackGetCues + DOMTextTrackGetCuesMethodInfo , dOMTextTrackGetCues , -- ** dOMTextTrackGetId + DOMTextTrackGetIdMethodInfo , dOMTextTrackGetId , -- ** dOMTextTrackGetKind + DOMTextTrackGetKindMethodInfo , dOMTextTrackGetKind , -- ** dOMTextTrackGetLabel + DOMTextTrackGetLabelMethodInfo , dOMTextTrackGetLabel , -- ** dOMTextTrackGetLanguage + DOMTextTrackGetLanguageMethodInfo , dOMTextTrackGetLanguage , -- ** dOMTextTrackGetMode + DOMTextTrackGetModeMethodInfo , dOMTextTrackGetMode , -- ** dOMTextTrackRemoveCue + DOMTextTrackRemoveCueMethodInfo , dOMTextTrackRemoveCue , -- ** dOMTextTrackSetMode + DOMTextTrackSetModeMethodInfo , dOMTextTrackSetMode , @@ -136,6 +148,51 @@ noDOMTextTrack :: Maybe DOMTextTrack noDOMTextTrack = Nothing +type family ResolveDOMTextTrackMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMTextTrackMethod "addCue" o = DOMTextTrackAddCueMethodInfo + ResolveDOMTextTrackMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMTextTrackMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMTextTrackMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMTextTrackMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMTextTrackMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMTextTrackMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMTextTrackMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMTextTrackMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMTextTrackMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMTextTrackMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMTextTrackMethod "removeCue" o = DOMTextTrackRemoveCueMethodInfo + ResolveDOMTextTrackMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMTextTrackMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMTextTrackMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMTextTrackMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMTextTrackMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMTextTrackMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMTextTrackMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMTextTrackMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMTextTrackMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMTextTrackMethod "getActiveCues" o = DOMTextTrackGetActiveCuesMethodInfo + ResolveDOMTextTrackMethod "getCues" o = DOMTextTrackGetCuesMethodInfo + ResolveDOMTextTrackMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMTextTrackMethod "getId" o = DOMTextTrackGetIdMethodInfo + ResolveDOMTextTrackMethod "getKind" o = DOMTextTrackGetKindMethodInfo + ResolveDOMTextTrackMethod "getLabel" o = DOMTextTrackGetLabelMethodInfo + ResolveDOMTextTrackMethod "getLanguage" o = DOMTextTrackGetLanguageMethodInfo + ResolveDOMTextTrackMethod "getMode" o = DOMTextTrackGetModeMethodInfo + ResolveDOMTextTrackMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMTextTrackMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMTextTrackMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMTextTrackMethod "setMode" o = DOMTextTrackSetModeMethodInfo + ResolveDOMTextTrackMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMTextTrackMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMTextTrackMethod t DOMTextTrack, MethodInfo info DOMTextTrack p) => IsLabelProxy t (DOMTextTrack -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMTextTrackMethod t DOMTextTrack, MethodInfo info DOMTextTrack p) => IsLabel t (DOMTextTrack -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "active-cues" -- Type: TInterface "WebKit" "DOMTextTrackCueList" -- Flags: [PropertyReadable] @@ -149,7 +206,7 @@ type AttrSetTypeConstraint DOMTextTrackActiveCuesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTextTrackActiveCuesPropertyInfo = DOMTextTrackK type AttrGetType DOMTextTrackActiveCuesPropertyInfo = DOMTextTrackCueList - type AttrLabel DOMTextTrackActiveCuesPropertyInfo = "DOMTextTrack::active-cues" + type AttrLabel DOMTextTrackActiveCuesPropertyInfo = "active-cues" attrGet _ = getDOMTextTrackActiveCues attrSet _ = undefined attrConstruct _ = undefined @@ -167,7 +224,7 @@ type AttrSetTypeConstraint DOMTextTrackCuesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTextTrackCuesPropertyInfo = DOMTextTrackK type AttrGetType DOMTextTrackCuesPropertyInfo = DOMTextTrackCueList - type AttrLabel DOMTextTrackCuesPropertyInfo = "DOMTextTrack::cues" + type AttrLabel DOMTextTrackCuesPropertyInfo = "cues" attrGet _ = getDOMTextTrackCues attrSet _ = undefined attrConstruct _ = undefined @@ -185,7 +242,7 @@ type AttrSetTypeConstraint DOMTextTrackIdPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTextTrackIdPropertyInfo = DOMTextTrackK type AttrGetType DOMTextTrackIdPropertyInfo = T.Text - type AttrLabel DOMTextTrackIdPropertyInfo = "DOMTextTrack::id" + type AttrLabel DOMTextTrackIdPropertyInfo = "id" attrGet _ = getDOMTextTrackId attrSet _ = undefined attrConstruct _ = undefined @@ -203,7 +260,7 @@ type AttrSetTypeConstraint DOMTextTrackKindPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTextTrackKindPropertyInfo = DOMTextTrackK type AttrGetType DOMTextTrackKindPropertyInfo = T.Text - type AttrLabel DOMTextTrackKindPropertyInfo = "DOMTextTrack::kind" + type AttrLabel DOMTextTrackKindPropertyInfo = "kind" attrGet _ = getDOMTextTrackKind attrSet _ = undefined attrConstruct _ = undefined @@ -221,7 +278,7 @@ type AttrSetTypeConstraint DOMTextTrackLabelPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTextTrackLabelPropertyInfo = DOMTextTrackK type AttrGetType DOMTextTrackLabelPropertyInfo = T.Text - type AttrLabel DOMTextTrackLabelPropertyInfo = "DOMTextTrack::label" + type AttrLabel DOMTextTrackLabelPropertyInfo = "label" attrGet _ = getDOMTextTrackLabel attrSet _ = undefined attrConstruct _ = undefined @@ -239,7 +296,7 @@ type AttrSetTypeConstraint DOMTextTrackLanguagePropertyInfo = (~) () type AttrBaseTypeConstraint DOMTextTrackLanguagePropertyInfo = DOMTextTrackK type AttrGetType DOMTextTrackLanguagePropertyInfo = T.Text - type AttrLabel DOMTextTrackLanguagePropertyInfo = "DOMTextTrack::language" + type AttrLabel DOMTextTrackLanguagePropertyInfo = "language" attrGet _ = getDOMTextTrackLanguage attrSet _ = undefined attrConstruct _ = undefined @@ -263,22 +320,21 @@ type AttrSetTypeConstraint DOMTextTrackModePropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMTextTrackModePropertyInfo = DOMTextTrackK type AttrGetType DOMTextTrackModePropertyInfo = T.Text - type AttrLabel DOMTextTrackModePropertyInfo = "DOMTextTrack::mode" + type AttrLabel DOMTextTrackModePropertyInfo = "mode" attrGet _ = getDOMTextTrackMode attrSet _ = setDOMTextTrackMode attrConstruct _ = constructDOMTextTrackMode type instance AttributeList DOMTextTrack = DOMTextTrackAttributeList -type DOMTextTrackAttributeList = ('[ '("active-cues", DOMTextTrackActiveCuesPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("cues", DOMTextTrackCuesPropertyInfo), '("id", DOMTextTrackIdPropertyInfo), '("kind", DOMTextTrackKindPropertyInfo), '("label", DOMTextTrackLabelPropertyInfo), '("language", DOMTextTrackLanguagePropertyInfo), '("mode", DOMTextTrackModePropertyInfo)] :: [(Symbol, *)]) +type DOMTextTrackAttributeList = ('[ '("activeCues", DOMTextTrackActiveCuesPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("cues", DOMTextTrackCuesPropertyInfo), '("id", DOMTextTrackIdPropertyInfo), '("kind", DOMTextTrackKindPropertyInfo), '("label", DOMTextTrackLabelPropertyInfo), '("language", DOMTextTrackLanguagePropertyInfo), '("mode", DOMTextTrackModePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMTextTrack = DOMTextTrackSignalList -type DOMTextTrackSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMTextTrackSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMTextTrack::add_cue -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cue", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cue", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cue", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -291,9 +347,9 @@ dOMTextTrackAddCue :: (MonadIO m, DOMTextTrackK a, DOMTextTrackCueK b) => - a -> -- _obj - b -> -- cue - m () + a -- _obj + -> b -- cue + -> m () -- result dOMTextTrackAddCue _obj cue = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let cue' = unsafeManagedPtrCastPtr cue @@ -302,11 +358,14 @@ touchManagedPtr cue return () +data DOMTextTrackAddCueMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMTextTrackK a, DOMTextTrackCueK b) => MethodInfo DOMTextTrackAddCueMethodInfo a signature where + overloadedMethod _ = dOMTextTrackAddCue + -- method DOMTextTrack::dispatch_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -320,9 +379,9 @@ {-# DEPRECATED dOMTextTrackDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-} dOMTextTrackDispatchEvent :: (MonadIO m, DOMTextTrackK a, DOMEventK b) => - a -> -- _obj - b -> -- evt - m () + a -- _obj + -> b -- evt + -> m () -- result dOMTextTrackDispatchEvent _obj evt = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let evt' = unsafeManagedPtrCastPtr evt @@ -335,11 +394,14 @@ return () ) +data DOMTextTrackDispatchEventMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMTextTrackK a, DOMEventK b) => MethodInfo DOMTextTrackDispatchEventMethodInfo a signature where + overloadedMethod _ = dOMTextTrackDispatchEvent + -- method DOMTextTrack::get_active_cues -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMTextTrackCueList" -- throws : False -- Skip return : False @@ -351,8 +413,8 @@ dOMTextTrackGetActiveCues :: (MonadIO m, DOMTextTrackK a) => - a -> -- _obj - m DOMTextTrackCueList + a -- _obj + -> m DOMTextTrackCueList -- result dOMTextTrackGetActiveCues _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_get_active_cues _obj' @@ -361,11 +423,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackGetActiveCuesMethodInfo +instance (signature ~ (m DOMTextTrackCueList), MonadIO m, DOMTextTrackK a) => MethodInfo DOMTextTrackGetActiveCuesMethodInfo a signature where + overloadedMethod _ = dOMTextTrackGetActiveCues + -- method DOMTextTrack::get_cues -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMTextTrackCueList" -- throws : False -- Skip return : False @@ -377,8 +442,8 @@ dOMTextTrackGetCues :: (MonadIO m, DOMTextTrackK a) => - a -> -- _obj - m DOMTextTrackCueList + a -- _obj + -> m DOMTextTrackCueList -- result dOMTextTrackGetCues _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_get_cues _obj' @@ -387,11 +452,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackGetCuesMethodInfo +instance (signature ~ (m DOMTextTrackCueList), MonadIO m, DOMTextTrackK a) => MethodInfo DOMTextTrackGetCuesMethodInfo a signature where + overloadedMethod _ = dOMTextTrackGetCues + -- method DOMTextTrack::get_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -403,8 +471,8 @@ dOMTextTrackGetId :: (MonadIO m, DOMTextTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMTextTrackGetId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_get_id _obj' @@ -414,11 +482,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackGetIdMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMTextTrackK a) => MethodInfo DOMTextTrackGetIdMethodInfo a signature where + overloadedMethod _ = dOMTextTrackGetId + -- method DOMTextTrack::get_kind -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -430,8 +501,8 @@ dOMTextTrackGetKind :: (MonadIO m, DOMTextTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMTextTrackGetKind _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_get_kind _obj' @@ -441,11 +512,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackGetKindMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMTextTrackK a) => MethodInfo DOMTextTrackGetKindMethodInfo a signature where + overloadedMethod _ = dOMTextTrackGetKind + -- method DOMTextTrack::get_label -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -457,8 +531,8 @@ dOMTextTrackGetLabel :: (MonadIO m, DOMTextTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMTextTrackGetLabel _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_get_label _obj' @@ -468,11 +542,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackGetLabelMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMTextTrackK a) => MethodInfo DOMTextTrackGetLabelMethodInfo a signature where + overloadedMethod _ = dOMTextTrackGetLabel + -- method DOMTextTrack::get_language -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -484,8 +561,8 @@ dOMTextTrackGetLanguage :: (MonadIO m, DOMTextTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMTextTrackGetLanguage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_get_language _obj' @@ -495,11 +572,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackGetLanguageMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMTextTrackK a) => MethodInfo DOMTextTrackGetLanguageMethodInfo a signature where + overloadedMethod _ = dOMTextTrackGetLanguage + -- method DOMTextTrack::get_mode -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -511,8 +591,8 @@ dOMTextTrackGetMode :: (MonadIO m, DOMTextTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMTextTrackGetMode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_get_mode _obj' @@ -522,11 +602,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackGetModeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMTextTrackK a) => MethodInfo DOMTextTrackGetModeMethodInfo a signature where + overloadedMethod _ = dOMTextTrackGetMode + -- method DOMTextTrack::remove_cue -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cue", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cue", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cue", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -540,9 +623,9 @@ dOMTextTrackRemoveCue :: (MonadIO m, DOMTextTrackK a, DOMTextTrackCueK b) => - a -> -- _obj - b -> -- cue - m () + a -- _obj + -> b -- cue + -> m () -- result dOMTextTrackRemoveCue _obj cue = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let cue' = unsafeManagedPtrCastPtr cue @@ -555,11 +638,14 @@ return () ) +data DOMTextTrackRemoveCueMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMTextTrackK a, DOMTextTrackCueK b) => MethodInfo DOMTextTrackRemoveCueMethodInfo a signature where + overloadedMethod _ = dOMTextTrackRemoveCue + -- method DOMTextTrack::set_mode -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -572,9 +658,9 @@ dOMTextTrackSetMode :: (MonadIO m, DOMTextTrackK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMTextTrackSetMode _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -582,5 +668,9 @@ touchManagedPtr _obj freeMem value' return () + +data DOMTextTrackSetModeMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMTextTrackK a) => MethodInfo DOMTextTrackSetModeMethodInfo a signature where + overloadedMethod _ = dOMTextTrackSetMode diff --git a/GI/WebKit/Objects/DOMTextTrack.hs-boot b/GI/WebKit/Objects/DOMTextTrack.hs-boot --- a/GI/WebKit/Objects/DOMTextTrack.hs-boot +++ b/GI/WebKit/Objects/DOMTextTrack.hs-boot @@ -18,3 +18,14 @@ data DOMTextTrackLabelPropertyInfo data DOMTextTrackLanguagePropertyInfo data DOMTextTrackModePropertyInfo +data DOMTextTrackAddCueMethodInfo +data DOMTextTrackDispatchEventMethodInfo +data DOMTextTrackGetActiveCuesMethodInfo +data DOMTextTrackGetCuesMethodInfo +data DOMTextTrackGetIdMethodInfo +data DOMTextTrackGetKindMethodInfo +data DOMTextTrackGetLabelMethodInfo +data DOMTextTrackGetLanguageMethodInfo +data DOMTextTrackGetModeMethodInfo +data DOMTextTrackRemoveCueMethodInfo +data DOMTextTrackSetModeMethodInfo diff --git a/GI/WebKit/Objects/DOMTextTrackCue.hs b/GI/WebKit/Objects/DOMTextTrackCue.hs --- a/GI/WebKit/Objects/DOMTextTrackCue.hs +++ b/GI/WebKit/Objects/DOMTextTrackCue.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,102 +18,127 @@ -- * Methods -- ** dOMTextTrackCueDispatchEvent + DOMTextTrackCueDispatchEventMethodInfo , dOMTextTrackCueDispatchEvent , -- ** dOMTextTrackCueGetAlign + DOMTextTrackCueGetAlignMethodInfo , dOMTextTrackCueGetAlign , -- ** dOMTextTrackCueGetCueAsHtml + DOMTextTrackCueGetCueAsHtmlMethodInfo , dOMTextTrackCueGetCueAsHtml , -- ** dOMTextTrackCueGetEndTime + DOMTextTrackCueGetEndTimeMethodInfo , dOMTextTrackCueGetEndTime , -- ** dOMTextTrackCueGetId + DOMTextTrackCueGetIdMethodInfo , dOMTextTrackCueGetId , -- ** dOMTextTrackCueGetLine + DOMTextTrackCueGetLineMethodInfo , dOMTextTrackCueGetLine , -- ** dOMTextTrackCueGetPauseOnExit + DOMTextTrackCueGetPauseOnExitMethodInfo , dOMTextTrackCueGetPauseOnExit , -- ** dOMTextTrackCueGetPosition + DOMTextTrackCueGetPositionMethodInfo , dOMTextTrackCueGetPosition , -- ** dOMTextTrackCueGetSize + DOMTextTrackCueGetSizeMethodInfo , dOMTextTrackCueGetSize , -- ** dOMTextTrackCueGetSnapToLines + DOMTextTrackCueGetSnapToLinesMethodInfo , dOMTextTrackCueGetSnapToLines , -- ** dOMTextTrackCueGetStartTime + DOMTextTrackCueGetStartTimeMethodInfo , dOMTextTrackCueGetStartTime , -- ** dOMTextTrackCueGetText + DOMTextTrackCueGetTextMethodInfo , dOMTextTrackCueGetText , -- ** dOMTextTrackCueGetTrack + DOMTextTrackCueGetTrackMethodInfo , dOMTextTrackCueGetTrack , -- ** dOMTextTrackCueGetVertical + DOMTextTrackCueGetVerticalMethodInfo , dOMTextTrackCueGetVertical , -- ** dOMTextTrackCueSetAlign + DOMTextTrackCueSetAlignMethodInfo , dOMTextTrackCueSetAlign , -- ** dOMTextTrackCueSetEndTime + DOMTextTrackCueSetEndTimeMethodInfo , dOMTextTrackCueSetEndTime , -- ** dOMTextTrackCueSetId + DOMTextTrackCueSetIdMethodInfo , dOMTextTrackCueSetId , -- ** dOMTextTrackCueSetLine + DOMTextTrackCueSetLineMethodInfo , dOMTextTrackCueSetLine , -- ** dOMTextTrackCueSetPauseOnExit + DOMTextTrackCueSetPauseOnExitMethodInfo , dOMTextTrackCueSetPauseOnExit , -- ** dOMTextTrackCueSetPosition + DOMTextTrackCueSetPositionMethodInfo , dOMTextTrackCueSetPosition , -- ** dOMTextTrackCueSetSize + DOMTextTrackCueSetSizeMethodInfo , dOMTextTrackCueSetSize , -- ** dOMTextTrackCueSetSnapToLines + DOMTextTrackCueSetSnapToLinesMethodInfo , dOMTextTrackCueSetSnapToLines , -- ** dOMTextTrackCueSetStartTime + DOMTextTrackCueSetStartTimeMethodInfo , dOMTextTrackCueSetStartTime , -- ** dOMTextTrackCueSetText + DOMTextTrackCueSetTextMethodInfo , dOMTextTrackCueSetText , -- ** dOMTextTrackCueSetVertical + DOMTextTrackCueSetVerticalMethodInfo , dOMTextTrackCueSetVertical , @@ -237,6 +263,65 @@ noDOMTextTrackCue :: Maybe DOMTextTrackCue noDOMTextTrackCue = Nothing +type family ResolveDOMTextTrackCueMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMTextTrackCueMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMTextTrackCueMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMTextTrackCueMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMTextTrackCueMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMTextTrackCueMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMTextTrackCueMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMTextTrackCueMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMTextTrackCueMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMTextTrackCueMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMTextTrackCueMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMTextTrackCueMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMTextTrackCueMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMTextTrackCueMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMTextTrackCueMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMTextTrackCueMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMTextTrackCueMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMTextTrackCueMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMTextTrackCueMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMTextTrackCueMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMTextTrackCueMethod "getAlign" o = DOMTextTrackCueGetAlignMethodInfo + ResolveDOMTextTrackCueMethod "getCueAsHtml" o = DOMTextTrackCueGetCueAsHtmlMethodInfo + ResolveDOMTextTrackCueMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMTextTrackCueMethod "getEndTime" o = DOMTextTrackCueGetEndTimeMethodInfo + ResolveDOMTextTrackCueMethod "getId" o = DOMTextTrackCueGetIdMethodInfo + ResolveDOMTextTrackCueMethod "getLine" o = DOMTextTrackCueGetLineMethodInfo + ResolveDOMTextTrackCueMethod "getPauseOnExit" o = DOMTextTrackCueGetPauseOnExitMethodInfo + ResolveDOMTextTrackCueMethod "getPosition" o = DOMTextTrackCueGetPositionMethodInfo + ResolveDOMTextTrackCueMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMTextTrackCueMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMTextTrackCueMethod "getSize" o = DOMTextTrackCueGetSizeMethodInfo + ResolveDOMTextTrackCueMethod "getSnapToLines" o = DOMTextTrackCueGetSnapToLinesMethodInfo + ResolveDOMTextTrackCueMethod "getStartTime" o = DOMTextTrackCueGetStartTimeMethodInfo + ResolveDOMTextTrackCueMethod "getText" o = DOMTextTrackCueGetTextMethodInfo + ResolveDOMTextTrackCueMethod "getTrack" o = DOMTextTrackCueGetTrackMethodInfo + ResolveDOMTextTrackCueMethod "getVertical" o = DOMTextTrackCueGetVerticalMethodInfo + ResolveDOMTextTrackCueMethod "setAlign" o = DOMTextTrackCueSetAlignMethodInfo + ResolveDOMTextTrackCueMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMTextTrackCueMethod "setEndTime" o = DOMTextTrackCueSetEndTimeMethodInfo + ResolveDOMTextTrackCueMethod "setId" o = DOMTextTrackCueSetIdMethodInfo + ResolveDOMTextTrackCueMethod "setLine" o = DOMTextTrackCueSetLineMethodInfo + ResolveDOMTextTrackCueMethod "setPauseOnExit" o = DOMTextTrackCueSetPauseOnExitMethodInfo + ResolveDOMTextTrackCueMethod "setPosition" o = DOMTextTrackCueSetPositionMethodInfo + ResolveDOMTextTrackCueMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMTextTrackCueMethod "setSize" o = DOMTextTrackCueSetSizeMethodInfo + ResolveDOMTextTrackCueMethod "setSnapToLines" o = DOMTextTrackCueSetSnapToLinesMethodInfo + ResolveDOMTextTrackCueMethod "setStartTime" o = DOMTextTrackCueSetStartTimeMethodInfo + ResolveDOMTextTrackCueMethod "setText" o = DOMTextTrackCueSetTextMethodInfo + ResolveDOMTextTrackCueMethod "setVertical" o = DOMTextTrackCueSetVerticalMethodInfo + ResolveDOMTextTrackCueMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMTextTrackCueMethod t DOMTextTrackCue, MethodInfo info DOMTextTrackCue p) => IsLabelProxy t (DOMTextTrackCue -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMTextTrackCueMethod t DOMTextTrackCue, MethodInfo info DOMTextTrackCue p) => IsLabel t (DOMTextTrackCue -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "align" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -256,7 +341,7 @@ type AttrSetTypeConstraint DOMTextTrackCueAlignPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMTextTrackCueAlignPropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCueAlignPropertyInfo = T.Text - type AttrLabel DOMTextTrackCueAlignPropertyInfo = "DOMTextTrackCue::align" + type AttrLabel DOMTextTrackCueAlignPropertyInfo = "align" attrGet _ = getDOMTextTrackCueAlign attrSet _ = setDOMTextTrackCueAlign attrConstruct _ = constructDOMTextTrackCueAlign @@ -280,7 +365,7 @@ type AttrSetTypeConstraint DOMTextTrackCueEndTimePropertyInfo = (~) Double type AttrBaseTypeConstraint DOMTextTrackCueEndTimePropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCueEndTimePropertyInfo = Double - type AttrLabel DOMTextTrackCueEndTimePropertyInfo = "DOMTextTrackCue::end-time" + type AttrLabel DOMTextTrackCueEndTimePropertyInfo = "end-time" attrGet _ = getDOMTextTrackCueEndTime attrSet _ = setDOMTextTrackCueEndTime attrConstruct _ = constructDOMTextTrackCueEndTime @@ -304,7 +389,7 @@ type AttrSetTypeConstraint DOMTextTrackCueIdPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMTextTrackCueIdPropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCueIdPropertyInfo = T.Text - type AttrLabel DOMTextTrackCueIdPropertyInfo = "DOMTextTrackCue::id" + type AttrLabel DOMTextTrackCueIdPropertyInfo = "id" attrGet _ = getDOMTextTrackCueId attrSet _ = setDOMTextTrackCueId attrConstruct _ = constructDOMTextTrackCueId @@ -328,7 +413,7 @@ type AttrSetTypeConstraint DOMTextTrackCueLinePropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMTextTrackCueLinePropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCueLinePropertyInfo = Int64 - type AttrLabel DOMTextTrackCueLinePropertyInfo = "DOMTextTrackCue::line" + type AttrLabel DOMTextTrackCueLinePropertyInfo = "line" attrGet _ = getDOMTextTrackCueLine attrSet _ = setDOMTextTrackCueLine attrConstruct _ = constructDOMTextTrackCueLine @@ -352,7 +437,7 @@ type AttrSetTypeConstraint DOMTextTrackCuePauseOnExitPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMTextTrackCuePauseOnExitPropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCuePauseOnExitPropertyInfo = Bool - type AttrLabel DOMTextTrackCuePauseOnExitPropertyInfo = "DOMTextTrackCue::pause-on-exit" + type AttrLabel DOMTextTrackCuePauseOnExitPropertyInfo = "pause-on-exit" attrGet _ = getDOMTextTrackCuePauseOnExit attrSet _ = setDOMTextTrackCuePauseOnExit attrConstruct _ = constructDOMTextTrackCuePauseOnExit @@ -376,7 +461,7 @@ type AttrSetTypeConstraint DOMTextTrackCuePositionPropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMTextTrackCuePositionPropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCuePositionPropertyInfo = Int64 - type AttrLabel DOMTextTrackCuePositionPropertyInfo = "DOMTextTrackCue::position" + type AttrLabel DOMTextTrackCuePositionPropertyInfo = "position" attrGet _ = getDOMTextTrackCuePosition attrSet _ = setDOMTextTrackCuePosition attrConstruct _ = constructDOMTextTrackCuePosition @@ -400,7 +485,7 @@ type AttrSetTypeConstraint DOMTextTrackCueSizePropertyInfo = (~) Int64 type AttrBaseTypeConstraint DOMTextTrackCueSizePropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCueSizePropertyInfo = Int64 - type AttrLabel DOMTextTrackCueSizePropertyInfo = "DOMTextTrackCue::size" + type AttrLabel DOMTextTrackCueSizePropertyInfo = "size" attrGet _ = getDOMTextTrackCueSize attrSet _ = setDOMTextTrackCueSize attrConstruct _ = constructDOMTextTrackCueSize @@ -424,7 +509,7 @@ type AttrSetTypeConstraint DOMTextTrackCueSnapToLinesPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMTextTrackCueSnapToLinesPropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCueSnapToLinesPropertyInfo = Bool - type AttrLabel DOMTextTrackCueSnapToLinesPropertyInfo = "DOMTextTrackCue::snap-to-lines" + type AttrLabel DOMTextTrackCueSnapToLinesPropertyInfo = "snap-to-lines" attrGet _ = getDOMTextTrackCueSnapToLines attrSet _ = setDOMTextTrackCueSnapToLines attrConstruct _ = constructDOMTextTrackCueSnapToLines @@ -448,7 +533,7 @@ type AttrSetTypeConstraint DOMTextTrackCueStartTimePropertyInfo = (~) Double type AttrBaseTypeConstraint DOMTextTrackCueStartTimePropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCueStartTimePropertyInfo = Double - type AttrLabel DOMTextTrackCueStartTimePropertyInfo = "DOMTextTrackCue::start-time" + type AttrLabel DOMTextTrackCueStartTimePropertyInfo = "start-time" attrGet _ = getDOMTextTrackCueStartTime attrSet _ = setDOMTextTrackCueStartTime attrConstruct _ = constructDOMTextTrackCueStartTime @@ -472,7 +557,7 @@ type AttrSetTypeConstraint DOMTextTrackCueTextPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMTextTrackCueTextPropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCueTextPropertyInfo = T.Text - type AttrLabel DOMTextTrackCueTextPropertyInfo = "DOMTextTrackCue::text" + type AttrLabel DOMTextTrackCueTextPropertyInfo = "text" attrGet _ = getDOMTextTrackCueText attrSet _ = setDOMTextTrackCueText attrConstruct _ = constructDOMTextTrackCueText @@ -490,7 +575,7 @@ type AttrSetTypeConstraint DOMTextTrackCueTrackPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTextTrackCueTrackPropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCueTrackPropertyInfo = DOMTextTrack - type AttrLabel DOMTextTrackCueTrackPropertyInfo = "DOMTextTrackCue::track" + type AttrLabel DOMTextTrackCueTrackPropertyInfo = "track" attrGet _ = getDOMTextTrackCueTrack attrSet _ = undefined attrConstruct _ = undefined @@ -514,22 +599,21 @@ type AttrSetTypeConstraint DOMTextTrackCueVerticalPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DOMTextTrackCueVerticalPropertyInfo = DOMTextTrackCueK type AttrGetType DOMTextTrackCueVerticalPropertyInfo = T.Text - type AttrLabel DOMTextTrackCueVerticalPropertyInfo = "DOMTextTrackCue::vertical" + type AttrLabel DOMTextTrackCueVerticalPropertyInfo = "vertical" attrGet _ = getDOMTextTrackCueVertical attrSet _ = setDOMTextTrackCueVertical attrConstruct _ = constructDOMTextTrackCueVertical type instance AttributeList DOMTextTrackCue = DOMTextTrackCueAttributeList -type DOMTextTrackCueAttributeList = ('[ '("align", DOMTextTrackCueAlignPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("end-time", DOMTextTrackCueEndTimePropertyInfo), '("id", DOMTextTrackCueIdPropertyInfo), '("line", DOMTextTrackCueLinePropertyInfo), '("pause-on-exit", DOMTextTrackCuePauseOnExitPropertyInfo), '("position", DOMTextTrackCuePositionPropertyInfo), '("size", DOMTextTrackCueSizePropertyInfo), '("snap-to-lines", DOMTextTrackCueSnapToLinesPropertyInfo), '("start-time", DOMTextTrackCueStartTimePropertyInfo), '("text", DOMTextTrackCueTextPropertyInfo), '("track", DOMTextTrackCueTrackPropertyInfo), '("vertical", DOMTextTrackCueVerticalPropertyInfo)] :: [(Symbol, *)]) +type DOMTextTrackCueAttributeList = ('[ '("align", DOMTextTrackCueAlignPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("endTime", DOMTextTrackCueEndTimePropertyInfo), '("id", DOMTextTrackCueIdPropertyInfo), '("line", DOMTextTrackCueLinePropertyInfo), '("pauseOnExit", DOMTextTrackCuePauseOnExitPropertyInfo), '("position", DOMTextTrackCuePositionPropertyInfo), '("size", DOMTextTrackCueSizePropertyInfo), '("snapToLines", DOMTextTrackCueSnapToLinesPropertyInfo), '("startTime", DOMTextTrackCueStartTimePropertyInfo), '("text", DOMTextTrackCueTextPropertyInfo), '("track", DOMTextTrackCueTrackPropertyInfo), '("vertical", DOMTextTrackCueVerticalPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMTextTrackCue = DOMTextTrackCueSignalList -type DOMTextTrackCueSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMTextTrackCueSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMTextTrackCue::dispatch_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -543,9 +627,9 @@ {-# DEPRECATED dOMTextTrackCueDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-} dOMTextTrackCueDispatchEvent :: (MonadIO m, DOMTextTrackCueK a, DOMEventK b) => - a -> -- _obj - b -> -- evt - m () + a -- _obj + -> b -- evt + -> m () -- result dOMTextTrackCueDispatchEvent _obj evt = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let evt' = unsafeManagedPtrCastPtr evt @@ -558,11 +642,14 @@ return () ) +data DOMTextTrackCueDispatchEventMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMTextTrackCueK a, DOMEventK b) => MethodInfo DOMTextTrackCueDispatchEventMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueDispatchEvent + -- method DOMTextTrackCue::get_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -574,8 +661,8 @@ dOMTextTrackCueGetAlign :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMTextTrackCueGetAlign _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_align _obj' @@ -585,11 +672,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackCueGetAlignMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetAlignMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetAlign + -- method DOMTextTrackCue::get_cue_as_html -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDocumentFragment" -- throws : False -- Skip return : False @@ -601,8 +691,8 @@ dOMTextTrackCueGetCueAsHtml :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m DOMDocumentFragment + a -- _obj + -> m DOMDocumentFragment -- result dOMTextTrackCueGetCueAsHtml _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_cue_as_html _obj' @@ -611,11 +701,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackCueGetCueAsHtmlMethodInfo +instance (signature ~ (m DOMDocumentFragment), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetCueAsHtmlMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetCueAsHtml + -- method DOMTextTrackCue::get_end_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -627,8 +720,8 @@ dOMTextTrackCueGetEndTime :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMTextTrackCueGetEndTime _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_end_time _obj' @@ -636,11 +729,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackCueGetEndTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetEndTimeMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetEndTime + -- method DOMTextTrackCue::get_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -652,8 +748,8 @@ dOMTextTrackCueGetId :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMTextTrackCueGetId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_id _obj' @@ -663,11 +759,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackCueGetIdMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetIdMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetId + -- method DOMTextTrackCue::get_line -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -679,19 +778,22 @@ dOMTextTrackCueGetLine :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMTextTrackCueGetLine _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_line _obj' touchManagedPtr _obj return result +data DOMTextTrackCueGetLineMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetLineMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetLine + -- method DOMTextTrackCue::get_pause_on_exit -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -703,8 +805,8 @@ dOMTextTrackCueGetPauseOnExit :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMTextTrackCueGetPauseOnExit _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_pause_on_exit _obj' @@ -712,11 +814,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackCueGetPauseOnExitMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetPauseOnExitMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetPauseOnExit + -- method DOMTextTrackCue::get_position -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -728,19 +833,22 @@ dOMTextTrackCueGetPosition :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMTextTrackCueGetPosition _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_position _obj' touchManagedPtr _obj return result +data DOMTextTrackCueGetPositionMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetPositionMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetPosition + -- method DOMTextTrackCue::get_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -752,19 +860,22 @@ dOMTextTrackCueGetSize :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMTextTrackCueGetSize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_size _obj' touchManagedPtr _obj return result +data DOMTextTrackCueGetSizeMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetSizeMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetSize + -- method DOMTextTrackCue::get_snap_to_lines -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -776,8 +887,8 @@ dOMTextTrackCueGetSnapToLines :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMTextTrackCueGetSnapToLines _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_snap_to_lines _obj' @@ -785,11 +896,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackCueGetSnapToLinesMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetSnapToLinesMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetSnapToLines + -- method DOMTextTrackCue::get_start_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -801,8 +915,8 @@ dOMTextTrackCueGetStartTime :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMTextTrackCueGetStartTime _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_start_time _obj' @@ -810,11 +924,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackCueGetStartTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetStartTimeMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetStartTime + -- method DOMTextTrackCue::get_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -826,8 +943,8 @@ dOMTextTrackCueGetText :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMTextTrackCueGetText _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_text _obj' @@ -837,11 +954,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackCueGetTextMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetTextMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetText + -- method DOMTextTrackCue::get_track -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMTextTrack" -- throws : False -- Skip return : False @@ -853,8 +973,8 @@ dOMTextTrackCueGetTrack :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m DOMTextTrack + a -- _obj + -> m DOMTextTrack -- result dOMTextTrackCueGetTrack _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_track _obj' @@ -863,11 +983,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackCueGetTrackMethodInfo +instance (signature ~ (m DOMTextTrack), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetTrackMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetTrack + -- method DOMTextTrackCue::get_vertical -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -879,8 +1002,8 @@ dOMTextTrackCueGetVertical :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMTextTrackCueGetVertical _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_get_vertical _obj' @@ -890,11 +1013,14 @@ touchManagedPtr _obj return result' +data DOMTextTrackCueGetVerticalMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueGetVerticalMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueGetVertical + -- method DOMTextTrackCue::set_align -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -908,9 +1034,9 @@ dOMTextTrackCueSetAlign :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMTextTrackCueSetAlign _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -923,11 +1049,14 @@ freeMem value' ) +data DOMTextTrackCueSetAlignMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueSetAlignMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueSetAlign + -- method DOMTextTrackCue::set_end_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -941,9 +1070,9 @@ dOMTextTrackCueSetEndTime :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - Double -> -- value - m () + a -- _obj + -> Double -- value + -> m () -- result dOMTextTrackCueSetEndTime _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = realToFrac value @@ -955,11 +1084,14 @@ return () ) +data DOMTextTrackCueSetEndTimeMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueSetEndTimeMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueSetEndTime + -- method DOMTextTrackCue::set_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -972,9 +1104,9 @@ dOMTextTrackCueSetId :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMTextTrackCueSetId _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -983,11 +1115,14 @@ freeMem value' return () +data DOMTextTrackCueSetIdMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueSetIdMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueSetId + -- method DOMTextTrackCue::set_line -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1001,9 +1136,9 @@ dOMTextTrackCueSetLine :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMTextTrackCueSetLine _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -1014,11 +1149,14 @@ return () ) +data DOMTextTrackCueSetLineMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueSetLineMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueSetLine + -- method DOMTextTrackCue::set_pause_on_exit -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1031,9 +1169,9 @@ dOMTextTrackCueSetPauseOnExit :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMTextTrackCueSetPauseOnExit _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1041,11 +1179,14 @@ touchManagedPtr _obj return () +data DOMTextTrackCueSetPauseOnExitMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueSetPauseOnExitMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueSetPauseOnExit + -- method DOMTextTrackCue::set_position -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1059,9 +1200,9 @@ dOMTextTrackCueSetPosition :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMTextTrackCueSetPosition _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -1072,11 +1213,14 @@ return () ) +data DOMTextTrackCueSetPositionMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueSetPositionMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueSetPosition + -- method DOMTextTrackCue::set_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1090,9 +1234,9 @@ dOMTextTrackCueSetSize :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - Int64 -> -- value - m () + a -- _obj + -> Int64 -- value + -> m () -- result dOMTextTrackCueSetSize _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -1103,11 +1247,14 @@ return () ) +data DOMTextTrackCueSetSizeMethodInfo +instance (signature ~ (Int64 -> m ()), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueSetSizeMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueSetSize + -- method DOMTextTrackCue::set_snap_to_lines -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1120,9 +1267,9 @@ dOMTextTrackCueSetSnapToLines :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMTextTrackCueSetSnapToLines _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value @@ -1130,11 +1277,14 @@ touchManagedPtr _obj return () +data DOMTextTrackCueSetSnapToLinesMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueSetSnapToLinesMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueSetSnapToLines + -- method DOMTextTrackCue::set_start_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1148,9 +1298,9 @@ dOMTextTrackCueSetStartTime :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - Double -> -- value - m () + a -- _obj + -> Double -- value + -> m () -- result dOMTextTrackCueSetStartTime _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = realToFrac value @@ -1162,11 +1312,14 @@ return () ) +data DOMTextTrackCueSetStartTimeMethodInfo +instance (signature ~ (Double -> m ()), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueSetStartTimeMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueSetStartTime + -- method DOMTextTrackCue::set_text -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1179,9 +1332,9 @@ dOMTextTrackCueSetText :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMTextTrackCueSetText _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1190,11 +1343,14 @@ freeMem value' return () +data DOMTextTrackCueSetTextMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueSetTextMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueSetText + -- method DOMTextTrackCue::set_vertical -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCue", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -1208,9 +1364,9 @@ dOMTextTrackCueSetVertical :: (MonadIO m, DOMTextTrackCueK a) => - a -> -- _obj - T.Text -> -- value - m () + a -- _obj + -> T.Text -- value + -> m () -- result dOMTextTrackCueSetVertical _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj value' <- textToCString value @@ -1222,5 +1378,9 @@ ) (do freeMem value' ) + +data DOMTextTrackCueSetVerticalMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DOMTextTrackCueK a) => MethodInfo DOMTextTrackCueSetVerticalMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueSetVertical diff --git a/GI/WebKit/Objects/DOMTextTrackCue.hs-boot b/GI/WebKit/Objects/DOMTextTrackCue.hs-boot --- a/GI/WebKit/Objects/DOMTextTrackCue.hs-boot +++ b/GI/WebKit/Objects/DOMTextTrackCue.hs-boot @@ -23,3 +23,28 @@ data DOMTextTrackCueTextPropertyInfo data DOMTextTrackCueTrackPropertyInfo data DOMTextTrackCueVerticalPropertyInfo +data DOMTextTrackCueDispatchEventMethodInfo +data DOMTextTrackCueGetAlignMethodInfo +data DOMTextTrackCueGetCueAsHtmlMethodInfo +data DOMTextTrackCueGetEndTimeMethodInfo +data DOMTextTrackCueGetIdMethodInfo +data DOMTextTrackCueGetLineMethodInfo +data DOMTextTrackCueGetPauseOnExitMethodInfo +data DOMTextTrackCueGetPositionMethodInfo +data DOMTextTrackCueGetSizeMethodInfo +data DOMTextTrackCueGetSnapToLinesMethodInfo +data DOMTextTrackCueGetStartTimeMethodInfo +data DOMTextTrackCueGetTextMethodInfo +data DOMTextTrackCueGetTrackMethodInfo +data DOMTextTrackCueGetVerticalMethodInfo +data DOMTextTrackCueSetAlignMethodInfo +data DOMTextTrackCueSetEndTimeMethodInfo +data DOMTextTrackCueSetIdMethodInfo +data DOMTextTrackCueSetLineMethodInfo +data DOMTextTrackCueSetPauseOnExitMethodInfo +data DOMTextTrackCueSetPositionMethodInfo +data DOMTextTrackCueSetSizeMethodInfo +data DOMTextTrackCueSetSnapToLinesMethodInfo +data DOMTextTrackCueSetStartTimeMethodInfo +data DOMTextTrackCueSetTextMethodInfo +data DOMTextTrackCueSetVerticalMethodInfo diff --git a/GI/WebKit/Objects/DOMTextTrackCueList.hs b/GI/WebKit/Objects/DOMTextTrackCueList.hs --- a/GI/WebKit/Objects/DOMTextTrackCueList.hs +++ b/GI/WebKit/Objects/DOMTextTrackCueList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMTextTrackCueListGetCueById + DOMTextTrackCueListGetCueByIdMethodInfo , dOMTextTrackCueListGetCueById , -- ** dOMTextTrackCueListGetLength + DOMTextTrackCueListGetLengthMethodInfo , dOMTextTrackCueListGetLength , -- ** dOMTextTrackCueListItem + DOMTextTrackCueListItemMethodInfo , dOMTextTrackCueListItem , @@ -72,6 +76,42 @@ noDOMTextTrackCueList :: Maybe DOMTextTrackCueList noDOMTextTrackCueList = Nothing +type family ResolveDOMTextTrackCueListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMTextTrackCueListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMTextTrackCueListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMTextTrackCueListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMTextTrackCueListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMTextTrackCueListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMTextTrackCueListMethod "item" o = DOMTextTrackCueListItemMethodInfo + ResolveDOMTextTrackCueListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMTextTrackCueListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMTextTrackCueListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMTextTrackCueListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMTextTrackCueListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMTextTrackCueListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMTextTrackCueListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMTextTrackCueListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMTextTrackCueListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMTextTrackCueListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMTextTrackCueListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMTextTrackCueListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMTextTrackCueListMethod "getCueById" o = DOMTextTrackCueListGetCueByIdMethodInfo + ResolveDOMTextTrackCueListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMTextTrackCueListMethod "getLength" o = DOMTextTrackCueListGetLengthMethodInfo + ResolveDOMTextTrackCueListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMTextTrackCueListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMTextTrackCueListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMTextTrackCueListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMTextTrackCueListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMTextTrackCueListMethod t DOMTextTrackCueList, MethodInfo info DOMTextTrackCueList p) => IsLabelProxy t (DOMTextTrackCueList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMTextTrackCueListMethod t DOMTextTrackCueList, MethodInfo info DOMTextTrackCueList p) => IsLabel t (DOMTextTrackCueList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -85,22 +125,21 @@ type AttrSetTypeConstraint DOMTextTrackCueListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTextTrackCueListLengthPropertyInfo = DOMTextTrackCueListK type AttrGetType DOMTextTrackCueListLengthPropertyInfo = Word64 - type AttrLabel DOMTextTrackCueListLengthPropertyInfo = "DOMTextTrackCueList::length" + type AttrLabel DOMTextTrackCueListLengthPropertyInfo = "length" attrGet _ = getDOMTextTrackCueListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMTextTrackCueList = DOMTextTrackCueListAttributeList -type DOMTextTrackCueListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMTextTrackCueListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMTextTrackCueListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMTextTrackCueListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMTextTrackCueList = DOMTextTrackCueListSignalList -type DOMTextTrackCueListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMTextTrackCueListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMTextTrackCueList::get_cue_by_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCueList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCueList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCueList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMTextTrackCue" -- throws : False -- Skip return : False @@ -113,9 +152,9 @@ dOMTextTrackCueListGetCueById :: (MonadIO m, DOMTextTrackCueListK a) => - a -> -- _obj - T.Text -> -- id - m DOMTextTrackCue + a -- _obj + -> T.Text -- id + -> m DOMTextTrackCue -- result dOMTextTrackCueListGetCueById _obj id = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj id' <- textToCString id @@ -126,11 +165,14 @@ freeMem id' return result' +data DOMTextTrackCueListGetCueByIdMethodInfo +instance (signature ~ (T.Text -> m DOMTextTrackCue), MonadIO m, DOMTextTrackCueListK a) => MethodInfo DOMTextTrackCueListGetCueByIdMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueListGetCueById + -- method DOMTextTrackCueList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCueList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCueList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCueList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -142,19 +184,22 @@ dOMTextTrackCueListGetLength :: (MonadIO m, DOMTextTrackCueListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMTextTrackCueListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_list_get_length _obj' touchManagedPtr _obj return result +data DOMTextTrackCueListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMTextTrackCueListK a) => MethodInfo DOMTextTrackCueListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueListGetLength + -- method DOMTextTrackCueList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCueList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCueList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackCueList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMTextTrackCue" -- throws : False -- Skip return : False @@ -167,9 +212,9 @@ dOMTextTrackCueListItem :: (MonadIO m, DOMTextTrackCueListK a) => - a -> -- _obj - Word64 -> -- index - m DOMTextTrackCue + a -- _obj + -> Word64 -- index + -> m DOMTextTrackCue -- result dOMTextTrackCueListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_cue_list_item _obj' index @@ -177,5 +222,9 @@ result' <- (newObject DOMTextTrackCue) result touchManagedPtr _obj return result' + +data DOMTextTrackCueListItemMethodInfo +instance (signature ~ (Word64 -> m DOMTextTrackCue), MonadIO m, DOMTextTrackCueListK a) => MethodInfo DOMTextTrackCueListItemMethodInfo a signature where + overloadedMethod _ = dOMTextTrackCueListItem diff --git a/GI/WebKit/Objects/DOMTextTrackCueList.hs-boot b/GI/WebKit/Objects/DOMTextTrackCueList.hs-boot --- a/GI/WebKit/Objects/DOMTextTrackCueList.hs-boot +++ b/GI/WebKit/Objects/DOMTextTrackCueList.hs-boot @@ -12,3 +12,6 @@ class GObject o => DOMTextTrackCueListK o instance (GObject o, IsDescendantOf DOMTextTrackCueList o) => DOMTextTrackCueListK o data DOMTextTrackCueListLengthPropertyInfo +data DOMTextTrackCueListGetCueByIdMethodInfo +data DOMTextTrackCueListGetLengthMethodInfo +data DOMTextTrackCueListItemMethodInfo diff --git a/GI/WebKit/Objects/DOMTextTrackList.hs b/GI/WebKit/Objects/DOMTextTrackList.hs --- a/GI/WebKit/Objects/DOMTextTrackList.hs +++ b/GI/WebKit/Objects/DOMTextTrackList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMTextTrackListDispatchEvent + DOMTextTrackListDispatchEventMethodInfo , dOMTextTrackListDispatchEvent , -- ** dOMTextTrackListGetLength + DOMTextTrackListGetLengthMethodInfo , dOMTextTrackListGetLength , -- ** dOMTextTrackListGetTrackById + DOMTextTrackListGetTrackByIdMethodInfo , dOMTextTrackListGetTrackById , -- ** dOMTextTrackListItem + DOMTextTrackListItemMethodInfo , dOMTextTrackListItem , @@ -76,6 +81,44 @@ noDOMTextTrackList :: Maybe DOMTextTrackList noDOMTextTrackList = Nothing +type family ResolveDOMTextTrackListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMTextTrackListMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMTextTrackListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMTextTrackListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMTextTrackListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMTextTrackListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMTextTrackListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMTextTrackListMethod "item" o = DOMTextTrackListItemMethodInfo + ResolveDOMTextTrackListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMTextTrackListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMTextTrackListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMTextTrackListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMTextTrackListMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMTextTrackListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMTextTrackListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMTextTrackListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMTextTrackListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMTextTrackListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMTextTrackListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMTextTrackListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMTextTrackListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMTextTrackListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMTextTrackListMethod "getLength" o = DOMTextTrackListGetLengthMethodInfo + ResolveDOMTextTrackListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMTextTrackListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMTextTrackListMethod "getTrackById" o = DOMTextTrackListGetTrackByIdMethodInfo + ResolveDOMTextTrackListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMTextTrackListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMTextTrackListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMTextTrackListMethod t DOMTextTrackList, MethodInfo info DOMTextTrackList p) => IsLabelProxy t (DOMTextTrackList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMTextTrackListMethod t DOMTextTrackList, MethodInfo info DOMTextTrackList p) => IsLabel t (DOMTextTrackList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -89,22 +132,21 @@ type AttrSetTypeConstraint DOMTextTrackListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTextTrackListLengthPropertyInfo = DOMTextTrackListK type AttrGetType DOMTextTrackListLengthPropertyInfo = Word64 - type AttrLabel DOMTextTrackListLengthPropertyInfo = "DOMTextTrackList::length" + type AttrLabel DOMTextTrackListLengthPropertyInfo = "length" attrGet _ = getDOMTextTrackListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMTextTrackList = DOMTextTrackListAttributeList -type DOMTextTrackListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMTextTrackListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMTextTrackListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMTextTrackListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMTextTrackList = DOMTextTrackListSignalList -type DOMTextTrackListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMTextTrackListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMTextTrackList::dispatch_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -118,9 +160,9 @@ {-# DEPRECATED dOMTextTrackListDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-} dOMTextTrackListDispatchEvent :: (MonadIO m, DOMTextTrackListK a, DOMEventK b) => - a -> -- _obj - b -> -- evt - m () + a -- _obj + -> b -- evt + -> m () -- result dOMTextTrackListDispatchEvent _obj evt = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let evt' = unsafeManagedPtrCastPtr evt @@ -133,11 +175,14 @@ return () ) +data DOMTextTrackListDispatchEventMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMTextTrackListK a, DOMEventK b) => MethodInfo DOMTextTrackListDispatchEventMethodInfo a signature where + overloadedMethod _ = dOMTextTrackListDispatchEvent + -- method DOMTextTrackList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -149,19 +194,22 @@ dOMTextTrackListGetLength :: (MonadIO m, DOMTextTrackListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMTextTrackListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_list_get_length _obj' touchManagedPtr _obj return result +data DOMTextTrackListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMTextTrackListK a) => MethodInfo DOMTextTrackListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMTextTrackListGetLength + -- method DOMTextTrackList::get_track_by_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMTextTrack" -- throws : False -- Skip return : False @@ -174,9 +222,9 @@ dOMTextTrackListGetTrackById :: (MonadIO m, DOMTextTrackListK a) => - a -> -- _obj - T.Text -> -- id - m DOMTextTrack + a -- _obj + -> T.Text -- id + -> m DOMTextTrack -- result dOMTextTrackListGetTrackById _obj id = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj id' <- textToCString id @@ -187,11 +235,14 @@ freeMem id' return result' +data DOMTextTrackListGetTrackByIdMethodInfo +instance (signature ~ (T.Text -> m DOMTextTrack), MonadIO m, DOMTextTrackListK a) => MethodInfo DOMTextTrackListGetTrackByIdMethodInfo a signature where + overloadedMethod _ = dOMTextTrackListGetTrackById + -- method DOMTextTrackList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTextTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMTextTrack" -- throws : False -- Skip return : False @@ -204,9 +255,9 @@ dOMTextTrackListItem :: (MonadIO m, DOMTextTrackListK a) => - a -> -- _obj - Word64 -> -- index - m DOMTextTrack + a -- _obj + -> Word64 -- index + -> m DOMTextTrack -- result dOMTextTrackListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_text_track_list_item _obj' index @@ -214,5 +265,9 @@ result' <- (wrapObject DOMTextTrack) result touchManagedPtr _obj return result' + +data DOMTextTrackListItemMethodInfo +instance (signature ~ (Word64 -> m DOMTextTrack), MonadIO m, DOMTextTrackListK a) => MethodInfo DOMTextTrackListItemMethodInfo a signature where + overloadedMethod _ = dOMTextTrackListItem diff --git a/GI/WebKit/Objects/DOMTextTrackList.hs-boot b/GI/WebKit/Objects/DOMTextTrackList.hs-boot --- a/GI/WebKit/Objects/DOMTextTrackList.hs-boot +++ b/GI/WebKit/Objects/DOMTextTrackList.hs-boot @@ -12,3 +12,7 @@ class GObject o => DOMTextTrackListK o instance (GObject o, IsDescendantOf DOMTextTrackList o) => DOMTextTrackListK o data DOMTextTrackListLengthPropertyInfo +data DOMTextTrackListDispatchEventMethodInfo +data DOMTextTrackListGetLengthMethodInfo +data DOMTextTrackListGetTrackByIdMethodInfo +data DOMTextTrackListItemMethodInfo diff --git a/GI/WebKit/Objects/DOMTimeRanges.hs b/GI/WebKit/Objects/DOMTimeRanges.hs --- a/GI/WebKit/Objects/DOMTimeRanges.hs +++ b/GI/WebKit/Objects/DOMTimeRanges.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** dOMTimeRangesEnd + DOMTimeRangesEndMethodInfo , dOMTimeRangesEnd , -- ** dOMTimeRangesGetLength + DOMTimeRangesGetLengthMethodInfo , dOMTimeRangesGetLength , -- ** dOMTimeRangesStart + DOMTimeRangesStartMethodInfo , dOMTimeRangesStart , @@ -72,6 +76,42 @@ noDOMTimeRanges :: Maybe DOMTimeRanges noDOMTimeRanges = Nothing +type family ResolveDOMTimeRangesMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMTimeRangesMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMTimeRangesMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMTimeRangesMethod "end" o = DOMTimeRangesEndMethodInfo + ResolveDOMTimeRangesMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMTimeRangesMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMTimeRangesMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMTimeRangesMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMTimeRangesMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMTimeRangesMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMTimeRangesMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMTimeRangesMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMTimeRangesMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMTimeRangesMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMTimeRangesMethod "start" o = DOMTimeRangesStartMethodInfo + ResolveDOMTimeRangesMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMTimeRangesMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMTimeRangesMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMTimeRangesMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMTimeRangesMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMTimeRangesMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMTimeRangesMethod "getLength" o = DOMTimeRangesGetLengthMethodInfo + ResolveDOMTimeRangesMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMTimeRangesMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMTimeRangesMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMTimeRangesMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMTimeRangesMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMTimeRangesMethod t DOMTimeRanges, MethodInfo info DOMTimeRanges p) => IsLabelProxy t (DOMTimeRanges -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMTimeRangesMethod t DOMTimeRanges, MethodInfo info DOMTimeRanges p) => IsLabel t (DOMTimeRanges -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -85,22 +125,21 @@ type AttrSetTypeConstraint DOMTimeRangesLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTimeRangesLengthPropertyInfo = DOMTimeRangesK type AttrGetType DOMTimeRangesLengthPropertyInfo = Word64 - type AttrLabel DOMTimeRangesLengthPropertyInfo = "DOMTimeRanges::length" + type AttrLabel DOMTimeRangesLengthPropertyInfo = "length" attrGet _ = getDOMTimeRangesLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMTimeRanges = DOMTimeRangesAttributeList -type DOMTimeRangesAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMTimeRangesLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMTimeRangesAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMTimeRangesLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMTimeRanges = DOMTimeRangesSignalList -type DOMTimeRangesSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMTimeRangesSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMTimeRanges::end -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTimeRanges", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTimeRanges", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTimeRanges", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : True -- Skip return : False @@ -114,9 +153,9 @@ dOMTimeRangesEnd :: (MonadIO m, DOMTimeRangesK a) => - a -> -- _obj - Word64 -> -- index - m Double + a -- _obj + -> Word64 -- index + -> m Double -- result dOMTimeRangesEnd _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -128,11 +167,14 @@ return () ) +data DOMTimeRangesEndMethodInfo +instance (signature ~ (Word64 -> m Double), MonadIO m, DOMTimeRangesK a) => MethodInfo DOMTimeRangesEndMethodInfo a signature where + overloadedMethod _ = dOMTimeRangesEnd + -- method DOMTimeRanges::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTimeRanges", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTimeRanges", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTimeRanges", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -144,19 +186,22 @@ dOMTimeRangesGetLength :: (MonadIO m, DOMTimeRangesK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMTimeRangesGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_time_ranges_get_length _obj' touchManagedPtr _obj return result +data DOMTimeRangesGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMTimeRangesK a) => MethodInfo DOMTimeRangesGetLengthMethodInfo a signature where + overloadedMethod _ = dOMTimeRangesGetLength + -- method DOMTimeRanges::start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTimeRanges", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTimeRanges", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTimeRanges", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : True -- Skip return : False @@ -170,9 +215,9 @@ dOMTimeRangesStart :: (MonadIO m, DOMTimeRangesK a) => - a -> -- _obj - Word64 -> -- index - m Double + a -- _obj + -> Word64 -- index + -> m Double -- result dOMTimeRangesStart _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -183,5 +228,9 @@ ) (do return () ) + +data DOMTimeRangesStartMethodInfo +instance (signature ~ (Word64 -> m Double), MonadIO m, DOMTimeRangesK a) => MethodInfo DOMTimeRangesStartMethodInfo a signature where + overloadedMethod _ = dOMTimeRangesStart diff --git a/GI/WebKit/Objects/DOMTimeRanges.hs-boot b/GI/WebKit/Objects/DOMTimeRanges.hs-boot --- a/GI/WebKit/Objects/DOMTimeRanges.hs-boot +++ b/GI/WebKit/Objects/DOMTimeRanges.hs-boot @@ -12,3 +12,6 @@ class GObject o => DOMTimeRangesK o instance (GObject o, IsDescendantOf DOMTimeRanges o) => DOMTimeRangesK o data DOMTimeRangesLengthPropertyInfo +data DOMTimeRangesEndMethodInfo +data DOMTimeRangesGetLengthMethodInfo +data DOMTimeRangesStartMethodInfo diff --git a/GI/WebKit/Objects/DOMTouch.hs b/GI/WebKit/Objects/DOMTouch.hs --- a/GI/WebKit/Objects/DOMTouch.hs +++ b/GI/WebKit/Objects/DOMTouch.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,50 +18,62 @@ -- * Methods -- ** dOMTouchGetClientX + DOMTouchGetClientXMethodInfo , dOMTouchGetClientX , -- ** dOMTouchGetClientY + DOMTouchGetClientYMethodInfo , dOMTouchGetClientY , -- ** dOMTouchGetIdentifier + DOMTouchGetIdentifierMethodInfo , dOMTouchGetIdentifier , -- ** dOMTouchGetPageX + DOMTouchGetPageXMethodInfo , dOMTouchGetPageX , -- ** dOMTouchGetPageY + DOMTouchGetPageYMethodInfo , dOMTouchGetPageY , -- ** dOMTouchGetScreenX + DOMTouchGetScreenXMethodInfo , dOMTouchGetScreenX , -- ** dOMTouchGetScreenY + DOMTouchGetScreenYMethodInfo , dOMTouchGetScreenY , -- ** dOMTouchGetTarget + DOMTouchGetTargetMethodInfo , dOMTouchGetTarget , -- ** dOMTouchGetWebkitForce + DOMTouchGetWebkitForceMethodInfo , dOMTouchGetWebkitForce , -- ** dOMTouchGetWebkitRadiusX + DOMTouchGetWebkitRadiusXMethodInfo , dOMTouchGetWebkitRadiusX , -- ** dOMTouchGetWebkitRadiusY + DOMTouchGetWebkitRadiusYMethodInfo , dOMTouchGetWebkitRadiusY , -- ** dOMTouchGetWebkitRotationAngle + DOMTouchGetWebkitRotationAngleMethodInfo, dOMTouchGetWebkitRotationAngle , @@ -163,6 +176,51 @@ noDOMTouch :: Maybe DOMTouch noDOMTouch = Nothing +type family ResolveDOMTouchMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMTouchMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMTouchMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMTouchMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMTouchMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMTouchMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMTouchMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMTouchMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMTouchMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMTouchMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMTouchMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMTouchMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMTouchMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMTouchMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMTouchMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMTouchMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMTouchMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMTouchMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMTouchMethod "getClientX" o = DOMTouchGetClientXMethodInfo + ResolveDOMTouchMethod "getClientY" o = DOMTouchGetClientYMethodInfo + ResolveDOMTouchMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMTouchMethod "getIdentifier" o = DOMTouchGetIdentifierMethodInfo + ResolveDOMTouchMethod "getPageX" o = DOMTouchGetPageXMethodInfo + ResolveDOMTouchMethod "getPageY" o = DOMTouchGetPageYMethodInfo + ResolveDOMTouchMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMTouchMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMTouchMethod "getScreenX" o = DOMTouchGetScreenXMethodInfo + ResolveDOMTouchMethod "getScreenY" o = DOMTouchGetScreenYMethodInfo + ResolveDOMTouchMethod "getTarget" o = DOMTouchGetTargetMethodInfo + ResolveDOMTouchMethod "getWebkitForce" o = DOMTouchGetWebkitForceMethodInfo + ResolveDOMTouchMethod "getWebkitRadiusX" o = DOMTouchGetWebkitRadiusXMethodInfo + ResolveDOMTouchMethod "getWebkitRadiusY" o = DOMTouchGetWebkitRadiusYMethodInfo + ResolveDOMTouchMethod "getWebkitRotationAngle" o = DOMTouchGetWebkitRotationAngleMethodInfo + ResolveDOMTouchMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMTouchMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMTouchMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMTouchMethod t DOMTouch, MethodInfo info DOMTouch p) => IsLabelProxy t (DOMTouch -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMTouchMethod t DOMTouch, MethodInfo info DOMTouch p) => IsLabel t (DOMTouch -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "client-x" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] @@ -176,7 +234,7 @@ type AttrSetTypeConstraint DOMTouchClientXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchClientXPropertyInfo = DOMTouchK type AttrGetType DOMTouchClientXPropertyInfo = Int64 - type AttrLabel DOMTouchClientXPropertyInfo = "DOMTouch::client-x" + type AttrLabel DOMTouchClientXPropertyInfo = "client-x" attrGet _ = getDOMTouchClientX attrSet _ = undefined attrConstruct _ = undefined @@ -194,7 +252,7 @@ type AttrSetTypeConstraint DOMTouchClientYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchClientYPropertyInfo = DOMTouchK type AttrGetType DOMTouchClientYPropertyInfo = Int64 - type AttrLabel DOMTouchClientYPropertyInfo = "DOMTouch::client-y" + type AttrLabel DOMTouchClientYPropertyInfo = "client-y" attrGet _ = getDOMTouchClientY attrSet _ = undefined attrConstruct _ = undefined @@ -212,7 +270,7 @@ type AttrSetTypeConstraint DOMTouchIdentifierPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchIdentifierPropertyInfo = DOMTouchK type AttrGetType DOMTouchIdentifierPropertyInfo = Word64 - type AttrLabel DOMTouchIdentifierPropertyInfo = "DOMTouch::identifier" + type AttrLabel DOMTouchIdentifierPropertyInfo = "identifier" attrGet _ = getDOMTouchIdentifier attrSet _ = undefined attrConstruct _ = undefined @@ -230,7 +288,7 @@ type AttrSetTypeConstraint DOMTouchPageXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchPageXPropertyInfo = DOMTouchK type AttrGetType DOMTouchPageXPropertyInfo = Int64 - type AttrLabel DOMTouchPageXPropertyInfo = "DOMTouch::page-x" + type AttrLabel DOMTouchPageXPropertyInfo = "page-x" attrGet _ = getDOMTouchPageX attrSet _ = undefined attrConstruct _ = undefined @@ -248,7 +306,7 @@ type AttrSetTypeConstraint DOMTouchPageYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchPageYPropertyInfo = DOMTouchK type AttrGetType DOMTouchPageYPropertyInfo = Int64 - type AttrLabel DOMTouchPageYPropertyInfo = "DOMTouch::page-y" + type AttrLabel DOMTouchPageYPropertyInfo = "page-y" attrGet _ = getDOMTouchPageY attrSet _ = undefined attrConstruct _ = undefined @@ -266,7 +324,7 @@ type AttrSetTypeConstraint DOMTouchScreenXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchScreenXPropertyInfo = DOMTouchK type AttrGetType DOMTouchScreenXPropertyInfo = Int64 - type AttrLabel DOMTouchScreenXPropertyInfo = "DOMTouch::screen-x" + type AttrLabel DOMTouchScreenXPropertyInfo = "screen-x" attrGet _ = getDOMTouchScreenX attrSet _ = undefined attrConstruct _ = undefined @@ -284,7 +342,7 @@ type AttrSetTypeConstraint DOMTouchScreenYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchScreenYPropertyInfo = DOMTouchK type AttrGetType DOMTouchScreenYPropertyInfo = Int64 - type AttrLabel DOMTouchScreenYPropertyInfo = "DOMTouch::screen-y" + type AttrLabel DOMTouchScreenYPropertyInfo = "screen-y" attrGet _ = getDOMTouchScreenY attrSet _ = undefined attrConstruct _ = undefined @@ -302,7 +360,7 @@ type AttrSetTypeConstraint DOMTouchTargetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchTargetPropertyInfo = DOMTouchK type AttrGetType DOMTouchTargetPropertyInfo = DOMEventTarget - type AttrLabel DOMTouchTargetPropertyInfo = "DOMTouch::target" + type AttrLabel DOMTouchTargetPropertyInfo = "target" attrGet _ = getDOMTouchTarget attrSet _ = undefined attrConstruct _ = undefined @@ -320,7 +378,7 @@ type AttrSetTypeConstraint DOMTouchWebkitForcePropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchWebkitForcePropertyInfo = DOMTouchK type AttrGetType DOMTouchWebkitForcePropertyInfo = Float - type AttrLabel DOMTouchWebkitForcePropertyInfo = "DOMTouch::webkit-force" + type AttrLabel DOMTouchWebkitForcePropertyInfo = "webkit-force" attrGet _ = getDOMTouchWebkitForce attrSet _ = undefined attrConstruct _ = undefined @@ -338,7 +396,7 @@ type AttrSetTypeConstraint DOMTouchWebkitRadiusXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchWebkitRadiusXPropertyInfo = DOMTouchK type AttrGetType DOMTouchWebkitRadiusXPropertyInfo = Int64 - type AttrLabel DOMTouchWebkitRadiusXPropertyInfo = "DOMTouch::webkit-radius-x" + type AttrLabel DOMTouchWebkitRadiusXPropertyInfo = "webkit-radius-x" attrGet _ = getDOMTouchWebkitRadiusX attrSet _ = undefined attrConstruct _ = undefined @@ -356,7 +414,7 @@ type AttrSetTypeConstraint DOMTouchWebkitRadiusYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchWebkitRadiusYPropertyInfo = DOMTouchK type AttrGetType DOMTouchWebkitRadiusYPropertyInfo = Int64 - type AttrLabel DOMTouchWebkitRadiusYPropertyInfo = "DOMTouch::webkit-radius-y" + type AttrLabel DOMTouchWebkitRadiusYPropertyInfo = "webkit-radius-y" attrGet _ = getDOMTouchWebkitRadiusY attrSet _ = undefined attrConstruct _ = undefined @@ -374,22 +432,21 @@ type AttrSetTypeConstraint DOMTouchWebkitRotationAnglePropertyInfo = (~) () type AttrBaseTypeConstraint DOMTouchWebkitRotationAnglePropertyInfo = DOMTouchK type AttrGetType DOMTouchWebkitRotationAnglePropertyInfo = Float - type AttrLabel DOMTouchWebkitRotationAnglePropertyInfo = "DOMTouch::webkit-rotation-angle" + type AttrLabel DOMTouchWebkitRotationAnglePropertyInfo = "webkit-rotation-angle" attrGet _ = getDOMTouchWebkitRotationAngle attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMTouch = DOMTouchAttributeList -type DOMTouchAttributeList = ('[ '("client-x", DOMTouchClientXPropertyInfo), '("client-y", DOMTouchClientYPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("identifier", DOMTouchIdentifierPropertyInfo), '("page-x", DOMTouchPageXPropertyInfo), '("page-y", DOMTouchPageYPropertyInfo), '("screen-x", DOMTouchScreenXPropertyInfo), '("screen-y", DOMTouchScreenYPropertyInfo), '("target", DOMTouchTargetPropertyInfo), '("webkit-force", DOMTouchWebkitForcePropertyInfo), '("webkit-radius-x", DOMTouchWebkitRadiusXPropertyInfo), '("webkit-radius-y", DOMTouchWebkitRadiusYPropertyInfo), '("webkit-rotation-angle", DOMTouchWebkitRotationAnglePropertyInfo)] :: [(Symbol, *)]) +type DOMTouchAttributeList = ('[ '("clientX", DOMTouchClientXPropertyInfo), '("clientY", DOMTouchClientYPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("identifier", DOMTouchIdentifierPropertyInfo), '("pageX", DOMTouchPageXPropertyInfo), '("pageY", DOMTouchPageYPropertyInfo), '("screenX", DOMTouchScreenXPropertyInfo), '("screenY", DOMTouchScreenYPropertyInfo), '("target", DOMTouchTargetPropertyInfo), '("webkitForce", DOMTouchWebkitForcePropertyInfo), '("webkitRadiusX", DOMTouchWebkitRadiusXPropertyInfo), '("webkitRadiusY", DOMTouchWebkitRadiusYPropertyInfo), '("webkitRotationAngle", DOMTouchWebkitRotationAnglePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMTouch = DOMTouchSignalList -type DOMTouchSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMTouchSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMTouch::get_client_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -401,19 +458,22 @@ dOMTouchGetClientX :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMTouchGetClientX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_client_x _obj' touchManagedPtr _obj return result +data DOMTouchGetClientXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetClientXMethodInfo a signature where + overloadedMethod _ = dOMTouchGetClientX + -- method DOMTouch::get_client_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -425,19 +485,22 @@ dOMTouchGetClientY :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMTouchGetClientY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_client_y _obj' touchManagedPtr _obj return result +data DOMTouchGetClientYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetClientYMethodInfo a signature where + overloadedMethod _ = dOMTouchGetClientY + -- method DOMTouch::get_identifier -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -449,19 +512,22 @@ dOMTouchGetIdentifier :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMTouchGetIdentifier _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_identifier _obj' touchManagedPtr _obj return result +data DOMTouchGetIdentifierMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetIdentifierMethodInfo a signature where + overloadedMethod _ = dOMTouchGetIdentifier + -- method DOMTouch::get_page_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -473,19 +539,22 @@ dOMTouchGetPageX :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMTouchGetPageX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_page_x _obj' touchManagedPtr _obj return result +data DOMTouchGetPageXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetPageXMethodInfo a signature where + overloadedMethod _ = dOMTouchGetPageX + -- method DOMTouch::get_page_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -497,19 +566,22 @@ dOMTouchGetPageY :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMTouchGetPageY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_page_y _obj' touchManagedPtr _obj return result +data DOMTouchGetPageYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetPageYMethodInfo a signature where + overloadedMethod _ = dOMTouchGetPageY + -- method DOMTouch::get_screen_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -521,19 +593,22 @@ dOMTouchGetScreenX :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMTouchGetScreenX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_screen_x _obj' touchManagedPtr _obj return result +data DOMTouchGetScreenXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetScreenXMethodInfo a signature where + overloadedMethod _ = dOMTouchGetScreenX + -- method DOMTouch::get_screen_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -545,19 +620,22 @@ dOMTouchGetScreenY :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMTouchGetScreenY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_screen_y _obj' touchManagedPtr _obj return result +data DOMTouchGetScreenYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetScreenYMethodInfo a signature where + overloadedMethod _ = dOMTouchGetScreenY + -- method DOMTouch::get_target -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMEventTarget" -- throws : False -- Skip return : False @@ -569,8 +647,8 @@ dOMTouchGetTarget :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m DOMEventTarget + a -- _obj + -> m DOMEventTarget -- result dOMTouchGetTarget _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_target _obj' @@ -579,11 +657,14 @@ touchManagedPtr _obj return result' +data DOMTouchGetTargetMethodInfo +instance (signature ~ (m DOMEventTarget), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetTargetMethodInfo a signature where + overloadedMethod _ = dOMTouchGetTarget + -- method DOMTouch::get_webkit_force -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TFloat -- throws : False -- Skip return : False @@ -595,8 +676,8 @@ dOMTouchGetWebkitForce :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m Float + a -- _obj + -> m Float -- result dOMTouchGetWebkitForce _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_webkit_force _obj' @@ -604,11 +685,14 @@ touchManagedPtr _obj return result' +data DOMTouchGetWebkitForceMethodInfo +instance (signature ~ (m Float), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetWebkitForceMethodInfo a signature where + overloadedMethod _ = dOMTouchGetWebkitForce + -- method DOMTouch::get_webkit_radius_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -620,19 +704,22 @@ dOMTouchGetWebkitRadiusX :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMTouchGetWebkitRadiusX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_webkit_radius_x _obj' touchManagedPtr _obj return result +data DOMTouchGetWebkitRadiusXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetWebkitRadiusXMethodInfo a signature where + overloadedMethod _ = dOMTouchGetWebkitRadiusX + -- method DOMTouch::get_webkit_radius_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -644,19 +731,22 @@ dOMTouchGetWebkitRadiusY :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMTouchGetWebkitRadiusY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_webkit_radius_y _obj' touchManagedPtr _obj return result +data DOMTouchGetWebkitRadiusYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetWebkitRadiusYMethodInfo a signature where + overloadedMethod _ = dOMTouchGetWebkitRadiusY + -- method DOMTouch::get_webkit_rotation_angle -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTouch", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TFloat -- throws : False -- Skip return : False @@ -668,13 +758,17 @@ dOMTouchGetWebkitRotationAngle :: (MonadIO m, DOMTouchK a) => - a -> -- _obj - m Float + a -- _obj + -> m Float -- result dOMTouchGetWebkitRotationAngle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_touch_get_webkit_rotation_angle _obj' let result' = realToFrac result touchManagedPtr _obj return result' + +data DOMTouchGetWebkitRotationAngleMethodInfo +instance (signature ~ (m Float), MonadIO m, DOMTouchK a) => MethodInfo DOMTouchGetWebkitRotationAngleMethodInfo a signature where + overloadedMethod _ = dOMTouchGetWebkitRotationAngle diff --git a/GI/WebKit/Objects/DOMTouch.hs-boot b/GI/WebKit/Objects/DOMTouch.hs-boot --- a/GI/WebKit/Objects/DOMTouch.hs-boot +++ b/GI/WebKit/Objects/DOMTouch.hs-boot @@ -23,3 +23,15 @@ data DOMTouchWebkitRadiusXPropertyInfo data DOMTouchWebkitRadiusYPropertyInfo data DOMTouchWebkitRotationAnglePropertyInfo +data DOMTouchGetClientXMethodInfo +data DOMTouchGetClientYMethodInfo +data DOMTouchGetIdentifierMethodInfo +data DOMTouchGetPageXMethodInfo +data DOMTouchGetPageYMethodInfo +data DOMTouchGetScreenXMethodInfo +data DOMTouchGetScreenYMethodInfo +data DOMTouchGetTargetMethodInfo +data DOMTouchGetWebkitForceMethodInfo +data DOMTouchGetWebkitRadiusXMethodInfo +data DOMTouchGetWebkitRadiusYMethodInfo +data DOMTouchGetWebkitRotationAngleMethodInfo diff --git a/GI/WebKit/Objects/DOMTrackEvent.hs b/GI/WebKit/Objects/DOMTrackEvent.hs --- a/GI/WebKit/Objects/DOMTrackEvent.hs +++ b/GI/WebKit/Objects/DOMTrackEvent.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -49,10 +50,59 @@ noDOMTrackEvent :: Maybe DOMTrackEvent noDOMTrackEvent = Nothing +type family ResolveDOMTrackEventMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMTrackEventMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMTrackEventMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMTrackEventMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMTrackEventMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMTrackEventMethod "initEvent" o = DOMEventInitEventMethodInfo + ResolveDOMTrackEventMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMTrackEventMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMTrackEventMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMTrackEventMethod "preventDefault" o = DOMEventPreventDefaultMethodInfo + ResolveDOMTrackEventMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMTrackEventMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMTrackEventMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMTrackEventMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMTrackEventMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMTrackEventMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMTrackEventMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMTrackEventMethod "stopImmediatePropagation" o = DOMEventStopImmediatePropagationMethodInfo + ResolveDOMTrackEventMethod "stopPropagation" o = DOMEventStopPropagationMethodInfo + ResolveDOMTrackEventMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMTrackEventMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMTrackEventMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMTrackEventMethod "getBubbles" o = DOMEventGetBubblesMethodInfo + ResolveDOMTrackEventMethod "getCancelBubble" o = DOMEventGetCancelBubbleMethodInfo + ResolveDOMTrackEventMethod "getCancelable" o = DOMEventGetCancelableMethodInfo + ResolveDOMTrackEventMethod "getCurrentTarget" o = DOMEventGetCurrentTargetMethodInfo + ResolveDOMTrackEventMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMTrackEventMethod "getDefaultPrevented" o = DOMEventGetDefaultPreventedMethodInfo + ResolveDOMTrackEventMethod "getEventPhase" o = DOMEventGetEventPhaseMethodInfo + ResolveDOMTrackEventMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMTrackEventMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMTrackEventMethod "getReturnValue" o = DOMEventGetReturnValueMethodInfo + ResolveDOMTrackEventMethod "getSrcElement" o = DOMEventGetSrcElementMethodInfo + ResolveDOMTrackEventMethod "getTarget" o = DOMEventGetTargetMethodInfo + ResolveDOMTrackEventMethod "getTimeStamp" o = DOMEventGetTimeStampMethodInfo + ResolveDOMTrackEventMethod "setCancelBubble" o = DOMEventSetCancelBubbleMethodInfo + ResolveDOMTrackEventMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMTrackEventMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMTrackEventMethod "setReturnValue" o = DOMEventSetReturnValueMethodInfo + ResolveDOMTrackEventMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMTrackEventMethod t DOMTrackEvent, MethodInfo info DOMTrackEvent p) => IsLabelProxy t (DOMTrackEvent -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMTrackEventMethod t DOMTrackEvent, MethodInfo info DOMTrackEvent p) => IsLabel t (DOMTrackEvent -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMTrackEvent = DOMTrackEventAttributeList -type DOMTrackEventAttributeList = ('[ '("bubbles", DOMEventBubblesPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo)] :: [(Symbol, *)]) +type DOMTrackEventAttributeList = ('[ '("bubbles", DOMEventBubblesPropertyInfo), '("cancelBubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentTarget", DOMEventCurrentTargetPropertyInfo), '("defaultPrevented", DOMEventDefaultPreventedPropertyInfo), '("eventPhase", DOMEventEventPhasePropertyInfo), '("returnValue", DOMEventReturnValuePropertyInfo), '("srcElement", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("timeStamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMTrackEvent = DOMTrackEventSignalList -type DOMTrackEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMTrackEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/DOMTreeWalker.hs b/GI/WebKit/Objects/DOMTreeWalker.hs --- a/GI/WebKit/Objects/DOMTreeWalker.hs +++ b/GI/WebKit/Objects/DOMTreeWalker.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,54 +18,67 @@ -- * Methods -- ** dOMTreeWalkerFirstChild + DOMTreeWalkerFirstChildMethodInfo , dOMTreeWalkerFirstChild , -- ** dOMTreeWalkerGetCurrentNode + DOMTreeWalkerGetCurrentNodeMethodInfo , dOMTreeWalkerGetCurrentNode , -- ** dOMTreeWalkerGetExpandEntityReferences + DOMTreeWalkerGetExpandEntityReferencesMethodInfo, dOMTreeWalkerGetExpandEntityReferences , -- ** dOMTreeWalkerGetFilter + DOMTreeWalkerGetFilterMethodInfo , dOMTreeWalkerGetFilter , -- ** dOMTreeWalkerGetRoot + DOMTreeWalkerGetRootMethodInfo , dOMTreeWalkerGetRoot , -- ** dOMTreeWalkerGetWhatToShow + DOMTreeWalkerGetWhatToShowMethodInfo , dOMTreeWalkerGetWhatToShow , -- ** dOMTreeWalkerLastChild + DOMTreeWalkerLastChildMethodInfo , dOMTreeWalkerLastChild , -- ** dOMTreeWalkerNextNode + DOMTreeWalkerNextNodeMethodInfo , dOMTreeWalkerNextNode , -- ** dOMTreeWalkerNextSibling + DOMTreeWalkerNextSiblingMethodInfo , dOMTreeWalkerNextSibling , -- ** dOMTreeWalkerParentNode + DOMTreeWalkerParentNodeMethodInfo , dOMTreeWalkerParentNode , -- ** dOMTreeWalkerPreviousNode + DOMTreeWalkerPreviousNodeMethodInfo , dOMTreeWalkerPreviousNode , -- ** dOMTreeWalkerPreviousSibling + DOMTreeWalkerPreviousSiblingMethodInfo , dOMTreeWalkerPreviousSibling , -- ** dOMTreeWalkerSetCurrentNode + DOMTreeWalkerSetCurrentNodeMethodInfo , dOMTreeWalkerSetCurrentNode , @@ -132,6 +146,52 @@ noDOMTreeWalker :: Maybe DOMTreeWalker noDOMTreeWalker = Nothing +type family ResolveDOMTreeWalkerMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMTreeWalkerMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMTreeWalkerMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMTreeWalkerMethod "firstChild" o = DOMTreeWalkerFirstChildMethodInfo + ResolveDOMTreeWalkerMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMTreeWalkerMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMTreeWalkerMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMTreeWalkerMethod "lastChild" o = DOMTreeWalkerLastChildMethodInfo + ResolveDOMTreeWalkerMethod "nextNode" o = DOMTreeWalkerNextNodeMethodInfo + ResolveDOMTreeWalkerMethod "nextSibling" o = DOMTreeWalkerNextSiblingMethodInfo + ResolveDOMTreeWalkerMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMTreeWalkerMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMTreeWalkerMethod "parentNode" o = DOMTreeWalkerParentNodeMethodInfo + ResolveDOMTreeWalkerMethod "previousNode" o = DOMTreeWalkerPreviousNodeMethodInfo + ResolveDOMTreeWalkerMethod "previousSibling" o = DOMTreeWalkerPreviousSiblingMethodInfo + ResolveDOMTreeWalkerMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMTreeWalkerMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMTreeWalkerMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMTreeWalkerMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMTreeWalkerMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMTreeWalkerMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMTreeWalkerMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMTreeWalkerMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMTreeWalkerMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMTreeWalkerMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMTreeWalkerMethod "getCurrentNode" o = DOMTreeWalkerGetCurrentNodeMethodInfo + ResolveDOMTreeWalkerMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMTreeWalkerMethod "getExpandEntityReferences" o = DOMTreeWalkerGetExpandEntityReferencesMethodInfo + ResolveDOMTreeWalkerMethod "getFilter" o = DOMTreeWalkerGetFilterMethodInfo + ResolveDOMTreeWalkerMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMTreeWalkerMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMTreeWalkerMethod "getRoot" o = DOMTreeWalkerGetRootMethodInfo + ResolveDOMTreeWalkerMethod "getWhatToShow" o = DOMTreeWalkerGetWhatToShowMethodInfo + ResolveDOMTreeWalkerMethod "setCurrentNode" o = DOMTreeWalkerSetCurrentNodeMethodInfo + ResolveDOMTreeWalkerMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMTreeWalkerMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMTreeWalkerMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMTreeWalkerMethod t DOMTreeWalker, MethodInfo info DOMTreeWalker p) => IsLabelProxy t (DOMTreeWalker -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMTreeWalkerMethod t DOMTreeWalker, MethodInfo info DOMTreeWalker p) => IsLabel t (DOMTreeWalker -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "current-node" -- Type: TInterface "WebKit" "DOMNode" -- Flags: [PropertyReadable] @@ -145,7 +205,7 @@ type AttrSetTypeConstraint DOMTreeWalkerCurrentNodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMTreeWalkerCurrentNodePropertyInfo = DOMTreeWalkerK type AttrGetType DOMTreeWalkerCurrentNodePropertyInfo = DOMNode - type AttrLabel DOMTreeWalkerCurrentNodePropertyInfo = "DOMTreeWalker::current-node" + type AttrLabel DOMTreeWalkerCurrentNodePropertyInfo = "current-node" attrGet _ = getDOMTreeWalkerCurrentNode attrSet _ = undefined attrConstruct _ = undefined @@ -163,7 +223,7 @@ type AttrSetTypeConstraint DOMTreeWalkerExpandEntityReferencesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTreeWalkerExpandEntityReferencesPropertyInfo = DOMTreeWalkerK type AttrGetType DOMTreeWalkerExpandEntityReferencesPropertyInfo = Bool - type AttrLabel DOMTreeWalkerExpandEntityReferencesPropertyInfo = "DOMTreeWalker::expand-entity-references" + type AttrLabel DOMTreeWalkerExpandEntityReferencesPropertyInfo = "expand-entity-references" attrGet _ = getDOMTreeWalkerExpandEntityReferences attrSet _ = undefined attrConstruct _ = undefined @@ -181,7 +241,7 @@ type AttrSetTypeConstraint DOMTreeWalkerFilterPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTreeWalkerFilterPropertyInfo = DOMTreeWalkerK type AttrGetType DOMTreeWalkerFilterPropertyInfo = DOMNodeFilter - type AttrLabel DOMTreeWalkerFilterPropertyInfo = "DOMTreeWalker::filter" + type AttrLabel DOMTreeWalkerFilterPropertyInfo = "filter" attrGet _ = getDOMTreeWalkerFilter attrSet _ = undefined attrConstruct _ = undefined @@ -199,7 +259,7 @@ type AttrSetTypeConstraint DOMTreeWalkerRootPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTreeWalkerRootPropertyInfo = DOMTreeWalkerK type AttrGetType DOMTreeWalkerRootPropertyInfo = DOMNode - type AttrLabel DOMTreeWalkerRootPropertyInfo = "DOMTreeWalker::root" + type AttrLabel DOMTreeWalkerRootPropertyInfo = "root" attrGet _ = getDOMTreeWalkerRoot attrSet _ = undefined attrConstruct _ = undefined @@ -217,22 +277,21 @@ type AttrSetTypeConstraint DOMTreeWalkerWhatToShowPropertyInfo = (~) () type AttrBaseTypeConstraint DOMTreeWalkerWhatToShowPropertyInfo = DOMTreeWalkerK type AttrGetType DOMTreeWalkerWhatToShowPropertyInfo = Word64 - type AttrLabel DOMTreeWalkerWhatToShowPropertyInfo = "DOMTreeWalker::what-to-show" + type AttrLabel DOMTreeWalkerWhatToShowPropertyInfo = "what-to-show" attrGet _ = getDOMTreeWalkerWhatToShow attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMTreeWalker = DOMTreeWalkerAttributeList -type DOMTreeWalkerAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-node", DOMTreeWalkerCurrentNodePropertyInfo), '("expand-entity-references", DOMTreeWalkerExpandEntityReferencesPropertyInfo), '("filter", DOMTreeWalkerFilterPropertyInfo), '("root", DOMTreeWalkerRootPropertyInfo), '("what-to-show", DOMTreeWalkerWhatToShowPropertyInfo)] :: [(Symbol, *)]) +type DOMTreeWalkerAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentNode", DOMTreeWalkerCurrentNodePropertyInfo), '("expandEntityReferences", DOMTreeWalkerExpandEntityReferencesPropertyInfo), '("filter", DOMTreeWalkerFilterPropertyInfo), '("root", DOMTreeWalkerRootPropertyInfo), '("whatToShow", DOMTreeWalkerWhatToShowPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMTreeWalker = DOMTreeWalkerSignalList -type DOMTreeWalkerSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMTreeWalkerSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMTreeWalker::first_child -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -244,8 +303,8 @@ dOMTreeWalkerFirstChild :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMTreeWalkerFirstChild _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_first_child _obj' @@ -254,11 +313,14 @@ touchManagedPtr _obj return result' +data DOMTreeWalkerFirstChildMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerFirstChildMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerFirstChild + -- method DOMTreeWalker::get_current_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -270,8 +332,8 @@ dOMTreeWalkerGetCurrentNode :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMTreeWalkerGetCurrentNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_get_current_node _obj' @@ -280,11 +342,14 @@ touchManagedPtr _obj return result' +data DOMTreeWalkerGetCurrentNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerGetCurrentNodeMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerGetCurrentNode + -- method DOMTreeWalker::get_expand_entity_references -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -296,8 +361,8 @@ dOMTreeWalkerGetExpandEntityReferences :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMTreeWalkerGetExpandEntityReferences _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_get_expand_entity_references _obj' @@ -305,11 +370,14 @@ touchManagedPtr _obj return result' +data DOMTreeWalkerGetExpandEntityReferencesMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerGetExpandEntityReferencesMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerGetExpandEntityReferences + -- method DOMTreeWalker::get_filter -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeFilter" -- throws : False -- Skip return : False @@ -321,8 +389,8 @@ dOMTreeWalkerGetFilter :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m DOMNodeFilter + a -- _obj + -> m DOMNodeFilter -- result dOMTreeWalkerGetFilter _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_get_filter _obj' @@ -331,11 +399,14 @@ touchManagedPtr _obj return result' +data DOMTreeWalkerGetFilterMethodInfo +instance (signature ~ (m DOMNodeFilter), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerGetFilterMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerGetFilter + -- method DOMTreeWalker::get_root -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -347,8 +418,8 @@ dOMTreeWalkerGetRoot :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMTreeWalkerGetRoot _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_get_root _obj' @@ -357,11 +428,14 @@ touchManagedPtr _obj return result' +data DOMTreeWalkerGetRootMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerGetRootMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerGetRoot + -- method DOMTreeWalker::get_what_to_show -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -373,19 +447,22 @@ dOMTreeWalkerGetWhatToShow :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMTreeWalkerGetWhatToShow _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_get_what_to_show _obj' touchManagedPtr _obj return result +data DOMTreeWalkerGetWhatToShowMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerGetWhatToShowMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerGetWhatToShow + -- method DOMTreeWalker::last_child -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -397,8 +474,8 @@ dOMTreeWalkerLastChild :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMTreeWalkerLastChild _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_last_child _obj' @@ -407,11 +484,14 @@ touchManagedPtr _obj return result' +data DOMTreeWalkerLastChildMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerLastChildMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerLastChild + -- method DOMTreeWalker::next_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -423,8 +503,8 @@ dOMTreeWalkerNextNode :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMTreeWalkerNextNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_next_node _obj' @@ -433,11 +513,14 @@ touchManagedPtr _obj return result' +data DOMTreeWalkerNextNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerNextNodeMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerNextNode + -- method DOMTreeWalker::next_sibling -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -449,8 +532,8 @@ dOMTreeWalkerNextSibling :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMTreeWalkerNextSibling _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_next_sibling _obj' @@ -459,11 +542,14 @@ touchManagedPtr _obj return result' +data DOMTreeWalkerNextSiblingMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerNextSiblingMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerNextSibling + -- method DOMTreeWalker::parent_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -475,8 +561,8 @@ dOMTreeWalkerParentNode :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMTreeWalkerParentNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_parent_node _obj' @@ -485,11 +571,14 @@ touchManagedPtr _obj return result' +data DOMTreeWalkerParentNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerParentNodeMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerParentNode + -- method DOMTreeWalker::previous_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -501,8 +590,8 @@ dOMTreeWalkerPreviousNode :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMTreeWalkerPreviousNode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_previous_node _obj' @@ -511,11 +600,14 @@ touchManagedPtr _obj return result' +data DOMTreeWalkerPreviousNodeMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerPreviousNodeMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerPreviousNode + -- method DOMTreeWalker::previous_sibling -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : False -- Skip return : False @@ -527,8 +619,8 @@ dOMTreeWalkerPreviousSibling :: (MonadIO m, DOMTreeWalkerK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMTreeWalkerPreviousSibling _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_tree_walker_previous_sibling _obj' @@ -537,11 +629,14 @@ touchManagedPtr _obj return result' +data DOMTreeWalkerPreviousSiblingMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMTreeWalkerK a) => MethodInfo DOMTreeWalkerPreviousSiblingMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerPreviousSibling + -- method DOMTreeWalker::set_current_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMTreeWalker", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : True -- Skip return : False @@ -555,9 +650,9 @@ dOMTreeWalkerSetCurrentNode :: (MonadIO m, DOMTreeWalkerK a, DOMNodeK b) => - a -> -- _obj - b -> -- value - m () + a -- _obj + -> b -- value + -> m () -- result dOMTreeWalkerSetCurrentNode _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = unsafeManagedPtrCastPtr value @@ -569,5 +664,9 @@ ) (do return () ) + +data DOMTreeWalkerSetCurrentNodeMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMTreeWalkerK a, DOMNodeK b) => MethodInfo DOMTreeWalkerSetCurrentNodeMethodInfo a signature where + overloadedMethod _ = dOMTreeWalkerSetCurrentNode diff --git a/GI/WebKit/Objects/DOMTreeWalker.hs-boot b/GI/WebKit/Objects/DOMTreeWalker.hs-boot --- a/GI/WebKit/Objects/DOMTreeWalker.hs-boot +++ b/GI/WebKit/Objects/DOMTreeWalker.hs-boot @@ -16,3 +16,16 @@ data DOMTreeWalkerFilterPropertyInfo data DOMTreeWalkerRootPropertyInfo data DOMTreeWalkerWhatToShowPropertyInfo +data DOMTreeWalkerFirstChildMethodInfo +data DOMTreeWalkerGetCurrentNodeMethodInfo +data DOMTreeWalkerGetExpandEntityReferencesMethodInfo +data DOMTreeWalkerGetFilterMethodInfo +data DOMTreeWalkerGetRootMethodInfo +data DOMTreeWalkerGetWhatToShowMethodInfo +data DOMTreeWalkerLastChildMethodInfo +data DOMTreeWalkerNextNodeMethodInfo +data DOMTreeWalkerNextSiblingMethodInfo +data DOMTreeWalkerParentNodeMethodInfo +data DOMTreeWalkerPreviousNodeMethodInfo +data DOMTreeWalkerPreviousSiblingMethodInfo +data DOMTreeWalkerSetCurrentNodeMethodInfo diff --git a/GI/WebKit/Objects/DOMUIEvent.hs b/GI/WebKit/Objects/DOMUIEvent.hs --- a/GI/WebKit/Objects/DOMUIEvent.hs +++ b/GI/WebKit/Objects/DOMUIEvent.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,42 +18,52 @@ -- * Methods -- ** dOMUIEventGetCharCode + DOMUIEventGetCharCodeMethodInfo , dOMUIEventGetCharCode , -- ** dOMUIEventGetDetail + DOMUIEventGetDetailMethodInfo , dOMUIEventGetDetail , -- ** dOMUIEventGetKeyCode + DOMUIEventGetKeyCodeMethodInfo , dOMUIEventGetKeyCode , -- ** dOMUIEventGetLayerX + DOMUIEventGetLayerXMethodInfo , dOMUIEventGetLayerX , -- ** dOMUIEventGetLayerY + DOMUIEventGetLayerYMethodInfo , dOMUIEventGetLayerY , -- ** dOMUIEventGetPageX + DOMUIEventGetPageXMethodInfo , dOMUIEventGetPageX , -- ** dOMUIEventGetPageY + DOMUIEventGetPageYMethodInfo , dOMUIEventGetPageY , -- ** dOMUIEventGetView + DOMUIEventGetViewMethodInfo , dOMUIEventGetView , -- ** dOMUIEventGetWhich + DOMUIEventGetWhichMethodInfo , dOMUIEventGetWhich , -- ** dOMUIEventInitUiEvent + DOMUIEventInitUiEventMethodInfo , dOMUIEventInitUiEvent , @@ -140,6 +151,65 @@ noDOMUIEvent :: Maybe DOMUIEvent noDOMUIEvent = Nothing +type family ResolveDOMUIEventMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMUIEventMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMUIEventMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMUIEventMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMUIEventMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMUIEventMethod "initEvent" o = DOMEventInitEventMethodInfo + ResolveDOMUIEventMethod "initUiEvent" o = DOMUIEventInitUiEventMethodInfo + ResolveDOMUIEventMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMUIEventMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMUIEventMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMUIEventMethod "preventDefault" o = DOMEventPreventDefaultMethodInfo + ResolveDOMUIEventMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMUIEventMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMUIEventMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMUIEventMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMUIEventMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMUIEventMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMUIEventMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMUIEventMethod "stopImmediatePropagation" o = DOMEventStopImmediatePropagationMethodInfo + ResolveDOMUIEventMethod "stopPropagation" o = DOMEventStopPropagationMethodInfo + ResolveDOMUIEventMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMUIEventMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMUIEventMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMUIEventMethod "getBubbles" o = DOMEventGetBubblesMethodInfo + ResolveDOMUIEventMethod "getCancelBubble" o = DOMEventGetCancelBubbleMethodInfo + ResolveDOMUIEventMethod "getCancelable" o = DOMEventGetCancelableMethodInfo + ResolveDOMUIEventMethod "getCharCode" o = DOMUIEventGetCharCodeMethodInfo + ResolveDOMUIEventMethod "getCurrentTarget" o = DOMEventGetCurrentTargetMethodInfo + ResolveDOMUIEventMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMUIEventMethod "getDefaultPrevented" o = DOMEventGetDefaultPreventedMethodInfo + ResolveDOMUIEventMethod "getDetail" o = DOMUIEventGetDetailMethodInfo + ResolveDOMUIEventMethod "getEventPhase" o = DOMEventGetEventPhaseMethodInfo + ResolveDOMUIEventMethod "getKeyCode" o = DOMUIEventGetKeyCodeMethodInfo + ResolveDOMUIEventMethod "getLayerX" o = DOMUIEventGetLayerXMethodInfo + ResolveDOMUIEventMethod "getLayerY" o = DOMUIEventGetLayerYMethodInfo + ResolveDOMUIEventMethod "getPageX" o = DOMUIEventGetPageXMethodInfo + ResolveDOMUIEventMethod "getPageY" o = DOMUIEventGetPageYMethodInfo + ResolveDOMUIEventMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMUIEventMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMUIEventMethod "getReturnValue" o = DOMEventGetReturnValueMethodInfo + ResolveDOMUIEventMethod "getSrcElement" o = DOMEventGetSrcElementMethodInfo + ResolveDOMUIEventMethod "getTarget" o = DOMEventGetTargetMethodInfo + ResolveDOMUIEventMethod "getTimeStamp" o = DOMEventGetTimeStampMethodInfo + ResolveDOMUIEventMethod "getView" o = DOMUIEventGetViewMethodInfo + ResolveDOMUIEventMethod "getWhich" o = DOMUIEventGetWhichMethodInfo + ResolveDOMUIEventMethod "setCancelBubble" o = DOMEventSetCancelBubbleMethodInfo + ResolveDOMUIEventMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMUIEventMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMUIEventMethod "setReturnValue" o = DOMEventSetReturnValueMethodInfo + ResolveDOMUIEventMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMUIEventMethod t DOMUIEvent, MethodInfo info DOMUIEvent p) => IsLabelProxy t (DOMUIEvent -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMUIEventMethod t DOMUIEvent, MethodInfo info DOMUIEvent p) => IsLabel t (DOMUIEvent -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "char-code" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] @@ -153,7 +223,7 @@ type AttrSetTypeConstraint DOMUIEventCharCodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventCharCodePropertyInfo = DOMUIEventK type AttrGetType DOMUIEventCharCodePropertyInfo = Int64 - type AttrLabel DOMUIEventCharCodePropertyInfo = "DOMUIEvent::char-code" + type AttrLabel DOMUIEventCharCodePropertyInfo = "char-code" attrGet _ = getDOMUIEventCharCode attrSet _ = undefined attrConstruct _ = undefined @@ -171,7 +241,7 @@ type AttrSetTypeConstraint DOMUIEventDetailPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventDetailPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventDetailPropertyInfo = Int64 - type AttrLabel DOMUIEventDetailPropertyInfo = "DOMUIEvent::detail" + type AttrLabel DOMUIEventDetailPropertyInfo = "detail" attrGet _ = getDOMUIEventDetail attrSet _ = undefined attrConstruct _ = undefined @@ -189,7 +259,7 @@ type AttrSetTypeConstraint DOMUIEventKeyCodePropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventKeyCodePropertyInfo = DOMUIEventK type AttrGetType DOMUIEventKeyCodePropertyInfo = Int64 - type AttrLabel DOMUIEventKeyCodePropertyInfo = "DOMUIEvent::key-code" + type AttrLabel DOMUIEventKeyCodePropertyInfo = "key-code" attrGet _ = getDOMUIEventKeyCode attrSet _ = undefined attrConstruct _ = undefined @@ -207,7 +277,7 @@ type AttrSetTypeConstraint DOMUIEventLayerXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventLayerXPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventLayerXPropertyInfo = Int64 - type AttrLabel DOMUIEventLayerXPropertyInfo = "DOMUIEvent::layer-x" + type AttrLabel DOMUIEventLayerXPropertyInfo = "layer-x" attrGet _ = getDOMUIEventLayerX attrSet _ = undefined attrConstruct _ = undefined @@ -225,7 +295,7 @@ type AttrSetTypeConstraint DOMUIEventLayerYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventLayerYPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventLayerYPropertyInfo = Int64 - type AttrLabel DOMUIEventLayerYPropertyInfo = "DOMUIEvent::layer-y" + type AttrLabel DOMUIEventLayerYPropertyInfo = "layer-y" attrGet _ = getDOMUIEventLayerY attrSet _ = undefined attrConstruct _ = undefined @@ -243,7 +313,7 @@ type AttrSetTypeConstraint DOMUIEventPageXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventPageXPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventPageXPropertyInfo = Int64 - type AttrLabel DOMUIEventPageXPropertyInfo = "DOMUIEvent::page-x" + type AttrLabel DOMUIEventPageXPropertyInfo = "page-x" attrGet _ = getDOMUIEventPageX attrSet _ = undefined attrConstruct _ = undefined @@ -261,7 +331,7 @@ type AttrSetTypeConstraint DOMUIEventPageYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventPageYPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventPageYPropertyInfo = Int64 - type AttrLabel DOMUIEventPageYPropertyInfo = "DOMUIEvent::page-y" + type AttrLabel DOMUIEventPageYPropertyInfo = "page-y" attrGet _ = getDOMUIEventPageY attrSet _ = undefined attrConstruct _ = undefined @@ -279,7 +349,7 @@ type AttrSetTypeConstraint DOMUIEventViewPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventViewPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventViewPropertyInfo = DOMDOMWindow - type AttrLabel DOMUIEventViewPropertyInfo = "DOMUIEvent::view" + type AttrLabel DOMUIEventViewPropertyInfo = "view" attrGet _ = getDOMUIEventView attrSet _ = undefined attrConstruct _ = undefined @@ -297,22 +367,21 @@ type AttrSetTypeConstraint DOMUIEventWhichPropertyInfo = (~) () type AttrBaseTypeConstraint DOMUIEventWhichPropertyInfo = DOMUIEventK type AttrGetType DOMUIEventWhichPropertyInfo = Int64 - type AttrLabel DOMUIEventWhichPropertyInfo = "DOMUIEvent::which" + type AttrLabel DOMUIEventWhichPropertyInfo = "which" attrGet _ = getDOMUIEventWhich attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMUIEvent = DOMUIEventAttributeList -type DOMUIEventAttributeList = ('[ '("bubbles", DOMEventBubblesPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("char-code", DOMUIEventCharCodePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("key-code", DOMUIEventKeyCodePropertyInfo), '("layer-x", DOMUIEventLayerXPropertyInfo), '("layer-y", DOMUIEventLayerYPropertyInfo), '("page-x", DOMUIEventPageXPropertyInfo), '("page-y", DOMUIEventPageYPropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("which", DOMUIEventWhichPropertyInfo)] :: [(Symbol, *)]) +type DOMUIEventAttributeList = ('[ '("bubbles", DOMEventBubblesPropertyInfo), '("cancelBubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("charCode", DOMUIEventCharCodePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("currentTarget", DOMEventCurrentTargetPropertyInfo), '("defaultPrevented", DOMEventDefaultPreventedPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("eventPhase", DOMEventEventPhasePropertyInfo), '("keyCode", DOMUIEventKeyCodePropertyInfo), '("layerX", DOMUIEventLayerXPropertyInfo), '("layerY", DOMUIEventLayerYPropertyInfo), '("pageX", DOMUIEventPageXPropertyInfo), '("pageY", DOMUIEventPageYPropertyInfo), '("returnValue", DOMEventReturnValuePropertyInfo), '("srcElement", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("timeStamp", DOMEventTimeStampPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("which", DOMUIEventWhichPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMUIEvent = DOMUIEventSignalList -type DOMUIEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMUIEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMUIEvent::get_char_code -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -324,19 +393,22 @@ dOMUIEventGetCharCode :: (MonadIO m, DOMUIEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMUIEventGetCharCode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_char_code _obj' touchManagedPtr _obj return result +data DOMUIEventGetCharCodeMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetCharCodeMethodInfo a signature where + overloadedMethod _ = dOMUIEventGetCharCode + -- method DOMUIEvent::get_detail -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -348,19 +420,22 @@ dOMUIEventGetDetail :: (MonadIO m, DOMUIEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMUIEventGetDetail _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_detail _obj' touchManagedPtr _obj return result +data DOMUIEventGetDetailMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetDetailMethodInfo a signature where + overloadedMethod _ = dOMUIEventGetDetail + -- method DOMUIEvent::get_key_code -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -372,19 +447,22 @@ dOMUIEventGetKeyCode :: (MonadIO m, DOMUIEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMUIEventGetKeyCode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_key_code _obj' touchManagedPtr _obj return result +data DOMUIEventGetKeyCodeMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetKeyCodeMethodInfo a signature where + overloadedMethod _ = dOMUIEventGetKeyCode + -- method DOMUIEvent::get_layer_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -396,19 +474,22 @@ dOMUIEventGetLayerX :: (MonadIO m, DOMUIEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMUIEventGetLayerX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_layer_x _obj' touchManagedPtr _obj return result +data DOMUIEventGetLayerXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetLayerXMethodInfo a signature where + overloadedMethod _ = dOMUIEventGetLayerX + -- method DOMUIEvent::get_layer_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -420,19 +501,22 @@ dOMUIEventGetLayerY :: (MonadIO m, DOMUIEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMUIEventGetLayerY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_layer_y _obj' touchManagedPtr _obj return result +data DOMUIEventGetLayerYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetLayerYMethodInfo a signature where + overloadedMethod _ = dOMUIEventGetLayerY + -- method DOMUIEvent::get_page_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -444,19 +528,22 @@ dOMUIEventGetPageX :: (MonadIO m, DOMUIEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMUIEventGetPageX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_page_x _obj' touchManagedPtr _obj return result +data DOMUIEventGetPageXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetPageXMethodInfo a signature where + overloadedMethod _ = dOMUIEventGetPageX + -- method DOMUIEvent::get_page_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -468,19 +555,22 @@ dOMUIEventGetPageY :: (MonadIO m, DOMUIEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMUIEventGetPageY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_page_y _obj' touchManagedPtr _obj return result +data DOMUIEventGetPageYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetPageYMethodInfo a signature where + overloadedMethod _ = dOMUIEventGetPageY + -- method DOMUIEvent::get_view -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDOMWindow" -- throws : False -- Skip return : False @@ -492,8 +582,8 @@ dOMUIEventGetView :: (MonadIO m, DOMUIEventK a) => - a -> -- _obj - m DOMDOMWindow + a -- _obj + -> m DOMDOMWindow -- result dOMUIEventGetView _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_view _obj' @@ -502,11 +592,14 @@ touchManagedPtr _obj return result' +data DOMUIEventGetViewMethodInfo +instance (signature ~ (m DOMDOMWindow), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetViewMethodInfo a signature where + overloadedMethod _ = dOMUIEventGetView + -- method DOMUIEvent::get_which -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -518,19 +611,22 @@ dOMUIEventGetWhich :: (MonadIO m, DOMUIEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMUIEventGetWhich _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_ui_event_get_which _obj' touchManagedPtr _obj return result +data DOMUIEventGetWhichMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMUIEventK a) => MethodInfo DOMUIEventGetWhichMethodInfo a signature where + overloadedMethod _ = dOMUIEventGetWhich + -- method DOMUIEvent::init_ui_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "canBubble", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cancelable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "detail", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "canBubble", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cancelable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "detail", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMUIEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "canBubble", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cancelable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "detail", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -547,13 +643,13 @@ dOMUIEventInitUiEvent :: (MonadIO m, DOMUIEventK a, DOMDOMWindowK b) => - a -> -- _obj - T.Text -> -- type - Bool -> -- canBubble - Bool -> -- cancelable - b -> -- view - Int64 -> -- detail - m () + a -- _obj + -> T.Text -- type_ + -> Bool -- canBubble + -> Bool -- cancelable + -> b -- view + -> Int64 -- detail + -> m () -- result dOMUIEventInitUiEvent _obj type_ canBubble cancelable view detail = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj type_' <- textToCString type_ @@ -565,5 +661,9 @@ touchManagedPtr view freeMem type_' return () + +data DOMUIEventInitUiEventMethodInfo +instance (signature ~ (T.Text -> Bool -> Bool -> b -> Int64 -> m ()), MonadIO m, DOMUIEventK a, DOMDOMWindowK b) => MethodInfo DOMUIEventInitUiEventMethodInfo a signature where + overloadedMethod _ = dOMUIEventInitUiEvent diff --git a/GI/WebKit/Objects/DOMUIEvent.hs-boot b/GI/WebKit/Objects/DOMUIEvent.hs-boot --- a/GI/WebKit/Objects/DOMUIEvent.hs-boot +++ b/GI/WebKit/Objects/DOMUIEvent.hs-boot @@ -20,3 +20,13 @@ data DOMUIEventPageYPropertyInfo data DOMUIEventViewPropertyInfo data DOMUIEventWhichPropertyInfo +data DOMUIEventGetCharCodeMethodInfo +data DOMUIEventGetDetailMethodInfo +data DOMUIEventGetKeyCodeMethodInfo +data DOMUIEventGetLayerXMethodInfo +data DOMUIEventGetLayerYMethodInfo +data DOMUIEventGetPageXMethodInfo +data DOMUIEventGetPageYMethodInfo +data DOMUIEventGetViewMethodInfo +data DOMUIEventGetWhichMethodInfo +data DOMUIEventInitUiEventMethodInfo diff --git a/GI/WebKit/Objects/DOMValidityState.hs b/GI/WebKit/Objects/DOMValidityState.hs --- a/GI/WebKit/Objects/DOMValidityState.hs +++ b/GI/WebKit/Objects/DOMValidityState.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,42 +18,52 @@ -- * Methods -- ** dOMValidityStateGetBadInput + DOMValidityStateGetBadInputMethodInfo , dOMValidityStateGetBadInput , -- ** dOMValidityStateGetCustomError + DOMValidityStateGetCustomErrorMethodInfo, dOMValidityStateGetCustomError , -- ** dOMValidityStateGetPatternMismatch + DOMValidityStateGetPatternMismatchMethodInfo, dOMValidityStateGetPatternMismatch , -- ** dOMValidityStateGetRangeOverflow + DOMValidityStateGetRangeOverflowMethodInfo, dOMValidityStateGetRangeOverflow , -- ** dOMValidityStateGetRangeUnderflow + DOMValidityStateGetRangeUnderflowMethodInfo, dOMValidityStateGetRangeUnderflow , -- ** dOMValidityStateGetStepMismatch + DOMValidityStateGetStepMismatchMethodInfo, dOMValidityStateGetStepMismatch , -- ** dOMValidityStateGetTooLong + DOMValidityStateGetTooLongMethodInfo , dOMValidityStateGetTooLong , -- ** dOMValidityStateGetTypeMismatch + DOMValidityStateGetTypeMismatchMethodInfo, dOMValidityStateGetTypeMismatch , -- ** dOMValidityStateGetValid + DOMValidityStateGetValidMethodInfo , dOMValidityStateGetValid , -- ** dOMValidityStateGetValueMissing + DOMValidityStateGetValueMissingMethodInfo, dOMValidityStateGetValueMissing , @@ -145,6 +156,49 @@ noDOMValidityState :: Maybe DOMValidityState noDOMValidityState = Nothing +type family ResolveDOMValidityStateMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMValidityStateMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMValidityStateMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMValidityStateMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMValidityStateMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMValidityStateMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMValidityStateMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMValidityStateMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMValidityStateMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMValidityStateMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMValidityStateMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMValidityStateMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMValidityStateMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMValidityStateMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMValidityStateMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMValidityStateMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMValidityStateMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMValidityStateMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMValidityStateMethod "getBadInput" o = DOMValidityStateGetBadInputMethodInfo + ResolveDOMValidityStateMethod "getCustomError" o = DOMValidityStateGetCustomErrorMethodInfo + ResolveDOMValidityStateMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMValidityStateMethod "getPatternMismatch" o = DOMValidityStateGetPatternMismatchMethodInfo + ResolveDOMValidityStateMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMValidityStateMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMValidityStateMethod "getRangeOverflow" o = DOMValidityStateGetRangeOverflowMethodInfo + ResolveDOMValidityStateMethod "getRangeUnderflow" o = DOMValidityStateGetRangeUnderflowMethodInfo + ResolveDOMValidityStateMethod "getStepMismatch" o = DOMValidityStateGetStepMismatchMethodInfo + ResolveDOMValidityStateMethod "getTooLong" o = DOMValidityStateGetTooLongMethodInfo + ResolveDOMValidityStateMethod "getTypeMismatch" o = DOMValidityStateGetTypeMismatchMethodInfo + ResolveDOMValidityStateMethod "getValid" o = DOMValidityStateGetValidMethodInfo + ResolveDOMValidityStateMethod "getValueMissing" o = DOMValidityStateGetValueMissingMethodInfo + ResolveDOMValidityStateMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMValidityStateMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMValidityStateMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMValidityStateMethod t DOMValidityState, MethodInfo info DOMValidityState p) => IsLabelProxy t (DOMValidityState -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMValidityStateMethod t DOMValidityState, MethodInfo info DOMValidityState p) => IsLabel t (DOMValidityState -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "bad-input" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -158,7 +212,7 @@ type AttrSetTypeConstraint DOMValidityStateBadInputPropertyInfo = (~) () type AttrBaseTypeConstraint DOMValidityStateBadInputPropertyInfo = DOMValidityStateK type AttrGetType DOMValidityStateBadInputPropertyInfo = Bool - type AttrLabel DOMValidityStateBadInputPropertyInfo = "DOMValidityState::bad-input" + type AttrLabel DOMValidityStateBadInputPropertyInfo = "bad-input" attrGet _ = getDOMValidityStateBadInput attrSet _ = undefined attrConstruct _ = undefined @@ -176,7 +230,7 @@ type AttrSetTypeConstraint DOMValidityStateCustomErrorPropertyInfo = (~) () type AttrBaseTypeConstraint DOMValidityStateCustomErrorPropertyInfo = DOMValidityStateK type AttrGetType DOMValidityStateCustomErrorPropertyInfo = Bool - type AttrLabel DOMValidityStateCustomErrorPropertyInfo = "DOMValidityState::custom-error" + type AttrLabel DOMValidityStateCustomErrorPropertyInfo = "custom-error" attrGet _ = getDOMValidityStateCustomError attrSet _ = undefined attrConstruct _ = undefined @@ -194,7 +248,7 @@ type AttrSetTypeConstraint DOMValidityStatePatternMismatchPropertyInfo = (~) () type AttrBaseTypeConstraint DOMValidityStatePatternMismatchPropertyInfo = DOMValidityStateK type AttrGetType DOMValidityStatePatternMismatchPropertyInfo = Bool - type AttrLabel DOMValidityStatePatternMismatchPropertyInfo = "DOMValidityState::pattern-mismatch" + type AttrLabel DOMValidityStatePatternMismatchPropertyInfo = "pattern-mismatch" attrGet _ = getDOMValidityStatePatternMismatch attrSet _ = undefined attrConstruct _ = undefined @@ -212,7 +266,7 @@ type AttrSetTypeConstraint DOMValidityStateRangeOverflowPropertyInfo = (~) () type AttrBaseTypeConstraint DOMValidityStateRangeOverflowPropertyInfo = DOMValidityStateK type AttrGetType DOMValidityStateRangeOverflowPropertyInfo = Bool - type AttrLabel DOMValidityStateRangeOverflowPropertyInfo = "DOMValidityState::range-overflow" + type AttrLabel DOMValidityStateRangeOverflowPropertyInfo = "range-overflow" attrGet _ = getDOMValidityStateRangeOverflow attrSet _ = undefined attrConstruct _ = undefined @@ -230,7 +284,7 @@ type AttrSetTypeConstraint DOMValidityStateRangeUnderflowPropertyInfo = (~) () type AttrBaseTypeConstraint DOMValidityStateRangeUnderflowPropertyInfo = DOMValidityStateK type AttrGetType DOMValidityStateRangeUnderflowPropertyInfo = Bool - type AttrLabel DOMValidityStateRangeUnderflowPropertyInfo = "DOMValidityState::range-underflow" + type AttrLabel DOMValidityStateRangeUnderflowPropertyInfo = "range-underflow" attrGet _ = getDOMValidityStateRangeUnderflow attrSet _ = undefined attrConstruct _ = undefined @@ -248,7 +302,7 @@ type AttrSetTypeConstraint DOMValidityStateStepMismatchPropertyInfo = (~) () type AttrBaseTypeConstraint DOMValidityStateStepMismatchPropertyInfo = DOMValidityStateK type AttrGetType DOMValidityStateStepMismatchPropertyInfo = Bool - type AttrLabel DOMValidityStateStepMismatchPropertyInfo = "DOMValidityState::step-mismatch" + type AttrLabel DOMValidityStateStepMismatchPropertyInfo = "step-mismatch" attrGet _ = getDOMValidityStateStepMismatch attrSet _ = undefined attrConstruct _ = undefined @@ -266,7 +320,7 @@ type AttrSetTypeConstraint DOMValidityStateTooLongPropertyInfo = (~) () type AttrBaseTypeConstraint DOMValidityStateTooLongPropertyInfo = DOMValidityStateK type AttrGetType DOMValidityStateTooLongPropertyInfo = Bool - type AttrLabel DOMValidityStateTooLongPropertyInfo = "DOMValidityState::too-long" + type AttrLabel DOMValidityStateTooLongPropertyInfo = "too-long" attrGet _ = getDOMValidityStateTooLong attrSet _ = undefined attrConstruct _ = undefined @@ -284,7 +338,7 @@ type AttrSetTypeConstraint DOMValidityStateTypeMismatchPropertyInfo = (~) () type AttrBaseTypeConstraint DOMValidityStateTypeMismatchPropertyInfo = DOMValidityStateK type AttrGetType DOMValidityStateTypeMismatchPropertyInfo = Bool - type AttrLabel DOMValidityStateTypeMismatchPropertyInfo = "DOMValidityState::type-mismatch" + type AttrLabel DOMValidityStateTypeMismatchPropertyInfo = "type-mismatch" attrGet _ = getDOMValidityStateTypeMismatch attrSet _ = undefined attrConstruct _ = undefined @@ -302,7 +356,7 @@ type AttrSetTypeConstraint DOMValidityStateValidPropertyInfo = (~) () type AttrBaseTypeConstraint DOMValidityStateValidPropertyInfo = DOMValidityStateK type AttrGetType DOMValidityStateValidPropertyInfo = Bool - type AttrLabel DOMValidityStateValidPropertyInfo = "DOMValidityState::valid" + type AttrLabel DOMValidityStateValidPropertyInfo = "valid" attrGet _ = getDOMValidityStateValid attrSet _ = undefined attrConstruct _ = undefined @@ -320,22 +374,21 @@ type AttrSetTypeConstraint DOMValidityStateValueMissingPropertyInfo = (~) () type AttrBaseTypeConstraint DOMValidityStateValueMissingPropertyInfo = DOMValidityStateK type AttrGetType DOMValidityStateValueMissingPropertyInfo = Bool - type AttrLabel DOMValidityStateValueMissingPropertyInfo = "DOMValidityState::value-missing" + type AttrLabel DOMValidityStateValueMissingPropertyInfo = "value-missing" attrGet _ = getDOMValidityStateValueMissing attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMValidityState = DOMValidityStateAttributeList -type DOMValidityStateAttributeList = ('[ '("bad-input", DOMValidityStateBadInputPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("custom-error", DOMValidityStateCustomErrorPropertyInfo), '("pattern-mismatch", DOMValidityStatePatternMismatchPropertyInfo), '("range-overflow", DOMValidityStateRangeOverflowPropertyInfo), '("range-underflow", DOMValidityStateRangeUnderflowPropertyInfo), '("step-mismatch", DOMValidityStateStepMismatchPropertyInfo), '("too-long", DOMValidityStateTooLongPropertyInfo), '("type-mismatch", DOMValidityStateTypeMismatchPropertyInfo), '("valid", DOMValidityStateValidPropertyInfo), '("value-missing", DOMValidityStateValueMissingPropertyInfo)] :: [(Symbol, *)]) +type DOMValidityStateAttributeList = ('[ '("badInput", DOMValidityStateBadInputPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("customError", DOMValidityStateCustomErrorPropertyInfo), '("patternMismatch", DOMValidityStatePatternMismatchPropertyInfo), '("rangeOverflow", DOMValidityStateRangeOverflowPropertyInfo), '("rangeUnderflow", DOMValidityStateRangeUnderflowPropertyInfo), '("stepMismatch", DOMValidityStateStepMismatchPropertyInfo), '("tooLong", DOMValidityStateTooLongPropertyInfo), '("typeMismatch", DOMValidityStateTypeMismatchPropertyInfo), '("valid", DOMValidityStateValidPropertyInfo), '("valueMissing", DOMValidityStateValueMissingPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMValidityState = DOMValidityStateSignalList -type DOMValidityStateSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMValidityStateSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMValidityState::get_bad_input -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -347,8 +400,8 @@ dOMValidityStateGetBadInput :: (MonadIO m, DOMValidityStateK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMValidityStateGetBadInput _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_validity_state_get_bad_input _obj' @@ -356,11 +409,14 @@ touchManagedPtr _obj return result' +data DOMValidityStateGetBadInputMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMValidityStateK a) => MethodInfo DOMValidityStateGetBadInputMethodInfo a signature where + overloadedMethod _ = dOMValidityStateGetBadInput + -- method DOMValidityState::get_custom_error -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -372,8 +428,8 @@ dOMValidityStateGetCustomError :: (MonadIO m, DOMValidityStateK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMValidityStateGetCustomError _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_validity_state_get_custom_error _obj' @@ -381,11 +437,14 @@ touchManagedPtr _obj return result' +data DOMValidityStateGetCustomErrorMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMValidityStateK a) => MethodInfo DOMValidityStateGetCustomErrorMethodInfo a signature where + overloadedMethod _ = dOMValidityStateGetCustomError + -- method DOMValidityState::get_pattern_mismatch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -397,8 +456,8 @@ dOMValidityStateGetPatternMismatch :: (MonadIO m, DOMValidityStateK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMValidityStateGetPatternMismatch _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_validity_state_get_pattern_mismatch _obj' @@ -406,11 +465,14 @@ touchManagedPtr _obj return result' +data DOMValidityStateGetPatternMismatchMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMValidityStateK a) => MethodInfo DOMValidityStateGetPatternMismatchMethodInfo a signature where + overloadedMethod _ = dOMValidityStateGetPatternMismatch + -- method DOMValidityState::get_range_overflow -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -422,8 +484,8 @@ dOMValidityStateGetRangeOverflow :: (MonadIO m, DOMValidityStateK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMValidityStateGetRangeOverflow _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_validity_state_get_range_overflow _obj' @@ -431,11 +493,14 @@ touchManagedPtr _obj return result' +data DOMValidityStateGetRangeOverflowMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMValidityStateK a) => MethodInfo DOMValidityStateGetRangeOverflowMethodInfo a signature where + overloadedMethod _ = dOMValidityStateGetRangeOverflow + -- method DOMValidityState::get_range_underflow -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -447,8 +512,8 @@ dOMValidityStateGetRangeUnderflow :: (MonadIO m, DOMValidityStateK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMValidityStateGetRangeUnderflow _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_validity_state_get_range_underflow _obj' @@ -456,11 +521,14 @@ touchManagedPtr _obj return result' +data DOMValidityStateGetRangeUnderflowMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMValidityStateK a) => MethodInfo DOMValidityStateGetRangeUnderflowMethodInfo a signature where + overloadedMethod _ = dOMValidityStateGetRangeUnderflow + -- method DOMValidityState::get_step_mismatch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -472,8 +540,8 @@ dOMValidityStateGetStepMismatch :: (MonadIO m, DOMValidityStateK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMValidityStateGetStepMismatch _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_validity_state_get_step_mismatch _obj' @@ -481,11 +549,14 @@ touchManagedPtr _obj return result' +data DOMValidityStateGetStepMismatchMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMValidityStateK a) => MethodInfo DOMValidityStateGetStepMismatchMethodInfo a signature where + overloadedMethod _ = dOMValidityStateGetStepMismatch + -- method DOMValidityState::get_too_long -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -497,8 +568,8 @@ dOMValidityStateGetTooLong :: (MonadIO m, DOMValidityStateK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMValidityStateGetTooLong _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_validity_state_get_too_long _obj' @@ -506,11 +577,14 @@ touchManagedPtr _obj return result' +data DOMValidityStateGetTooLongMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMValidityStateK a) => MethodInfo DOMValidityStateGetTooLongMethodInfo a signature where + overloadedMethod _ = dOMValidityStateGetTooLong + -- method DOMValidityState::get_type_mismatch -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -522,8 +596,8 @@ dOMValidityStateGetTypeMismatch :: (MonadIO m, DOMValidityStateK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMValidityStateGetTypeMismatch _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_validity_state_get_type_mismatch _obj' @@ -531,11 +605,14 @@ touchManagedPtr _obj return result' +data DOMValidityStateGetTypeMismatchMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMValidityStateK a) => MethodInfo DOMValidityStateGetTypeMismatchMethodInfo a signature where + overloadedMethod _ = dOMValidityStateGetTypeMismatch + -- method DOMValidityState::get_valid -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -547,8 +624,8 @@ dOMValidityStateGetValid :: (MonadIO m, DOMValidityStateK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMValidityStateGetValid _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_validity_state_get_valid _obj' @@ -556,11 +633,14 @@ touchManagedPtr _obj return result' +data DOMValidityStateGetValidMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMValidityStateK a) => MethodInfo DOMValidityStateGetValidMethodInfo a signature where + overloadedMethod _ = dOMValidityStateGetValid + -- method DOMValidityState::get_value_missing -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMValidityState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -572,13 +652,17 @@ dOMValidityStateGetValueMissing :: (MonadIO m, DOMValidityStateK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMValidityStateGetValueMissing _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_validity_state_get_value_missing _obj' let result' = (/= 0) result touchManagedPtr _obj return result' + +data DOMValidityStateGetValueMissingMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMValidityStateK a) => MethodInfo DOMValidityStateGetValueMissingMethodInfo a signature where + overloadedMethod _ = dOMValidityStateGetValueMissing diff --git a/GI/WebKit/Objects/DOMValidityState.hs-boot b/GI/WebKit/Objects/DOMValidityState.hs-boot --- a/GI/WebKit/Objects/DOMValidityState.hs-boot +++ b/GI/WebKit/Objects/DOMValidityState.hs-boot @@ -21,3 +21,13 @@ data DOMValidityStateTypeMismatchPropertyInfo data DOMValidityStateValidPropertyInfo data DOMValidityStateValueMissingPropertyInfo +data DOMValidityStateGetBadInputMethodInfo +data DOMValidityStateGetCustomErrorMethodInfo +data DOMValidityStateGetPatternMismatchMethodInfo +data DOMValidityStateGetRangeOverflowMethodInfo +data DOMValidityStateGetRangeUnderflowMethodInfo +data DOMValidityStateGetStepMismatchMethodInfo +data DOMValidityStateGetTooLongMethodInfo +data DOMValidityStateGetTypeMismatchMethodInfo +data DOMValidityStateGetValidMethodInfo +data DOMValidityStateGetValueMissingMethodInfo diff --git a/GI/WebKit/Objects/DOMVideoPlaybackQuality.hs b/GI/WebKit/Objects/DOMVideoPlaybackQuality.hs --- a/GI/WebKit/Objects/DOMVideoPlaybackQuality.hs +++ b/GI/WebKit/Objects/DOMVideoPlaybackQuality.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,22 +18,27 @@ -- * Methods -- ** dOMVideoPlaybackQualityGetCorruptedVideoFrames + DOMVideoPlaybackQualityGetCorruptedVideoFramesMethodInfo, dOMVideoPlaybackQualityGetCorruptedVideoFrames, -- ** dOMVideoPlaybackQualityGetCreationTime + DOMVideoPlaybackQualityGetCreationTimeMethodInfo, dOMVideoPlaybackQualityGetCreationTime , -- ** dOMVideoPlaybackQualityGetDroppedVideoFrames + DOMVideoPlaybackQualityGetDroppedVideoFramesMethodInfo, dOMVideoPlaybackQualityGetDroppedVideoFrames, -- ** dOMVideoPlaybackQualityGetTotalFrameDelay + DOMVideoPlaybackQualityGetTotalFrameDelayMethodInfo, dOMVideoPlaybackQualityGetTotalFrameDelay, -- ** dOMVideoPlaybackQualityGetTotalVideoFrames + DOMVideoPlaybackQualityGetTotalVideoFramesMethodInfo, dOMVideoPlaybackQualityGetTotalVideoFrames, @@ -100,6 +106,44 @@ noDOMVideoPlaybackQuality :: Maybe DOMVideoPlaybackQuality noDOMVideoPlaybackQuality = Nothing +type family ResolveDOMVideoPlaybackQualityMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMVideoPlaybackQualityMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMVideoPlaybackQualityMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMVideoPlaybackQualityMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMVideoPlaybackQualityMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMVideoPlaybackQualityMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMVideoPlaybackQualityMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMVideoPlaybackQualityMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMVideoPlaybackQualityMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMVideoPlaybackQualityMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMVideoPlaybackQualityMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMVideoPlaybackQualityMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMVideoPlaybackQualityMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMVideoPlaybackQualityMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMVideoPlaybackQualityMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMVideoPlaybackQualityMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMVideoPlaybackQualityMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMVideoPlaybackQualityMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMVideoPlaybackQualityMethod "getCorruptedVideoFrames" o = DOMVideoPlaybackQualityGetCorruptedVideoFramesMethodInfo + ResolveDOMVideoPlaybackQualityMethod "getCreationTime" o = DOMVideoPlaybackQualityGetCreationTimeMethodInfo + ResolveDOMVideoPlaybackQualityMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMVideoPlaybackQualityMethod "getDroppedVideoFrames" o = DOMVideoPlaybackQualityGetDroppedVideoFramesMethodInfo + ResolveDOMVideoPlaybackQualityMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMVideoPlaybackQualityMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMVideoPlaybackQualityMethod "getTotalFrameDelay" o = DOMVideoPlaybackQualityGetTotalFrameDelayMethodInfo + ResolveDOMVideoPlaybackQualityMethod "getTotalVideoFrames" o = DOMVideoPlaybackQualityGetTotalVideoFramesMethodInfo + ResolveDOMVideoPlaybackQualityMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMVideoPlaybackQualityMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMVideoPlaybackQualityMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMVideoPlaybackQualityMethod t DOMVideoPlaybackQuality, MethodInfo info DOMVideoPlaybackQuality p) => IsLabelProxy t (DOMVideoPlaybackQuality -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMVideoPlaybackQualityMethod t DOMVideoPlaybackQuality, MethodInfo info DOMVideoPlaybackQuality p) => IsLabel t (DOMVideoPlaybackQuality -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "corrupted-video-frames" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -113,7 +157,7 @@ type AttrSetTypeConstraint DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo = DOMVideoPlaybackQualityK type AttrGetType DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo = Word64 - type AttrLabel DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo = "DOMVideoPlaybackQuality::corrupted-video-frames" + type AttrLabel DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo = "corrupted-video-frames" attrGet _ = getDOMVideoPlaybackQualityCorruptedVideoFrames attrSet _ = undefined attrConstruct _ = undefined @@ -131,7 +175,7 @@ type AttrSetTypeConstraint DOMVideoPlaybackQualityCreationTimePropertyInfo = (~) () type AttrBaseTypeConstraint DOMVideoPlaybackQualityCreationTimePropertyInfo = DOMVideoPlaybackQualityK type AttrGetType DOMVideoPlaybackQualityCreationTimePropertyInfo = Double - type AttrLabel DOMVideoPlaybackQualityCreationTimePropertyInfo = "DOMVideoPlaybackQuality::creation-time" + type AttrLabel DOMVideoPlaybackQualityCreationTimePropertyInfo = "creation-time" attrGet _ = getDOMVideoPlaybackQualityCreationTime attrSet _ = undefined attrConstruct _ = undefined @@ -149,7 +193,7 @@ type AttrSetTypeConstraint DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo = DOMVideoPlaybackQualityK type AttrGetType DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo = Word64 - type AttrLabel DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo = "DOMVideoPlaybackQuality::dropped-video-frames" + type AttrLabel DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo = "dropped-video-frames" attrGet _ = getDOMVideoPlaybackQualityDroppedVideoFrames attrSet _ = undefined attrConstruct _ = undefined @@ -167,7 +211,7 @@ type AttrSetTypeConstraint DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo = (~) () type AttrBaseTypeConstraint DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo = DOMVideoPlaybackQualityK type AttrGetType DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo = Double - type AttrLabel DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo = "DOMVideoPlaybackQuality::total-frame-delay" + type AttrLabel DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo = "total-frame-delay" attrGet _ = getDOMVideoPlaybackQualityTotalFrameDelay attrSet _ = undefined attrConstruct _ = undefined @@ -185,22 +229,21 @@ type AttrSetTypeConstraint DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo = (~) () type AttrBaseTypeConstraint DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo = DOMVideoPlaybackQualityK type AttrGetType DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo = Word64 - type AttrLabel DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo = "DOMVideoPlaybackQuality::total-video-frames" + type AttrLabel DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo = "total-video-frames" attrGet _ = getDOMVideoPlaybackQualityTotalVideoFrames attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMVideoPlaybackQuality = DOMVideoPlaybackQualityAttributeList -type DOMVideoPlaybackQualityAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("corrupted-video-frames", DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo), '("creation-time", DOMVideoPlaybackQualityCreationTimePropertyInfo), '("dropped-video-frames", DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo), '("total-frame-delay", DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo), '("total-video-frames", DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo)] :: [(Symbol, *)]) +type DOMVideoPlaybackQualityAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("corruptedVideoFrames", DOMVideoPlaybackQualityCorruptedVideoFramesPropertyInfo), '("creationTime", DOMVideoPlaybackQualityCreationTimePropertyInfo), '("droppedVideoFrames", DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo), '("totalFrameDelay", DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo), '("totalVideoFrames", DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMVideoPlaybackQuality = DOMVideoPlaybackQualitySignalList -type DOMVideoPlaybackQualitySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMVideoPlaybackQualitySignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMVideoPlaybackQuality::get_corrupted_video_frames -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -212,19 +255,22 @@ dOMVideoPlaybackQualityGetCorruptedVideoFrames :: (MonadIO m, DOMVideoPlaybackQualityK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMVideoPlaybackQualityGetCorruptedVideoFrames _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_playback_quality_get_corrupted_video_frames _obj' touchManagedPtr _obj return result +data DOMVideoPlaybackQualityGetCorruptedVideoFramesMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMVideoPlaybackQualityK a) => MethodInfo DOMVideoPlaybackQualityGetCorruptedVideoFramesMethodInfo a signature where + overloadedMethod _ = dOMVideoPlaybackQualityGetCorruptedVideoFrames + -- method DOMVideoPlaybackQuality::get_creation_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -236,8 +282,8 @@ dOMVideoPlaybackQualityGetCreationTime :: (MonadIO m, DOMVideoPlaybackQualityK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMVideoPlaybackQualityGetCreationTime _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_playback_quality_get_creation_time _obj' @@ -245,11 +291,14 @@ touchManagedPtr _obj return result' +data DOMVideoPlaybackQualityGetCreationTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMVideoPlaybackQualityK a) => MethodInfo DOMVideoPlaybackQualityGetCreationTimeMethodInfo a signature where + overloadedMethod _ = dOMVideoPlaybackQualityGetCreationTime + -- method DOMVideoPlaybackQuality::get_dropped_video_frames -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -261,19 +310,22 @@ dOMVideoPlaybackQualityGetDroppedVideoFrames :: (MonadIO m, DOMVideoPlaybackQualityK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMVideoPlaybackQualityGetDroppedVideoFrames _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_playback_quality_get_dropped_video_frames _obj' touchManagedPtr _obj return result +data DOMVideoPlaybackQualityGetDroppedVideoFramesMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMVideoPlaybackQualityK a) => MethodInfo DOMVideoPlaybackQualityGetDroppedVideoFramesMethodInfo a signature where + overloadedMethod _ = dOMVideoPlaybackQualityGetDroppedVideoFrames + -- method DOMVideoPlaybackQuality::get_total_frame_delay -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -285,8 +337,8 @@ dOMVideoPlaybackQualityGetTotalFrameDelay :: (MonadIO m, DOMVideoPlaybackQualityK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMVideoPlaybackQualityGetTotalFrameDelay _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_playback_quality_get_total_frame_delay _obj' @@ -294,11 +346,14 @@ touchManagedPtr _obj return result' +data DOMVideoPlaybackQualityGetTotalFrameDelayMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMVideoPlaybackQualityK a) => MethodInfo DOMVideoPlaybackQualityGetTotalFrameDelayMethodInfo a signature where + overloadedMethod _ = dOMVideoPlaybackQualityGetTotalFrameDelay + -- method DOMVideoPlaybackQuality::get_total_video_frames -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoPlaybackQuality", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -310,12 +365,16 @@ dOMVideoPlaybackQualityGetTotalVideoFrames :: (MonadIO m, DOMVideoPlaybackQualityK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMVideoPlaybackQualityGetTotalVideoFrames _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_playback_quality_get_total_video_frames _obj' touchManagedPtr _obj return result + +data DOMVideoPlaybackQualityGetTotalVideoFramesMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMVideoPlaybackQualityK a) => MethodInfo DOMVideoPlaybackQualityGetTotalVideoFramesMethodInfo a signature where + overloadedMethod _ = dOMVideoPlaybackQualityGetTotalVideoFrames diff --git a/GI/WebKit/Objects/DOMVideoPlaybackQuality.hs-boot b/GI/WebKit/Objects/DOMVideoPlaybackQuality.hs-boot --- a/GI/WebKit/Objects/DOMVideoPlaybackQuality.hs-boot +++ b/GI/WebKit/Objects/DOMVideoPlaybackQuality.hs-boot @@ -16,3 +16,8 @@ data DOMVideoPlaybackQualityDroppedVideoFramesPropertyInfo data DOMVideoPlaybackQualityTotalFrameDelayPropertyInfo data DOMVideoPlaybackQualityTotalVideoFramesPropertyInfo +data DOMVideoPlaybackQualityGetCorruptedVideoFramesMethodInfo +data DOMVideoPlaybackQualityGetCreationTimeMethodInfo +data DOMVideoPlaybackQualityGetDroppedVideoFramesMethodInfo +data DOMVideoPlaybackQualityGetTotalFrameDelayMethodInfo +data DOMVideoPlaybackQualityGetTotalVideoFramesMethodInfo diff --git a/GI/WebKit/Objects/DOMVideoTrack.hs b/GI/WebKit/Objects/DOMVideoTrack.hs --- a/GI/WebKit/Objects/DOMVideoTrack.hs +++ b/GI/WebKit/Objects/DOMVideoTrack.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** dOMVideoTrackGetId + DOMVideoTrackGetIdMethodInfo , dOMVideoTrackGetId , -- ** dOMVideoTrackGetKind + DOMVideoTrackGetKindMethodInfo , dOMVideoTrackGetKind , -- ** dOMVideoTrackGetLabel + DOMVideoTrackGetLabelMethodInfo , dOMVideoTrackGetLabel , -- ** dOMVideoTrackGetLanguage + DOMVideoTrackGetLanguageMethodInfo , dOMVideoTrackGetLanguage , -- ** dOMVideoTrackGetSelected + DOMVideoTrackGetSelectedMethodInfo , dOMVideoTrackGetSelected , -- ** dOMVideoTrackSetSelected + DOMVideoTrackSetSelectedMethodInfo , dOMVideoTrackSetSelected , @@ -106,6 +113,45 @@ noDOMVideoTrack :: Maybe DOMVideoTrack noDOMVideoTrack = Nothing +type family ResolveDOMVideoTrackMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMVideoTrackMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMVideoTrackMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMVideoTrackMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMVideoTrackMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMVideoTrackMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMVideoTrackMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMVideoTrackMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMVideoTrackMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMVideoTrackMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMVideoTrackMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMVideoTrackMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMVideoTrackMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMVideoTrackMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMVideoTrackMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMVideoTrackMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMVideoTrackMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMVideoTrackMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMVideoTrackMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMVideoTrackMethod "getId" o = DOMVideoTrackGetIdMethodInfo + ResolveDOMVideoTrackMethod "getKind" o = DOMVideoTrackGetKindMethodInfo + ResolveDOMVideoTrackMethod "getLabel" o = DOMVideoTrackGetLabelMethodInfo + ResolveDOMVideoTrackMethod "getLanguage" o = DOMVideoTrackGetLanguageMethodInfo + ResolveDOMVideoTrackMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMVideoTrackMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMVideoTrackMethod "getSelected" o = DOMVideoTrackGetSelectedMethodInfo + ResolveDOMVideoTrackMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMVideoTrackMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMVideoTrackMethod "setSelected" o = DOMVideoTrackSetSelectedMethodInfo + ResolveDOMVideoTrackMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMVideoTrackMethod t DOMVideoTrack, MethodInfo info DOMVideoTrack p) => IsLabelProxy t (DOMVideoTrack -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMVideoTrackMethod t DOMVideoTrack, MethodInfo info DOMVideoTrack p) => IsLabel t (DOMVideoTrack -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "id" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -119,7 +165,7 @@ type AttrSetTypeConstraint DOMVideoTrackIdPropertyInfo = (~) () type AttrBaseTypeConstraint DOMVideoTrackIdPropertyInfo = DOMVideoTrackK type AttrGetType DOMVideoTrackIdPropertyInfo = T.Text - type AttrLabel DOMVideoTrackIdPropertyInfo = "DOMVideoTrack::id" + type AttrLabel DOMVideoTrackIdPropertyInfo = "id" attrGet _ = getDOMVideoTrackId attrSet _ = undefined attrConstruct _ = undefined @@ -137,7 +183,7 @@ type AttrSetTypeConstraint DOMVideoTrackKindPropertyInfo = (~) () type AttrBaseTypeConstraint DOMVideoTrackKindPropertyInfo = DOMVideoTrackK type AttrGetType DOMVideoTrackKindPropertyInfo = T.Text - type AttrLabel DOMVideoTrackKindPropertyInfo = "DOMVideoTrack::kind" + type AttrLabel DOMVideoTrackKindPropertyInfo = "kind" attrGet _ = getDOMVideoTrackKind attrSet _ = undefined attrConstruct _ = undefined @@ -155,7 +201,7 @@ type AttrSetTypeConstraint DOMVideoTrackLabelPropertyInfo = (~) () type AttrBaseTypeConstraint DOMVideoTrackLabelPropertyInfo = DOMVideoTrackK type AttrGetType DOMVideoTrackLabelPropertyInfo = T.Text - type AttrLabel DOMVideoTrackLabelPropertyInfo = "DOMVideoTrack::label" + type AttrLabel DOMVideoTrackLabelPropertyInfo = "label" attrGet _ = getDOMVideoTrackLabel attrSet _ = undefined attrConstruct _ = undefined @@ -173,7 +219,7 @@ type AttrSetTypeConstraint DOMVideoTrackLanguagePropertyInfo = (~) () type AttrBaseTypeConstraint DOMVideoTrackLanguagePropertyInfo = DOMVideoTrackK type AttrGetType DOMVideoTrackLanguagePropertyInfo = T.Text - type AttrLabel DOMVideoTrackLanguagePropertyInfo = "DOMVideoTrack::language" + type AttrLabel DOMVideoTrackLanguagePropertyInfo = "language" attrGet _ = getDOMVideoTrackLanguage attrSet _ = undefined attrConstruct _ = undefined @@ -197,22 +243,21 @@ type AttrSetTypeConstraint DOMVideoTrackSelectedPropertyInfo = (~) Bool type AttrBaseTypeConstraint DOMVideoTrackSelectedPropertyInfo = DOMVideoTrackK type AttrGetType DOMVideoTrackSelectedPropertyInfo = Bool - type AttrLabel DOMVideoTrackSelectedPropertyInfo = "DOMVideoTrack::selected" + type AttrLabel DOMVideoTrackSelectedPropertyInfo = "selected" attrGet _ = getDOMVideoTrackSelected attrSet _ = setDOMVideoTrackSelected attrConstruct _ = constructDOMVideoTrackSelected type instance AttributeList DOMVideoTrack = DOMVideoTrackAttributeList -type DOMVideoTrackAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("id", DOMVideoTrackIdPropertyInfo), '("kind", DOMVideoTrackKindPropertyInfo), '("label", DOMVideoTrackLabelPropertyInfo), '("language", DOMVideoTrackLanguagePropertyInfo), '("selected", DOMVideoTrackSelectedPropertyInfo)] :: [(Symbol, *)]) +type DOMVideoTrackAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("id", DOMVideoTrackIdPropertyInfo), '("kind", DOMVideoTrackKindPropertyInfo), '("label", DOMVideoTrackLabelPropertyInfo), '("language", DOMVideoTrackLanguagePropertyInfo), '("selected", DOMVideoTrackSelectedPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMVideoTrack = DOMVideoTrackSignalList -type DOMVideoTrackSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMVideoTrackSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMVideoTrack::get_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -224,8 +269,8 @@ dOMVideoTrackGetId :: (MonadIO m, DOMVideoTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMVideoTrackGetId _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_track_get_id _obj' @@ -235,11 +280,14 @@ touchManagedPtr _obj return result' +data DOMVideoTrackGetIdMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMVideoTrackK a) => MethodInfo DOMVideoTrackGetIdMethodInfo a signature where + overloadedMethod _ = dOMVideoTrackGetId + -- method DOMVideoTrack::get_kind -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -251,8 +299,8 @@ dOMVideoTrackGetKind :: (MonadIO m, DOMVideoTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMVideoTrackGetKind _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_track_get_kind _obj' @@ -262,11 +310,14 @@ touchManagedPtr _obj return result' +data DOMVideoTrackGetKindMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMVideoTrackK a) => MethodInfo DOMVideoTrackGetKindMethodInfo a signature where + overloadedMethod _ = dOMVideoTrackGetKind + -- method DOMVideoTrack::get_label -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -278,8 +329,8 @@ dOMVideoTrackGetLabel :: (MonadIO m, DOMVideoTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMVideoTrackGetLabel _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_track_get_label _obj' @@ -289,11 +340,14 @@ touchManagedPtr _obj return result' +data DOMVideoTrackGetLabelMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMVideoTrackK a) => MethodInfo DOMVideoTrackGetLabelMethodInfo a signature where + overloadedMethod _ = dOMVideoTrackGetLabel + -- method DOMVideoTrack::get_language -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -305,8 +359,8 @@ dOMVideoTrackGetLanguage :: (MonadIO m, DOMVideoTrackK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMVideoTrackGetLanguage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_track_get_language _obj' @@ -316,11 +370,14 @@ touchManagedPtr _obj return result' +data DOMVideoTrackGetLanguageMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMVideoTrackK a) => MethodInfo DOMVideoTrackGetLanguageMethodInfo a signature where + overloadedMethod _ = dOMVideoTrackGetLanguage + -- method DOMVideoTrack::get_selected -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -332,8 +389,8 @@ dOMVideoTrackGetSelected :: (MonadIO m, DOMVideoTrackK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMVideoTrackGetSelected _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_track_get_selected _obj' @@ -341,11 +398,14 @@ touchManagedPtr _obj return result' +data DOMVideoTrackGetSelectedMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMVideoTrackK a) => MethodInfo DOMVideoTrackGetSelectedMethodInfo a signature where + overloadedMethod _ = dOMVideoTrackGetSelected + -- method DOMVideoTrack::set_selected -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrack", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -358,14 +418,18 @@ dOMVideoTrackSetSelected :: (MonadIO m, DOMVideoTrackK a) => - a -> -- _obj - Bool -> -- value - m () + a -- _obj + -> Bool -- value + -> m () -- result dOMVideoTrackSetSelected _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = (fromIntegral . fromEnum) value webkit_dom_video_track_set_selected _obj' value' touchManagedPtr _obj return () + +data DOMVideoTrackSetSelectedMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, DOMVideoTrackK a) => MethodInfo DOMVideoTrackSetSelectedMethodInfo a signature where + overloadedMethod _ = dOMVideoTrackSetSelected diff --git a/GI/WebKit/Objects/DOMVideoTrack.hs-boot b/GI/WebKit/Objects/DOMVideoTrack.hs-boot --- a/GI/WebKit/Objects/DOMVideoTrack.hs-boot +++ b/GI/WebKit/Objects/DOMVideoTrack.hs-boot @@ -16,3 +16,9 @@ data DOMVideoTrackLabelPropertyInfo data DOMVideoTrackLanguagePropertyInfo data DOMVideoTrackSelectedPropertyInfo +data DOMVideoTrackGetIdMethodInfo +data DOMVideoTrackGetKindMethodInfo +data DOMVideoTrackGetLabelMethodInfo +data DOMVideoTrackGetLanguageMethodInfo +data DOMVideoTrackGetSelectedMethodInfo +data DOMVideoTrackSetSelectedMethodInfo diff --git a/GI/WebKit/Objects/DOMVideoTrackList.hs b/GI/WebKit/Objects/DOMVideoTrackList.hs --- a/GI/WebKit/Objects/DOMVideoTrackList.hs +++ b/GI/WebKit/Objects/DOMVideoTrackList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMVideoTrackListDispatchEvent + DOMVideoTrackListDispatchEventMethodInfo, dOMVideoTrackListDispatchEvent , -- ** dOMVideoTrackListGetLength + DOMVideoTrackListGetLengthMethodInfo , dOMVideoTrackListGetLength , -- ** dOMVideoTrackListGetTrackById + DOMVideoTrackListGetTrackByIdMethodInfo , dOMVideoTrackListGetTrackById , -- ** dOMVideoTrackListItem + DOMVideoTrackListItemMethodInfo , dOMVideoTrackListItem , @@ -76,6 +81,44 @@ noDOMVideoTrackList :: Maybe DOMVideoTrackList noDOMVideoTrackList = Nothing +type family ResolveDOMVideoTrackListMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMVideoTrackListMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMVideoTrackListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMVideoTrackListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMVideoTrackListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMVideoTrackListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMVideoTrackListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMVideoTrackListMethod "item" o = DOMVideoTrackListItemMethodInfo + ResolveDOMVideoTrackListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMVideoTrackListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMVideoTrackListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMVideoTrackListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMVideoTrackListMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMVideoTrackListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMVideoTrackListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMVideoTrackListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMVideoTrackListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMVideoTrackListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMVideoTrackListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMVideoTrackListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMVideoTrackListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMVideoTrackListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMVideoTrackListMethod "getLength" o = DOMVideoTrackListGetLengthMethodInfo + ResolveDOMVideoTrackListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMVideoTrackListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMVideoTrackListMethod "getTrackById" o = DOMVideoTrackListGetTrackByIdMethodInfo + ResolveDOMVideoTrackListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMVideoTrackListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMVideoTrackListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMVideoTrackListMethod t DOMVideoTrackList, MethodInfo info DOMVideoTrackList p) => IsLabelProxy t (DOMVideoTrackList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMVideoTrackListMethod t DOMVideoTrackList, MethodInfo info DOMVideoTrackList p) => IsLabel t (DOMVideoTrackList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "length" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -89,22 +132,21 @@ type AttrSetTypeConstraint DOMVideoTrackListLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMVideoTrackListLengthPropertyInfo = DOMVideoTrackListK type AttrGetType DOMVideoTrackListLengthPropertyInfo = Word64 - type AttrLabel DOMVideoTrackListLengthPropertyInfo = "DOMVideoTrackList::length" + type AttrLabel DOMVideoTrackListLengthPropertyInfo = "length" attrGet _ = getDOMVideoTrackListLength attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMVideoTrackList = DOMVideoTrackListAttributeList -type DOMVideoTrackListAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("length", DOMVideoTrackListLengthPropertyInfo)] :: [(Symbol, *)]) +type DOMVideoTrackListAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("length", DOMVideoTrackListLengthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMVideoTrackList = DOMVideoTrackListSignalList -type DOMVideoTrackListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMVideoTrackListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMVideoTrackList::dispatch_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "evt", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -118,9 +160,9 @@ {-# DEPRECATED dOMVideoTrackListDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-} dOMVideoTrackListDispatchEvent :: (MonadIO m, DOMVideoTrackListK a, DOMEventK b) => - a -> -- _obj - b -> -- evt - m () + a -- _obj + -> b -- evt + -> m () -- result dOMVideoTrackListDispatchEvent _obj evt = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let evt' = unsafeManagedPtrCastPtr evt @@ -133,11 +175,14 @@ return () ) +data DOMVideoTrackListDispatchEventMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMVideoTrackListK a, DOMEventK b) => MethodInfo DOMVideoTrackListDispatchEventMethodInfo a signature where + overloadedMethod _ = dOMVideoTrackListDispatchEvent + -- method DOMVideoTrackList::get_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -149,19 +194,22 @@ dOMVideoTrackListGetLength :: (MonadIO m, DOMVideoTrackListK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMVideoTrackListGetLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_track_list_get_length _obj' touchManagedPtr _obj return result +data DOMVideoTrackListGetLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMVideoTrackListK a) => MethodInfo DOMVideoTrackListGetLengthMethodInfo a signature where + overloadedMethod _ = dOMVideoTrackListGetLength + -- method DOMVideoTrackList::get_track_by_id -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMVideoTrack" -- throws : False -- Skip return : False @@ -174,9 +222,9 @@ dOMVideoTrackListGetTrackById :: (MonadIO m, DOMVideoTrackListK a) => - a -> -- _obj - T.Text -> -- id - m DOMVideoTrack + a -- _obj + -> T.Text -- id + -> m DOMVideoTrack -- result dOMVideoTrackListGetTrackById _obj id = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj id' <- textToCString id @@ -187,11 +235,14 @@ freeMem id' return result' +data DOMVideoTrackListGetTrackByIdMethodInfo +instance (signature ~ (T.Text -> m DOMVideoTrack), MonadIO m, DOMVideoTrackListK a) => MethodInfo DOMVideoTrackListGetTrackByIdMethodInfo a signature where + overloadedMethod _ = dOMVideoTrackListGetTrackById + -- method DOMVideoTrackList::item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMVideoTrackList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMVideoTrack" -- throws : False -- Skip return : False @@ -204,9 +255,9 @@ dOMVideoTrackListItem :: (MonadIO m, DOMVideoTrackListK a) => - a -> -- _obj - Word64 -> -- index - m DOMVideoTrack + a -- _obj + -> Word64 -- index + -> m DOMVideoTrack -- result dOMVideoTrackListItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_video_track_list_item _obj' index @@ -214,5 +265,9 @@ result' <- (wrapObject DOMVideoTrack) result touchManagedPtr _obj return result' + +data DOMVideoTrackListItemMethodInfo +instance (signature ~ (Word64 -> m DOMVideoTrack), MonadIO m, DOMVideoTrackListK a) => MethodInfo DOMVideoTrackListItemMethodInfo a signature where + overloadedMethod _ = dOMVideoTrackListItem diff --git a/GI/WebKit/Objects/DOMVideoTrackList.hs-boot b/GI/WebKit/Objects/DOMVideoTrackList.hs-boot --- a/GI/WebKit/Objects/DOMVideoTrackList.hs-boot +++ b/GI/WebKit/Objects/DOMVideoTrackList.hs-boot @@ -12,3 +12,7 @@ class GObject o => DOMVideoTrackListK o instance (GObject o, IsDescendantOf DOMVideoTrackList o) => DOMVideoTrackListK o data DOMVideoTrackListLengthPropertyInfo +data DOMVideoTrackListDispatchEventMethodInfo +data DOMVideoTrackListGetLengthMethodInfo +data DOMVideoTrackListGetTrackByIdMethodInfo +data DOMVideoTrackListItemMethodInfo diff --git a/GI/WebKit/Objects/DOMWebKitNamedFlow.hs b/GI/WebKit/Objects/DOMWebKitNamedFlow.hs --- a/GI/WebKit/Objects/DOMWebKitNamedFlow.hs +++ b/GI/WebKit/Objects/DOMWebKitNamedFlow.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,42 +18,52 @@ -- * Methods -- ** dOMWebKitNamedFlowDispatchEvent + DOMWebKitNamedFlowDispatchEventMethodInfo, dOMWebKitNamedFlowDispatchEvent , -- ** dOMWebKitNamedFlowGetContent + DOMWebKitNamedFlowGetContentMethodInfo , dOMWebKitNamedFlowGetContent , -- ** dOMWebKitNamedFlowGetContentNodes + DOMWebKitNamedFlowGetContentNodesMethodInfo, dOMWebKitNamedFlowGetContentNodes , -- ** dOMWebKitNamedFlowGetFirstEmptyRegionIndex + DOMWebKitNamedFlowGetFirstEmptyRegionIndexMethodInfo, dOMWebKitNamedFlowGetFirstEmptyRegionIndex, -- ** dOMWebKitNamedFlowGetName + DOMWebKitNamedFlowGetNameMethodInfo , dOMWebKitNamedFlowGetName , -- ** dOMWebKitNamedFlowGetOverflow + DOMWebKitNamedFlowGetOverflowMethodInfo , dOMWebKitNamedFlowGetOverflow , -- ** dOMWebKitNamedFlowGetOverset + DOMWebKitNamedFlowGetOversetMethodInfo , dOMWebKitNamedFlowGetOverset , -- ** dOMWebKitNamedFlowGetRegions + DOMWebKitNamedFlowGetRegionsMethodInfo , dOMWebKitNamedFlowGetRegions , -- ** dOMWebKitNamedFlowGetRegionsByContent + DOMWebKitNamedFlowGetRegionsByContentMethodInfo, dOMWebKitNamedFlowGetRegionsByContent , -- ** dOMWebKitNamedFlowGetRegionsByContentNode + DOMWebKitNamedFlowGetRegionsByContentNodeMethodInfo, dOMWebKitNamedFlowGetRegionsByContentNode, @@ -110,6 +121,50 @@ noDOMWebKitNamedFlow :: Maybe DOMWebKitNamedFlow noDOMWebKitNamedFlow = Nothing +type family ResolveDOMWebKitNamedFlowMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMWebKitNamedFlowMethod "addEventListener" o = DOMEventTargetAddEventListenerMethodInfo + ResolveDOMWebKitNamedFlowMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMWebKitNamedFlowMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMWebKitNamedFlowMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMWebKitNamedFlowMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMWebKitNamedFlowMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMWebKitNamedFlowMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMWebKitNamedFlowMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMWebKitNamedFlowMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMWebKitNamedFlowMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMWebKitNamedFlowMethod "removeEventListener" o = DOMEventTargetRemoveEventListenerMethodInfo + ResolveDOMWebKitNamedFlowMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMWebKitNamedFlowMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMWebKitNamedFlowMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMWebKitNamedFlowMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMWebKitNamedFlowMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMWebKitNamedFlowMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMWebKitNamedFlowMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMWebKitNamedFlowMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMWebKitNamedFlowMethod "getContent" o = DOMWebKitNamedFlowGetContentMethodInfo + ResolveDOMWebKitNamedFlowMethod "getContentNodes" o = DOMWebKitNamedFlowGetContentNodesMethodInfo + ResolveDOMWebKitNamedFlowMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMWebKitNamedFlowMethod "getFirstEmptyRegionIndex" o = DOMWebKitNamedFlowGetFirstEmptyRegionIndexMethodInfo + ResolveDOMWebKitNamedFlowMethod "getName" o = DOMWebKitNamedFlowGetNameMethodInfo + ResolveDOMWebKitNamedFlowMethod "getOverflow" o = DOMWebKitNamedFlowGetOverflowMethodInfo + ResolveDOMWebKitNamedFlowMethod "getOverset" o = DOMWebKitNamedFlowGetOversetMethodInfo + ResolveDOMWebKitNamedFlowMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMWebKitNamedFlowMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMWebKitNamedFlowMethod "getRegions" o = DOMWebKitNamedFlowGetRegionsMethodInfo + ResolveDOMWebKitNamedFlowMethod "getRegionsByContent" o = DOMWebKitNamedFlowGetRegionsByContentMethodInfo + ResolveDOMWebKitNamedFlowMethod "getRegionsByContentNode" o = DOMWebKitNamedFlowGetRegionsByContentNodeMethodInfo + ResolveDOMWebKitNamedFlowMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMWebKitNamedFlowMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMWebKitNamedFlowMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMWebKitNamedFlowMethod t DOMWebKitNamedFlow, MethodInfo info DOMWebKitNamedFlow p) => IsLabelProxy t (DOMWebKitNamedFlow -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMWebKitNamedFlowMethod t DOMWebKitNamedFlow, MethodInfo info DOMWebKitNamedFlow p) => IsLabel t (DOMWebKitNamedFlow -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "first-empty-region-index" -- Type: TBasicType TInt64 -- Flags: [PropertyReadable] @@ -123,7 +178,7 @@ type AttrSetTypeConstraint DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = (~) () type AttrBaseTypeConstraint DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = DOMWebKitNamedFlowK type AttrGetType DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = Int64 - type AttrLabel DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = "DOMWebKitNamedFlow::first-empty-region-index" + type AttrLabel DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo = "first-empty-region-index" attrGet _ = getDOMWebKitNamedFlowFirstEmptyRegionIndex attrSet _ = undefined attrConstruct _ = undefined @@ -141,7 +196,7 @@ type AttrSetTypeConstraint DOMWebKitNamedFlowNamePropertyInfo = (~) () type AttrBaseTypeConstraint DOMWebKitNamedFlowNamePropertyInfo = DOMWebKitNamedFlowK type AttrGetType DOMWebKitNamedFlowNamePropertyInfo = T.Text - type AttrLabel DOMWebKitNamedFlowNamePropertyInfo = "DOMWebKitNamedFlow::name" + type AttrLabel DOMWebKitNamedFlowNamePropertyInfo = "name" attrGet _ = getDOMWebKitNamedFlowName attrSet _ = undefined attrConstruct _ = undefined @@ -159,22 +214,21 @@ type AttrSetTypeConstraint DOMWebKitNamedFlowOversetPropertyInfo = (~) () type AttrBaseTypeConstraint DOMWebKitNamedFlowOversetPropertyInfo = DOMWebKitNamedFlowK type AttrGetType DOMWebKitNamedFlowOversetPropertyInfo = Bool - type AttrLabel DOMWebKitNamedFlowOversetPropertyInfo = "DOMWebKitNamedFlow::overset" + type AttrLabel DOMWebKitNamedFlowOversetPropertyInfo = "overset" attrGet _ = getDOMWebKitNamedFlowOverset attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMWebKitNamedFlow = DOMWebKitNamedFlowAttributeList -type DOMWebKitNamedFlowAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("first-empty-region-index", DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo), '("name", DOMWebKitNamedFlowNamePropertyInfo), '("overset", DOMWebKitNamedFlowOversetPropertyInfo)] :: [(Symbol, *)]) +type DOMWebKitNamedFlowAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("firstEmptyRegionIndex", DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo), '("name", DOMWebKitNamedFlowNamePropertyInfo), '("overset", DOMWebKitNamedFlowOversetPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMWebKitNamedFlow = DOMWebKitNamedFlowSignalList -type DOMWebKitNamedFlowSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMWebKitNamedFlowSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMWebKitNamedFlow::dispatch_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event", argType = TInterface "WebKit" "DOMEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -188,9 +242,9 @@ {-# DEPRECATED dOMWebKitNamedFlowDispatchEvent ["(Since version 2.4)","Use webkit_dom_event_target_dispatch_event() instead."]#-} dOMWebKitNamedFlowDispatchEvent :: (MonadIO m, DOMWebKitNamedFlowK a, DOMEventK b) => - a -> -- _obj - b -> -- event - m () + a -- _obj + -> b -- event + -> m () -- result dOMWebKitNamedFlowDispatchEvent _obj event = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let event' = unsafeManagedPtrCastPtr event @@ -203,11 +257,14 @@ return () ) +data DOMWebKitNamedFlowDispatchEventMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, DOMWebKitNamedFlowK a, DOMEventK b) => MethodInfo DOMWebKitNamedFlowDispatchEventMethodInfo a signature where + overloadedMethod _ = dOMWebKitNamedFlowDispatchEvent + -- method DOMWebKitNamedFlow::get_content -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -219,8 +276,8 @@ dOMWebKitNamedFlowGetContent :: (MonadIO m, DOMWebKitNamedFlowK a) => - a -> -- _obj - m DOMNodeList + a -- _obj + -> m DOMNodeList -- result dOMWebKitNamedFlowGetContent _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_webkit_named_flow_get_content _obj' @@ -229,11 +286,14 @@ touchManagedPtr _obj return result' +data DOMWebKitNamedFlowGetContentMethodInfo +instance (signature ~ (m DOMNodeList), MonadIO m, DOMWebKitNamedFlowK a) => MethodInfo DOMWebKitNamedFlowGetContentMethodInfo a signature where + overloadedMethod _ = dOMWebKitNamedFlowGetContent + -- method DOMWebKitNamedFlow::get_content_nodes -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -245,8 +305,8 @@ {-# DEPRECATED dOMWebKitNamedFlowGetContentNodes ["(Since version 1.10)","Use webkit_dom_webkit_named_flow_get_content() instead."]#-} dOMWebKitNamedFlowGetContentNodes :: (MonadIO m, DOMWebKitNamedFlowK a) => - a -> -- _obj - m DOMNodeList + a -- _obj + -> m DOMNodeList -- result dOMWebKitNamedFlowGetContentNodes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_webkit_named_flow_get_content_nodes _obj' @@ -255,11 +315,14 @@ touchManagedPtr _obj return result' +data DOMWebKitNamedFlowGetContentNodesMethodInfo +instance (signature ~ (m DOMNodeList), MonadIO m, DOMWebKitNamedFlowK a) => MethodInfo DOMWebKitNamedFlowGetContentNodesMethodInfo a signature where + overloadedMethod _ = dOMWebKitNamedFlowGetContentNodes + -- method DOMWebKitNamedFlow::get_first_empty_region_index -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -271,19 +334,22 @@ dOMWebKitNamedFlowGetFirstEmptyRegionIndex :: (MonadIO m, DOMWebKitNamedFlowK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMWebKitNamedFlowGetFirstEmptyRegionIndex _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_webkit_named_flow_get_first_empty_region_index _obj' touchManagedPtr _obj return result +data DOMWebKitNamedFlowGetFirstEmptyRegionIndexMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMWebKitNamedFlowK a) => MethodInfo DOMWebKitNamedFlowGetFirstEmptyRegionIndexMethodInfo a signature where + overloadedMethod _ = dOMWebKitNamedFlowGetFirstEmptyRegionIndex + -- method DOMWebKitNamedFlow::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -295,8 +361,8 @@ dOMWebKitNamedFlowGetName :: (MonadIO m, DOMWebKitNamedFlowK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMWebKitNamedFlowGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_webkit_named_flow_get_name _obj' @@ -306,11 +372,14 @@ touchManagedPtr _obj return result' +data DOMWebKitNamedFlowGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMWebKitNamedFlowK a) => MethodInfo DOMWebKitNamedFlowGetNameMethodInfo a signature where + overloadedMethod _ = dOMWebKitNamedFlowGetName + -- method DOMWebKitNamedFlow::get_overflow -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -322,8 +391,8 @@ {-# DEPRECATED dOMWebKitNamedFlowGetOverflow ["(Since version 1.10)","Use webkit_dom_webkit_named_flow_get_overset() instead."]#-} dOMWebKitNamedFlowGetOverflow :: (MonadIO m, DOMWebKitNamedFlowK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMWebKitNamedFlowGetOverflow _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_webkit_named_flow_get_overflow _obj' @@ -331,11 +400,14 @@ touchManagedPtr _obj return result' +data DOMWebKitNamedFlowGetOverflowMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMWebKitNamedFlowK a) => MethodInfo DOMWebKitNamedFlowGetOverflowMethodInfo a signature where + overloadedMethod _ = dOMWebKitNamedFlowGetOverflow + -- method DOMWebKitNamedFlow::get_overset -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -347,8 +419,8 @@ dOMWebKitNamedFlowGetOverset :: (MonadIO m, DOMWebKitNamedFlowK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMWebKitNamedFlowGetOverset _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_webkit_named_flow_get_overset _obj' @@ -356,11 +428,14 @@ touchManagedPtr _obj return result' +data DOMWebKitNamedFlowGetOversetMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMWebKitNamedFlowK a) => MethodInfo DOMWebKitNamedFlowGetOversetMethodInfo a signature where + overloadedMethod _ = dOMWebKitNamedFlowGetOverset + -- method DOMWebKitNamedFlow::get_regions -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -372,8 +447,8 @@ dOMWebKitNamedFlowGetRegions :: (MonadIO m, DOMWebKitNamedFlowK a) => - a -> -- _obj - m DOMNodeList + a -- _obj + -> m DOMNodeList -- result dOMWebKitNamedFlowGetRegions _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_webkit_named_flow_get_regions _obj' @@ -382,11 +457,14 @@ touchManagedPtr _obj return result' +data DOMWebKitNamedFlowGetRegionsMethodInfo +instance (signature ~ (m DOMNodeList), MonadIO m, DOMWebKitNamedFlowK a) => MethodInfo DOMWebKitNamedFlowGetRegionsMethodInfo a signature where + overloadedMethod _ = dOMWebKitNamedFlowGetRegions + -- method DOMWebKitNamedFlow::get_regions_by_content -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "contentNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "contentNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "contentNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -399,9 +477,9 @@ dOMWebKitNamedFlowGetRegionsByContent :: (MonadIO m, DOMWebKitNamedFlowK a, DOMNodeK b) => - a -> -- _obj - b -> -- contentNode - m DOMNodeList + a -- _obj + -> b -- contentNode + -> m DOMNodeList -- result dOMWebKitNamedFlowGetRegionsByContent _obj contentNode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let contentNode' = unsafeManagedPtrCastPtr contentNode @@ -412,11 +490,14 @@ touchManagedPtr contentNode return result' +data DOMWebKitNamedFlowGetRegionsByContentMethodInfo +instance (signature ~ (b -> m DOMNodeList), MonadIO m, DOMWebKitNamedFlowK a, DOMNodeK b) => MethodInfo DOMWebKitNamedFlowGetRegionsByContentMethodInfo a signature where + overloadedMethod _ = dOMWebKitNamedFlowGetRegionsByContent + -- method DOMWebKitNamedFlow::get_regions_by_content_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content_node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "content_node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitNamedFlow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content_node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNodeList" -- throws : False -- Skip return : False @@ -429,17 +510,21 @@ {-# DEPRECATED dOMWebKitNamedFlowGetRegionsByContentNode ["(Since version 1.10)","Use webkit_dom_webkit_named_flow_get_regions_by_content() instead."]#-} dOMWebKitNamedFlowGetRegionsByContentNode :: (MonadIO m, DOMWebKitNamedFlowK a, DOMNodeK b) => - a -> -- _obj - b -> -- content_node - m DOMNodeList -dOMWebKitNamedFlowGetRegionsByContentNode _obj content_node = liftIO $ do + a -- _obj + -> b -- contentNode + -> m DOMNodeList -- result +dOMWebKitNamedFlowGetRegionsByContentNode _obj contentNode = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - let content_node' = unsafeManagedPtrCastPtr content_node - result <- webkit_dom_webkit_named_flow_get_regions_by_content_node _obj' content_node' + let contentNode' = unsafeManagedPtrCastPtr contentNode + result <- webkit_dom_webkit_named_flow_get_regions_by_content_node _obj' contentNode' checkUnexpectedReturnNULL "webkit_dom_webkit_named_flow_get_regions_by_content_node" result result' <- (newObject DOMNodeList) result touchManagedPtr _obj - touchManagedPtr content_node + touchManagedPtr contentNode return result' + +data DOMWebKitNamedFlowGetRegionsByContentNodeMethodInfo +instance (signature ~ (b -> m DOMNodeList), MonadIO m, DOMWebKitNamedFlowK a, DOMNodeK b) => MethodInfo DOMWebKitNamedFlowGetRegionsByContentNodeMethodInfo a signature where + overloadedMethod _ = dOMWebKitNamedFlowGetRegionsByContentNode diff --git a/GI/WebKit/Objects/DOMWebKitNamedFlow.hs-boot b/GI/WebKit/Objects/DOMWebKitNamedFlow.hs-boot --- a/GI/WebKit/Objects/DOMWebKitNamedFlow.hs-boot +++ b/GI/WebKit/Objects/DOMWebKitNamedFlow.hs-boot @@ -14,3 +14,13 @@ data DOMWebKitNamedFlowFirstEmptyRegionIndexPropertyInfo data DOMWebKitNamedFlowNamePropertyInfo data DOMWebKitNamedFlowOversetPropertyInfo +data DOMWebKitNamedFlowDispatchEventMethodInfo +data DOMWebKitNamedFlowGetContentMethodInfo +data DOMWebKitNamedFlowGetContentNodesMethodInfo +data DOMWebKitNamedFlowGetFirstEmptyRegionIndexMethodInfo +data DOMWebKitNamedFlowGetNameMethodInfo +data DOMWebKitNamedFlowGetOverflowMethodInfo +data DOMWebKitNamedFlowGetOversetMethodInfo +data DOMWebKitNamedFlowGetRegionsMethodInfo +data DOMWebKitNamedFlowGetRegionsByContentMethodInfo +data DOMWebKitNamedFlowGetRegionsByContentNodeMethodInfo diff --git a/GI/WebKit/Objects/DOMWebKitPoint.hs b/GI/WebKit/Objects/DOMWebKitPoint.hs --- a/GI/WebKit/Objects/DOMWebKitPoint.hs +++ b/GI/WebKit/Objects/DOMWebKitPoint.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,18 +18,22 @@ -- * Methods -- ** dOMWebKitPointGetX + DOMWebKitPointGetXMethodInfo , dOMWebKitPointGetX , -- ** dOMWebKitPointGetY + DOMWebKitPointGetYMethodInfo , dOMWebKitPointGetY , -- ** dOMWebKitPointSetX + DOMWebKitPointSetXMethodInfo , dOMWebKitPointSetX , -- ** dOMWebKitPointSetY + DOMWebKitPointSetYMethodInfo , dOMWebKitPointSetY , @@ -85,6 +90,43 @@ noDOMWebKitPoint :: Maybe DOMWebKitPoint noDOMWebKitPoint = Nothing +type family ResolveDOMWebKitPointMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMWebKitPointMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMWebKitPointMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMWebKitPointMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMWebKitPointMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMWebKitPointMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMWebKitPointMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMWebKitPointMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMWebKitPointMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMWebKitPointMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMWebKitPointMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMWebKitPointMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMWebKitPointMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMWebKitPointMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMWebKitPointMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMWebKitPointMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMWebKitPointMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMWebKitPointMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMWebKitPointMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMWebKitPointMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMWebKitPointMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMWebKitPointMethod "getX" o = DOMWebKitPointGetXMethodInfo + ResolveDOMWebKitPointMethod "getY" o = DOMWebKitPointGetYMethodInfo + ResolveDOMWebKitPointMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMWebKitPointMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMWebKitPointMethod "setX" o = DOMWebKitPointSetXMethodInfo + ResolveDOMWebKitPointMethod "setY" o = DOMWebKitPointSetYMethodInfo + ResolveDOMWebKitPointMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMWebKitPointMethod t DOMWebKitPoint, MethodInfo info DOMWebKitPoint p) => IsLabelProxy t (DOMWebKitPoint -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMWebKitPointMethod t DOMWebKitPoint, MethodInfo info DOMWebKitPoint p) => IsLabel t (DOMWebKitPoint -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "x" -- Type: TBasicType TFloat -- Flags: [PropertyReadable,PropertyWritable] @@ -104,7 +146,7 @@ type AttrSetTypeConstraint DOMWebKitPointXPropertyInfo = (~) Float type AttrBaseTypeConstraint DOMWebKitPointXPropertyInfo = DOMWebKitPointK type AttrGetType DOMWebKitPointXPropertyInfo = Float - type AttrLabel DOMWebKitPointXPropertyInfo = "DOMWebKitPoint::x" + type AttrLabel DOMWebKitPointXPropertyInfo = "x" attrGet _ = getDOMWebKitPointX attrSet _ = setDOMWebKitPointX attrConstruct _ = constructDOMWebKitPointX @@ -128,22 +170,21 @@ type AttrSetTypeConstraint DOMWebKitPointYPropertyInfo = (~) Float type AttrBaseTypeConstraint DOMWebKitPointYPropertyInfo = DOMWebKitPointK type AttrGetType DOMWebKitPointYPropertyInfo = Float - type AttrLabel DOMWebKitPointYPropertyInfo = "DOMWebKitPoint::y" + type AttrLabel DOMWebKitPointYPropertyInfo = "y" attrGet _ = getDOMWebKitPointY attrSet _ = setDOMWebKitPointY attrConstruct _ = constructDOMWebKitPointY type instance AttributeList DOMWebKitPoint = DOMWebKitPointAttributeList -type DOMWebKitPointAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo), '("x", DOMWebKitPointXPropertyInfo), '("y", DOMWebKitPointYPropertyInfo)] :: [(Symbol, *)]) +type DOMWebKitPointAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo), '("x", DOMWebKitPointXPropertyInfo), '("y", DOMWebKitPointYPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMWebKitPoint = DOMWebKitPointSignalList -type DOMWebKitPointSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMWebKitPointSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMWebKitPoint::get_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TFloat -- throws : False -- Skip return : False @@ -155,8 +196,8 @@ dOMWebKitPointGetX :: (MonadIO m, DOMWebKitPointK a) => - a -> -- _obj - m Float + a -- _obj + -> m Float -- result dOMWebKitPointGetX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_webkit_point_get_x _obj' @@ -164,11 +205,14 @@ touchManagedPtr _obj return result' +data DOMWebKitPointGetXMethodInfo +instance (signature ~ (m Float), MonadIO m, DOMWebKitPointK a) => MethodInfo DOMWebKitPointGetXMethodInfo a signature where + overloadedMethod _ = dOMWebKitPointGetX + -- method DOMWebKitPoint::get_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TFloat -- throws : False -- Skip return : False @@ -180,8 +224,8 @@ dOMWebKitPointGetY :: (MonadIO m, DOMWebKitPointK a) => - a -> -- _obj - m Float + a -- _obj + -> m Float -- result dOMWebKitPointGetY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_webkit_point_get_y _obj' @@ -189,11 +233,14 @@ touchManagedPtr _obj return result' +data DOMWebKitPointGetYMethodInfo +instance (signature ~ (m Float), MonadIO m, DOMWebKitPointK a) => MethodInfo DOMWebKitPointGetYMethodInfo a signature where + overloadedMethod _ = dOMWebKitPointGetY + -- method DOMWebKitPoint::set_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -206,9 +253,9 @@ dOMWebKitPointSetX :: (MonadIO m, DOMWebKitPointK a) => - a -> -- _obj - Float -> -- value - m () + a -- _obj + -> Float -- value + -> m () -- result dOMWebKitPointSetX _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = realToFrac value @@ -216,11 +263,14 @@ touchManagedPtr _obj return () +data DOMWebKitPointSetXMethodInfo +instance (signature ~ (Float -> m ()), MonadIO m, DOMWebKitPointK a) => MethodInfo DOMWebKitPointSetXMethodInfo a signature where + overloadedMethod _ = dOMWebKitPointSetX + -- method DOMWebKitPoint::set_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "value", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWebKitPoint", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "value", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -233,14 +283,18 @@ dOMWebKitPointSetY :: (MonadIO m, DOMWebKitPointK a) => - a -> -- _obj - Float -> -- value - m () + a -- _obj + -> Float -- value + -> m () -- result dOMWebKitPointSetY _obj value = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let value' = realToFrac value webkit_dom_webkit_point_set_y _obj' value' touchManagedPtr _obj return () + +data DOMWebKitPointSetYMethodInfo +instance (signature ~ (Float -> m ()), MonadIO m, DOMWebKitPointK a) => MethodInfo DOMWebKitPointSetYMethodInfo a signature where + overloadedMethod _ = dOMWebKitPointSetY diff --git a/GI/WebKit/Objects/DOMWebKitPoint.hs-boot b/GI/WebKit/Objects/DOMWebKitPoint.hs-boot --- a/GI/WebKit/Objects/DOMWebKitPoint.hs-boot +++ b/GI/WebKit/Objects/DOMWebKitPoint.hs-boot @@ -13,3 +13,7 @@ instance (GObject o, IsDescendantOf DOMWebKitPoint o) => DOMWebKitPointK o data DOMWebKitPointXPropertyInfo data DOMWebKitPointYPropertyInfo +data DOMWebKitPointGetXMethodInfo +data DOMWebKitPointGetYMethodInfo +data DOMWebKitPointSetXMethodInfo +data DOMWebKitPointSetYMethodInfo diff --git a/GI/WebKit/Objects/DOMWheelEvent.hs b/GI/WebKit/Objects/DOMWheelEvent.hs --- a/GI/WebKit/Objects/DOMWheelEvent.hs +++ b/GI/WebKit/Objects/DOMWheelEvent.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,38 +18,47 @@ -- * Methods -- ** dOMWheelEventGetDeltaMode + DOMWheelEventGetDeltaModeMethodInfo , dOMWheelEventGetDeltaMode , -- ** dOMWheelEventGetDeltaX + DOMWheelEventGetDeltaXMethodInfo , dOMWheelEventGetDeltaX , -- ** dOMWheelEventGetDeltaY + DOMWheelEventGetDeltaYMethodInfo , dOMWheelEventGetDeltaY , -- ** dOMWheelEventGetDeltaZ + DOMWheelEventGetDeltaZMethodInfo , dOMWheelEventGetDeltaZ , -- ** dOMWheelEventGetWebkitDirectionInvertedFromDevice + DOMWheelEventGetWebkitDirectionInvertedFromDeviceMethodInfo, dOMWheelEventGetWebkitDirectionInvertedFromDevice, -- ** dOMWheelEventGetWheelDelta + DOMWheelEventGetWheelDeltaMethodInfo , dOMWheelEventGetWheelDelta , -- ** dOMWheelEventGetWheelDeltaX + DOMWheelEventGetWheelDeltaXMethodInfo , dOMWheelEventGetWheelDeltaX , -- ** dOMWheelEventGetWheelDeltaY + DOMWheelEventGetWheelDeltaYMethodInfo , dOMWheelEventGetWheelDeltaY , -- ** dOMWheelEventInitWheelEvent + DOMWheelEventInitWheelEventMethodInfo , dOMWheelEventInitWheelEvent , @@ -131,6 +141,93 @@ noDOMWheelEvent :: Maybe DOMWheelEvent noDOMWheelEvent = Nothing +type family ResolveDOMWheelEventMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMWheelEventMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMWheelEventMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMWheelEventMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMWheelEventMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMWheelEventMethod "initEvent" o = DOMEventInitEventMethodInfo + ResolveDOMWheelEventMethod "initMouseEvent" o = DOMMouseEventInitMouseEventMethodInfo + ResolveDOMWheelEventMethod "initUiEvent" o = DOMUIEventInitUiEventMethodInfo + ResolveDOMWheelEventMethod "initWheelEvent" o = DOMWheelEventInitWheelEventMethodInfo + ResolveDOMWheelEventMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMWheelEventMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMWheelEventMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMWheelEventMethod "preventDefault" o = DOMEventPreventDefaultMethodInfo + ResolveDOMWheelEventMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMWheelEventMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMWheelEventMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMWheelEventMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMWheelEventMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMWheelEventMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMWheelEventMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMWheelEventMethod "stopImmediatePropagation" o = DOMEventStopImmediatePropagationMethodInfo + ResolveDOMWheelEventMethod "stopPropagation" o = DOMEventStopPropagationMethodInfo + ResolveDOMWheelEventMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMWheelEventMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMWheelEventMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMWheelEventMethod "getAltKey" o = DOMMouseEventGetAltKeyMethodInfo + ResolveDOMWheelEventMethod "getBubbles" o = DOMEventGetBubblesMethodInfo + ResolveDOMWheelEventMethod "getButton" o = DOMMouseEventGetButtonMethodInfo + ResolveDOMWheelEventMethod "getCancelBubble" o = DOMEventGetCancelBubbleMethodInfo + ResolveDOMWheelEventMethod "getCancelable" o = DOMEventGetCancelableMethodInfo + ResolveDOMWheelEventMethod "getCharCode" o = DOMUIEventGetCharCodeMethodInfo + ResolveDOMWheelEventMethod "getClientX" o = DOMMouseEventGetClientXMethodInfo + ResolveDOMWheelEventMethod "getClientY" o = DOMMouseEventGetClientYMethodInfo + ResolveDOMWheelEventMethod "getCtrlKey" o = DOMMouseEventGetCtrlKeyMethodInfo + ResolveDOMWheelEventMethod "getCurrentTarget" o = DOMEventGetCurrentTargetMethodInfo + ResolveDOMWheelEventMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMWheelEventMethod "getDefaultPrevented" o = DOMEventGetDefaultPreventedMethodInfo + ResolveDOMWheelEventMethod "getDeltaMode" o = DOMWheelEventGetDeltaModeMethodInfo + ResolveDOMWheelEventMethod "getDeltaX" o = DOMWheelEventGetDeltaXMethodInfo + ResolveDOMWheelEventMethod "getDeltaY" o = DOMWheelEventGetDeltaYMethodInfo + ResolveDOMWheelEventMethod "getDeltaZ" o = DOMWheelEventGetDeltaZMethodInfo + ResolveDOMWheelEventMethod "getDetail" o = DOMUIEventGetDetailMethodInfo + ResolveDOMWheelEventMethod "getEventPhase" o = DOMEventGetEventPhaseMethodInfo + ResolveDOMWheelEventMethod "getFromElement" o = DOMMouseEventGetFromElementMethodInfo + ResolveDOMWheelEventMethod "getKeyCode" o = DOMUIEventGetKeyCodeMethodInfo + ResolveDOMWheelEventMethod "getLayerX" o = DOMUIEventGetLayerXMethodInfo + ResolveDOMWheelEventMethod "getLayerY" o = DOMUIEventGetLayerYMethodInfo + ResolveDOMWheelEventMethod "getMetaKey" o = DOMMouseEventGetMetaKeyMethodInfo + ResolveDOMWheelEventMethod "getOffsetX" o = DOMMouseEventGetOffsetXMethodInfo + ResolveDOMWheelEventMethod "getOffsetY" o = DOMMouseEventGetOffsetYMethodInfo + ResolveDOMWheelEventMethod "getPageX" o = DOMUIEventGetPageXMethodInfo + ResolveDOMWheelEventMethod "getPageY" o = DOMUIEventGetPageYMethodInfo + ResolveDOMWheelEventMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMWheelEventMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMWheelEventMethod "getRelatedTarget" o = DOMMouseEventGetRelatedTargetMethodInfo + ResolveDOMWheelEventMethod "getReturnValue" o = DOMEventGetReturnValueMethodInfo + ResolveDOMWheelEventMethod "getScreenX" o = DOMMouseEventGetScreenXMethodInfo + ResolveDOMWheelEventMethod "getScreenY" o = DOMMouseEventGetScreenYMethodInfo + ResolveDOMWheelEventMethod "getShiftKey" o = DOMMouseEventGetShiftKeyMethodInfo + ResolveDOMWheelEventMethod "getSrcElement" o = DOMEventGetSrcElementMethodInfo + ResolveDOMWheelEventMethod "getTarget" o = DOMEventGetTargetMethodInfo + ResolveDOMWheelEventMethod "getTimeStamp" o = DOMEventGetTimeStampMethodInfo + ResolveDOMWheelEventMethod "getToElement" o = DOMMouseEventGetToElementMethodInfo + ResolveDOMWheelEventMethod "getView" o = DOMUIEventGetViewMethodInfo + ResolveDOMWheelEventMethod "getWebkitDirectionInvertedFromDevice" o = DOMWheelEventGetWebkitDirectionInvertedFromDeviceMethodInfo + ResolveDOMWheelEventMethod "getWebkitMovementX" o = DOMMouseEventGetWebkitMovementXMethodInfo + ResolveDOMWheelEventMethod "getWebkitMovementY" o = DOMMouseEventGetWebkitMovementYMethodInfo + ResolveDOMWheelEventMethod "getWheelDelta" o = DOMWheelEventGetWheelDeltaMethodInfo + ResolveDOMWheelEventMethod "getWheelDeltaX" o = DOMWheelEventGetWheelDeltaXMethodInfo + ResolveDOMWheelEventMethod "getWheelDeltaY" o = DOMWheelEventGetWheelDeltaYMethodInfo + ResolveDOMWheelEventMethod "getWhich" o = DOMUIEventGetWhichMethodInfo + ResolveDOMWheelEventMethod "getX" o = DOMMouseEventGetXMethodInfo + ResolveDOMWheelEventMethod "getY" o = DOMMouseEventGetYMethodInfo + ResolveDOMWheelEventMethod "setCancelBubble" o = DOMEventSetCancelBubbleMethodInfo + ResolveDOMWheelEventMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMWheelEventMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMWheelEventMethod "setReturnValue" o = DOMEventSetReturnValueMethodInfo + ResolveDOMWheelEventMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMWheelEventMethod t DOMWheelEvent, MethodInfo info DOMWheelEvent p) => IsLabelProxy t (DOMWheelEvent -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMWheelEventMethod t DOMWheelEvent, MethodInfo info DOMWheelEvent p) => IsLabel t (DOMWheelEvent -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "delta-mode" -- Type: TBasicType TUInt64 -- Flags: [PropertyReadable] @@ -144,7 +241,7 @@ type AttrSetTypeConstraint DOMWheelEventDeltaModePropertyInfo = (~) () type AttrBaseTypeConstraint DOMWheelEventDeltaModePropertyInfo = DOMWheelEventK type AttrGetType DOMWheelEventDeltaModePropertyInfo = Word64 - type AttrLabel DOMWheelEventDeltaModePropertyInfo = "DOMWheelEvent::delta-mode" + type AttrLabel DOMWheelEventDeltaModePropertyInfo = "delta-mode" attrGet _ = getDOMWheelEventDeltaMode attrSet _ = undefined attrConstruct _ = undefined @@ -162,7 +259,7 @@ type AttrSetTypeConstraint DOMWheelEventDeltaXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMWheelEventDeltaXPropertyInfo = DOMWheelEventK type AttrGetType DOMWheelEventDeltaXPropertyInfo = Double - type AttrLabel DOMWheelEventDeltaXPropertyInfo = "DOMWheelEvent::delta-x" + type AttrLabel DOMWheelEventDeltaXPropertyInfo = "delta-x" attrGet _ = getDOMWheelEventDeltaX attrSet _ = undefined attrConstruct _ = undefined @@ -180,7 +277,7 @@ type AttrSetTypeConstraint DOMWheelEventDeltaYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMWheelEventDeltaYPropertyInfo = DOMWheelEventK type AttrGetType DOMWheelEventDeltaYPropertyInfo = Double - type AttrLabel DOMWheelEventDeltaYPropertyInfo = "DOMWheelEvent::delta-y" + type AttrLabel DOMWheelEventDeltaYPropertyInfo = "delta-y" attrGet _ = getDOMWheelEventDeltaY attrSet _ = undefined attrConstruct _ = undefined @@ -198,7 +295,7 @@ type AttrSetTypeConstraint DOMWheelEventDeltaZPropertyInfo = (~) () type AttrBaseTypeConstraint DOMWheelEventDeltaZPropertyInfo = DOMWheelEventK type AttrGetType DOMWheelEventDeltaZPropertyInfo = Double - type AttrLabel DOMWheelEventDeltaZPropertyInfo = "DOMWheelEvent::delta-z" + type AttrLabel DOMWheelEventDeltaZPropertyInfo = "delta-z" attrGet _ = getDOMWheelEventDeltaZ attrSet _ = undefined attrConstruct _ = undefined @@ -216,7 +313,7 @@ type AttrSetTypeConstraint DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = (~) () type AttrBaseTypeConstraint DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = DOMWheelEventK type AttrGetType DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = Bool - type AttrLabel DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = "DOMWheelEvent::webkit-direction-inverted-from-device" + type AttrLabel DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo = "webkit-direction-inverted-from-device" attrGet _ = getDOMWheelEventWebkitDirectionInvertedFromDevice attrSet _ = undefined attrConstruct _ = undefined @@ -234,7 +331,7 @@ type AttrSetTypeConstraint DOMWheelEventWheelDeltaPropertyInfo = (~) () type AttrBaseTypeConstraint DOMWheelEventWheelDeltaPropertyInfo = DOMWheelEventK type AttrGetType DOMWheelEventWheelDeltaPropertyInfo = Int64 - type AttrLabel DOMWheelEventWheelDeltaPropertyInfo = "DOMWheelEvent::wheel-delta" + type AttrLabel DOMWheelEventWheelDeltaPropertyInfo = "wheel-delta" attrGet _ = getDOMWheelEventWheelDelta attrSet _ = undefined attrConstruct _ = undefined @@ -252,7 +349,7 @@ type AttrSetTypeConstraint DOMWheelEventWheelDeltaXPropertyInfo = (~) () type AttrBaseTypeConstraint DOMWheelEventWheelDeltaXPropertyInfo = DOMWheelEventK type AttrGetType DOMWheelEventWheelDeltaXPropertyInfo = Int64 - type AttrLabel DOMWheelEventWheelDeltaXPropertyInfo = "DOMWheelEvent::wheel-delta-x" + type AttrLabel DOMWheelEventWheelDeltaXPropertyInfo = "wheel-delta-x" attrGet _ = getDOMWheelEventWheelDeltaX attrSet _ = undefined attrConstruct _ = undefined @@ -270,22 +367,21 @@ type AttrSetTypeConstraint DOMWheelEventWheelDeltaYPropertyInfo = (~) () type AttrBaseTypeConstraint DOMWheelEventWheelDeltaYPropertyInfo = DOMWheelEventK type AttrGetType DOMWheelEventWheelDeltaYPropertyInfo = Int64 - type AttrLabel DOMWheelEventWheelDeltaYPropertyInfo = "DOMWheelEvent::wheel-delta-y" + type AttrLabel DOMWheelEventWheelDeltaYPropertyInfo = "wheel-delta-y" attrGet _ = getDOMWheelEventWheelDeltaY attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMWheelEvent = DOMWheelEventAttributeList -type DOMWheelEventAttributeList = ('[ '("alt-key", DOMMouseEventAltKeyPropertyInfo), '("bubbles", DOMEventBubblesPropertyInfo), '("button", DOMMouseEventButtonPropertyInfo), '("cancel-bubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("char-code", DOMUIEventCharCodePropertyInfo), '("client-x", DOMMouseEventClientXPropertyInfo), '("client-y", DOMMouseEventClientYPropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("ctrl-key", DOMMouseEventCtrlKeyPropertyInfo), '("current-target", DOMEventCurrentTargetPropertyInfo), '("default-prevented", DOMEventDefaultPreventedPropertyInfo), '("delta-mode", DOMWheelEventDeltaModePropertyInfo), '("delta-x", DOMWheelEventDeltaXPropertyInfo), '("delta-y", DOMWheelEventDeltaYPropertyInfo), '("delta-z", DOMWheelEventDeltaZPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("event-phase", DOMEventEventPhasePropertyInfo), '("from-element", DOMMouseEventFromElementPropertyInfo), '("key-code", DOMUIEventKeyCodePropertyInfo), '("layer-x", DOMUIEventLayerXPropertyInfo), '("layer-y", DOMUIEventLayerYPropertyInfo), '("meta-key", DOMMouseEventMetaKeyPropertyInfo), '("offset-x", DOMMouseEventOffsetXPropertyInfo), '("offset-y", DOMMouseEventOffsetYPropertyInfo), '("page-x", DOMUIEventPageXPropertyInfo), '("page-y", DOMUIEventPageYPropertyInfo), '("related-target", DOMMouseEventRelatedTargetPropertyInfo), '("return-value", DOMEventReturnValuePropertyInfo), '("screen-x", DOMMouseEventScreenXPropertyInfo), '("screen-y", DOMMouseEventScreenYPropertyInfo), '("shift-key", DOMMouseEventShiftKeyPropertyInfo), '("src-element", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("time-stamp", DOMEventTimeStampPropertyInfo), '("to-element", DOMMouseEventToElementPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("webkit-direction-inverted-from-device", DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo), '("webkit-movement-x", DOMMouseEventWebkitMovementXPropertyInfo), '("webkit-movement-y", DOMMouseEventWebkitMovementYPropertyInfo), '("wheel-delta", DOMWheelEventWheelDeltaPropertyInfo), '("wheel-delta-x", DOMWheelEventWheelDeltaXPropertyInfo), '("wheel-delta-y", DOMWheelEventWheelDeltaYPropertyInfo), '("which", DOMUIEventWhichPropertyInfo), '("x", DOMMouseEventXPropertyInfo), '("y", DOMMouseEventYPropertyInfo)] :: [(Symbol, *)]) +type DOMWheelEventAttributeList = ('[ '("altKey", DOMMouseEventAltKeyPropertyInfo), '("bubbles", DOMEventBubblesPropertyInfo), '("button", DOMMouseEventButtonPropertyInfo), '("cancelBubble", DOMEventCancelBubblePropertyInfo), '("cancelable", DOMEventCancelablePropertyInfo), '("charCode", DOMUIEventCharCodePropertyInfo), '("clientX", DOMMouseEventClientXPropertyInfo), '("clientY", DOMMouseEventClientYPropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("ctrlKey", DOMMouseEventCtrlKeyPropertyInfo), '("currentTarget", DOMEventCurrentTargetPropertyInfo), '("defaultPrevented", DOMEventDefaultPreventedPropertyInfo), '("deltaMode", DOMWheelEventDeltaModePropertyInfo), '("deltaX", DOMWheelEventDeltaXPropertyInfo), '("deltaY", DOMWheelEventDeltaYPropertyInfo), '("deltaZ", DOMWheelEventDeltaZPropertyInfo), '("detail", DOMUIEventDetailPropertyInfo), '("eventPhase", DOMEventEventPhasePropertyInfo), '("fromElement", DOMMouseEventFromElementPropertyInfo), '("keyCode", DOMUIEventKeyCodePropertyInfo), '("layerX", DOMUIEventLayerXPropertyInfo), '("layerY", DOMUIEventLayerYPropertyInfo), '("metaKey", DOMMouseEventMetaKeyPropertyInfo), '("offsetX", DOMMouseEventOffsetXPropertyInfo), '("offsetY", DOMMouseEventOffsetYPropertyInfo), '("pageX", DOMUIEventPageXPropertyInfo), '("pageY", DOMUIEventPageYPropertyInfo), '("relatedTarget", DOMMouseEventRelatedTargetPropertyInfo), '("returnValue", DOMEventReturnValuePropertyInfo), '("screenX", DOMMouseEventScreenXPropertyInfo), '("screenY", DOMMouseEventScreenYPropertyInfo), '("shiftKey", DOMMouseEventShiftKeyPropertyInfo), '("srcElement", DOMEventSrcElementPropertyInfo), '("target", DOMEventTargetPropertyInfo), '("timeStamp", DOMEventTimeStampPropertyInfo), '("toElement", DOMMouseEventToElementPropertyInfo), '("type", DOMEventTypePropertyInfo), '("view", DOMUIEventViewPropertyInfo), '("webkitDirectionInvertedFromDevice", DOMWheelEventWebkitDirectionInvertedFromDevicePropertyInfo), '("webkitMovementX", DOMMouseEventWebkitMovementXPropertyInfo), '("webkitMovementY", DOMMouseEventWebkitMovementYPropertyInfo), '("wheelDelta", DOMWheelEventWheelDeltaPropertyInfo), '("wheelDeltaX", DOMWheelEventWheelDeltaXPropertyInfo), '("wheelDeltaY", DOMWheelEventWheelDeltaYPropertyInfo), '("which", DOMUIEventWhichPropertyInfo), '("x", DOMMouseEventXPropertyInfo), '("y", DOMMouseEventYPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMWheelEvent = DOMWheelEventSignalList -type DOMWheelEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMWheelEventSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMWheelEvent::get_delta_mode -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -297,19 +393,22 @@ dOMWheelEventGetDeltaMode :: (MonadIO m, DOMWheelEventK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMWheelEventGetDeltaMode _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_wheel_event_get_delta_mode _obj' touchManagedPtr _obj return result +data DOMWheelEventGetDeltaModeMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMWheelEventK a) => MethodInfo DOMWheelEventGetDeltaModeMethodInfo a signature where + overloadedMethod _ = dOMWheelEventGetDeltaMode + -- method DOMWheelEvent::get_delta_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -321,8 +420,8 @@ dOMWheelEventGetDeltaX :: (MonadIO m, DOMWheelEventK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMWheelEventGetDeltaX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_wheel_event_get_delta_x _obj' @@ -330,11 +429,14 @@ touchManagedPtr _obj return result' +data DOMWheelEventGetDeltaXMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMWheelEventK a) => MethodInfo DOMWheelEventGetDeltaXMethodInfo a signature where + overloadedMethod _ = dOMWheelEventGetDeltaX + -- method DOMWheelEvent::get_delta_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -346,8 +448,8 @@ dOMWheelEventGetDeltaY :: (MonadIO m, DOMWheelEventK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMWheelEventGetDeltaY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_wheel_event_get_delta_y _obj' @@ -355,11 +457,14 @@ touchManagedPtr _obj return result' +data DOMWheelEventGetDeltaYMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMWheelEventK a) => MethodInfo DOMWheelEventGetDeltaYMethodInfo a signature where + overloadedMethod _ = dOMWheelEventGetDeltaY + -- method DOMWheelEvent::get_delta_z -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -371,8 +476,8 @@ dOMWheelEventGetDeltaZ :: (MonadIO m, DOMWheelEventK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMWheelEventGetDeltaZ _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_wheel_event_get_delta_z _obj' @@ -380,11 +485,14 @@ touchManagedPtr _obj return result' +data DOMWheelEventGetDeltaZMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMWheelEventK a) => MethodInfo DOMWheelEventGetDeltaZMethodInfo a signature where + overloadedMethod _ = dOMWheelEventGetDeltaZ + -- method DOMWheelEvent::get_webkit_direction_inverted_from_device -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -396,8 +504,8 @@ dOMWheelEventGetWebkitDirectionInvertedFromDevice :: (MonadIO m, DOMWheelEventK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMWheelEventGetWebkitDirectionInvertedFromDevice _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_wheel_event_get_webkit_direction_inverted_from_device _obj' @@ -405,11 +513,14 @@ touchManagedPtr _obj return result' +data DOMWheelEventGetWebkitDirectionInvertedFromDeviceMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMWheelEventK a) => MethodInfo DOMWheelEventGetWebkitDirectionInvertedFromDeviceMethodInfo a signature where + overloadedMethod _ = dOMWheelEventGetWebkitDirectionInvertedFromDevice + -- method DOMWheelEvent::get_wheel_delta -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -421,19 +532,22 @@ dOMWheelEventGetWheelDelta :: (MonadIO m, DOMWheelEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMWheelEventGetWheelDelta _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_wheel_event_get_wheel_delta _obj' touchManagedPtr _obj return result +data DOMWheelEventGetWheelDeltaMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMWheelEventK a) => MethodInfo DOMWheelEventGetWheelDeltaMethodInfo a signature where + overloadedMethod _ = dOMWheelEventGetWheelDelta + -- method DOMWheelEvent::get_wheel_delta_x -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -445,19 +559,22 @@ dOMWheelEventGetWheelDeltaX :: (MonadIO m, DOMWheelEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMWheelEventGetWheelDeltaX _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_wheel_event_get_wheel_delta_x _obj' touchManagedPtr _obj return result +data DOMWheelEventGetWheelDeltaXMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMWheelEventK a) => MethodInfo DOMWheelEventGetWheelDeltaXMethodInfo a signature where + overloadedMethod _ = dOMWheelEventGetWheelDeltaX + -- method DOMWheelEvent::get_wheel_delta_y -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt64 -- throws : False -- Skip return : False @@ -469,19 +586,22 @@ dOMWheelEventGetWheelDeltaY :: (MonadIO m, DOMWheelEventK a) => - a -> -- _obj - m Int64 + a -- _obj + -> m Int64 -- result dOMWheelEventGetWheelDeltaY _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_wheel_event_get_wheel_delta_y _obj' touchManagedPtr _obj return result +data DOMWheelEventGetWheelDeltaYMethodInfo +instance (signature ~ (m Int64), MonadIO m, DOMWheelEventK a) => MethodInfo DOMWheelEventGetWheelDeltaYMethodInfo a signature where + overloadedMethod _ = dOMWheelEventGetWheelDeltaY + -- method DOMWheelEvent::init_wheel_event -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wheelDeltaX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wheelDeltaY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "clientX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "clientY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "ctrlKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "altKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "shiftKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "metaKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "wheelDeltaX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "wheelDeltaY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "screenX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "screenY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "clientX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "clientY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "ctrlKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "altKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "shiftKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "metaKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMWheelEvent", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wheelDeltaX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wheelDeltaY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "view", argType = TInterface "WebKit" "DOMDOMWindow", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "screenY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "clientX", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "clientY", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "ctrlKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "altKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "shiftKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "metaKey", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -504,19 +624,19 @@ dOMWheelEventInitWheelEvent :: (MonadIO m, DOMWheelEventK a, DOMDOMWindowK b) => - a -> -- _obj - Int64 -> -- wheelDeltaX - Int64 -> -- wheelDeltaY - b -> -- view - Int64 -> -- screenX - Int64 -> -- screenY - Int64 -> -- clientX - Int64 -> -- clientY - Bool -> -- ctrlKey - Bool -> -- altKey - Bool -> -- shiftKey - Bool -> -- metaKey - m () + a -- _obj + -> Int64 -- wheelDeltaX + -> Int64 -- wheelDeltaY + -> b -- view + -> Int64 -- screenX + -> Int64 -- screenY + -> Int64 -- clientX + -> Int64 -- clientY + -> Bool -- ctrlKey + -> Bool -- altKey + -> Bool -- shiftKey + -> Bool -- metaKey + -> m () -- result dOMWheelEventInitWheelEvent _obj wheelDeltaX wheelDeltaY view screenX screenY clientX clientY ctrlKey altKey shiftKey metaKey = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let view' = unsafeManagedPtrCastPtr view @@ -528,5 +648,9 @@ touchManagedPtr _obj touchManagedPtr view return () + +data DOMWheelEventInitWheelEventMethodInfo +instance (signature ~ (Int64 -> Int64 -> b -> Int64 -> Int64 -> Int64 -> Int64 -> Bool -> Bool -> Bool -> Bool -> m ()), MonadIO m, DOMWheelEventK a, DOMDOMWindowK b) => MethodInfo DOMWheelEventInitWheelEventMethodInfo a signature where + overloadedMethod _ = dOMWheelEventInitWheelEvent diff --git a/GI/WebKit/Objects/DOMWheelEvent.hs-boot b/GI/WebKit/Objects/DOMWheelEvent.hs-boot --- a/GI/WebKit/Objects/DOMWheelEvent.hs-boot +++ b/GI/WebKit/Objects/DOMWheelEvent.hs-boot @@ -19,3 +19,12 @@ data DOMWheelEventWheelDeltaPropertyInfo data DOMWheelEventWheelDeltaXPropertyInfo data DOMWheelEventWheelDeltaYPropertyInfo +data DOMWheelEventGetDeltaModeMethodInfo +data DOMWheelEventGetDeltaXMethodInfo +data DOMWheelEventGetDeltaYMethodInfo +data DOMWheelEventGetDeltaZMethodInfo +data DOMWheelEventGetWebkitDirectionInvertedFromDeviceMethodInfo +data DOMWheelEventGetWheelDeltaMethodInfo +data DOMWheelEventGetWheelDeltaXMethodInfo +data DOMWheelEventGetWheelDeltaYMethodInfo +data DOMWheelEventInitWheelEventMethodInfo diff --git a/GI/WebKit/Objects/DOMXPathExpression.hs b/GI/WebKit/Objects/DOMXPathExpression.hs --- a/GI/WebKit/Objects/DOMXPathExpression.hs +++ b/GI/WebKit/Objects/DOMXPathExpression.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** dOMXPathExpressionEvaluate + DOMXPathExpressionEvaluateMethodInfo , dOMXPathExpressionEvaluate , @@ -56,17 +58,50 @@ noDOMXPathExpression :: Maybe DOMXPathExpression noDOMXPathExpression = Nothing +type family ResolveDOMXPathExpressionMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMXPathExpressionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMXPathExpressionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMXPathExpressionMethod "evaluate" o = DOMXPathExpressionEvaluateMethodInfo + ResolveDOMXPathExpressionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMXPathExpressionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMXPathExpressionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMXPathExpressionMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMXPathExpressionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMXPathExpressionMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMXPathExpressionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMXPathExpressionMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMXPathExpressionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMXPathExpressionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMXPathExpressionMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMXPathExpressionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMXPathExpressionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMXPathExpressionMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMXPathExpressionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMXPathExpressionMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMXPathExpressionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMXPathExpressionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMXPathExpressionMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMXPathExpressionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMXPathExpressionMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMXPathExpressionMethod t DOMXPathExpression, MethodInfo info DOMXPathExpression p) => IsLabelProxy t (DOMXPathExpression -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMXPathExpressionMethod t DOMXPathExpression, MethodInfo info DOMXPathExpression p) => IsLabel t (DOMXPathExpression -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMXPathExpression = DOMXPathExpressionAttributeList -type DOMXPathExpressionAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMXPathExpressionAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMXPathExpression = DOMXPathExpressionSignalList -type DOMXPathExpressionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMXPathExpressionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMXPathExpression::evaluate -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathExpression", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "contextNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "inResult", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMXPathExpression", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "contextNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "type", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "inResult", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathExpression", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "contextNode", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "type", argType = TBasicType TUInt16, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "inResult", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMXPathResult" -- throws : True -- Skip return : False @@ -82,11 +117,11 @@ dOMXPathExpressionEvaluate :: (MonadIO m, DOMXPathExpressionK a, DOMNodeK b, DOMXPathResultK c) => - a -> -- _obj - b -> -- contextNode - Word16 -> -- type - c -> -- inResult - m DOMXPathResult + a -- _obj + -> b -- contextNode + -> Word16 -- type_ + -> c -- inResult + -> m DOMXPathResult -- result dOMXPathExpressionEvaluate _obj contextNode type_ inResult = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let contextNode' = unsafeManagedPtrCastPtr contextNode @@ -102,5 +137,9 @@ ) (do return () ) + +data DOMXPathExpressionEvaluateMethodInfo +instance (signature ~ (b -> Word16 -> c -> m DOMXPathResult), MonadIO m, DOMXPathExpressionK a, DOMNodeK b, DOMXPathResultK c) => MethodInfo DOMXPathExpressionEvaluateMethodInfo a signature where + overloadedMethod _ = dOMXPathExpressionEvaluate diff --git a/GI/WebKit/Objects/DOMXPathExpression.hs-boot b/GI/WebKit/Objects/DOMXPathExpression.hs-boot --- a/GI/WebKit/Objects/DOMXPathExpression.hs-boot +++ b/GI/WebKit/Objects/DOMXPathExpression.hs-boot @@ -11,3 +11,4 @@ instance GObject DOMXPathExpression where class GObject o => DOMXPathExpressionK o instance (GObject o, IsDescendantOf DOMXPathExpression o) => DOMXPathExpressionK o +data DOMXPathExpressionEvaluateMethodInfo diff --git a/GI/WebKit/Objects/DOMXPathNSResolver.hs b/GI/WebKit/Objects/DOMXPathNSResolver.hs --- a/GI/WebKit/Objects/DOMXPathNSResolver.hs +++ b/GI/WebKit/Objects/DOMXPathNSResolver.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** dOMXPathNSResolverLookupNamespaceUri + DOMXPathNSResolverLookupNamespaceUriMethodInfo, dOMXPathNSResolverLookupNamespaceUri , @@ -56,17 +58,50 @@ noDOMXPathNSResolver :: Maybe DOMXPathNSResolver noDOMXPathNSResolver = Nothing +type family ResolveDOMXPathNSResolverMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMXPathNSResolverMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMXPathNSResolverMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMXPathNSResolverMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMXPathNSResolverMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMXPathNSResolverMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMXPathNSResolverMethod "lookupNamespaceUri" o = DOMXPathNSResolverLookupNamespaceUriMethodInfo + ResolveDOMXPathNSResolverMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMXPathNSResolverMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMXPathNSResolverMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMXPathNSResolverMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMXPathNSResolverMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMXPathNSResolverMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMXPathNSResolverMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMXPathNSResolverMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMXPathNSResolverMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMXPathNSResolverMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMXPathNSResolverMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMXPathNSResolverMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMXPathNSResolverMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMXPathNSResolverMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMXPathNSResolverMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMXPathNSResolverMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMXPathNSResolverMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMXPathNSResolverMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMXPathNSResolverMethod t DOMXPathNSResolver, MethodInfo info DOMXPathNSResolver p) => IsLabelProxy t (DOMXPathNSResolver -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMXPathNSResolverMethod t DOMXPathNSResolver, MethodInfo info DOMXPathNSResolver p) => IsLabel t (DOMXPathNSResolver -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList DOMXPathNSResolver = DOMXPathNSResolverAttributeList -type DOMXPathNSResolverAttributeList = ('[ '("core-object", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) +type DOMXPathNSResolverAttributeList = ('[ '("coreObject", DOMObjectCoreObjectPropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMXPathNSResolver = DOMXPathNSResolverSignalList -type DOMXPathNSResolverSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMXPathNSResolverSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMXPathNSResolver::lookup_namespace_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathNSResolver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "prefix", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMXPathNSResolver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "prefix", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathNSResolver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "prefix", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -79,9 +114,9 @@ dOMXPathNSResolverLookupNamespaceUri :: (MonadIO m, DOMXPathNSResolverK a) => - a -> -- _obj - T.Text -> -- prefix - m T.Text + a -- _obj + -> T.Text -- prefix + -> m T.Text -- result dOMXPathNSResolverLookupNamespaceUri _obj prefix = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj prefix' <- textToCString prefix @@ -92,5 +127,9 @@ touchManagedPtr _obj freeMem prefix' return result' + +data DOMXPathNSResolverLookupNamespaceUriMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, DOMXPathNSResolverK a) => MethodInfo DOMXPathNSResolverLookupNamespaceUriMethodInfo a signature where + overloadedMethod _ = dOMXPathNSResolverLookupNamespaceUri diff --git a/GI/WebKit/Objects/DOMXPathNSResolver.hs-boot b/GI/WebKit/Objects/DOMXPathNSResolver.hs-boot --- a/GI/WebKit/Objects/DOMXPathNSResolver.hs-boot +++ b/GI/WebKit/Objects/DOMXPathNSResolver.hs-boot @@ -11,3 +11,4 @@ instance GObject DOMXPathNSResolver where class GObject o => DOMXPathNSResolverK o instance (GObject o, IsDescendantOf DOMXPathNSResolver o) => DOMXPathNSResolverK o +data DOMXPathNSResolverLookupNamespaceUriMethodInfo diff --git a/GI/WebKit/Objects/DOMXPathResult.hs b/GI/WebKit/Objects/DOMXPathResult.hs --- a/GI/WebKit/Objects/DOMXPathResult.hs +++ b/GI/WebKit/Objects/DOMXPathResult.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,38 +18,47 @@ -- * Methods -- ** dOMXPathResultGetBooleanValue + DOMXPathResultGetBooleanValueMethodInfo , dOMXPathResultGetBooleanValue , -- ** dOMXPathResultGetInvalidIteratorState + DOMXPathResultGetInvalidIteratorStateMethodInfo, dOMXPathResultGetInvalidIteratorState , -- ** dOMXPathResultGetNumberValue + DOMXPathResultGetNumberValueMethodInfo , dOMXPathResultGetNumberValue , -- ** dOMXPathResultGetResultType + DOMXPathResultGetResultTypeMethodInfo , dOMXPathResultGetResultType , -- ** dOMXPathResultGetSingleNodeValue + DOMXPathResultGetSingleNodeValueMethodInfo, dOMXPathResultGetSingleNodeValue , -- ** dOMXPathResultGetSnapshotLength + DOMXPathResultGetSnapshotLengthMethodInfo, dOMXPathResultGetSnapshotLength , -- ** dOMXPathResultGetStringValue + DOMXPathResultGetStringValueMethodInfo , dOMXPathResultGetStringValue , -- ** dOMXPathResultIterateNext + DOMXPathResultIterateNextMethodInfo , dOMXPathResultIterateNext , -- ** dOMXPathResultSnapshotItem + DOMXPathResultSnapshotItemMethodInfo , dOMXPathResultSnapshotItem , @@ -126,6 +136,48 @@ noDOMXPathResult :: Maybe DOMXPathResult noDOMXPathResult = Nothing +type family ResolveDOMXPathResultMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMXPathResultMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDOMXPathResultMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDOMXPathResultMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDOMXPathResultMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDOMXPathResultMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDOMXPathResultMethod "iterateNext" o = DOMXPathResultIterateNextMethodInfo + ResolveDOMXPathResultMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDOMXPathResultMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDOMXPathResultMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDOMXPathResultMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDOMXPathResultMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDOMXPathResultMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDOMXPathResultMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDOMXPathResultMethod "snapshotItem" o = DOMXPathResultSnapshotItemMethodInfo + ResolveDOMXPathResultMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDOMXPathResultMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDOMXPathResultMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDOMXPathResultMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDOMXPathResultMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDOMXPathResultMethod "getBooleanValue" o = DOMXPathResultGetBooleanValueMethodInfo + ResolveDOMXPathResultMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDOMXPathResultMethod "getInvalidIteratorState" o = DOMXPathResultGetInvalidIteratorStateMethodInfo + ResolveDOMXPathResultMethod "getNumberValue" o = DOMXPathResultGetNumberValueMethodInfo + ResolveDOMXPathResultMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDOMXPathResultMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDOMXPathResultMethod "getResultType" o = DOMXPathResultGetResultTypeMethodInfo + ResolveDOMXPathResultMethod "getSingleNodeValue" o = DOMXPathResultGetSingleNodeValueMethodInfo + ResolveDOMXPathResultMethod "getSnapshotLength" o = DOMXPathResultGetSnapshotLengthMethodInfo + ResolveDOMXPathResultMethod "getStringValue" o = DOMXPathResultGetStringValueMethodInfo + ResolveDOMXPathResultMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDOMXPathResultMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDOMXPathResultMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMXPathResultMethod t DOMXPathResult, MethodInfo info DOMXPathResult p) => IsLabelProxy t (DOMXPathResult -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMXPathResultMethod t DOMXPathResult, MethodInfo info DOMXPathResult p) => IsLabel t (DOMXPathResult -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "boolean-value" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable] @@ -139,7 +191,7 @@ type AttrSetTypeConstraint DOMXPathResultBooleanValuePropertyInfo = (~) () type AttrBaseTypeConstraint DOMXPathResultBooleanValuePropertyInfo = DOMXPathResultK type AttrGetType DOMXPathResultBooleanValuePropertyInfo = Bool - type AttrLabel DOMXPathResultBooleanValuePropertyInfo = "DOMXPathResult::boolean-value" + type AttrLabel DOMXPathResultBooleanValuePropertyInfo = "boolean-value" attrGet _ = getDOMXPathResultBooleanValue attrSet _ = undefined attrConstruct _ = undefined @@ -157,7 +209,7 @@ type AttrSetTypeConstraint DOMXPathResultInvalidIteratorStatePropertyInfo = (~) () type AttrBaseTypeConstraint DOMXPathResultInvalidIteratorStatePropertyInfo = DOMXPathResultK type AttrGetType DOMXPathResultInvalidIteratorStatePropertyInfo = Bool - type AttrLabel DOMXPathResultInvalidIteratorStatePropertyInfo = "DOMXPathResult::invalid-iterator-state" + type AttrLabel DOMXPathResultInvalidIteratorStatePropertyInfo = "invalid-iterator-state" attrGet _ = getDOMXPathResultInvalidIteratorState attrSet _ = undefined attrConstruct _ = undefined @@ -175,7 +227,7 @@ type AttrSetTypeConstraint DOMXPathResultNumberValuePropertyInfo = (~) () type AttrBaseTypeConstraint DOMXPathResultNumberValuePropertyInfo = DOMXPathResultK type AttrGetType DOMXPathResultNumberValuePropertyInfo = Double - type AttrLabel DOMXPathResultNumberValuePropertyInfo = "DOMXPathResult::number-value" + type AttrLabel DOMXPathResultNumberValuePropertyInfo = "number-value" attrGet _ = getDOMXPathResultNumberValue attrSet _ = undefined attrConstruct _ = undefined @@ -193,7 +245,7 @@ type AttrSetTypeConstraint DOMXPathResultResultTypePropertyInfo = (~) () type AttrBaseTypeConstraint DOMXPathResultResultTypePropertyInfo = DOMXPathResultK type AttrGetType DOMXPathResultResultTypePropertyInfo = Word32 - type AttrLabel DOMXPathResultResultTypePropertyInfo = "DOMXPathResult::result-type" + type AttrLabel DOMXPathResultResultTypePropertyInfo = "result-type" attrGet _ = getDOMXPathResultResultType attrSet _ = undefined attrConstruct _ = undefined @@ -211,7 +263,7 @@ type AttrSetTypeConstraint DOMXPathResultSingleNodeValuePropertyInfo = (~) () type AttrBaseTypeConstraint DOMXPathResultSingleNodeValuePropertyInfo = DOMXPathResultK type AttrGetType DOMXPathResultSingleNodeValuePropertyInfo = DOMNode - type AttrLabel DOMXPathResultSingleNodeValuePropertyInfo = "DOMXPathResult::single-node-value" + type AttrLabel DOMXPathResultSingleNodeValuePropertyInfo = "single-node-value" attrGet _ = getDOMXPathResultSingleNodeValue attrSet _ = undefined attrConstruct _ = undefined @@ -229,7 +281,7 @@ type AttrSetTypeConstraint DOMXPathResultSnapshotLengthPropertyInfo = (~) () type AttrBaseTypeConstraint DOMXPathResultSnapshotLengthPropertyInfo = DOMXPathResultK type AttrGetType DOMXPathResultSnapshotLengthPropertyInfo = Word64 - type AttrLabel DOMXPathResultSnapshotLengthPropertyInfo = "DOMXPathResult::snapshot-length" + type AttrLabel DOMXPathResultSnapshotLengthPropertyInfo = "snapshot-length" attrGet _ = getDOMXPathResultSnapshotLength attrSet _ = undefined attrConstruct _ = undefined @@ -247,22 +299,21 @@ type AttrSetTypeConstraint DOMXPathResultStringValuePropertyInfo = (~) () type AttrBaseTypeConstraint DOMXPathResultStringValuePropertyInfo = DOMXPathResultK type AttrGetType DOMXPathResultStringValuePropertyInfo = T.Text - type AttrLabel DOMXPathResultStringValuePropertyInfo = "DOMXPathResult::string-value" + type AttrLabel DOMXPathResultStringValuePropertyInfo = "string-value" attrGet _ = getDOMXPathResultStringValue attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList DOMXPathResult = DOMXPathResultAttributeList -type DOMXPathResultAttributeList = ('[ '("boolean-value", DOMXPathResultBooleanValuePropertyInfo), '("core-object", DOMObjectCoreObjectPropertyInfo), '("invalid-iterator-state", DOMXPathResultInvalidIteratorStatePropertyInfo), '("number-value", DOMXPathResultNumberValuePropertyInfo), '("result-type", DOMXPathResultResultTypePropertyInfo), '("single-node-value", DOMXPathResultSingleNodeValuePropertyInfo), '("snapshot-length", DOMXPathResultSnapshotLengthPropertyInfo), '("string-value", DOMXPathResultStringValuePropertyInfo)] :: [(Symbol, *)]) +type DOMXPathResultAttributeList = ('[ '("booleanValue", DOMXPathResultBooleanValuePropertyInfo), '("coreObject", DOMObjectCoreObjectPropertyInfo), '("invalidIteratorState", DOMXPathResultInvalidIteratorStatePropertyInfo), '("numberValue", DOMXPathResultNumberValuePropertyInfo), '("resultType", DOMXPathResultResultTypePropertyInfo), '("singleNodeValue", DOMXPathResultSingleNodeValuePropertyInfo), '("snapshotLength", DOMXPathResultSnapshotLengthPropertyInfo), '("stringValue", DOMXPathResultStringValuePropertyInfo)] :: [(Symbol, *)]) type instance SignalList DOMXPathResult = DOMXPathResultSignalList -type DOMXPathResultSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DOMXPathResultSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method DOMXPathResult::get_boolean_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : True -- Skip return : False @@ -275,8 +326,8 @@ dOMXPathResultGetBooleanValue :: (MonadIO m, DOMXPathResultK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result dOMXPathResultGetBooleanValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -287,11 +338,14 @@ return () ) +data DOMXPathResultGetBooleanValueMethodInfo +instance (signature ~ (m ()), MonadIO m, DOMXPathResultK a) => MethodInfo DOMXPathResultGetBooleanValueMethodInfo a signature where + overloadedMethod _ = dOMXPathResultGetBooleanValue + -- method DOMXPathResult::get_invalid_iterator_state -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -303,8 +357,8 @@ dOMXPathResultGetInvalidIteratorState :: (MonadIO m, DOMXPathResultK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result dOMXPathResultGetInvalidIteratorState _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_xpath_result_get_invalid_iterator_state _obj' @@ -312,11 +366,14 @@ touchManagedPtr _obj return result' +data DOMXPathResultGetInvalidIteratorStateMethodInfo +instance (signature ~ (m Bool), MonadIO m, DOMXPathResultK a) => MethodInfo DOMXPathResultGetInvalidIteratorStateMethodInfo a signature where + overloadedMethod _ = dOMXPathResultGetInvalidIteratorState + -- method DOMXPathResult::get_number_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : True -- Skip return : False @@ -329,8 +386,8 @@ dOMXPathResultGetNumberValue :: (MonadIO m, DOMXPathResultK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result dOMXPathResultGetNumberValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -342,11 +399,14 @@ return () ) +data DOMXPathResultGetNumberValueMethodInfo +instance (signature ~ (m Double), MonadIO m, DOMXPathResultK a) => MethodInfo DOMXPathResultGetNumberValueMethodInfo a signature where + overloadedMethod _ = dOMXPathResultGetNumberValue + -- method DOMXPathResult::get_result_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt16 -- throws : False -- Skip return : False @@ -358,19 +418,22 @@ dOMXPathResultGetResultType :: (MonadIO m, DOMXPathResultK a) => - a -> -- _obj - m Word16 + a -- _obj + -> m Word16 -- result dOMXPathResultGetResultType _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_dom_xpath_result_get_result_type _obj' touchManagedPtr _obj return result +data DOMXPathResultGetResultTypeMethodInfo +instance (signature ~ (m Word16), MonadIO m, DOMXPathResultK a) => MethodInfo DOMXPathResultGetResultTypeMethodInfo a signature where + overloadedMethod _ = dOMXPathResultGetResultType + -- method DOMXPathResult::get_single_node_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -383,8 +446,8 @@ dOMXPathResultGetSingleNodeValue :: (MonadIO m, DOMXPathResultK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMXPathResultGetSingleNodeValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -397,11 +460,14 @@ return () ) +data DOMXPathResultGetSingleNodeValueMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMXPathResultK a) => MethodInfo DOMXPathResultGetSingleNodeValueMethodInfo a signature where + overloadedMethod _ = dOMXPathResultGetSingleNodeValue + -- method DOMXPathResult::get_snapshot_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : True -- Skip return : False @@ -414,8 +480,8 @@ dOMXPathResultGetSnapshotLength :: (MonadIO m, DOMXPathResultK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result dOMXPathResultGetSnapshotLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -426,11 +492,14 @@ return () ) +data DOMXPathResultGetSnapshotLengthMethodInfo +instance (signature ~ (m Word64), MonadIO m, DOMXPathResultK a) => MethodInfo DOMXPathResultGetSnapshotLengthMethodInfo a signature where + overloadedMethod _ = dOMXPathResultGetSnapshotLength + -- method DOMXPathResult::get_string_value -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : True -- Skip return : False @@ -443,8 +512,8 @@ dOMXPathResultGetStringValue :: (MonadIO m, DOMXPathResultK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result dOMXPathResultGetStringValue _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -458,11 +527,14 @@ return () ) +data DOMXPathResultGetStringValueMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DOMXPathResultK a) => MethodInfo DOMXPathResultGetStringValueMethodInfo a signature where + overloadedMethod _ = dOMXPathResultGetStringValue + -- method DOMXPathResult::iterate_next -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -475,8 +547,8 @@ dOMXPathResultIterateNext :: (MonadIO m, DOMXPathResultK a) => - a -> -- _obj - m DOMNode + a -- _obj + -> m DOMNode -- result dOMXPathResultIterateNext _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -489,11 +561,14 @@ return () ) +data DOMXPathResultIterateNextMethodInfo +instance (signature ~ (m DOMNode), MonadIO m, DOMXPathResultK a) => MethodInfo DOMXPathResultIterateNextMethodInfo a signature where + overloadedMethod _ = dOMXPathResultIterateNext + -- method DOMXPathResult::snapshot_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "DOMXPathResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMNode" -- throws : True -- Skip return : False @@ -507,9 +582,9 @@ dOMXPathResultSnapshotItem :: (MonadIO m, DOMXPathResultK a) => - a -> -- _obj - Word64 -> -- index - m DOMNode + a -- _obj + -> Word64 -- index + -> m DOMNode -- result dOMXPathResultSnapshotItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj onException (do @@ -521,5 +596,9 @@ ) (do return () ) + +data DOMXPathResultSnapshotItemMethodInfo +instance (signature ~ (Word64 -> m DOMNode), MonadIO m, DOMXPathResultK a) => MethodInfo DOMXPathResultSnapshotItemMethodInfo a signature where + overloadedMethod _ = dOMXPathResultSnapshotItem diff --git a/GI/WebKit/Objects/DOMXPathResult.hs-boot b/GI/WebKit/Objects/DOMXPathResult.hs-boot --- a/GI/WebKit/Objects/DOMXPathResult.hs-boot +++ b/GI/WebKit/Objects/DOMXPathResult.hs-boot @@ -18,3 +18,12 @@ data DOMXPathResultSingleNodeValuePropertyInfo data DOMXPathResultSnapshotLengthPropertyInfo data DOMXPathResultStringValuePropertyInfo +data DOMXPathResultGetBooleanValueMethodInfo +data DOMXPathResultGetInvalidIteratorStateMethodInfo +data DOMXPathResultGetNumberValueMethodInfo +data DOMXPathResultGetResultTypeMethodInfo +data DOMXPathResultGetSingleNodeValueMethodInfo +data DOMXPathResultGetSnapshotLengthMethodInfo +data DOMXPathResultGetStringValueMethodInfo +data DOMXPathResultIterateNextMethodInfo +data DOMXPathResultSnapshotItemMethodInfo diff --git a/GI/WebKit/Objects/Download.hs b/GI/WebKit/Objects/Download.hs --- a/GI/WebKit/Objects/Download.hs +++ b/GI/WebKit/Objects/Download.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,46 +18,57 @@ -- * Methods -- ** downloadCancel + DownloadCancelMethodInfo , downloadCancel , -- ** downloadGetCurrentSize + DownloadGetCurrentSizeMethodInfo , downloadGetCurrentSize , -- ** downloadGetDestinationUri + DownloadGetDestinationUriMethodInfo , downloadGetDestinationUri , -- ** downloadGetElapsedTime + DownloadGetElapsedTimeMethodInfo , downloadGetElapsedTime , -- ** downloadGetNetworkRequest + DownloadGetNetworkRequestMethodInfo , downloadGetNetworkRequest , -- ** downloadGetNetworkResponse + DownloadGetNetworkResponseMethodInfo , downloadGetNetworkResponse , -- ** downloadGetProgress + DownloadGetProgressMethodInfo , downloadGetProgress , -- ** downloadGetStatus + DownloadGetStatusMethodInfo , downloadGetStatus , -- ** downloadGetSuggestedFilename + DownloadGetSuggestedFilenameMethodInfo , downloadGetSuggestedFilename , -- ** downloadGetTotalSize + DownloadGetTotalSizeMethodInfo , downloadGetTotalSize , -- ** downloadGetUri + DownloadGetUriMethodInfo , downloadGetUri , @@ -65,10 +77,12 @@ -- ** downloadSetDestinationUri + DownloadSetDestinationUriMethodInfo , downloadSetDestinationUri , -- ** downloadStart + DownloadStartMethodInfo , downloadStart , @@ -170,6 +184,52 @@ noDownload :: Maybe Download noDownload = Nothing +type family ResolveDownloadMethod (t :: Symbol) (o :: *) :: * where + ResolveDownloadMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveDownloadMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveDownloadMethod "cancel" o = DownloadCancelMethodInfo + ResolveDownloadMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveDownloadMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveDownloadMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveDownloadMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveDownloadMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveDownloadMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveDownloadMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveDownloadMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveDownloadMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveDownloadMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveDownloadMethod "start" o = DownloadStartMethodInfo + ResolveDownloadMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveDownloadMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveDownloadMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveDownloadMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveDownloadMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveDownloadMethod "getCurrentSize" o = DownloadGetCurrentSizeMethodInfo + ResolveDownloadMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveDownloadMethod "getDestinationUri" o = DownloadGetDestinationUriMethodInfo + ResolveDownloadMethod "getElapsedTime" o = DownloadGetElapsedTimeMethodInfo + ResolveDownloadMethod "getNetworkRequest" o = DownloadGetNetworkRequestMethodInfo + ResolveDownloadMethod "getNetworkResponse" o = DownloadGetNetworkResponseMethodInfo + ResolveDownloadMethod "getProgress" o = DownloadGetProgressMethodInfo + ResolveDownloadMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveDownloadMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveDownloadMethod "getStatus" o = DownloadGetStatusMethodInfo + ResolveDownloadMethod "getSuggestedFilename" o = DownloadGetSuggestedFilenameMethodInfo + ResolveDownloadMethod "getTotalSize" o = DownloadGetTotalSizeMethodInfo + ResolveDownloadMethod "getUri" o = DownloadGetUriMethodInfo + ResolveDownloadMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveDownloadMethod "setDestinationUri" o = DownloadSetDestinationUriMethodInfo + ResolveDownloadMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveDownloadMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDownloadMethod t Download, MethodInfo info Download p) => IsLabelProxy t (Download -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDownloadMethod t Download, MethodInfo info Download p) => IsLabel t (Download -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- signal Download::error type DownloadErrorCallback = Int32 -> @@ -203,9 +263,9 @@ CString -> Ptr () -> IO CInt -downloadErrorCallbackWrapper _cb _ error_code error_detail reason _ = do +downloadErrorCallbackWrapper _cb _ errorCode errorDetail reason _ = do reason' <- cstringToText reason - result <- _cb error_code error_detail reason' + result <- _cb errorCode errorDetail reason' let result' = (fromIntegral . fromEnum) result return result' @@ -233,7 +293,7 @@ type AttrSetTypeConstraint DownloadCurrentSizePropertyInfo = (~) () type AttrBaseTypeConstraint DownloadCurrentSizePropertyInfo = DownloadK type AttrGetType DownloadCurrentSizePropertyInfo = Word64 - type AttrLabel DownloadCurrentSizePropertyInfo = "Download::current-size" + type AttrLabel DownloadCurrentSizePropertyInfo = "current-size" attrGet _ = getDownloadCurrentSize attrSet _ = undefined attrConstruct _ = undefined @@ -257,7 +317,7 @@ type AttrSetTypeConstraint DownloadDestinationUriPropertyInfo = (~) T.Text type AttrBaseTypeConstraint DownloadDestinationUriPropertyInfo = DownloadK type AttrGetType DownloadDestinationUriPropertyInfo = T.Text - type AttrLabel DownloadDestinationUriPropertyInfo = "Download::destination-uri" + type AttrLabel DownloadDestinationUriPropertyInfo = "destination-uri" attrGet _ = getDownloadDestinationUri attrSet _ = setDownloadDestinationUri attrConstruct _ = constructDownloadDestinationUri @@ -278,7 +338,7 @@ type AttrSetTypeConstraint DownloadNetworkRequestPropertyInfo = NetworkRequestK type AttrBaseTypeConstraint DownloadNetworkRequestPropertyInfo = DownloadK type AttrGetType DownloadNetworkRequestPropertyInfo = NetworkRequest - type AttrLabel DownloadNetworkRequestPropertyInfo = "Download::network-request" + type AttrLabel DownloadNetworkRequestPropertyInfo = "network-request" attrGet _ = getDownloadNetworkRequest attrSet _ = undefined attrConstruct _ = constructDownloadNetworkRequest @@ -299,7 +359,7 @@ type AttrSetTypeConstraint DownloadNetworkResponsePropertyInfo = NetworkResponseK type AttrBaseTypeConstraint DownloadNetworkResponsePropertyInfo = DownloadK type AttrGetType DownloadNetworkResponsePropertyInfo = NetworkResponse - type AttrLabel DownloadNetworkResponsePropertyInfo = "Download::network-response" + type AttrLabel DownloadNetworkResponsePropertyInfo = "network-response" attrGet _ = getDownloadNetworkResponse attrSet _ = undefined attrConstruct _ = constructDownloadNetworkResponse @@ -317,7 +377,7 @@ type AttrSetTypeConstraint DownloadProgressPropertyInfo = (~) () type AttrBaseTypeConstraint DownloadProgressPropertyInfo = DownloadK type AttrGetType DownloadProgressPropertyInfo = Double - type AttrLabel DownloadProgressPropertyInfo = "Download::progress" + type AttrLabel DownloadProgressPropertyInfo = "progress" attrGet _ = getDownloadProgress attrSet _ = undefined attrConstruct _ = undefined @@ -335,7 +395,7 @@ type AttrSetTypeConstraint DownloadStatusPropertyInfo = (~) () type AttrBaseTypeConstraint DownloadStatusPropertyInfo = DownloadK type AttrGetType DownloadStatusPropertyInfo = DownloadStatus - type AttrLabel DownloadStatusPropertyInfo = "Download::status" + type AttrLabel DownloadStatusPropertyInfo = "status" attrGet _ = getDownloadStatus attrSet _ = undefined attrConstruct _ = undefined @@ -353,7 +413,7 @@ type AttrSetTypeConstraint DownloadSuggestedFilenamePropertyInfo = (~) () type AttrBaseTypeConstraint DownloadSuggestedFilenamePropertyInfo = DownloadK type AttrGetType DownloadSuggestedFilenamePropertyInfo = T.Text - type AttrLabel DownloadSuggestedFilenamePropertyInfo = "Download::suggested-filename" + type AttrLabel DownloadSuggestedFilenamePropertyInfo = "suggested-filename" attrGet _ = getDownloadSuggestedFilename attrSet _ = undefined attrConstruct _ = undefined @@ -371,13 +431,13 @@ type AttrSetTypeConstraint DownloadTotalSizePropertyInfo = (~) () type AttrBaseTypeConstraint DownloadTotalSizePropertyInfo = DownloadK type AttrGetType DownloadTotalSizePropertyInfo = Word64 - type AttrLabel DownloadTotalSizePropertyInfo = "Download::total-size" + type AttrLabel DownloadTotalSizePropertyInfo = "total-size" attrGet _ = getDownloadTotalSize attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList Download = DownloadAttributeList -type DownloadAttributeList = ('[ '("current-size", DownloadCurrentSizePropertyInfo), '("destination-uri", DownloadDestinationUriPropertyInfo), '("network-request", DownloadNetworkRequestPropertyInfo), '("network-response", DownloadNetworkResponsePropertyInfo), '("progress", DownloadProgressPropertyInfo), '("status", DownloadStatusPropertyInfo), '("suggested-filename", DownloadSuggestedFilenamePropertyInfo), '("total-size", DownloadTotalSizePropertyInfo)] :: [(Symbol, *)]) +type DownloadAttributeList = ('[ '("currentSize", DownloadCurrentSizePropertyInfo), '("destinationUri", DownloadDestinationUriPropertyInfo), '("networkRequest", DownloadNetworkRequestPropertyInfo), '("networkResponse", DownloadNetworkResponsePropertyInfo), '("progress", DownloadProgressPropertyInfo), '("status", DownloadStatusPropertyInfo), '("suggestedFilename", DownloadSuggestedFilenamePropertyInfo), '("totalSize", DownloadTotalSizePropertyInfo)] :: [(Symbol, *)]) data DownloadErrorSignalInfo instance SignalInfo DownloadErrorSignalInfo where @@ -385,13 +445,12 @@ connectSignal _ = connectDownloadError type instance SignalList Download = DownloadSignalList -type DownloadSignalList = ('[ '("error", DownloadErrorSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type DownloadSignalList = ('[ '("error", DownloadErrorSignalInfo), '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method Download::new -- method type : Constructor --- Args : [Arg {argName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "Download" -- throws : False -- Skip return : False @@ -403,8 +462,8 @@ downloadNew :: (MonadIO m, NetworkRequestK a) => - a -> -- request - m Download + a -- request + -> m Download -- result downloadNew request = liftIO $ do let request' = unsafeManagedPtrCastPtr request result <- webkit_download_new request' @@ -415,9 +474,8 @@ -- method Download::cancel -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -429,19 +487,22 @@ downloadCancel :: (MonadIO m, DownloadK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result downloadCancel _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_download_cancel _obj' touchManagedPtr _obj return () +data DownloadCancelMethodInfo +instance (signature ~ (m ()), MonadIO m, DownloadK a) => MethodInfo DownloadCancelMethodInfo a signature where + overloadedMethod _ = downloadCancel + -- method Download::get_current_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -453,19 +514,22 @@ downloadGetCurrentSize :: (MonadIO m, DownloadK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result downloadGetCurrentSize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_download_get_current_size _obj' touchManagedPtr _obj return result +data DownloadGetCurrentSizeMethodInfo +instance (signature ~ (m Word64), MonadIO m, DownloadK a) => MethodInfo DownloadGetCurrentSizeMethodInfo a signature where + overloadedMethod _ = downloadGetCurrentSize + -- method Download::get_destination_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -477,8 +541,8 @@ downloadGetDestinationUri :: (MonadIO m, DownloadK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result downloadGetDestinationUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_download_get_destination_uri _obj' @@ -487,11 +551,14 @@ touchManagedPtr _obj return result' +data DownloadGetDestinationUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DownloadK a) => MethodInfo DownloadGetDestinationUriMethodInfo a signature where + overloadedMethod _ = downloadGetDestinationUri + -- method Download::get_elapsed_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -503,8 +570,8 @@ downloadGetElapsedTime :: (MonadIO m, DownloadK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result downloadGetElapsedTime _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_download_get_elapsed_time _obj' @@ -512,11 +579,14 @@ touchManagedPtr _obj return result' +data DownloadGetElapsedTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, DownloadK a) => MethodInfo DownloadGetElapsedTimeMethodInfo a signature where + overloadedMethod _ = downloadGetElapsedTime + -- method Download::get_network_request -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "NetworkRequest" -- throws : False -- Skip return : False @@ -528,8 +598,8 @@ downloadGetNetworkRequest :: (MonadIO m, DownloadK a) => - a -> -- _obj - m NetworkRequest + a -- _obj + -> m NetworkRequest -- result downloadGetNetworkRequest _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_download_get_network_request _obj' @@ -538,11 +608,14 @@ touchManagedPtr _obj return result' +data DownloadGetNetworkRequestMethodInfo +instance (signature ~ (m NetworkRequest), MonadIO m, DownloadK a) => MethodInfo DownloadGetNetworkRequestMethodInfo a signature where + overloadedMethod _ = downloadGetNetworkRequest + -- method Download::get_network_response -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "NetworkResponse" -- throws : False -- Skip return : False @@ -554,8 +627,8 @@ downloadGetNetworkResponse :: (MonadIO m, DownloadK a) => - a -> -- _obj - m NetworkResponse + a -- _obj + -> m NetworkResponse -- result downloadGetNetworkResponse _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_download_get_network_response _obj' @@ -564,11 +637,14 @@ touchManagedPtr _obj return result' +data DownloadGetNetworkResponseMethodInfo +instance (signature ~ (m NetworkResponse), MonadIO m, DownloadK a) => MethodInfo DownloadGetNetworkResponseMethodInfo a signature where + overloadedMethod _ = downloadGetNetworkResponse + -- method Download::get_progress -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -580,8 +656,8 @@ downloadGetProgress :: (MonadIO m, DownloadK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result downloadGetProgress _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_download_get_progress _obj' @@ -589,11 +665,14 @@ touchManagedPtr _obj return result' +data DownloadGetProgressMethodInfo +instance (signature ~ (m Double), MonadIO m, DownloadK a) => MethodInfo DownloadGetProgressMethodInfo a signature where + overloadedMethod _ = downloadGetProgress + -- method Download::get_status -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DownloadStatus" -- throws : False -- Skip return : False @@ -605,8 +684,8 @@ downloadGetStatus :: (MonadIO m, DownloadK a) => - a -> -- _obj - m DownloadStatus + a -- _obj + -> m DownloadStatus -- result downloadGetStatus _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_download_get_status _obj' @@ -614,11 +693,14 @@ touchManagedPtr _obj return result' +data DownloadGetStatusMethodInfo +instance (signature ~ (m DownloadStatus), MonadIO m, DownloadK a) => MethodInfo DownloadGetStatusMethodInfo a signature where + overloadedMethod _ = downloadGetStatus + -- method Download::get_suggested_filename -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -630,8 +712,8 @@ downloadGetSuggestedFilename :: (MonadIO m, DownloadK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result downloadGetSuggestedFilename _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_download_get_suggested_filename _obj' @@ -640,11 +722,14 @@ touchManagedPtr _obj return result' +data DownloadGetSuggestedFilenameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DownloadK a) => MethodInfo DownloadGetSuggestedFilenameMethodInfo a signature where + overloadedMethod _ = downloadGetSuggestedFilename + -- method Download::get_total_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -656,19 +741,22 @@ downloadGetTotalSize :: (MonadIO m, DownloadK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result downloadGetTotalSize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_download_get_total_size _obj' touchManagedPtr _obj return result +data DownloadGetTotalSizeMethodInfo +instance (signature ~ (m Word64), MonadIO m, DownloadK a) => MethodInfo DownloadGetTotalSizeMethodInfo a signature where + overloadedMethod _ = downloadGetTotalSize + -- method Download::get_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -680,8 +768,8 @@ downloadGetUri :: (MonadIO m, DownloadK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result downloadGetUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_download_get_uri _obj' @@ -690,11 +778,14 @@ touchManagedPtr _obj return result' +data DownloadGetUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, DownloadK a) => MethodInfo DownloadGetUriMethodInfo a signature where + overloadedMethod _ = downloadGetUri + -- method Download::set_destination_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "destination_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "destination_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "destination_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -707,22 +798,25 @@ downloadSetDestinationUri :: (MonadIO m, DownloadK a) => - a -> -- _obj - T.Text -> -- destination_uri - m () -downloadSetDestinationUri _obj destination_uri = liftIO $ do + a -- _obj + -> T.Text -- destinationUri + -> m () -- result +downloadSetDestinationUri _obj destinationUri = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - destination_uri' <- textToCString destination_uri - webkit_download_set_destination_uri _obj' destination_uri' + destinationUri' <- textToCString destinationUri + webkit_download_set_destination_uri _obj' destinationUri' touchManagedPtr _obj - freeMem destination_uri' + freeMem destinationUri' return () +data DownloadSetDestinationUriMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, DownloadK a) => MethodInfo DownloadSetDestinationUriMethodInfo a signature where + overloadedMethod _ = downloadSetDestinationUri + -- method Download::start -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "Download", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -734,12 +828,16 @@ downloadStart :: (MonadIO m, DownloadK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result downloadStart _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_download_start _obj' touchManagedPtr _obj return () + +data DownloadStartMethodInfo +instance (signature ~ (m ()), MonadIO m, DownloadK a) => MethodInfo DownloadStartMethodInfo a signature where + overloadedMethod _ = downloadStart diff --git a/GI/WebKit/Objects/Download.hs-boot b/GI/WebKit/Objects/Download.hs-boot --- a/GI/WebKit/Objects/Download.hs-boot +++ b/GI/WebKit/Objects/Download.hs-boot @@ -20,3 +20,16 @@ data DownloadSuggestedFilenamePropertyInfo data DownloadTotalSizePropertyInfo data DownloadErrorSignalInfo +data DownloadCancelMethodInfo +data DownloadGetCurrentSizeMethodInfo +data DownloadGetDestinationUriMethodInfo +data DownloadGetElapsedTimeMethodInfo +data DownloadGetNetworkRequestMethodInfo +data DownloadGetNetworkResponseMethodInfo +data DownloadGetProgressMethodInfo +data DownloadGetStatusMethodInfo +data DownloadGetSuggestedFilenameMethodInfo +data DownloadGetTotalSizeMethodInfo +data DownloadGetUriMethodInfo +data DownloadSetDestinationUriMethodInfo +data DownloadStartMethodInfo diff --git a/GI/WebKit/Objects/FaviconDatabase.hs b/GI/WebKit/Objects/FaviconDatabase.hs --- a/GI/WebKit/Objects/FaviconDatabase.hs +++ b/GI/WebKit/Objects/FaviconDatabase.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,30 +18,37 @@ -- * Methods -- ** faviconDatabaseClear + FaviconDatabaseClearMethodInfo , faviconDatabaseClear , -- ** faviconDatabaseGetFaviconPixbuf + FaviconDatabaseGetFaviconPixbufMethodInfo, faviconDatabaseGetFaviconPixbuf , -- ** faviconDatabaseGetFaviconPixbufFinish + FaviconDatabaseGetFaviconPixbufFinishMethodInfo, faviconDatabaseGetFaviconPixbufFinish , -- ** faviconDatabaseGetFaviconUri + FaviconDatabaseGetFaviconUriMethodInfo , faviconDatabaseGetFaviconUri , -- ** faviconDatabaseGetPath + FaviconDatabaseGetPathMethodInfo , faviconDatabaseGetPath , -- ** faviconDatabaseSetPath + FaviconDatabaseSetPathMethodInfo , faviconDatabaseSetPath , -- ** faviconDatabaseTryGetFaviconPixbuf + FaviconDatabaseTryGetFaviconPixbufMethodInfo, faviconDatabaseTryGetFaviconPixbuf , @@ -107,6 +115,46 @@ noFaviconDatabase :: Maybe FaviconDatabase noFaviconDatabase = Nothing +type family ResolveFaviconDatabaseMethod (t :: Symbol) (o :: *) :: * where + ResolveFaviconDatabaseMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveFaviconDatabaseMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveFaviconDatabaseMethod "clear" o = FaviconDatabaseClearMethodInfo + ResolveFaviconDatabaseMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveFaviconDatabaseMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveFaviconDatabaseMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveFaviconDatabaseMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveFaviconDatabaseMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveFaviconDatabaseMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveFaviconDatabaseMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveFaviconDatabaseMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveFaviconDatabaseMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveFaviconDatabaseMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveFaviconDatabaseMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveFaviconDatabaseMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveFaviconDatabaseMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveFaviconDatabaseMethod "tryGetFaviconPixbuf" o = FaviconDatabaseTryGetFaviconPixbufMethodInfo + ResolveFaviconDatabaseMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveFaviconDatabaseMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveFaviconDatabaseMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveFaviconDatabaseMethod "getFaviconPixbuf" o = FaviconDatabaseGetFaviconPixbufMethodInfo + ResolveFaviconDatabaseMethod "getFaviconPixbufFinish" o = FaviconDatabaseGetFaviconPixbufFinishMethodInfo + ResolveFaviconDatabaseMethod "getFaviconUri" o = FaviconDatabaseGetFaviconUriMethodInfo + ResolveFaviconDatabaseMethod "getPath" o = FaviconDatabaseGetPathMethodInfo + ResolveFaviconDatabaseMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveFaviconDatabaseMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveFaviconDatabaseMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveFaviconDatabaseMethod "setPath" o = FaviconDatabaseSetPathMethodInfo + ResolveFaviconDatabaseMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveFaviconDatabaseMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveFaviconDatabaseMethod t FaviconDatabase, MethodInfo info FaviconDatabase p) => IsLabelProxy t (FaviconDatabase -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveFaviconDatabaseMethod t FaviconDatabase, MethodInfo info FaviconDatabase p) => IsLabel t (FaviconDatabase -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- signal FaviconDatabase::icon-loaded type FaviconDatabaseIconLoadedCallback = T.Text -> @@ -134,9 +182,9 @@ CString -> Ptr () -> IO () -faviconDatabaseIconLoadedCallbackWrapper _cb _ frame_uri _ = do - frame_uri' <- cstringToText frame_uri - _cb frame_uri' +faviconDatabaseIconLoadedCallbackWrapper _cb _ frameUri _ = do + frameUri' <- cstringToText frameUri + _cb frameUri' onFaviconDatabaseIconLoaded :: (GObject a, MonadIO m) => a -> FaviconDatabaseIconLoadedCallback -> m SignalHandlerId onFaviconDatabaseIconLoaded obj cb = liftIO $ connectFaviconDatabaseIconLoaded obj cb SignalConnectBefore @@ -168,7 +216,7 @@ type AttrSetTypeConstraint FaviconDatabasePathPropertyInfo = (~) T.Text type AttrBaseTypeConstraint FaviconDatabasePathPropertyInfo = FaviconDatabaseK type AttrGetType FaviconDatabasePathPropertyInfo = T.Text - type AttrLabel FaviconDatabasePathPropertyInfo = "FaviconDatabase::path" + type AttrLabel FaviconDatabasePathPropertyInfo = "path" attrGet _ = getFaviconDatabasePath attrSet _ = setFaviconDatabasePath attrConstruct _ = constructFaviconDatabasePath @@ -182,13 +230,12 @@ connectSignal _ = connectFaviconDatabaseIconLoaded type instance SignalList FaviconDatabase = FaviconDatabaseSignalList -type FaviconDatabaseSignalList = ('[ '("icon-loaded", FaviconDatabaseIconLoadedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type FaviconDatabaseSignalList = ('[ '("iconLoaded", FaviconDatabaseIconLoadedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method FaviconDatabase::clear -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -200,19 +247,22 @@ faviconDatabaseClear :: (MonadIO m, FaviconDatabaseK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result faviconDatabaseClear _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_favicon_database_clear _obj' touchManagedPtr _obj return () +data FaviconDatabaseClearMethodInfo +instance (signature ~ (m ()), MonadIO m, FaviconDatabaseK a) => MethodInfo FaviconDatabaseClearMethodInfo a signature where + overloadedMethod _ = faviconDatabaseClear + -- method FaviconDatabase::get_favicon_pixbuf -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "width", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "height", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cancellable", argType = TInterface "Gio" "Cancellable", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "callback", argType = TInterface "Gio" "AsyncReadyCallback", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeAsync, argClosure = 6, argDestroy = -1, transfer = TransferNothing},Arg {argName = "user_data", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "width", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "height", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cancellable", argType = TInterface "Gio" "Cancellable", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "callback", argType = TInterface "Gio" "AsyncReadyCallback", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeAsync, argClosure = 6, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "user_data", argType = TBasicType TVoid, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "width", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "height", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "cancellable", argType = TInterface "Gio" "Cancellable", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "callback", argType = TInterface "Gio" "AsyncReadyCallback", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeAsync, argClosure = 6, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -230,16 +280,16 @@ faviconDatabaseGetFaviconPixbuf :: (MonadIO m, FaviconDatabaseK a, Gio.CancellableK b) => - a -> -- _obj - T.Text -> -- page_uri - Word32 -> -- width - Word32 -> -- height - Maybe (b) -> -- cancellable - Maybe (Gio.AsyncReadyCallback) -> -- callback - m () -faviconDatabaseGetFaviconPixbuf _obj page_uri width height cancellable callback = liftIO $ do + a -- _obj + -> T.Text -- pageUri + -> Word32 -- width + -> Word32 -- height + -> Maybe (b) -- cancellable + -> Maybe (Gio.AsyncReadyCallback) -- callback + -> m () -- result +faviconDatabaseGetFaviconPixbuf _obj pageUri width height cancellable callback = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - page_uri' <- textToCString page_uri + pageUri' <- textToCString pageUri maybeCancellable <- case cancellable of Nothing -> return nullPtr Just jCancellable -> do @@ -252,18 +302,21 @@ jCallback' <- Gio.mkAsyncReadyCallback (Gio.asyncReadyCallbackWrapper (Just ptrcallback) jCallback) poke ptrcallback jCallback' return jCallback' - let user_data = nullPtr - webkit_favicon_database_get_favicon_pixbuf _obj' page_uri' width height maybeCancellable maybeCallback user_data + let userData = nullPtr + webkit_favicon_database_get_favicon_pixbuf _obj' pageUri' width height maybeCancellable maybeCallback userData touchManagedPtr _obj whenJust cancellable touchManagedPtr - freeMem page_uri' + freeMem pageUri' return () +data FaviconDatabaseGetFaviconPixbufMethodInfo +instance (signature ~ (T.Text -> Word32 -> Word32 -> Maybe (b) -> Maybe (Gio.AsyncReadyCallback) -> m ()), MonadIO m, FaviconDatabaseK a, Gio.CancellableK b) => MethodInfo FaviconDatabaseGetFaviconPixbufMethodInfo a signature where + overloadedMethod _ = faviconDatabaseGetFaviconPixbuf + -- method FaviconDatabase::get_favicon_pixbuf_finish -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "result", argType = TInterface "Gio" "AsyncResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "result", argType = TInterface "Gio" "AsyncResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "result", argType = TInterface "Gio" "AsyncResult", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "GdkPixbuf" "Pixbuf" -- throws : True -- Skip return : False @@ -277,9 +330,9 @@ faviconDatabaseGetFaviconPixbufFinish :: (MonadIO m, FaviconDatabaseK a, Gio.AsyncResultK b) => - a -> -- _obj - b -> -- result - m GdkPixbuf.Pixbuf + a -- _obj + -> b -- result_ + -> m GdkPixbuf.Pixbuf -- result faviconDatabaseGetFaviconPixbufFinish _obj result_ = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let result_' = unsafeManagedPtrCastPtr result_ @@ -294,11 +347,14 @@ return () ) +data FaviconDatabaseGetFaviconPixbufFinishMethodInfo +instance (signature ~ (b -> m GdkPixbuf.Pixbuf), MonadIO m, FaviconDatabaseK a, Gio.AsyncResultK b) => MethodInfo FaviconDatabaseGetFaviconPixbufFinishMethodInfo a signature where + overloadedMethod _ = faviconDatabaseGetFaviconPixbufFinish + -- method FaviconDatabase::get_favicon_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -311,25 +367,28 @@ faviconDatabaseGetFaviconUri :: (MonadIO m, FaviconDatabaseK a) => - a -> -- _obj - T.Text -> -- page_uri - m T.Text -faviconDatabaseGetFaviconUri _obj page_uri = liftIO $ do + a -- _obj + -> T.Text -- pageUri + -> m T.Text -- result +faviconDatabaseGetFaviconUri _obj pageUri = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - page_uri' <- textToCString page_uri - result <- webkit_favicon_database_get_favicon_uri _obj' page_uri' + pageUri' <- textToCString pageUri + result <- webkit_favicon_database_get_favicon_uri _obj' pageUri' checkUnexpectedReturnNULL "webkit_favicon_database_get_favicon_uri" result result' <- cstringToText result freeMem result touchManagedPtr _obj - freeMem page_uri' + freeMem pageUri' return result' +data FaviconDatabaseGetFaviconUriMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, FaviconDatabaseK a) => MethodInfo FaviconDatabaseGetFaviconUriMethodInfo a signature where + overloadedMethod _ = faviconDatabaseGetFaviconUri + -- method FaviconDatabase::get_path -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -341,8 +400,8 @@ faviconDatabaseGetPath :: (MonadIO m, FaviconDatabaseK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result faviconDatabaseGetPath _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_favicon_database_get_path _obj' @@ -351,11 +410,14 @@ touchManagedPtr _obj return result' +data FaviconDatabaseGetPathMethodInfo +instance (signature ~ (m T.Text), MonadIO m, FaviconDatabaseK a) => MethodInfo FaviconDatabaseGetPathMethodInfo a signature where + overloadedMethod _ = faviconDatabaseGetPath + -- method FaviconDatabase::set_path -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "path", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "path", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "path", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -368,9 +430,9 @@ faviconDatabaseSetPath :: (MonadIO m, FaviconDatabaseK a) => - a -> -- _obj - Maybe (T.Text) -> -- path - m () + a -- _obj + -> Maybe (T.Text) -- path + -> m () -- result faviconDatabaseSetPath _obj path = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj maybePath <- case path of @@ -383,11 +445,14 @@ freeMem maybePath return () +data FaviconDatabaseSetPathMethodInfo +instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, FaviconDatabaseK a) => MethodInfo FaviconDatabaseSetPathMethodInfo a signature where + overloadedMethod _ = faviconDatabaseSetPath + -- method FaviconDatabase::try_get_favicon_pixbuf -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "width", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "height", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "width", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "height", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FaviconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "width", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "height", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "GdkPixbuf" "Pixbuf" -- throws : False -- Skip return : False @@ -402,19 +467,23 @@ faviconDatabaseTryGetFaviconPixbuf :: (MonadIO m, FaviconDatabaseK a) => - a -> -- _obj - T.Text -> -- page_uri - Word32 -> -- width - Word32 -> -- height - m GdkPixbuf.Pixbuf -faviconDatabaseTryGetFaviconPixbuf _obj page_uri width height = liftIO $ do + a -- _obj + -> T.Text -- pageUri + -> Word32 -- width + -> Word32 -- height + -> m GdkPixbuf.Pixbuf -- result +faviconDatabaseTryGetFaviconPixbuf _obj pageUri width height = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - page_uri' <- textToCString page_uri - result <- webkit_favicon_database_try_get_favicon_pixbuf _obj' page_uri' width height + pageUri' <- textToCString pageUri + result <- webkit_favicon_database_try_get_favicon_pixbuf _obj' pageUri' width height checkUnexpectedReturnNULL "webkit_favicon_database_try_get_favicon_pixbuf" result result' <- (wrapObject GdkPixbuf.Pixbuf) result touchManagedPtr _obj - freeMem page_uri' + freeMem pageUri' return result' + +data FaviconDatabaseTryGetFaviconPixbufMethodInfo +instance (signature ~ (T.Text -> Word32 -> Word32 -> m GdkPixbuf.Pixbuf), MonadIO m, FaviconDatabaseK a) => MethodInfo FaviconDatabaseTryGetFaviconPixbufMethodInfo a signature where + overloadedMethod _ = faviconDatabaseTryGetFaviconPixbuf diff --git a/GI/WebKit/Objects/FaviconDatabase.hs-boot b/GI/WebKit/Objects/FaviconDatabase.hs-boot --- a/GI/WebKit/Objects/FaviconDatabase.hs-boot +++ b/GI/WebKit/Objects/FaviconDatabase.hs-boot @@ -13,3 +13,10 @@ instance (GObject o, IsDescendantOf FaviconDatabase o) => FaviconDatabaseK o data FaviconDatabasePathPropertyInfo data FaviconDatabaseIconLoadedSignalInfo +data FaviconDatabaseClearMethodInfo +data FaviconDatabaseGetFaviconPixbufMethodInfo +data FaviconDatabaseGetFaviconPixbufFinishMethodInfo +data FaviconDatabaseGetFaviconUriMethodInfo +data FaviconDatabaseGetPathMethodInfo +data FaviconDatabaseSetPathMethodInfo +data FaviconDatabaseTryGetFaviconPixbufMethodInfo diff --git a/GI/WebKit/Objects/FileChooserRequest.hs b/GI/WebKit/Objects/FileChooserRequest.hs --- a/GI/WebKit/Objects/FileChooserRequest.hs +++ b/GI/WebKit/Objects/FileChooserRequest.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,22 +18,27 @@ -- * Methods -- ** fileChooserRequestGetMimeTypes + FileChooserRequestGetMimeTypesMethodInfo, fileChooserRequestGetMimeTypes , -- ** fileChooserRequestGetMimeTypesFilter + FileChooserRequestGetMimeTypesFilterMethodInfo, fileChooserRequestGetMimeTypesFilter , -- ** fileChooserRequestGetSelectMultiple + FileChooserRequestGetSelectMultipleMethodInfo, fileChooserRequestGetSelectMultiple , -- ** fileChooserRequestGetSelectedFiles + FileChooserRequestGetSelectedFilesMethodInfo, fileChooserRequestGetSelectedFiles , -- ** fileChooserRequestSelectFiles + FileChooserRequestSelectFilesMethodInfo , fileChooserRequestSelectFiles , @@ -96,6 +102,44 @@ noFileChooserRequest :: Maybe FileChooserRequest noFileChooserRequest = Nothing +type family ResolveFileChooserRequestMethod (t :: Symbol) (o :: *) :: * where + ResolveFileChooserRequestMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveFileChooserRequestMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveFileChooserRequestMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveFileChooserRequestMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveFileChooserRequestMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveFileChooserRequestMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveFileChooserRequestMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveFileChooserRequestMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveFileChooserRequestMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveFileChooserRequestMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveFileChooserRequestMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveFileChooserRequestMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveFileChooserRequestMethod "selectFiles" o = FileChooserRequestSelectFilesMethodInfo + ResolveFileChooserRequestMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveFileChooserRequestMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveFileChooserRequestMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveFileChooserRequestMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveFileChooserRequestMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveFileChooserRequestMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveFileChooserRequestMethod "getMimeTypes" o = FileChooserRequestGetMimeTypesMethodInfo + ResolveFileChooserRequestMethod "getMimeTypesFilter" o = FileChooserRequestGetMimeTypesFilterMethodInfo + ResolveFileChooserRequestMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveFileChooserRequestMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveFileChooserRequestMethod "getSelectMultiple" o = FileChooserRequestGetSelectMultipleMethodInfo + ResolveFileChooserRequestMethod "getSelectedFiles" o = FileChooserRequestGetSelectedFilesMethodInfo + ResolveFileChooserRequestMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveFileChooserRequestMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveFileChooserRequestMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveFileChooserRequestMethod t FileChooserRequest, MethodInfo info FileChooserRequest p) => IsLabelProxy t (FileChooserRequest -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveFileChooserRequestMethod t FileChooserRequest, MethodInfo info FileChooserRequest p) => IsLabel t (FileChooserRequest -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "filter" -- Type: TInterface "Gtk" "FileFilter" -- Flags: [PropertyReadable] @@ -109,7 +153,7 @@ type AttrSetTypeConstraint FileChooserRequestFilterPropertyInfo = (~) () type AttrBaseTypeConstraint FileChooserRequestFilterPropertyInfo = FileChooserRequestK type AttrGetType FileChooserRequestFilterPropertyInfo = Gtk.FileFilter - type AttrLabel FileChooserRequestFilterPropertyInfo = "FileChooserRequest::filter" + type AttrLabel FileChooserRequestFilterPropertyInfo = "filter" attrGet _ = getFileChooserRequestFilter attrSet _ = undefined attrConstruct _ = undefined @@ -127,7 +171,7 @@ type AttrSetTypeConstraint FileChooserRequestMimeTypesPropertyInfo = (~) () type AttrBaseTypeConstraint FileChooserRequestMimeTypesPropertyInfo = FileChooserRequestK type AttrGetType FileChooserRequestMimeTypesPropertyInfo = [T.Text] - type AttrLabel FileChooserRequestMimeTypesPropertyInfo = "FileChooserRequest::mime-types" + type AttrLabel FileChooserRequestMimeTypesPropertyInfo = "mime-types" attrGet _ = getFileChooserRequestMimeTypes attrSet _ = undefined attrConstruct _ = undefined @@ -145,7 +189,7 @@ type AttrSetTypeConstraint FileChooserRequestSelectMultiplePropertyInfo = (~) () type AttrBaseTypeConstraint FileChooserRequestSelectMultiplePropertyInfo = FileChooserRequestK type AttrGetType FileChooserRequestSelectMultiplePropertyInfo = Bool - type AttrLabel FileChooserRequestSelectMultiplePropertyInfo = "FileChooserRequest::select-multiple" + type AttrLabel FileChooserRequestSelectMultiplePropertyInfo = "select-multiple" attrGet _ = getFileChooserRequestSelectMultiple attrSet _ = undefined attrConstruct _ = undefined @@ -163,22 +207,21 @@ type AttrSetTypeConstraint FileChooserRequestSelectedFilesPropertyInfo = (~) () type AttrBaseTypeConstraint FileChooserRequestSelectedFilesPropertyInfo = FileChooserRequestK type AttrGetType FileChooserRequestSelectedFilesPropertyInfo = [T.Text] - type AttrLabel FileChooserRequestSelectedFilesPropertyInfo = "FileChooserRequest::selected-files" + type AttrLabel FileChooserRequestSelectedFilesPropertyInfo = "selected-files" attrGet _ = getFileChooserRequestSelectedFiles attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList FileChooserRequest = FileChooserRequestAttributeList -type FileChooserRequestAttributeList = ('[ '("filter", FileChooserRequestFilterPropertyInfo), '("mime-types", FileChooserRequestMimeTypesPropertyInfo), '("select-multiple", FileChooserRequestSelectMultiplePropertyInfo), '("selected-files", FileChooserRequestSelectedFilesPropertyInfo)] :: [(Symbol, *)]) +type FileChooserRequestAttributeList = ('[ '("filter", FileChooserRequestFilterPropertyInfo), '("mimeTypes", FileChooserRequestMimeTypesPropertyInfo), '("selectMultiple", FileChooserRequestSelectMultiplePropertyInfo), '("selectedFiles", FileChooserRequestSelectedFilesPropertyInfo)] :: [(Symbol, *)]) type instance SignalList FileChooserRequest = FileChooserRequestSignalList -type FileChooserRequestSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type FileChooserRequestSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method FileChooserRequest::get_mime_types -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TCArray True (-1) (-1) (TBasicType TUTF8) -- throws : False -- Skip return : False @@ -190,8 +233,8 @@ fileChooserRequestGetMimeTypes :: (MonadIO m, FileChooserRequestK a) => - a -> -- _obj - m [T.Text] + a -- _obj + -> m [T.Text] -- result fileChooserRequestGetMimeTypes _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_file_chooser_request_get_mime_types _obj' @@ -200,11 +243,14 @@ touchManagedPtr _obj return result' +data FileChooserRequestGetMimeTypesMethodInfo +instance (signature ~ (m [T.Text]), MonadIO m, FileChooserRequestK a) => MethodInfo FileChooserRequestGetMimeTypesMethodInfo a signature where + overloadedMethod _ = fileChooserRequestGetMimeTypes + -- method FileChooserRequest::get_mime_types_filter -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "Gtk" "FileFilter" -- throws : False -- Skip return : False @@ -216,8 +262,8 @@ fileChooserRequestGetMimeTypesFilter :: (MonadIO m, FileChooserRequestK a) => - a -> -- _obj - m Gtk.FileFilter + a -- _obj + -> m Gtk.FileFilter -- result fileChooserRequestGetMimeTypesFilter _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_file_chooser_request_get_mime_types_filter _obj' @@ -226,11 +272,14 @@ touchManagedPtr _obj return result' +data FileChooserRequestGetMimeTypesFilterMethodInfo +instance (signature ~ (m Gtk.FileFilter), MonadIO m, FileChooserRequestK a) => MethodInfo FileChooserRequestGetMimeTypesFilterMethodInfo a signature where + overloadedMethod _ = fileChooserRequestGetMimeTypesFilter + -- method FileChooserRequest::get_select_multiple -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -242,8 +291,8 @@ fileChooserRequestGetSelectMultiple :: (MonadIO m, FileChooserRequestK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result fileChooserRequestGetSelectMultiple _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_file_chooser_request_get_select_multiple _obj' @@ -251,11 +300,14 @@ touchManagedPtr _obj return result' +data FileChooserRequestGetSelectMultipleMethodInfo +instance (signature ~ (m Bool), MonadIO m, FileChooserRequestK a) => MethodInfo FileChooserRequestGetSelectMultipleMethodInfo a signature where + overloadedMethod _ = fileChooserRequestGetSelectMultiple + -- method FileChooserRequest::get_selected_files -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TCArray True (-1) (-1) (TBasicType TUTF8) -- throws : False -- Skip return : False @@ -267,8 +319,8 @@ fileChooserRequestGetSelectedFiles :: (MonadIO m, FileChooserRequestK a) => - a -> -- _obj - m [T.Text] + a -- _obj + -> m [T.Text] -- result fileChooserRequestGetSelectedFiles _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_file_chooser_request_get_selected_files _obj' @@ -277,11 +329,14 @@ touchManagedPtr _obj return result' +data FileChooserRequestGetSelectedFilesMethodInfo +instance (signature ~ (m [T.Text]), MonadIO m, FileChooserRequestK a) => MethodInfo FileChooserRequestGetSelectedFilesMethodInfo a signature where + overloadedMethod _ = fileChooserRequestGetSelectedFiles + -- method FileChooserRequest::select_files -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "files", argType = TCArray True (-1) (-1) (TBasicType TUTF8), direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "files", argType = TCArray True (-1) (-1) (TBasicType TUTF8), direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "FileChooserRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "files", argType = TCArray True (-1) (-1) (TBasicType TUTF8), direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -294,9 +349,9 @@ fileChooserRequestSelectFiles :: (MonadIO m, FileChooserRequestK a) => - a -> -- _obj - [T.Text] -> -- files - m () + a -- _obj + -> [T.Text] -- files + -> m () -- result fileChooserRequestSelectFiles _obj files = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj files' <- packZeroTerminatedUTF8CArray files @@ -305,5 +360,9 @@ mapZeroTerminatedCArray freeMem files' freeMem files' return () + +data FileChooserRequestSelectFilesMethodInfo +instance (signature ~ ([T.Text] -> m ()), MonadIO m, FileChooserRequestK a) => MethodInfo FileChooserRequestSelectFilesMethodInfo a signature where + overloadedMethod _ = fileChooserRequestSelectFiles diff --git a/GI/WebKit/Objects/FileChooserRequest.hs-boot b/GI/WebKit/Objects/FileChooserRequest.hs-boot --- a/GI/WebKit/Objects/FileChooserRequest.hs-boot +++ b/GI/WebKit/Objects/FileChooserRequest.hs-boot @@ -15,3 +15,8 @@ data FileChooserRequestMimeTypesPropertyInfo data FileChooserRequestSelectMultiplePropertyInfo data FileChooserRequestSelectedFilesPropertyInfo +data FileChooserRequestGetMimeTypesMethodInfo +data FileChooserRequestGetMimeTypesFilterMethodInfo +data FileChooserRequestGetSelectMultipleMethodInfo +data FileChooserRequestGetSelectedFilesMethodInfo +data FileChooserRequestSelectFilesMethodInfo diff --git a/GI/WebKit/Objects/GeolocationPolicyDecision.hs b/GI/WebKit/Objects/GeolocationPolicyDecision.hs --- a/GI/WebKit/Objects/GeolocationPolicyDecision.hs +++ b/GI/WebKit/Objects/GeolocationPolicyDecision.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -49,10 +50,43 @@ noGeolocationPolicyDecision :: Maybe GeolocationPolicyDecision noGeolocationPolicyDecision = Nothing +type family ResolveGeolocationPolicyDecisionMethod (t :: Symbol) (o :: *) :: * where + ResolveGeolocationPolicyDecisionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveGeolocationPolicyDecisionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveGeolocationPolicyDecisionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveGeolocationPolicyDecisionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveGeolocationPolicyDecisionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveGeolocationPolicyDecisionMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveGeolocationPolicyDecisionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveGeolocationPolicyDecisionMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveGeolocationPolicyDecisionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveGeolocationPolicyDecisionMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveGeolocationPolicyDecisionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveGeolocationPolicyDecisionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveGeolocationPolicyDecisionMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveGeolocationPolicyDecisionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveGeolocationPolicyDecisionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveGeolocationPolicyDecisionMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveGeolocationPolicyDecisionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveGeolocationPolicyDecisionMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveGeolocationPolicyDecisionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveGeolocationPolicyDecisionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveGeolocationPolicyDecisionMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveGeolocationPolicyDecisionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveGeolocationPolicyDecisionMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveGeolocationPolicyDecisionMethod t GeolocationPolicyDecision, MethodInfo info GeolocationPolicyDecision p) => IsLabelProxy t (GeolocationPolicyDecision -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveGeolocationPolicyDecisionMethod t GeolocationPolicyDecision, MethodInfo info GeolocationPolicyDecision p) => IsLabel t (GeolocationPolicyDecision -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList GeolocationPolicyDecision = GeolocationPolicyDecisionAttributeList type GeolocationPolicyDecisionAttributeList = ('[ ] :: [(Symbol, *)]) type instance SignalList GeolocationPolicyDecision = GeolocationPolicyDecisionSignalList -type GeolocationPolicyDecisionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type GeolocationPolicyDecisionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/HitTestResult.hs b/GI/WebKit/Objects/HitTestResult.hs --- a/GI/WebKit/Objects/HitTestResult.hs +++ b/GI/WebKit/Objects/HitTestResult.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -94,6 +95,39 @@ noHitTestResult :: Maybe HitTestResult noHitTestResult = Nothing +type family ResolveHitTestResultMethod (t :: Symbol) (o :: *) :: * where + ResolveHitTestResultMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveHitTestResultMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveHitTestResultMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveHitTestResultMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveHitTestResultMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveHitTestResultMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveHitTestResultMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveHitTestResultMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveHitTestResultMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveHitTestResultMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveHitTestResultMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveHitTestResultMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveHitTestResultMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveHitTestResultMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveHitTestResultMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveHitTestResultMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveHitTestResultMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveHitTestResultMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveHitTestResultMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveHitTestResultMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveHitTestResultMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveHitTestResultMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveHitTestResultMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveHitTestResultMethod t HitTestResult, MethodInfo info HitTestResult p) => IsLabelProxy t (HitTestResult -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveHitTestResultMethod t HitTestResult, MethodInfo info HitTestResult p) => IsLabel t (HitTestResult -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "context" -- Type: TInterface "WebKit" "HitTestResultContext" -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly] @@ -110,7 +144,7 @@ type AttrSetTypeConstraint HitTestResultContextPropertyInfo = (~) [HitTestResultContext] type AttrBaseTypeConstraint HitTestResultContextPropertyInfo = HitTestResultK type AttrGetType HitTestResultContextPropertyInfo = [HitTestResultContext] - type AttrLabel HitTestResultContextPropertyInfo = "HitTestResult::context" + type AttrLabel HitTestResultContextPropertyInfo = "context" attrGet _ = getHitTestResultContext attrSet _ = undefined attrConstruct _ = constructHitTestResultContext @@ -131,7 +165,7 @@ type AttrSetTypeConstraint HitTestResultImageUriPropertyInfo = (~) T.Text type AttrBaseTypeConstraint HitTestResultImageUriPropertyInfo = HitTestResultK type AttrGetType HitTestResultImageUriPropertyInfo = T.Text - type AttrLabel HitTestResultImageUriPropertyInfo = "HitTestResult::image-uri" + type AttrLabel HitTestResultImageUriPropertyInfo = "image-uri" attrGet _ = getHitTestResultImageUri attrSet _ = undefined attrConstruct _ = constructHitTestResultImageUri @@ -152,7 +186,7 @@ type AttrSetTypeConstraint HitTestResultInnerNodePropertyInfo = DOMNodeK type AttrBaseTypeConstraint HitTestResultInnerNodePropertyInfo = HitTestResultK type AttrGetType HitTestResultInnerNodePropertyInfo = DOMNode - type AttrLabel HitTestResultInnerNodePropertyInfo = "HitTestResult::inner-node" + type AttrLabel HitTestResultInnerNodePropertyInfo = "inner-node" attrGet _ = getHitTestResultInnerNode attrSet _ = undefined attrConstruct _ = constructHitTestResultInnerNode @@ -173,7 +207,7 @@ type AttrSetTypeConstraint HitTestResultLinkUriPropertyInfo = (~) T.Text type AttrBaseTypeConstraint HitTestResultLinkUriPropertyInfo = HitTestResultK type AttrGetType HitTestResultLinkUriPropertyInfo = T.Text - type AttrLabel HitTestResultLinkUriPropertyInfo = "HitTestResult::link-uri" + type AttrLabel HitTestResultLinkUriPropertyInfo = "link-uri" attrGet _ = getHitTestResultLinkUri attrSet _ = undefined attrConstruct _ = constructHitTestResultLinkUri @@ -194,7 +228,7 @@ type AttrSetTypeConstraint HitTestResultMediaUriPropertyInfo = (~) T.Text type AttrBaseTypeConstraint HitTestResultMediaUriPropertyInfo = HitTestResultK type AttrGetType HitTestResultMediaUriPropertyInfo = T.Text - type AttrLabel HitTestResultMediaUriPropertyInfo = "HitTestResult::media-uri" + type AttrLabel HitTestResultMediaUriPropertyInfo = "media-uri" attrGet _ = getHitTestResultMediaUri attrSet _ = undefined attrConstruct _ = constructHitTestResultMediaUri @@ -215,7 +249,7 @@ type AttrSetTypeConstraint HitTestResultXPropertyInfo = (~) Int32 type AttrBaseTypeConstraint HitTestResultXPropertyInfo = HitTestResultK type AttrGetType HitTestResultXPropertyInfo = Int32 - type AttrLabel HitTestResultXPropertyInfo = "HitTestResult::x" + type AttrLabel HitTestResultXPropertyInfo = "x" attrGet _ = getHitTestResultX attrSet _ = undefined attrConstruct _ = constructHitTestResultX @@ -236,15 +270,15 @@ type AttrSetTypeConstraint HitTestResultYPropertyInfo = (~) Int32 type AttrBaseTypeConstraint HitTestResultYPropertyInfo = HitTestResultK type AttrGetType HitTestResultYPropertyInfo = Int32 - type AttrLabel HitTestResultYPropertyInfo = "HitTestResult::y" + type AttrLabel HitTestResultYPropertyInfo = "y" attrGet _ = getHitTestResultY attrSet _ = undefined attrConstruct _ = constructHitTestResultY type instance AttributeList HitTestResult = HitTestResultAttributeList -type HitTestResultAttributeList = ('[ '("context", HitTestResultContextPropertyInfo), '("image-uri", HitTestResultImageUriPropertyInfo), '("inner-node", HitTestResultInnerNodePropertyInfo), '("link-uri", HitTestResultLinkUriPropertyInfo), '("media-uri", HitTestResultMediaUriPropertyInfo), '("x", HitTestResultXPropertyInfo), '("y", HitTestResultYPropertyInfo)] :: [(Symbol, *)]) +type HitTestResultAttributeList = ('[ '("context", HitTestResultContextPropertyInfo), '("imageUri", HitTestResultImageUriPropertyInfo), '("innerNode", HitTestResultInnerNodePropertyInfo), '("linkUri", HitTestResultLinkUriPropertyInfo), '("mediaUri", HitTestResultMediaUriPropertyInfo), '("x", HitTestResultXPropertyInfo), '("y", HitTestResultYPropertyInfo)] :: [(Symbol, *)]) type instance SignalList HitTestResult = HitTestResultSignalList -type HitTestResultSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type HitTestResultSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/IconDatabase.hs b/GI/WebKit/Objects/IconDatabase.hs --- a/GI/WebKit/Objects/IconDatabase.hs +++ b/GI/WebKit/Objects/IconDatabase.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,22 +18,27 @@ -- * Methods -- ** iconDatabaseClear + IconDatabaseClearMethodInfo , iconDatabaseClear , -- ** iconDatabaseGetIconPixbuf + IconDatabaseGetIconPixbufMethodInfo , iconDatabaseGetIconPixbuf , -- ** iconDatabaseGetIconUri + IconDatabaseGetIconUriMethodInfo , iconDatabaseGetIconUri , -- ** iconDatabaseGetPath + IconDatabaseGetPathMethodInfo , iconDatabaseGetPath , -- ** iconDatabaseSetPath + IconDatabaseSetPathMethodInfo , iconDatabaseSetPath , @@ -98,6 +104,44 @@ noIconDatabase :: Maybe IconDatabase noIconDatabase = Nothing +type family ResolveIconDatabaseMethod (t :: Symbol) (o :: *) :: * where + ResolveIconDatabaseMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveIconDatabaseMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveIconDatabaseMethod "clear" o = IconDatabaseClearMethodInfo + ResolveIconDatabaseMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveIconDatabaseMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveIconDatabaseMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveIconDatabaseMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveIconDatabaseMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveIconDatabaseMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveIconDatabaseMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveIconDatabaseMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveIconDatabaseMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveIconDatabaseMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveIconDatabaseMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveIconDatabaseMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveIconDatabaseMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveIconDatabaseMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveIconDatabaseMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveIconDatabaseMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveIconDatabaseMethod "getIconPixbuf" o = IconDatabaseGetIconPixbufMethodInfo + ResolveIconDatabaseMethod "getIconUri" o = IconDatabaseGetIconUriMethodInfo + ResolveIconDatabaseMethod "getPath" o = IconDatabaseGetPathMethodInfo + ResolveIconDatabaseMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveIconDatabaseMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveIconDatabaseMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveIconDatabaseMethod "setPath" o = IconDatabaseSetPathMethodInfo + ResolveIconDatabaseMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveIconDatabaseMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveIconDatabaseMethod t IconDatabase, MethodInfo info IconDatabase p) => IsLabelProxy t (IconDatabase -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveIconDatabaseMethod t IconDatabase, MethodInfo info IconDatabase p) => IsLabel t (IconDatabase -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- signal IconDatabase::icon-loaded type IconDatabaseIconLoadedCallback = WebFrame -> @@ -128,10 +172,10 @@ CString -> Ptr () -> IO () -iconDatabaseIconLoadedCallbackWrapper _cb _ frame frame_uri _ = do +iconDatabaseIconLoadedCallbackWrapper _cb _ frame frameUri _ = do frame' <- (newObject WebFrame) frame - frame_uri' <- cstringToText frame_uri - _cb frame' frame_uri' + frameUri' <- cstringToText frameUri + _cb frame' frameUri' onIconDatabaseIconLoaded :: (GObject a, MonadIO m) => a -> IconDatabaseIconLoadedCallback -> m SignalHandlerId onIconDatabaseIconLoaded obj cb = liftIO $ connectIconDatabaseIconLoaded obj cb SignalConnectBefore @@ -163,7 +207,7 @@ type AttrSetTypeConstraint IconDatabasePathPropertyInfo = (~) T.Text type AttrBaseTypeConstraint IconDatabasePathPropertyInfo = IconDatabaseK type AttrGetType IconDatabasePathPropertyInfo = T.Text - type AttrLabel IconDatabasePathPropertyInfo = "IconDatabase::path" + type AttrLabel IconDatabasePathPropertyInfo = "path" attrGet _ = getIconDatabasePath attrSet _ = setIconDatabasePath attrConstruct _ = constructIconDatabasePath @@ -177,13 +221,12 @@ connectSignal _ = connectIconDatabaseIconLoaded type instance SignalList IconDatabase = IconDatabaseSignalList -type IconDatabaseSignalList = ('[ '("icon-loaded", IconDatabaseIconLoadedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type IconDatabaseSignalList = ('[ '("iconLoaded", IconDatabaseIconLoadedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method IconDatabase::clear -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -195,19 +238,22 @@ {-# DEPRECATED iconDatabaseClear ["(Since version 1.8)","Use webkit_favicon_database_clear() instead."]#-} iconDatabaseClear :: (MonadIO m, IconDatabaseK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result iconDatabaseClear _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_icon_database_clear _obj' touchManagedPtr _obj return () +data IconDatabaseClearMethodInfo +instance (signature ~ (m ()), MonadIO m, IconDatabaseK a) => MethodInfo IconDatabaseClearMethodInfo a signature where + overloadedMethod _ = iconDatabaseClear + -- method IconDatabase::get_icon_pixbuf -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "GdkPixbuf" "Pixbuf" -- throws : False -- Skip return : False @@ -220,24 +266,27 @@ {-# DEPRECATED iconDatabaseGetIconPixbuf ["(Since version 1.8)","Use webkit_favicon_database_try_get_favicon_pixbuf() instead."]#-} iconDatabaseGetIconPixbuf :: (MonadIO m, IconDatabaseK a) => - a -> -- _obj - T.Text -> -- page_uri - m GdkPixbuf.Pixbuf -iconDatabaseGetIconPixbuf _obj page_uri = liftIO $ do + a -- _obj + -> T.Text -- pageUri + -> m GdkPixbuf.Pixbuf -- result +iconDatabaseGetIconPixbuf _obj pageUri = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - page_uri' <- textToCString page_uri - result <- webkit_icon_database_get_icon_pixbuf _obj' page_uri' + pageUri' <- textToCString pageUri + result <- webkit_icon_database_get_icon_pixbuf _obj' pageUri' checkUnexpectedReturnNULL "webkit_icon_database_get_icon_pixbuf" result result' <- (wrapObject GdkPixbuf.Pixbuf) result touchManagedPtr _obj - freeMem page_uri' + freeMem pageUri' return result' +data IconDatabaseGetIconPixbufMethodInfo +instance (signature ~ (T.Text -> m GdkPixbuf.Pixbuf), MonadIO m, IconDatabaseK a) => MethodInfo IconDatabaseGetIconPixbufMethodInfo a signature where + overloadedMethod _ = iconDatabaseGetIconPixbuf + -- method IconDatabase::get_icon_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "page_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -250,25 +299,28 @@ {-# DEPRECATED iconDatabaseGetIconUri ["(Since version 1.8)","Use webkit_favicon_database_get_favicon_uri() instead."]#-} iconDatabaseGetIconUri :: (MonadIO m, IconDatabaseK a) => - a -> -- _obj - T.Text -> -- page_uri - m T.Text -iconDatabaseGetIconUri _obj page_uri = liftIO $ do + a -- _obj + -> T.Text -- pageUri + -> m T.Text -- result +iconDatabaseGetIconUri _obj pageUri = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - page_uri' <- textToCString page_uri - result <- webkit_icon_database_get_icon_uri _obj' page_uri' + pageUri' <- textToCString pageUri + result <- webkit_icon_database_get_icon_uri _obj' pageUri' checkUnexpectedReturnNULL "webkit_icon_database_get_icon_uri" result result' <- cstringToText result freeMem result touchManagedPtr _obj - freeMem page_uri' + freeMem pageUri' return result' +data IconDatabaseGetIconUriMethodInfo +instance (signature ~ (T.Text -> m T.Text), MonadIO m, IconDatabaseK a) => MethodInfo IconDatabaseGetIconUriMethodInfo a signature where + overloadedMethod _ = iconDatabaseGetIconUri + -- method IconDatabase::get_path -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -280,8 +332,8 @@ {-# DEPRECATED iconDatabaseGetPath ["(Since version 1.8)","Use webkit_favicon_database_get_path() instead."]#-} iconDatabaseGetPath :: (MonadIO m, IconDatabaseK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result iconDatabaseGetPath _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_icon_database_get_path _obj' @@ -290,11 +342,14 @@ touchManagedPtr _obj return result' +data IconDatabaseGetPathMethodInfo +instance (signature ~ (m T.Text), MonadIO m, IconDatabaseK a) => MethodInfo IconDatabaseGetPathMethodInfo a signature where + overloadedMethod _ = iconDatabaseGetPath + -- method IconDatabase::set_path -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "path", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "path", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "IconDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "path", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -307,9 +362,9 @@ {-# DEPRECATED iconDatabaseSetPath ["(Since version 1.8)","Use webkit_favicon_database_set_path() instead."]#-} iconDatabaseSetPath :: (MonadIO m, IconDatabaseK a) => - a -> -- _obj - T.Text -> -- path - m () + a -- _obj + -> T.Text -- path + -> m () -- result iconDatabaseSetPath _obj path = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj path' <- textToCString path @@ -317,5 +372,9 @@ touchManagedPtr _obj freeMem path' return () + +data IconDatabaseSetPathMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, IconDatabaseK a) => MethodInfo IconDatabaseSetPathMethodInfo a signature where + overloadedMethod _ = iconDatabaseSetPath diff --git a/GI/WebKit/Objects/IconDatabase.hs-boot b/GI/WebKit/Objects/IconDatabase.hs-boot --- a/GI/WebKit/Objects/IconDatabase.hs-boot +++ b/GI/WebKit/Objects/IconDatabase.hs-boot @@ -13,3 +13,8 @@ instance (GObject o, IsDescendantOf IconDatabase o) => IconDatabaseK o data IconDatabasePathPropertyInfo data IconDatabaseIconLoadedSignalInfo +data IconDatabaseClearMethodInfo +data IconDatabaseGetIconPixbufMethodInfo +data IconDatabaseGetIconUriMethodInfo +data IconDatabaseGetPathMethodInfo +data IconDatabaseSetPathMethodInfo diff --git a/GI/WebKit/Objects/NetworkRequest.hs b/GI/WebKit/Objects/NetworkRequest.hs --- a/GI/WebKit/Objects/NetworkRequest.hs +++ b/GI/WebKit/Objects/NetworkRequest.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** networkRequestGetMessage + NetworkRequestGetMessageMethodInfo , networkRequestGetMessage , -- ** networkRequestGetUri + NetworkRequestGetUriMethodInfo , networkRequestGetUri , @@ -29,6 +32,7 @@ -- ** networkRequestSetUri + NetworkRequestSetUriMethodInfo , networkRequestSetUri , @@ -85,6 +89,42 @@ noNetworkRequest :: Maybe NetworkRequest noNetworkRequest = Nothing +type family ResolveNetworkRequestMethod (t :: Symbol) (o :: *) :: * where + ResolveNetworkRequestMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveNetworkRequestMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveNetworkRequestMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveNetworkRequestMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveNetworkRequestMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveNetworkRequestMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveNetworkRequestMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveNetworkRequestMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveNetworkRequestMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveNetworkRequestMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveNetworkRequestMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveNetworkRequestMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveNetworkRequestMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveNetworkRequestMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveNetworkRequestMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveNetworkRequestMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveNetworkRequestMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveNetworkRequestMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveNetworkRequestMethod "getMessage" o = NetworkRequestGetMessageMethodInfo + ResolveNetworkRequestMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveNetworkRequestMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveNetworkRequestMethod "getUri" o = NetworkRequestGetUriMethodInfo + ResolveNetworkRequestMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveNetworkRequestMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveNetworkRequestMethod "setUri" o = NetworkRequestSetUriMethodInfo + ResolveNetworkRequestMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveNetworkRequestMethod t NetworkRequest, MethodInfo info NetworkRequest p) => IsLabelProxy t (NetworkRequest -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveNetworkRequestMethod t NetworkRequest, MethodInfo info NetworkRequest p) => IsLabel t (NetworkRequest -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "message" -- Type: TInterface "Soup" "Message" -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly] @@ -101,7 +141,7 @@ type AttrSetTypeConstraint NetworkRequestMessagePropertyInfo = Soup.MessageK type AttrBaseTypeConstraint NetworkRequestMessagePropertyInfo = NetworkRequestK type AttrGetType NetworkRequestMessagePropertyInfo = Soup.Message - type AttrLabel NetworkRequestMessagePropertyInfo = "NetworkRequest::message" + type AttrLabel NetworkRequestMessagePropertyInfo = "message" attrGet _ = getNetworkRequestMessage attrSet _ = undefined attrConstruct _ = constructNetworkRequestMessage @@ -125,7 +165,7 @@ type AttrSetTypeConstraint NetworkRequestUriPropertyInfo = (~) T.Text type AttrBaseTypeConstraint NetworkRequestUriPropertyInfo = NetworkRequestK type AttrGetType NetworkRequestUriPropertyInfo = T.Text - type AttrLabel NetworkRequestUriPropertyInfo = "NetworkRequest::uri" + type AttrLabel NetworkRequestUriPropertyInfo = "uri" attrGet _ = getNetworkRequestUri attrSet _ = setNetworkRequestUri attrConstruct _ = constructNetworkRequestUri @@ -134,13 +174,12 @@ type NetworkRequestAttributeList = ('[ '("message", NetworkRequestMessagePropertyInfo), '("uri", NetworkRequestUriPropertyInfo)] :: [(Symbol, *)]) type instance SignalList NetworkRequest = NetworkRequestSignalList -type NetworkRequestSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type NetworkRequestSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method NetworkRequest::new -- method type : Constructor --- Args : [Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "NetworkRequest" -- throws : False -- Skip return : False @@ -152,8 +191,8 @@ networkRequestNew :: (MonadIO m) => - T.Text -> -- uri - m NetworkRequest + T.Text -- uri + -> m NetworkRequest -- result networkRequestNew uri = liftIO $ do uri' <- textToCString uri result <- webkit_network_request_new uri' @@ -164,9 +203,8 @@ -- method NetworkRequest::get_message -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "Soup" "Message" -- throws : False -- Skip return : False @@ -178,8 +216,8 @@ networkRequestGetMessage :: (MonadIO m, NetworkRequestK a) => - a -> -- _obj - m Soup.Message + a -- _obj + -> m Soup.Message -- result networkRequestGetMessage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_network_request_get_message _obj' @@ -188,11 +226,14 @@ touchManagedPtr _obj return result' +data NetworkRequestGetMessageMethodInfo +instance (signature ~ (m Soup.Message), MonadIO m, NetworkRequestK a) => MethodInfo NetworkRequestGetMessageMethodInfo a signature where + overloadedMethod _ = networkRequestGetMessage + -- method NetworkRequest::get_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -204,8 +245,8 @@ networkRequestGetUri :: (MonadIO m, NetworkRequestK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result networkRequestGetUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_network_request_get_uri _obj' @@ -214,11 +255,14 @@ touchManagedPtr _obj return result' +data NetworkRequestGetUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, NetworkRequestK a) => MethodInfo NetworkRequestGetUriMethodInfo a signature where + overloadedMethod _ = networkRequestGetUri + -- method NetworkRequest::set_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -231,9 +275,9 @@ networkRequestSetUri :: (MonadIO m, NetworkRequestK a) => - a -> -- _obj - T.Text -> -- uri - m () + a -- _obj + -> T.Text -- uri + -> m () -- result networkRequestSetUri _obj uri = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj uri' <- textToCString uri @@ -241,5 +285,9 @@ touchManagedPtr _obj freeMem uri' return () + +data NetworkRequestSetUriMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, NetworkRequestK a) => MethodInfo NetworkRequestSetUriMethodInfo a signature where + overloadedMethod _ = networkRequestSetUri diff --git a/GI/WebKit/Objects/NetworkRequest.hs-boot b/GI/WebKit/Objects/NetworkRequest.hs-boot --- a/GI/WebKit/Objects/NetworkRequest.hs-boot +++ b/GI/WebKit/Objects/NetworkRequest.hs-boot @@ -13,3 +13,6 @@ instance (GObject o, IsDescendantOf NetworkRequest o) => NetworkRequestK o data NetworkRequestMessagePropertyInfo data NetworkRequestUriPropertyInfo +data NetworkRequestGetMessageMethodInfo +data NetworkRequestGetUriMethodInfo +data NetworkRequestSetUriMethodInfo diff --git a/GI/WebKit/Objects/NetworkResponse.hs b/GI/WebKit/Objects/NetworkResponse.hs --- a/GI/WebKit/Objects/NetworkResponse.hs +++ b/GI/WebKit/Objects/NetworkResponse.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** networkResponseGetMessage + NetworkResponseGetMessageMethodInfo , networkResponseGetMessage , -- ** networkResponseGetSuggestedFilename + NetworkResponseGetSuggestedFilenameMethodInfo, networkResponseGetSuggestedFilename , -- ** networkResponseGetUri + NetworkResponseGetUriMethodInfo , networkResponseGetUri , @@ -33,6 +37,7 @@ -- ** networkResponseSetUri + NetworkResponseSetUriMethodInfo , networkResponseSetUri , @@ -94,6 +99,43 @@ noNetworkResponse :: Maybe NetworkResponse noNetworkResponse = Nothing +type family ResolveNetworkResponseMethod (t :: Symbol) (o :: *) :: * where + ResolveNetworkResponseMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveNetworkResponseMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveNetworkResponseMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveNetworkResponseMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveNetworkResponseMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveNetworkResponseMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveNetworkResponseMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveNetworkResponseMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveNetworkResponseMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveNetworkResponseMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveNetworkResponseMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveNetworkResponseMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveNetworkResponseMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveNetworkResponseMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveNetworkResponseMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveNetworkResponseMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveNetworkResponseMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveNetworkResponseMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveNetworkResponseMethod "getMessage" o = NetworkResponseGetMessageMethodInfo + ResolveNetworkResponseMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveNetworkResponseMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveNetworkResponseMethod "getSuggestedFilename" o = NetworkResponseGetSuggestedFilenameMethodInfo + ResolveNetworkResponseMethod "getUri" o = NetworkResponseGetUriMethodInfo + ResolveNetworkResponseMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveNetworkResponseMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveNetworkResponseMethod "setUri" o = NetworkResponseSetUriMethodInfo + ResolveNetworkResponseMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveNetworkResponseMethod t NetworkResponse, MethodInfo info NetworkResponse p) => IsLabelProxy t (NetworkResponse -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveNetworkResponseMethod t NetworkResponse, MethodInfo info NetworkResponse p) => IsLabel t (NetworkResponse -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "message" -- Type: TInterface "Soup" "Message" -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly] @@ -110,7 +152,7 @@ type AttrSetTypeConstraint NetworkResponseMessagePropertyInfo = Soup.MessageK type AttrBaseTypeConstraint NetworkResponseMessagePropertyInfo = NetworkResponseK type AttrGetType NetworkResponseMessagePropertyInfo = Soup.Message - type AttrLabel NetworkResponseMessagePropertyInfo = "NetworkResponse::message" + type AttrLabel NetworkResponseMessagePropertyInfo = "message" attrGet _ = getNetworkResponseMessage attrSet _ = undefined attrConstruct _ = constructNetworkResponseMessage @@ -128,7 +170,7 @@ type AttrSetTypeConstraint NetworkResponseSuggestedFilenamePropertyInfo = (~) () type AttrBaseTypeConstraint NetworkResponseSuggestedFilenamePropertyInfo = NetworkResponseK type AttrGetType NetworkResponseSuggestedFilenamePropertyInfo = T.Text - type AttrLabel NetworkResponseSuggestedFilenamePropertyInfo = "NetworkResponse::suggested-filename" + type AttrLabel NetworkResponseSuggestedFilenamePropertyInfo = "suggested-filename" attrGet _ = getNetworkResponseSuggestedFilename attrSet _ = undefined attrConstruct _ = undefined @@ -152,22 +194,21 @@ type AttrSetTypeConstraint NetworkResponseUriPropertyInfo = (~) T.Text type AttrBaseTypeConstraint NetworkResponseUriPropertyInfo = NetworkResponseK type AttrGetType NetworkResponseUriPropertyInfo = T.Text - type AttrLabel NetworkResponseUriPropertyInfo = "NetworkResponse::uri" + type AttrLabel NetworkResponseUriPropertyInfo = "uri" attrGet _ = getNetworkResponseUri attrSet _ = setNetworkResponseUri attrConstruct _ = constructNetworkResponseUri type instance AttributeList NetworkResponse = NetworkResponseAttributeList -type NetworkResponseAttributeList = ('[ '("message", NetworkResponseMessagePropertyInfo), '("suggested-filename", NetworkResponseSuggestedFilenamePropertyInfo), '("uri", NetworkResponseUriPropertyInfo)] :: [(Symbol, *)]) +type NetworkResponseAttributeList = ('[ '("message", NetworkResponseMessagePropertyInfo), '("suggestedFilename", NetworkResponseSuggestedFilenamePropertyInfo), '("uri", NetworkResponseUriPropertyInfo)] :: [(Symbol, *)]) type instance SignalList NetworkResponse = NetworkResponseSignalList -type NetworkResponseSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type NetworkResponseSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method NetworkResponse::new -- method type : Constructor --- Args : [Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "NetworkResponse" -- throws : False -- Skip return : False @@ -179,8 +220,8 @@ networkResponseNew :: (MonadIO m) => - T.Text -> -- uri - m NetworkResponse + T.Text -- uri + -> m NetworkResponse -- result networkResponseNew uri = liftIO $ do uri' <- textToCString uri result <- webkit_network_response_new uri' @@ -191,9 +232,8 @@ -- method NetworkResponse::get_message -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "Soup" "Message" -- throws : False -- Skip return : False @@ -205,8 +245,8 @@ networkResponseGetMessage :: (MonadIO m, NetworkResponseK a) => - a -> -- _obj - m Soup.Message + a -- _obj + -> m Soup.Message -- result networkResponseGetMessage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_network_response_get_message _obj' @@ -215,11 +255,14 @@ touchManagedPtr _obj return result' +data NetworkResponseGetMessageMethodInfo +instance (signature ~ (m Soup.Message), MonadIO m, NetworkResponseK a) => MethodInfo NetworkResponseGetMessageMethodInfo a signature where + overloadedMethod _ = networkResponseGetMessage + -- method NetworkResponse::get_suggested_filename -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -231,8 +274,8 @@ networkResponseGetSuggestedFilename :: (MonadIO m, NetworkResponseK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result networkResponseGetSuggestedFilename _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_network_response_get_suggested_filename _obj' @@ -241,11 +284,14 @@ touchManagedPtr _obj return result' +data NetworkResponseGetSuggestedFilenameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, NetworkResponseK a) => MethodInfo NetworkResponseGetSuggestedFilenameMethodInfo a signature where + overloadedMethod _ = networkResponseGetSuggestedFilename + -- method NetworkResponse::get_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -257,8 +303,8 @@ networkResponseGetUri :: (MonadIO m, NetworkResponseK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result networkResponseGetUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_network_response_get_uri _obj' @@ -267,11 +313,14 @@ touchManagedPtr _obj return result' +data NetworkResponseGetUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, NetworkResponseK a) => MethodInfo NetworkResponseGetUriMethodInfo a signature where + overloadedMethod _ = networkResponseGetUri + -- method NetworkResponse::set_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "NetworkResponse", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -284,9 +333,9 @@ networkResponseSetUri :: (MonadIO m, NetworkResponseK a) => - a -> -- _obj - T.Text -> -- uri - m () + a -- _obj + -> T.Text -- uri + -> m () -- result networkResponseSetUri _obj uri = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj uri' <- textToCString uri @@ -294,5 +343,9 @@ touchManagedPtr _obj freeMem uri' return () + +data NetworkResponseSetUriMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, NetworkResponseK a) => MethodInfo NetworkResponseSetUriMethodInfo a signature where + overloadedMethod _ = networkResponseSetUri diff --git a/GI/WebKit/Objects/NetworkResponse.hs-boot b/GI/WebKit/Objects/NetworkResponse.hs-boot --- a/GI/WebKit/Objects/NetworkResponse.hs-boot +++ b/GI/WebKit/Objects/NetworkResponse.hs-boot @@ -14,3 +14,7 @@ data NetworkResponseMessagePropertyInfo data NetworkResponseSuggestedFilenamePropertyInfo data NetworkResponseUriPropertyInfo +data NetworkResponseGetMessageMethodInfo +data NetworkResponseGetSuggestedFilenameMethodInfo +data NetworkResponseGetUriMethodInfo +data NetworkResponseSetUriMethodInfo diff --git a/GI/WebKit/Objects/SecurityOrigin.hs b/GI/WebKit/Objects/SecurityOrigin.hs --- a/GI/WebKit/Objects/SecurityOrigin.hs +++ b/GI/WebKit/Objects/SecurityOrigin.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,30 +18,37 @@ -- * Methods -- ** securityOriginGetAllWebDatabases + SecurityOriginGetAllWebDatabasesMethodInfo, securityOriginGetAllWebDatabases , -- ** securityOriginGetHost + SecurityOriginGetHostMethodInfo , securityOriginGetHost , -- ** securityOriginGetPort + SecurityOriginGetPortMethodInfo , securityOriginGetPort , -- ** securityOriginGetProtocol + SecurityOriginGetProtocolMethodInfo , securityOriginGetProtocol , -- ** securityOriginGetWebDatabaseQuota + SecurityOriginGetWebDatabaseQuotaMethodInfo, securityOriginGetWebDatabaseQuota , -- ** securityOriginGetWebDatabaseUsage + SecurityOriginGetWebDatabaseUsageMethodInfo, securityOriginGetWebDatabaseUsage , -- ** securityOriginSetWebDatabaseQuota + SecurityOriginSetWebDatabaseQuotaMethodInfo, securityOriginSetWebDatabaseQuota , @@ -110,6 +118,46 @@ noSecurityOrigin :: Maybe SecurityOrigin noSecurityOrigin = Nothing +type family ResolveSecurityOriginMethod (t :: Symbol) (o :: *) :: * where + ResolveSecurityOriginMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveSecurityOriginMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveSecurityOriginMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveSecurityOriginMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveSecurityOriginMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveSecurityOriginMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveSecurityOriginMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveSecurityOriginMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveSecurityOriginMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveSecurityOriginMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveSecurityOriginMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveSecurityOriginMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveSecurityOriginMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveSecurityOriginMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveSecurityOriginMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveSecurityOriginMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveSecurityOriginMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveSecurityOriginMethod "getAllWebDatabases" o = SecurityOriginGetAllWebDatabasesMethodInfo + ResolveSecurityOriginMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveSecurityOriginMethod "getHost" o = SecurityOriginGetHostMethodInfo + ResolveSecurityOriginMethod "getPort" o = SecurityOriginGetPortMethodInfo + ResolveSecurityOriginMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveSecurityOriginMethod "getProtocol" o = SecurityOriginGetProtocolMethodInfo + ResolveSecurityOriginMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveSecurityOriginMethod "getWebDatabaseQuota" o = SecurityOriginGetWebDatabaseQuotaMethodInfo + ResolveSecurityOriginMethod "getWebDatabaseUsage" o = SecurityOriginGetWebDatabaseUsageMethodInfo + ResolveSecurityOriginMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveSecurityOriginMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveSecurityOriginMethod "setWebDatabaseQuota" o = SecurityOriginSetWebDatabaseQuotaMethodInfo + ResolveSecurityOriginMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveSecurityOriginMethod t SecurityOrigin, MethodInfo info SecurityOrigin p) => IsLabelProxy t (SecurityOrigin -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveSecurityOriginMethod t SecurityOrigin, MethodInfo info SecurityOrigin p) => IsLabel t (SecurityOrigin -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "host" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -123,7 +171,7 @@ type AttrSetTypeConstraint SecurityOriginHostPropertyInfo = (~) () type AttrBaseTypeConstraint SecurityOriginHostPropertyInfo = SecurityOriginK type AttrGetType SecurityOriginHostPropertyInfo = T.Text - type AttrLabel SecurityOriginHostPropertyInfo = "SecurityOrigin::host" + type AttrLabel SecurityOriginHostPropertyInfo = "host" attrGet _ = getSecurityOriginHost attrSet _ = undefined attrConstruct _ = undefined @@ -141,7 +189,7 @@ type AttrSetTypeConstraint SecurityOriginPortPropertyInfo = (~) () type AttrBaseTypeConstraint SecurityOriginPortPropertyInfo = SecurityOriginK type AttrGetType SecurityOriginPortPropertyInfo = Word32 - type AttrLabel SecurityOriginPortPropertyInfo = "SecurityOrigin::port" + type AttrLabel SecurityOriginPortPropertyInfo = "port" attrGet _ = getSecurityOriginPort attrSet _ = undefined attrConstruct _ = undefined @@ -159,7 +207,7 @@ type AttrSetTypeConstraint SecurityOriginProtocolPropertyInfo = (~) () type AttrBaseTypeConstraint SecurityOriginProtocolPropertyInfo = SecurityOriginK type AttrGetType SecurityOriginProtocolPropertyInfo = T.Text - type AttrLabel SecurityOriginProtocolPropertyInfo = "SecurityOrigin::protocol" + type AttrLabel SecurityOriginProtocolPropertyInfo = "protocol" attrGet _ = getSecurityOriginProtocol attrSet _ = undefined attrConstruct _ = undefined @@ -183,7 +231,7 @@ type AttrSetTypeConstraint SecurityOriginWebDatabaseQuotaPropertyInfo = (~) Word64 type AttrBaseTypeConstraint SecurityOriginWebDatabaseQuotaPropertyInfo = SecurityOriginK type AttrGetType SecurityOriginWebDatabaseQuotaPropertyInfo = Word64 - type AttrLabel SecurityOriginWebDatabaseQuotaPropertyInfo = "SecurityOrigin::web-database-quota" + type AttrLabel SecurityOriginWebDatabaseQuotaPropertyInfo = "web-database-quota" attrGet _ = getSecurityOriginWebDatabaseQuota attrSet _ = setSecurityOriginWebDatabaseQuota attrConstruct _ = constructSecurityOriginWebDatabaseQuota @@ -201,22 +249,21 @@ type AttrSetTypeConstraint SecurityOriginWebDatabaseUsagePropertyInfo = (~) () type AttrBaseTypeConstraint SecurityOriginWebDatabaseUsagePropertyInfo = SecurityOriginK type AttrGetType SecurityOriginWebDatabaseUsagePropertyInfo = Word64 - type AttrLabel SecurityOriginWebDatabaseUsagePropertyInfo = "SecurityOrigin::web-database-usage" + type AttrLabel SecurityOriginWebDatabaseUsagePropertyInfo = "web-database-usage" attrGet _ = getSecurityOriginWebDatabaseUsage attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList SecurityOrigin = SecurityOriginAttributeList -type SecurityOriginAttributeList = ('[ '("host", SecurityOriginHostPropertyInfo), '("port", SecurityOriginPortPropertyInfo), '("protocol", SecurityOriginProtocolPropertyInfo), '("web-database-quota", SecurityOriginWebDatabaseQuotaPropertyInfo), '("web-database-usage", SecurityOriginWebDatabaseUsagePropertyInfo)] :: [(Symbol, *)]) +type SecurityOriginAttributeList = ('[ '("host", SecurityOriginHostPropertyInfo), '("port", SecurityOriginPortPropertyInfo), '("protocol", SecurityOriginProtocolPropertyInfo), '("webDatabaseQuota", SecurityOriginWebDatabaseQuotaPropertyInfo), '("webDatabaseUsage", SecurityOriginWebDatabaseUsagePropertyInfo)] :: [(Symbol, *)]) type instance SignalList SecurityOrigin = SecurityOriginSignalList -type SecurityOriginSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type SecurityOriginSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method SecurityOrigin::get_all_web_databases -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TGList (TInterface "WebKit" "WebDatabase") -- throws : False -- Skip return : False @@ -228,8 +275,8 @@ securityOriginGetAllWebDatabases :: (MonadIO m, SecurityOriginK a) => - a -> -- _obj - m [WebDatabase] + a -- _obj + -> m [WebDatabase] -- result securityOriginGetAllWebDatabases _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_security_origin_get_all_web_databases _obj' @@ -240,11 +287,14 @@ touchManagedPtr _obj return result'' +data SecurityOriginGetAllWebDatabasesMethodInfo +instance (signature ~ (m [WebDatabase]), MonadIO m, SecurityOriginK a) => MethodInfo SecurityOriginGetAllWebDatabasesMethodInfo a signature where + overloadedMethod _ = securityOriginGetAllWebDatabases + -- method SecurityOrigin::get_host -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -256,8 +306,8 @@ securityOriginGetHost :: (MonadIO m, SecurityOriginK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result securityOriginGetHost _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_security_origin_get_host _obj' @@ -266,11 +316,14 @@ touchManagedPtr _obj return result' +data SecurityOriginGetHostMethodInfo +instance (signature ~ (m T.Text), MonadIO m, SecurityOriginK a) => MethodInfo SecurityOriginGetHostMethodInfo a signature where + overloadedMethod _ = securityOriginGetHost + -- method SecurityOrigin::get_port -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt32 -- throws : False -- Skip return : False @@ -282,19 +335,22 @@ securityOriginGetPort :: (MonadIO m, SecurityOriginK a) => - a -> -- _obj - m Word32 + a -- _obj + -> m Word32 -- result securityOriginGetPort _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_security_origin_get_port _obj' touchManagedPtr _obj return result +data SecurityOriginGetPortMethodInfo +instance (signature ~ (m Word32), MonadIO m, SecurityOriginK a) => MethodInfo SecurityOriginGetPortMethodInfo a signature where + overloadedMethod _ = securityOriginGetPort + -- method SecurityOrigin::get_protocol -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -306,8 +362,8 @@ securityOriginGetProtocol :: (MonadIO m, SecurityOriginK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result securityOriginGetProtocol _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_security_origin_get_protocol _obj' @@ -316,11 +372,14 @@ touchManagedPtr _obj return result' +data SecurityOriginGetProtocolMethodInfo +instance (signature ~ (m T.Text), MonadIO m, SecurityOriginK a) => MethodInfo SecurityOriginGetProtocolMethodInfo a signature where + overloadedMethod _ = securityOriginGetProtocol + -- method SecurityOrigin::get_web_database_quota -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -332,19 +391,22 @@ securityOriginGetWebDatabaseQuota :: (MonadIO m, SecurityOriginK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result securityOriginGetWebDatabaseQuota _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_security_origin_get_web_database_quota _obj' touchManagedPtr _obj return result +data SecurityOriginGetWebDatabaseQuotaMethodInfo +instance (signature ~ (m Word64), MonadIO m, SecurityOriginK a) => MethodInfo SecurityOriginGetWebDatabaseQuotaMethodInfo a signature where + overloadedMethod _ = securityOriginGetWebDatabaseQuota + -- method SecurityOrigin::get_web_database_usage -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -356,19 +418,22 @@ securityOriginGetWebDatabaseUsage :: (MonadIO m, SecurityOriginK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result securityOriginGetWebDatabaseUsage _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_security_origin_get_web_database_usage _obj' touchManagedPtr _obj return result +data SecurityOriginGetWebDatabaseUsageMethodInfo +instance (signature ~ (m Word64), MonadIO m, SecurityOriginK a) => MethodInfo SecurityOriginGetWebDatabaseUsageMethodInfo a signature where + overloadedMethod _ = securityOriginGetWebDatabaseUsage + -- method SecurityOrigin::set_web_database_quota -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "quota", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "quota", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "SecurityOrigin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "quota", argType = TBasicType TUInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -381,13 +446,17 @@ securityOriginSetWebDatabaseQuota :: (MonadIO m, SecurityOriginK a) => - a -> -- _obj - Word64 -> -- quota - m () + a -- _obj + -> Word64 -- quota + -> m () -- result securityOriginSetWebDatabaseQuota _obj quota = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_security_origin_set_web_database_quota _obj' quota touchManagedPtr _obj return () + +data SecurityOriginSetWebDatabaseQuotaMethodInfo +instance (signature ~ (Word64 -> m ()), MonadIO m, SecurityOriginK a) => MethodInfo SecurityOriginSetWebDatabaseQuotaMethodInfo a signature where + overloadedMethod _ = securityOriginSetWebDatabaseQuota diff --git a/GI/WebKit/Objects/SecurityOrigin.hs-boot b/GI/WebKit/Objects/SecurityOrigin.hs-boot --- a/GI/WebKit/Objects/SecurityOrigin.hs-boot +++ b/GI/WebKit/Objects/SecurityOrigin.hs-boot @@ -16,3 +16,10 @@ data SecurityOriginProtocolPropertyInfo data SecurityOriginWebDatabaseQuotaPropertyInfo data SecurityOriginWebDatabaseUsagePropertyInfo +data SecurityOriginGetAllWebDatabasesMethodInfo +data SecurityOriginGetHostMethodInfo +data SecurityOriginGetPortMethodInfo +data SecurityOriginGetProtocolMethodInfo +data SecurityOriginGetWebDatabaseQuotaMethodInfo +data SecurityOriginGetWebDatabaseUsageMethodInfo +data SecurityOriginSetWebDatabaseQuotaMethodInfo diff --git a/GI/WebKit/Objects/SoupAuthDialog.hs b/GI/WebKit/Objects/SoupAuthDialog.hs --- a/GI/WebKit/Objects/SoupAuthDialog.hs +++ b/GI/WebKit/Objects/SoupAuthDialog.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -66,6 +67,44 @@ noSoupAuthDialog :: Maybe SoupAuthDialog noSoupAuthDialog = Nothing +type family ResolveSoupAuthDialogMethod (t :: Symbol) (o :: *) :: * where + ResolveSoupAuthDialogMethod "addFeature" o = Soup.SessionFeatureAddFeatureMethodInfo + ResolveSoupAuthDialogMethod "attach" o = Soup.SessionFeatureAttachMethodInfo + ResolveSoupAuthDialogMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveSoupAuthDialogMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveSoupAuthDialogMethod "detach" o = Soup.SessionFeatureDetachMethodInfo + ResolveSoupAuthDialogMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveSoupAuthDialogMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveSoupAuthDialogMethod "hasFeature" o = Soup.SessionFeatureHasFeatureMethodInfo + ResolveSoupAuthDialogMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveSoupAuthDialogMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveSoupAuthDialogMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveSoupAuthDialogMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveSoupAuthDialogMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveSoupAuthDialogMethod "removeFeature" o = Soup.SessionFeatureRemoveFeatureMethodInfo + ResolveSoupAuthDialogMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveSoupAuthDialogMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveSoupAuthDialogMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveSoupAuthDialogMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveSoupAuthDialogMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveSoupAuthDialogMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveSoupAuthDialogMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveSoupAuthDialogMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveSoupAuthDialogMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveSoupAuthDialogMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveSoupAuthDialogMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveSoupAuthDialogMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveSoupAuthDialogMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveSoupAuthDialogMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveSoupAuthDialogMethod t SoupAuthDialog, MethodInfo info SoupAuthDialog p) => IsLabelProxy t (SoupAuthDialog -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveSoupAuthDialogMethod t SoupAuthDialog, MethodInfo info SoupAuthDialog p) => IsLabel t (SoupAuthDialog -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- signal SoupAuthDialog::current-toplevel type SoupAuthDialogCurrentToplevelCallback = Soup.Message -> @@ -119,6 +158,6 @@ connectSignal _ = connectSoupAuthDialogCurrentToplevel type instance SignalList SoupAuthDialog = SoupAuthDialogSignalList -type SoupAuthDialogSignalList = ('[ '("current-toplevel", SoupAuthDialogCurrentToplevelSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type SoupAuthDialogSignalList = ('[ '("currentToplevel", SoupAuthDialogCurrentToplevelSignalInfo), '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) diff --git a/GI/WebKit/Objects/ViewportAttributes.hs b/GI/WebKit/Objects/ViewportAttributes.hs --- a/GI/WebKit/Objects/ViewportAttributes.hs +++ b/GI/WebKit/Objects/ViewportAttributes.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** viewportAttributesRecompute + ViewportAttributesRecomputeMethodInfo , viewportAttributesRecompute , @@ -141,6 +143,40 @@ noViewportAttributes :: Maybe ViewportAttributes noViewportAttributes = Nothing +type family ResolveViewportAttributesMethod (t :: Symbol) (o :: *) :: * where + ResolveViewportAttributesMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveViewportAttributesMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveViewportAttributesMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveViewportAttributesMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveViewportAttributesMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveViewportAttributesMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveViewportAttributesMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveViewportAttributesMethod "recompute" o = ViewportAttributesRecomputeMethodInfo + ResolveViewportAttributesMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveViewportAttributesMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveViewportAttributesMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveViewportAttributesMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveViewportAttributesMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveViewportAttributesMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveViewportAttributesMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveViewportAttributesMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveViewportAttributesMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveViewportAttributesMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveViewportAttributesMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveViewportAttributesMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveViewportAttributesMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveViewportAttributesMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveViewportAttributesMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveViewportAttributesMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveViewportAttributesMethod t ViewportAttributes, MethodInfo info ViewportAttributes p) => IsLabelProxy t (ViewportAttributes -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveViewportAttributesMethod t ViewportAttributes, MethodInfo info ViewportAttributes p) => IsLabel t (ViewportAttributes -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "available-height" -- Type: TBasicType TInt32 -- Flags: [PropertyReadable,PropertyWritable] @@ -160,7 +196,7 @@ type AttrSetTypeConstraint ViewportAttributesAvailableHeightPropertyInfo = (~) Int32 type AttrBaseTypeConstraint ViewportAttributesAvailableHeightPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesAvailableHeightPropertyInfo = Int32 - type AttrLabel ViewportAttributesAvailableHeightPropertyInfo = "ViewportAttributes::available-height" + type AttrLabel ViewportAttributesAvailableHeightPropertyInfo = "available-height" attrGet _ = getViewportAttributesAvailableHeight attrSet _ = setViewportAttributesAvailableHeight attrConstruct _ = constructViewportAttributesAvailableHeight @@ -184,7 +220,7 @@ type AttrSetTypeConstraint ViewportAttributesAvailableWidthPropertyInfo = (~) Int32 type AttrBaseTypeConstraint ViewportAttributesAvailableWidthPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesAvailableWidthPropertyInfo = Int32 - type AttrLabel ViewportAttributesAvailableWidthPropertyInfo = "ViewportAttributes::available-width" + type AttrLabel ViewportAttributesAvailableWidthPropertyInfo = "available-width" attrGet _ = getViewportAttributesAvailableWidth attrSet _ = setViewportAttributesAvailableWidth attrConstruct _ = constructViewportAttributesAvailableWidth @@ -208,7 +244,7 @@ type AttrSetTypeConstraint ViewportAttributesDesktopWidthPropertyInfo = (~) Int32 type AttrBaseTypeConstraint ViewportAttributesDesktopWidthPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesDesktopWidthPropertyInfo = Int32 - type AttrLabel ViewportAttributesDesktopWidthPropertyInfo = "ViewportAttributes::desktop-width" + type AttrLabel ViewportAttributesDesktopWidthPropertyInfo = "desktop-width" attrGet _ = getViewportAttributesDesktopWidth attrSet _ = setViewportAttributesDesktopWidth attrConstruct _ = constructViewportAttributesDesktopWidth @@ -232,7 +268,7 @@ type AttrSetTypeConstraint ViewportAttributesDeviceDpiPropertyInfo = (~) Int32 type AttrBaseTypeConstraint ViewportAttributesDeviceDpiPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesDeviceDpiPropertyInfo = Int32 - type AttrLabel ViewportAttributesDeviceDpiPropertyInfo = "ViewportAttributes::device-dpi" + type AttrLabel ViewportAttributesDeviceDpiPropertyInfo = "device-dpi" attrGet _ = getViewportAttributesDeviceDpi attrSet _ = setViewportAttributesDeviceDpi attrConstruct _ = constructViewportAttributesDeviceDpi @@ -256,7 +292,7 @@ type AttrSetTypeConstraint ViewportAttributesDeviceHeightPropertyInfo = (~) Int32 type AttrBaseTypeConstraint ViewportAttributesDeviceHeightPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesDeviceHeightPropertyInfo = Int32 - type AttrLabel ViewportAttributesDeviceHeightPropertyInfo = "ViewportAttributes::device-height" + type AttrLabel ViewportAttributesDeviceHeightPropertyInfo = "device-height" attrGet _ = getViewportAttributesDeviceHeight attrSet _ = setViewportAttributesDeviceHeight attrConstruct _ = constructViewportAttributesDeviceHeight @@ -274,7 +310,7 @@ type AttrSetTypeConstraint ViewportAttributesDevicePixelRatioPropertyInfo = (~) () type AttrBaseTypeConstraint ViewportAttributesDevicePixelRatioPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesDevicePixelRatioPropertyInfo = Float - type AttrLabel ViewportAttributesDevicePixelRatioPropertyInfo = "ViewportAttributes::device-pixel-ratio" + type AttrLabel ViewportAttributesDevicePixelRatioPropertyInfo = "device-pixel-ratio" attrGet _ = getViewportAttributesDevicePixelRatio attrSet _ = undefined attrConstruct _ = undefined @@ -298,7 +334,7 @@ type AttrSetTypeConstraint ViewportAttributesDeviceWidthPropertyInfo = (~) Int32 type AttrBaseTypeConstraint ViewportAttributesDeviceWidthPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesDeviceWidthPropertyInfo = Int32 - type AttrLabel ViewportAttributesDeviceWidthPropertyInfo = "ViewportAttributes::device-width" + type AttrLabel ViewportAttributesDeviceWidthPropertyInfo = "device-width" attrGet _ = getViewportAttributesDeviceWidth attrSet _ = setViewportAttributesDeviceWidth attrConstruct _ = constructViewportAttributesDeviceWidth @@ -316,7 +352,7 @@ type AttrSetTypeConstraint ViewportAttributesHeightPropertyInfo = (~) () type AttrBaseTypeConstraint ViewportAttributesHeightPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesHeightPropertyInfo = Int32 - type AttrLabel ViewportAttributesHeightPropertyInfo = "ViewportAttributes::height" + type AttrLabel ViewportAttributesHeightPropertyInfo = "height" attrGet _ = getViewportAttributesHeight attrSet _ = undefined attrConstruct _ = undefined @@ -334,7 +370,7 @@ type AttrSetTypeConstraint ViewportAttributesInitialScaleFactorPropertyInfo = (~) () type AttrBaseTypeConstraint ViewportAttributesInitialScaleFactorPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesInitialScaleFactorPropertyInfo = Float - type AttrLabel ViewportAttributesInitialScaleFactorPropertyInfo = "ViewportAttributes::initial-scale-factor" + type AttrLabel ViewportAttributesInitialScaleFactorPropertyInfo = "initial-scale-factor" attrGet _ = getViewportAttributesInitialScaleFactor attrSet _ = undefined attrConstruct _ = undefined @@ -352,7 +388,7 @@ type AttrSetTypeConstraint ViewportAttributesMaximumScaleFactorPropertyInfo = (~) () type AttrBaseTypeConstraint ViewportAttributesMaximumScaleFactorPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesMaximumScaleFactorPropertyInfo = Float - type AttrLabel ViewportAttributesMaximumScaleFactorPropertyInfo = "ViewportAttributes::maximum-scale-factor" + type AttrLabel ViewportAttributesMaximumScaleFactorPropertyInfo = "maximum-scale-factor" attrGet _ = getViewportAttributesMaximumScaleFactor attrSet _ = undefined attrConstruct _ = undefined @@ -370,7 +406,7 @@ type AttrSetTypeConstraint ViewportAttributesMinimumScaleFactorPropertyInfo = (~) () type AttrBaseTypeConstraint ViewportAttributesMinimumScaleFactorPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesMinimumScaleFactorPropertyInfo = Float - type AttrLabel ViewportAttributesMinimumScaleFactorPropertyInfo = "ViewportAttributes::minimum-scale-factor" + type AttrLabel ViewportAttributesMinimumScaleFactorPropertyInfo = "minimum-scale-factor" attrGet _ = getViewportAttributesMinimumScaleFactor attrSet _ = undefined attrConstruct _ = undefined @@ -388,7 +424,7 @@ type AttrSetTypeConstraint ViewportAttributesUserScalablePropertyInfo = (~) () type AttrBaseTypeConstraint ViewportAttributesUserScalablePropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesUserScalablePropertyInfo = Bool - type AttrLabel ViewportAttributesUserScalablePropertyInfo = "ViewportAttributes::user-scalable" + type AttrLabel ViewportAttributesUserScalablePropertyInfo = "user-scalable" attrGet _ = getViewportAttributesUserScalable attrSet _ = undefined attrConstruct _ = undefined @@ -406,7 +442,7 @@ type AttrSetTypeConstraint ViewportAttributesValidPropertyInfo = (~) () type AttrBaseTypeConstraint ViewportAttributesValidPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesValidPropertyInfo = Bool - type AttrLabel ViewportAttributesValidPropertyInfo = "ViewportAttributes::valid" + type AttrLabel ViewportAttributesValidPropertyInfo = "valid" attrGet _ = getViewportAttributesValid attrSet _ = undefined attrConstruct _ = undefined @@ -424,22 +460,21 @@ type AttrSetTypeConstraint ViewportAttributesWidthPropertyInfo = (~) () type AttrBaseTypeConstraint ViewportAttributesWidthPropertyInfo = ViewportAttributesK type AttrGetType ViewportAttributesWidthPropertyInfo = Int32 - type AttrLabel ViewportAttributesWidthPropertyInfo = "ViewportAttributes::width" + type AttrLabel ViewportAttributesWidthPropertyInfo = "width" attrGet _ = getViewportAttributesWidth attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList ViewportAttributes = ViewportAttributesAttributeList -type ViewportAttributesAttributeList = ('[ '("available-height", ViewportAttributesAvailableHeightPropertyInfo), '("available-width", ViewportAttributesAvailableWidthPropertyInfo), '("desktop-width", ViewportAttributesDesktopWidthPropertyInfo), '("device-dpi", ViewportAttributesDeviceDpiPropertyInfo), '("device-height", ViewportAttributesDeviceHeightPropertyInfo), '("device-pixel-ratio", ViewportAttributesDevicePixelRatioPropertyInfo), '("device-width", ViewportAttributesDeviceWidthPropertyInfo), '("height", ViewportAttributesHeightPropertyInfo), '("initial-scale-factor", ViewportAttributesInitialScaleFactorPropertyInfo), '("maximum-scale-factor", ViewportAttributesMaximumScaleFactorPropertyInfo), '("minimum-scale-factor", ViewportAttributesMinimumScaleFactorPropertyInfo), '("user-scalable", ViewportAttributesUserScalablePropertyInfo), '("valid", ViewportAttributesValidPropertyInfo), '("width", ViewportAttributesWidthPropertyInfo)] :: [(Symbol, *)]) +type ViewportAttributesAttributeList = ('[ '("availableHeight", ViewportAttributesAvailableHeightPropertyInfo), '("availableWidth", ViewportAttributesAvailableWidthPropertyInfo), '("desktopWidth", ViewportAttributesDesktopWidthPropertyInfo), '("deviceDpi", ViewportAttributesDeviceDpiPropertyInfo), '("deviceHeight", ViewportAttributesDeviceHeightPropertyInfo), '("devicePixelRatio", ViewportAttributesDevicePixelRatioPropertyInfo), '("deviceWidth", ViewportAttributesDeviceWidthPropertyInfo), '("height", ViewportAttributesHeightPropertyInfo), '("initialScaleFactor", ViewportAttributesInitialScaleFactorPropertyInfo), '("maximumScaleFactor", ViewportAttributesMaximumScaleFactorPropertyInfo), '("minimumScaleFactor", ViewportAttributesMinimumScaleFactorPropertyInfo), '("userScalable", ViewportAttributesUserScalablePropertyInfo), '("valid", ViewportAttributesValidPropertyInfo), '("width", ViewportAttributesWidthPropertyInfo)] :: [(Symbol, *)]) type instance SignalList ViewportAttributes = ViewportAttributesSignalList -type ViewportAttributesSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type ViewportAttributesSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method ViewportAttributes::recompute -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "ViewportAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "ViewportAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "ViewportAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -451,12 +486,16 @@ viewportAttributesRecompute :: (MonadIO m, ViewportAttributesK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result viewportAttributesRecompute _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_viewport_attributes_recompute _obj' touchManagedPtr _obj return () + +data ViewportAttributesRecomputeMethodInfo +instance (signature ~ (m ()), MonadIO m, ViewportAttributesK a) => MethodInfo ViewportAttributesRecomputeMethodInfo a signature where + overloadedMethod _ = viewportAttributesRecompute diff --git a/GI/WebKit/Objects/ViewportAttributes.hs-boot b/GI/WebKit/Objects/ViewportAttributes.hs-boot --- a/GI/WebKit/Objects/ViewportAttributes.hs-boot +++ b/GI/WebKit/Objects/ViewportAttributes.hs-boot @@ -25,3 +25,4 @@ data ViewportAttributesUserScalablePropertyInfo data ViewportAttributesValidPropertyInfo data ViewportAttributesWidthPropertyInfo +data ViewportAttributesRecomputeMethodInfo diff --git a/GI/WebKit/Objects/WebBackForwardList.hs b/GI/WebKit/Objects/WebBackForwardList.hs --- a/GI/WebKit/Objects/WebBackForwardList.hs +++ b/GI/WebKit/Objects/WebBackForwardList.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,66 +18,82 @@ -- * Methods -- ** webBackForwardListAddItem + WebBackForwardListAddItemMethodInfo , webBackForwardListAddItem , -- ** webBackForwardListClear + WebBackForwardListClearMethodInfo , webBackForwardListClear , -- ** webBackForwardListContainsItem + WebBackForwardListContainsItemMethodInfo, webBackForwardListContainsItem , -- ** webBackForwardListGetBackItem + WebBackForwardListGetBackItemMethodInfo , webBackForwardListGetBackItem , -- ** webBackForwardListGetBackLength + WebBackForwardListGetBackLengthMethodInfo, webBackForwardListGetBackLength , -- ** webBackForwardListGetBackListWithLimit + WebBackForwardListGetBackListWithLimitMethodInfo, webBackForwardListGetBackListWithLimit , -- ** webBackForwardListGetCurrentItem + WebBackForwardListGetCurrentItemMethodInfo, webBackForwardListGetCurrentItem , -- ** webBackForwardListGetForwardItem + WebBackForwardListGetForwardItemMethodInfo, webBackForwardListGetForwardItem , -- ** webBackForwardListGetForwardLength + WebBackForwardListGetForwardLengthMethodInfo, webBackForwardListGetForwardLength , -- ** webBackForwardListGetForwardListWithLimit + WebBackForwardListGetForwardListWithLimitMethodInfo, webBackForwardListGetForwardListWithLimit, -- ** webBackForwardListGetLimit + WebBackForwardListGetLimitMethodInfo , webBackForwardListGetLimit , -- ** webBackForwardListGetNthItem + WebBackForwardListGetNthItemMethodInfo , webBackForwardListGetNthItem , -- ** webBackForwardListGoBack + WebBackForwardListGoBackMethodInfo , webBackForwardListGoBack , -- ** webBackForwardListGoForward + WebBackForwardListGoForwardMethodInfo , webBackForwardListGoForward , -- ** webBackForwardListGoToItem + WebBackForwardListGoToItemMethodInfo , webBackForwardListGoToItem , -- ** webBackForwardListSetLimit + WebBackForwardListSetLimitMethodInfo , webBackForwardListSetLimit , @@ -116,17 +133,65 @@ noWebBackForwardList :: Maybe WebBackForwardList noWebBackForwardList = Nothing +type family ResolveWebBackForwardListMethod (t :: Symbol) (o :: *) :: * where + ResolveWebBackForwardListMethod "addItem" o = WebBackForwardListAddItemMethodInfo + ResolveWebBackForwardListMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebBackForwardListMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebBackForwardListMethod "clear" o = WebBackForwardListClearMethodInfo + ResolveWebBackForwardListMethod "containsItem" o = WebBackForwardListContainsItemMethodInfo + ResolveWebBackForwardListMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebBackForwardListMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebBackForwardListMethod "goBack" o = WebBackForwardListGoBackMethodInfo + ResolveWebBackForwardListMethod "goForward" o = WebBackForwardListGoForwardMethodInfo + ResolveWebBackForwardListMethod "goToItem" o = WebBackForwardListGoToItemMethodInfo + ResolveWebBackForwardListMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebBackForwardListMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebBackForwardListMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebBackForwardListMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebBackForwardListMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebBackForwardListMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebBackForwardListMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebBackForwardListMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebBackForwardListMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebBackForwardListMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebBackForwardListMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebBackForwardListMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebBackForwardListMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebBackForwardListMethod "getBackItem" o = WebBackForwardListGetBackItemMethodInfo + ResolveWebBackForwardListMethod "getBackLength" o = WebBackForwardListGetBackLengthMethodInfo + ResolveWebBackForwardListMethod "getBackListWithLimit" o = WebBackForwardListGetBackListWithLimitMethodInfo + ResolveWebBackForwardListMethod "getCurrentItem" o = WebBackForwardListGetCurrentItemMethodInfo + ResolveWebBackForwardListMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebBackForwardListMethod "getForwardItem" o = WebBackForwardListGetForwardItemMethodInfo + ResolveWebBackForwardListMethod "getForwardLength" o = WebBackForwardListGetForwardLengthMethodInfo + ResolveWebBackForwardListMethod "getForwardListWithLimit" o = WebBackForwardListGetForwardListWithLimitMethodInfo + ResolveWebBackForwardListMethod "getLimit" o = WebBackForwardListGetLimitMethodInfo + ResolveWebBackForwardListMethod "getNthItem" o = WebBackForwardListGetNthItemMethodInfo + ResolveWebBackForwardListMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebBackForwardListMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebBackForwardListMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebBackForwardListMethod "setLimit" o = WebBackForwardListSetLimitMethodInfo + ResolveWebBackForwardListMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebBackForwardListMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebBackForwardListMethod t WebBackForwardList, MethodInfo info WebBackForwardList p) => IsLabelProxy t (WebBackForwardList -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebBackForwardListMethod t WebBackForwardList, MethodInfo info WebBackForwardList p) => IsLabel t (WebBackForwardList -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList WebBackForwardList = WebBackForwardListAttributeList type WebBackForwardListAttributeList = ('[ ] :: [(Symbol, *)]) type instance SignalList WebBackForwardList = WebBackForwardListSignalList -type WebBackForwardListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebBackForwardListSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method WebBackForwardList::add_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "history_item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "history_item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "history_item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -139,22 +204,25 @@ webBackForwardListAddItem :: (MonadIO m, WebBackForwardListK a, WebHistoryItemK b) => - a -> -- _obj - b -> -- history_item - m () -webBackForwardListAddItem _obj history_item = liftIO $ do + a -- _obj + -> b -- historyItem + -> m () -- result +webBackForwardListAddItem _obj historyItem = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - let history_item' = unsafeManagedPtrCastPtr history_item - webkit_web_back_forward_list_add_item _obj' history_item' + let historyItem' = unsafeManagedPtrCastPtr historyItem + webkit_web_back_forward_list_add_item _obj' historyItem' touchManagedPtr _obj - touchManagedPtr history_item + touchManagedPtr historyItem return () +data WebBackForwardListAddItemMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, WebBackForwardListK a, WebHistoryItemK b) => MethodInfo WebBackForwardListAddItemMethodInfo a signature where + overloadedMethod _ = webBackForwardListAddItem + -- method WebBackForwardList::clear -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -166,19 +234,22 @@ webBackForwardListClear :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webBackForwardListClear _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_back_forward_list_clear _obj' touchManagedPtr _obj return () +data WebBackForwardListClearMethodInfo +instance (signature ~ (m ()), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListClearMethodInfo a signature where + overloadedMethod _ = webBackForwardListClear + -- method WebBackForwardList::contains_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "history_item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "history_item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "history_item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -191,23 +262,26 @@ webBackForwardListContainsItem :: (MonadIO m, WebBackForwardListK a, WebHistoryItemK b) => - a -> -- _obj - b -> -- history_item - m Bool -webBackForwardListContainsItem _obj history_item = liftIO $ do + a -- _obj + -> b -- historyItem + -> m Bool -- result +webBackForwardListContainsItem _obj historyItem = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - let history_item' = unsafeManagedPtrCastPtr history_item - result <- webkit_web_back_forward_list_contains_item _obj' history_item' + let historyItem' = unsafeManagedPtrCastPtr historyItem + result <- webkit_web_back_forward_list_contains_item _obj' historyItem' let result' = (/= 0) result touchManagedPtr _obj - touchManagedPtr history_item + touchManagedPtr historyItem return result' +data WebBackForwardListContainsItemMethodInfo +instance (signature ~ (b -> m Bool), MonadIO m, WebBackForwardListK a, WebHistoryItemK b) => MethodInfo WebBackForwardListContainsItemMethodInfo a signature where + overloadedMethod _ = webBackForwardListContainsItem + -- method WebBackForwardList::get_back_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebHistoryItem" -- throws : False -- Skip return : False @@ -219,8 +293,8 @@ webBackForwardListGetBackItem :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - m WebHistoryItem + a -- _obj + -> m WebHistoryItem -- result webBackForwardListGetBackItem _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_back_forward_list_get_back_item _obj' @@ -229,11 +303,14 @@ touchManagedPtr _obj return result' +data WebBackForwardListGetBackItemMethodInfo +instance (signature ~ (m WebHistoryItem), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListGetBackItemMethodInfo a signature where + overloadedMethod _ = webBackForwardListGetBackItem + -- method WebBackForwardList::get_back_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt32 -- throws : False -- Skip return : False @@ -245,19 +322,22 @@ webBackForwardListGetBackLength :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - m Int32 + a -- _obj + -> m Int32 -- result webBackForwardListGetBackLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_back_forward_list_get_back_length _obj' touchManagedPtr _obj return result +data WebBackForwardListGetBackLengthMethodInfo +instance (signature ~ (m Int32), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListGetBackLengthMethodInfo a signature where + overloadedMethod _ = webBackForwardListGetBackLength + -- method WebBackForwardList::get_back_list_with_limit -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "limit", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "limit", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "limit", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TGList (TInterface "WebKit" "WebHistoryItem") -- throws : False -- Skip return : False @@ -270,9 +350,9 @@ webBackForwardListGetBackListWithLimit :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - Int32 -> -- limit - m [WebHistoryItem] + a -- _obj + -> Int32 -- limit + -> m [WebHistoryItem] -- result webBackForwardListGetBackListWithLimit _obj limit = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_back_forward_list_get_back_list_with_limit _obj' limit @@ -283,11 +363,14 @@ touchManagedPtr _obj return result'' +data WebBackForwardListGetBackListWithLimitMethodInfo +instance (signature ~ (Int32 -> m [WebHistoryItem]), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListGetBackListWithLimitMethodInfo a signature where + overloadedMethod _ = webBackForwardListGetBackListWithLimit + -- method WebBackForwardList::get_current_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebHistoryItem" -- throws : False -- Skip return : False @@ -299,8 +382,8 @@ webBackForwardListGetCurrentItem :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - m WebHistoryItem + a -- _obj + -> m WebHistoryItem -- result webBackForwardListGetCurrentItem _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_back_forward_list_get_current_item _obj' @@ -309,11 +392,14 @@ touchManagedPtr _obj return result' +data WebBackForwardListGetCurrentItemMethodInfo +instance (signature ~ (m WebHistoryItem), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListGetCurrentItemMethodInfo a signature where + overloadedMethod _ = webBackForwardListGetCurrentItem + -- method WebBackForwardList::get_forward_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebHistoryItem" -- throws : False -- Skip return : False @@ -325,8 +411,8 @@ webBackForwardListGetForwardItem :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - m WebHistoryItem + a -- _obj + -> m WebHistoryItem -- result webBackForwardListGetForwardItem _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_back_forward_list_get_forward_item _obj' @@ -335,11 +421,14 @@ touchManagedPtr _obj return result' +data WebBackForwardListGetForwardItemMethodInfo +instance (signature ~ (m WebHistoryItem), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListGetForwardItemMethodInfo a signature where + overloadedMethod _ = webBackForwardListGetForwardItem + -- method WebBackForwardList::get_forward_length -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt32 -- throws : False -- Skip return : False @@ -351,19 +440,22 @@ webBackForwardListGetForwardLength :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - m Int32 + a -- _obj + -> m Int32 -- result webBackForwardListGetForwardLength _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_back_forward_list_get_forward_length _obj' touchManagedPtr _obj return result +data WebBackForwardListGetForwardLengthMethodInfo +instance (signature ~ (m Int32), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListGetForwardLengthMethodInfo a signature where + overloadedMethod _ = webBackForwardListGetForwardLength + -- method WebBackForwardList::get_forward_list_with_limit -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "limit", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "limit", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "limit", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TGList (TInterface "WebKit" "WebHistoryItem") -- throws : False -- Skip return : False @@ -376,9 +468,9 @@ webBackForwardListGetForwardListWithLimit :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - Int32 -> -- limit - m [WebHistoryItem] + a -- _obj + -> Int32 -- limit + -> m [WebHistoryItem] -- result webBackForwardListGetForwardListWithLimit _obj limit = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_back_forward_list_get_forward_list_with_limit _obj' limit @@ -389,11 +481,14 @@ touchManagedPtr _obj return result'' +data WebBackForwardListGetForwardListWithLimitMethodInfo +instance (signature ~ (Int32 -> m [WebHistoryItem]), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListGetForwardListWithLimitMethodInfo a signature where + overloadedMethod _ = webBackForwardListGetForwardListWithLimit + -- method WebBackForwardList::get_limit -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt32 -- throws : False -- Skip return : False @@ -405,19 +500,22 @@ webBackForwardListGetLimit :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - m Int32 + a -- _obj + -> m Int32 -- result webBackForwardListGetLimit _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_back_forward_list_get_limit _obj' touchManagedPtr _obj return result +data WebBackForwardListGetLimitMethodInfo +instance (signature ~ (m Int32), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListGetLimitMethodInfo a signature where + overloadedMethod _ = webBackForwardListGetLimit + -- method WebBackForwardList::get_nth_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "index", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "index", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebHistoryItem" -- throws : False -- Skip return : False @@ -430,9 +528,9 @@ webBackForwardListGetNthItem :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - Int32 -> -- index - m WebHistoryItem + a -- _obj + -> Int32 -- index + -> m WebHistoryItem -- result webBackForwardListGetNthItem _obj index = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_back_forward_list_get_nth_item _obj' index @@ -441,11 +539,14 @@ touchManagedPtr _obj return result' +data WebBackForwardListGetNthItemMethodInfo +instance (signature ~ (Int32 -> m WebHistoryItem), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListGetNthItemMethodInfo a signature where + overloadedMethod _ = webBackForwardListGetNthItem + -- method WebBackForwardList::go_back -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -457,19 +558,22 @@ webBackForwardListGoBack :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webBackForwardListGoBack _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_back_forward_list_go_back _obj' touchManagedPtr _obj return () +data WebBackForwardListGoBackMethodInfo +instance (signature ~ (m ()), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListGoBackMethodInfo a signature where + overloadedMethod _ = webBackForwardListGoBack + -- method WebBackForwardList::go_forward -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -481,19 +585,22 @@ webBackForwardListGoForward :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webBackForwardListGoForward _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_back_forward_list_go_forward _obj' touchManagedPtr _obj return () +data WebBackForwardListGoForwardMethodInfo +instance (signature ~ (m ()), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListGoForwardMethodInfo a signature where + overloadedMethod _ = webBackForwardListGoForward + -- method WebBackForwardList::go_to_item -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "history_item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "history_item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "history_item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -506,22 +613,25 @@ webBackForwardListGoToItem :: (MonadIO m, WebBackForwardListK a, WebHistoryItemK b) => - a -> -- _obj - b -> -- history_item - m () -webBackForwardListGoToItem _obj history_item = liftIO $ do + a -- _obj + -> b -- historyItem + -> m () -- result +webBackForwardListGoToItem _obj historyItem = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - let history_item' = unsafeManagedPtrCastPtr history_item - webkit_web_back_forward_list_go_to_item _obj' history_item' + let historyItem' = unsafeManagedPtrCastPtr historyItem + webkit_web_back_forward_list_go_to_item _obj' historyItem' touchManagedPtr _obj - touchManagedPtr history_item + touchManagedPtr historyItem return () +data WebBackForwardListGoToItemMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, WebBackForwardListK a, WebHistoryItemK b) => MethodInfo WebBackForwardListGoToItemMethodInfo a signature where + overloadedMethod _ = webBackForwardListGoToItem + -- method WebBackForwardList::set_limit -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "limit", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "limit", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebBackForwardList", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "limit", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -534,13 +644,17 @@ webBackForwardListSetLimit :: (MonadIO m, WebBackForwardListK a) => - a -> -- _obj - Int32 -> -- limit - m () + a -- _obj + -> Int32 -- limit + -> m () -- result webBackForwardListSetLimit _obj limit = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_back_forward_list_set_limit _obj' limit touchManagedPtr _obj return () + +data WebBackForwardListSetLimitMethodInfo +instance (signature ~ (Int32 -> m ()), MonadIO m, WebBackForwardListK a) => MethodInfo WebBackForwardListSetLimitMethodInfo a signature where + overloadedMethod _ = webBackForwardListSetLimit diff --git a/GI/WebKit/Objects/WebBackForwardList.hs-boot b/GI/WebKit/Objects/WebBackForwardList.hs-boot --- a/GI/WebKit/Objects/WebBackForwardList.hs-boot +++ b/GI/WebKit/Objects/WebBackForwardList.hs-boot @@ -11,3 +11,19 @@ instance GObject WebBackForwardList where class GObject o => WebBackForwardListK o instance (GObject o, IsDescendantOf WebBackForwardList o) => WebBackForwardListK o +data WebBackForwardListAddItemMethodInfo +data WebBackForwardListClearMethodInfo +data WebBackForwardListContainsItemMethodInfo +data WebBackForwardListGetBackItemMethodInfo +data WebBackForwardListGetBackLengthMethodInfo +data WebBackForwardListGetBackListWithLimitMethodInfo +data WebBackForwardListGetCurrentItemMethodInfo +data WebBackForwardListGetForwardItemMethodInfo +data WebBackForwardListGetForwardLengthMethodInfo +data WebBackForwardListGetForwardListWithLimitMethodInfo +data WebBackForwardListGetLimitMethodInfo +data WebBackForwardListGetNthItemMethodInfo +data WebBackForwardListGoBackMethodInfo +data WebBackForwardListGoForwardMethodInfo +data WebBackForwardListGoToItemMethodInfo +data WebBackForwardListSetLimitMethodInfo diff --git a/GI/WebKit/Objects/WebDataSource.hs b/GI/WebKit/Objects/WebDataSource.hs --- a/GI/WebKit/Objects/WebDataSource.hs +++ b/GI/WebKit/Objects/WebDataSource.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,38 +18,47 @@ -- * Methods -- ** webDataSourceGetData + WebDataSourceGetDataMethodInfo , webDataSourceGetData , -- ** webDataSourceGetEncoding + WebDataSourceGetEncodingMethodInfo , webDataSourceGetEncoding , -- ** webDataSourceGetInitialRequest + WebDataSourceGetInitialRequestMethodInfo, webDataSourceGetInitialRequest , -- ** webDataSourceGetMainResource + WebDataSourceGetMainResourceMethodInfo , webDataSourceGetMainResource , -- ** webDataSourceGetRequest + WebDataSourceGetRequestMethodInfo , webDataSourceGetRequest , -- ** webDataSourceGetSubresources + WebDataSourceGetSubresourcesMethodInfo , webDataSourceGetSubresources , -- ** webDataSourceGetUnreachableUri + WebDataSourceGetUnreachableUriMethodInfo, webDataSourceGetUnreachableUri , -- ** webDataSourceGetWebFrame + WebDataSourceGetWebFrameMethodInfo , webDataSourceGetWebFrame , -- ** webDataSourceIsLoading + WebDataSourceIsLoadingMethodInfo , webDataSourceIsLoading , @@ -97,17 +107,56 @@ noWebDataSource :: Maybe WebDataSource noWebDataSource = Nothing +type family ResolveWebDataSourceMethod (t :: Symbol) (o :: *) :: * where + ResolveWebDataSourceMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebDataSourceMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebDataSourceMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebDataSourceMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebDataSourceMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebDataSourceMethod "isLoading" o = WebDataSourceIsLoadingMethodInfo + ResolveWebDataSourceMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebDataSourceMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebDataSourceMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebDataSourceMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebDataSourceMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebDataSourceMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebDataSourceMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebDataSourceMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebDataSourceMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebDataSourceMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebDataSourceMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebDataSourceMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebDataSourceMethod "getEncoding" o = WebDataSourceGetEncodingMethodInfo + ResolveWebDataSourceMethod "getInitialRequest" o = WebDataSourceGetInitialRequestMethodInfo + ResolveWebDataSourceMethod "getMainResource" o = WebDataSourceGetMainResourceMethodInfo + ResolveWebDataSourceMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebDataSourceMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebDataSourceMethod "getRequest" o = WebDataSourceGetRequestMethodInfo + ResolveWebDataSourceMethod "getSubresources" o = WebDataSourceGetSubresourcesMethodInfo + ResolveWebDataSourceMethod "getUnreachableUri" o = WebDataSourceGetUnreachableUriMethodInfo + ResolveWebDataSourceMethod "getWebFrame" o = WebDataSourceGetWebFrameMethodInfo + ResolveWebDataSourceMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebDataSourceMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebDataSourceMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebDataSourceMethod t WebDataSource, MethodInfo info WebDataSource p) => IsLabelProxy t (WebDataSource -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebDataSourceMethod t WebDataSource, MethodInfo info WebDataSource p) => IsLabel t (WebDataSource -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList WebDataSource = WebDataSourceAttributeList type WebDataSourceAttributeList = ('[ ] :: [(Symbol, *)]) type instance SignalList WebDataSource = WebDataSourceSignalList -type WebDataSourceSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebDataSourceSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method WebDataSource::new -- method type : Constructor -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TInterface "WebKit" "WebDataSource" -- throws : False -- Skip return : False @@ -118,7 +167,7 @@ webDataSourceNew :: (MonadIO m) => - m WebDataSource + m WebDataSource -- result webDataSourceNew = liftIO $ do result <- webkit_web_data_source_new checkUnexpectedReturnNULL "webkit_web_data_source_new" result @@ -127,9 +176,8 @@ -- method WebDataSource::new_with_request -- method type : Constructor --- Args : [Arg {argName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebDataSource" -- throws : False -- Skip return : False @@ -141,8 +189,8 @@ webDataSourceNewWithRequest :: (MonadIO m, NetworkRequestK a) => - a -> -- request - m WebDataSource + a -- request + -> m WebDataSource -- result webDataSourceNewWithRequest request = liftIO $ do let request' = unsafeManagedPtrCastPtr request result <- webkit_web_data_source_new_with_request request' @@ -153,9 +201,8 @@ -- method WebDataSource::get_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "GLib" "String" -- throws : False -- Skip return : False @@ -167,8 +214,8 @@ webDataSourceGetData :: (MonadIO m, WebDataSourceK a) => - a -> -- _obj - m GLib.String + a -- _obj + -> m GLib.String -- result webDataSourceGetData _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_data_source_get_data _obj' @@ -177,11 +224,14 @@ touchManagedPtr _obj return result' +data WebDataSourceGetDataMethodInfo +instance (signature ~ (m GLib.String), MonadIO m, WebDataSourceK a) => MethodInfo WebDataSourceGetDataMethodInfo a signature where + overloadedMethod _ = webDataSourceGetData + -- method WebDataSource::get_encoding -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -193,8 +243,8 @@ webDataSourceGetEncoding :: (MonadIO m, WebDataSourceK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webDataSourceGetEncoding _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_data_source_get_encoding _obj' @@ -203,11 +253,14 @@ touchManagedPtr _obj return result' +data WebDataSourceGetEncodingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebDataSourceK a) => MethodInfo WebDataSourceGetEncodingMethodInfo a signature where + overloadedMethod _ = webDataSourceGetEncoding + -- method WebDataSource::get_initial_request -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "NetworkRequest" -- throws : False -- Skip return : False @@ -219,8 +272,8 @@ webDataSourceGetInitialRequest :: (MonadIO m, WebDataSourceK a) => - a -> -- _obj - m NetworkRequest + a -- _obj + -> m NetworkRequest -- result webDataSourceGetInitialRequest _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_data_source_get_initial_request _obj' @@ -229,11 +282,14 @@ touchManagedPtr _obj return result' +data WebDataSourceGetInitialRequestMethodInfo +instance (signature ~ (m NetworkRequest), MonadIO m, WebDataSourceK a) => MethodInfo WebDataSourceGetInitialRequestMethodInfo a signature where + overloadedMethod _ = webDataSourceGetInitialRequest + -- method WebDataSource::get_main_resource -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebResource" -- throws : False -- Skip return : False @@ -245,8 +301,8 @@ webDataSourceGetMainResource :: (MonadIO m, WebDataSourceK a) => - a -> -- _obj - m WebResource + a -- _obj + -> m WebResource -- result webDataSourceGetMainResource _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_data_source_get_main_resource _obj' @@ -255,11 +311,14 @@ touchManagedPtr _obj return result' +data WebDataSourceGetMainResourceMethodInfo +instance (signature ~ (m WebResource), MonadIO m, WebDataSourceK a) => MethodInfo WebDataSourceGetMainResourceMethodInfo a signature where + overloadedMethod _ = webDataSourceGetMainResource + -- method WebDataSource::get_request -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "NetworkRequest" -- throws : False -- Skip return : False @@ -271,8 +330,8 @@ webDataSourceGetRequest :: (MonadIO m, WebDataSourceK a) => - a -> -- _obj - m NetworkRequest + a -- _obj + -> m NetworkRequest -- result webDataSourceGetRequest _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_data_source_get_request _obj' @@ -281,11 +340,14 @@ touchManagedPtr _obj return result' +data WebDataSourceGetRequestMethodInfo +instance (signature ~ (m NetworkRequest), MonadIO m, WebDataSourceK a) => MethodInfo WebDataSourceGetRequestMethodInfo a signature where + overloadedMethod _ = webDataSourceGetRequest + -- method WebDataSource::get_subresources -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TGList (TInterface "WebKit" "WebResource") -- throws : False -- Skip return : False @@ -297,8 +359,8 @@ webDataSourceGetSubresources :: (MonadIO m, WebDataSourceK a) => - a -> -- _obj - m [WebResource] + a -- _obj + -> m [WebResource] -- result webDataSourceGetSubresources _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_data_source_get_subresources _obj' @@ -309,11 +371,14 @@ touchManagedPtr _obj return result'' +data WebDataSourceGetSubresourcesMethodInfo +instance (signature ~ (m [WebResource]), MonadIO m, WebDataSourceK a) => MethodInfo WebDataSourceGetSubresourcesMethodInfo a signature where + overloadedMethod _ = webDataSourceGetSubresources + -- method WebDataSource::get_unreachable_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -325,8 +390,8 @@ webDataSourceGetUnreachableUri :: (MonadIO m, WebDataSourceK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webDataSourceGetUnreachableUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_data_source_get_unreachable_uri _obj' @@ -335,11 +400,14 @@ touchManagedPtr _obj return result' +data WebDataSourceGetUnreachableUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebDataSourceK a) => MethodInfo WebDataSourceGetUnreachableUriMethodInfo a signature where + overloadedMethod _ = webDataSourceGetUnreachableUri + -- method WebDataSource::get_web_frame -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebFrame" -- throws : False -- Skip return : False @@ -351,8 +419,8 @@ webDataSourceGetWebFrame :: (MonadIO m, WebDataSourceK a) => - a -> -- _obj - m WebFrame + a -- _obj + -> m WebFrame -- result webDataSourceGetWebFrame _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_data_source_get_web_frame _obj' @@ -361,11 +429,14 @@ touchManagedPtr _obj return result' +data WebDataSourceGetWebFrameMethodInfo +instance (signature ~ (m WebFrame), MonadIO m, WebDataSourceK a) => MethodInfo WebDataSourceGetWebFrameMethodInfo a signature where + overloadedMethod _ = webDataSourceGetWebFrame + -- method WebDataSource::is_loading -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDataSource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -377,13 +448,17 @@ webDataSourceIsLoading :: (MonadIO m, WebDataSourceK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result webDataSourceIsLoading _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_data_source_is_loading _obj' let result' = (/= 0) result touchManagedPtr _obj return result' + +data WebDataSourceIsLoadingMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebDataSourceK a) => MethodInfo WebDataSourceIsLoadingMethodInfo a signature where + overloadedMethod _ = webDataSourceIsLoading diff --git a/GI/WebKit/Objects/WebDataSource.hs-boot b/GI/WebKit/Objects/WebDataSource.hs-boot --- a/GI/WebKit/Objects/WebDataSource.hs-boot +++ b/GI/WebKit/Objects/WebDataSource.hs-boot @@ -11,3 +11,12 @@ instance GObject WebDataSource where class GObject o => WebDataSourceK o instance (GObject o, IsDescendantOf WebDataSource o) => WebDataSourceK o +data WebDataSourceGetDataMethodInfo +data WebDataSourceGetEncodingMethodInfo +data WebDataSourceGetInitialRequestMethodInfo +data WebDataSourceGetMainResourceMethodInfo +data WebDataSourceGetRequestMethodInfo +data WebDataSourceGetSubresourcesMethodInfo +data WebDataSourceGetUnreachableUriMethodInfo +data WebDataSourceGetWebFrameMethodInfo +data WebDataSourceIsLoadingMethodInfo diff --git a/GI/WebKit/Objects/WebDatabase.hs b/GI/WebKit/Objects/WebDatabase.hs --- a/GI/WebKit/Objects/WebDatabase.hs +++ b/GI/WebKit/Objects/WebDatabase.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,30 +18,37 @@ -- * Methods -- ** webDatabaseGetDisplayName + WebDatabaseGetDisplayNameMethodInfo , webDatabaseGetDisplayName , -- ** webDatabaseGetExpectedSize + WebDatabaseGetExpectedSizeMethodInfo , webDatabaseGetExpectedSize , -- ** webDatabaseGetFilename + WebDatabaseGetFilenameMethodInfo , webDatabaseGetFilename , -- ** webDatabaseGetName + WebDatabaseGetNameMethodInfo , webDatabaseGetName , -- ** webDatabaseGetSecurityOrigin + WebDatabaseGetSecurityOriginMethodInfo , webDatabaseGetSecurityOrigin , -- ** webDatabaseGetSize + WebDatabaseGetSizeMethodInfo , webDatabaseGetSize , -- ** webDatabaseRemove + WebDatabaseRemoveMethodInfo , webDatabaseRemove , @@ -115,6 +123,46 @@ noWebDatabase :: Maybe WebDatabase noWebDatabase = Nothing +type family ResolveWebDatabaseMethod (t :: Symbol) (o :: *) :: * where + ResolveWebDatabaseMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebDatabaseMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebDatabaseMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebDatabaseMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebDatabaseMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebDatabaseMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebDatabaseMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebDatabaseMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebDatabaseMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebDatabaseMethod "remove" o = WebDatabaseRemoveMethodInfo + ResolveWebDatabaseMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebDatabaseMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebDatabaseMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebDatabaseMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebDatabaseMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebDatabaseMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebDatabaseMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebDatabaseMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebDatabaseMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebDatabaseMethod "getDisplayName" o = WebDatabaseGetDisplayNameMethodInfo + ResolveWebDatabaseMethod "getExpectedSize" o = WebDatabaseGetExpectedSizeMethodInfo + ResolveWebDatabaseMethod "getFilename" o = WebDatabaseGetFilenameMethodInfo + ResolveWebDatabaseMethod "getName" o = WebDatabaseGetNameMethodInfo + ResolveWebDatabaseMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebDatabaseMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebDatabaseMethod "getSecurityOrigin" o = WebDatabaseGetSecurityOriginMethodInfo + ResolveWebDatabaseMethod "getSize" o = WebDatabaseGetSizeMethodInfo + ResolveWebDatabaseMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebDatabaseMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebDatabaseMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebDatabaseMethod t WebDatabase, MethodInfo info WebDatabase p) => IsLabelProxy t (WebDatabase -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebDatabaseMethod t WebDatabase, MethodInfo info WebDatabase p) => IsLabel t (WebDatabase -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "display-name" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable] @@ -128,7 +176,7 @@ type AttrSetTypeConstraint WebDatabaseDisplayNamePropertyInfo = (~) () type AttrBaseTypeConstraint WebDatabaseDisplayNamePropertyInfo = WebDatabaseK type AttrGetType WebDatabaseDisplayNamePropertyInfo = T.Text - type AttrLabel WebDatabaseDisplayNamePropertyInfo = "WebDatabase::display-name" + type AttrLabel WebDatabaseDisplayNamePropertyInfo = "display-name" attrGet _ = getWebDatabaseDisplayName attrSet _ = undefined attrConstruct _ = undefined @@ -146,7 +194,7 @@ type AttrSetTypeConstraint WebDatabaseExpectedSizePropertyInfo = (~) () type AttrBaseTypeConstraint WebDatabaseExpectedSizePropertyInfo = WebDatabaseK type AttrGetType WebDatabaseExpectedSizePropertyInfo = Word64 - type AttrLabel WebDatabaseExpectedSizePropertyInfo = "WebDatabase::expected-size" + type AttrLabel WebDatabaseExpectedSizePropertyInfo = "expected-size" attrGet _ = getWebDatabaseExpectedSize attrSet _ = undefined attrConstruct _ = undefined @@ -164,7 +212,7 @@ type AttrSetTypeConstraint WebDatabaseFilenamePropertyInfo = (~) () type AttrBaseTypeConstraint WebDatabaseFilenamePropertyInfo = WebDatabaseK type AttrGetType WebDatabaseFilenamePropertyInfo = T.Text - type AttrLabel WebDatabaseFilenamePropertyInfo = "WebDatabase::filename" + type AttrLabel WebDatabaseFilenamePropertyInfo = "filename" attrGet _ = getWebDatabaseFilename attrSet _ = undefined attrConstruct _ = undefined @@ -185,7 +233,7 @@ type AttrSetTypeConstraint WebDatabaseNamePropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebDatabaseNamePropertyInfo = WebDatabaseK type AttrGetType WebDatabaseNamePropertyInfo = T.Text - type AttrLabel WebDatabaseNamePropertyInfo = "WebDatabase::name" + type AttrLabel WebDatabaseNamePropertyInfo = "name" attrGet _ = getWebDatabaseName attrSet _ = undefined attrConstruct _ = constructWebDatabaseName @@ -206,7 +254,7 @@ type AttrSetTypeConstraint WebDatabaseSecurityOriginPropertyInfo = SecurityOriginK type AttrBaseTypeConstraint WebDatabaseSecurityOriginPropertyInfo = WebDatabaseK type AttrGetType WebDatabaseSecurityOriginPropertyInfo = SecurityOrigin - type AttrLabel WebDatabaseSecurityOriginPropertyInfo = "WebDatabase::security-origin" + type AttrLabel WebDatabaseSecurityOriginPropertyInfo = "security-origin" attrGet _ = getWebDatabaseSecurityOrigin attrSet _ = undefined attrConstruct _ = constructWebDatabaseSecurityOrigin @@ -224,22 +272,21 @@ type AttrSetTypeConstraint WebDatabaseSizePropertyInfo = (~) () type AttrBaseTypeConstraint WebDatabaseSizePropertyInfo = WebDatabaseK type AttrGetType WebDatabaseSizePropertyInfo = Word64 - type AttrLabel WebDatabaseSizePropertyInfo = "WebDatabase::size" + type AttrLabel WebDatabaseSizePropertyInfo = "size" attrGet _ = getWebDatabaseSize attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList WebDatabase = WebDatabaseAttributeList -type WebDatabaseAttributeList = ('[ '("display-name", WebDatabaseDisplayNamePropertyInfo), '("expected-size", WebDatabaseExpectedSizePropertyInfo), '("filename", WebDatabaseFilenamePropertyInfo), '("name", WebDatabaseNamePropertyInfo), '("security-origin", WebDatabaseSecurityOriginPropertyInfo), '("size", WebDatabaseSizePropertyInfo)] :: [(Symbol, *)]) +type WebDatabaseAttributeList = ('[ '("displayName", WebDatabaseDisplayNamePropertyInfo), '("expectedSize", WebDatabaseExpectedSizePropertyInfo), '("filename", WebDatabaseFilenamePropertyInfo), '("name", WebDatabaseNamePropertyInfo), '("securityOrigin", WebDatabaseSecurityOriginPropertyInfo), '("size", WebDatabaseSizePropertyInfo)] :: [(Symbol, *)]) type instance SignalList WebDatabase = WebDatabaseSignalList -type WebDatabaseSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebDatabaseSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method WebDatabase::get_display_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -251,8 +298,8 @@ webDatabaseGetDisplayName :: (MonadIO m, WebDatabaseK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webDatabaseGetDisplayName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_database_get_display_name _obj' @@ -261,11 +308,14 @@ touchManagedPtr _obj return result' +data WebDatabaseGetDisplayNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebDatabaseK a) => MethodInfo WebDatabaseGetDisplayNameMethodInfo a signature where + overloadedMethod _ = webDatabaseGetDisplayName + -- method WebDatabase::get_expected_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -277,19 +327,22 @@ webDatabaseGetExpectedSize :: (MonadIO m, WebDatabaseK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result webDatabaseGetExpectedSize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_database_get_expected_size _obj' touchManagedPtr _obj return result +data WebDatabaseGetExpectedSizeMethodInfo +instance (signature ~ (m Word64), MonadIO m, WebDatabaseK a) => MethodInfo WebDatabaseGetExpectedSizeMethodInfo a signature where + overloadedMethod _ = webDatabaseGetExpectedSize + -- method WebDatabase::get_filename -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -301,8 +354,8 @@ webDatabaseGetFilename :: (MonadIO m, WebDatabaseK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webDatabaseGetFilename _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_database_get_filename _obj' @@ -311,11 +364,14 @@ touchManagedPtr _obj return result' +data WebDatabaseGetFilenameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebDatabaseK a) => MethodInfo WebDatabaseGetFilenameMethodInfo a signature where + overloadedMethod _ = webDatabaseGetFilename + -- method WebDatabase::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -327,8 +383,8 @@ webDatabaseGetName :: (MonadIO m, WebDatabaseK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webDatabaseGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_database_get_name _obj' @@ -337,11 +393,14 @@ touchManagedPtr _obj return result' +data WebDatabaseGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebDatabaseK a) => MethodInfo WebDatabaseGetNameMethodInfo a signature where + overloadedMethod _ = webDatabaseGetName + -- method WebDatabase::get_security_origin -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "SecurityOrigin" -- throws : False -- Skip return : False @@ -353,8 +412,8 @@ webDatabaseGetSecurityOrigin :: (MonadIO m, WebDatabaseK a) => - a -> -- _obj - m SecurityOrigin + a -- _obj + -> m SecurityOrigin -- result webDatabaseGetSecurityOrigin _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_database_get_security_origin _obj' @@ -363,11 +422,14 @@ touchManagedPtr _obj return result' +data WebDatabaseGetSecurityOriginMethodInfo +instance (signature ~ (m SecurityOrigin), MonadIO m, WebDatabaseK a) => MethodInfo WebDatabaseGetSecurityOriginMethodInfo a signature where + overloadedMethod _ = webDatabaseGetSecurityOrigin + -- method WebDatabase::get_size -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUInt64 -- throws : False -- Skip return : False @@ -379,19 +441,22 @@ webDatabaseGetSize :: (MonadIO m, WebDatabaseK a) => - a -> -- _obj - m Word64 + a -- _obj + -> m Word64 -- result webDatabaseGetSize _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_database_get_size _obj' touchManagedPtr _obj return result +data WebDatabaseGetSizeMethodInfo +instance (signature ~ (m Word64), MonadIO m, WebDatabaseK a) => MethodInfo WebDatabaseGetSizeMethodInfo a signature where + overloadedMethod _ = webDatabaseGetSize + -- method WebDatabase::remove -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -403,12 +468,16 @@ webDatabaseRemove :: (MonadIO m, WebDatabaseK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webDatabaseRemove _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_database_remove _obj' touchManagedPtr _obj return () + +data WebDatabaseRemoveMethodInfo +instance (signature ~ (m ()), MonadIO m, WebDatabaseK a) => MethodInfo WebDatabaseRemoveMethodInfo a signature where + overloadedMethod _ = webDatabaseRemove diff --git a/GI/WebKit/Objects/WebDatabase.hs-boot b/GI/WebKit/Objects/WebDatabase.hs-boot --- a/GI/WebKit/Objects/WebDatabase.hs-boot +++ b/GI/WebKit/Objects/WebDatabase.hs-boot @@ -17,3 +17,10 @@ data WebDatabaseNamePropertyInfo data WebDatabaseSecurityOriginPropertyInfo data WebDatabaseSizePropertyInfo +data WebDatabaseGetDisplayNameMethodInfo +data WebDatabaseGetExpectedSizeMethodInfo +data WebDatabaseGetFilenameMethodInfo +data WebDatabaseGetNameMethodInfo +data WebDatabaseGetSecurityOriginMethodInfo +data WebDatabaseGetSizeMethodInfo +data WebDatabaseRemoveMethodInfo diff --git a/GI/WebKit/Objects/WebFrame.hs b/GI/WebKit/Objects/WebFrame.hs --- a/GI/WebKit/Objects/WebFrame.hs +++ b/GI/WebKit/Objects/WebFrame.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,82 +18,102 @@ -- * Methods -- ** webFrameFindFrame + WebFrameFindFrameMethodInfo , webFrameFindFrame , -- ** webFrameGetDataSource + WebFrameGetDataSourceMethodInfo , webFrameGetDataSource , -- ** webFrameGetDomDocument + WebFrameGetDomDocumentMethodInfo , webFrameGetDomDocument , -- ** webFrameGetGlobalContext + WebFrameGetGlobalContextMethodInfo , webFrameGetGlobalContext , -- ** webFrameGetHorizontalScrollbarPolicy + WebFrameGetHorizontalScrollbarPolicyMethodInfo, webFrameGetHorizontalScrollbarPolicy , -- ** webFrameGetLoadStatus + WebFrameGetLoadStatusMethodInfo , webFrameGetLoadStatus , -- ** webFrameGetName + WebFrameGetNameMethodInfo , webFrameGetName , -- ** webFrameGetNetworkResponse + WebFrameGetNetworkResponseMethodInfo , webFrameGetNetworkResponse , -- ** webFrameGetParent + WebFrameGetParentMethodInfo , webFrameGetParent , -- ** webFrameGetProvisionalDataSource + WebFrameGetProvisionalDataSourceMethodInfo, webFrameGetProvisionalDataSource , -- ** webFrameGetRangeForWordAroundCaret + WebFrameGetRangeForWordAroundCaretMethodInfo, webFrameGetRangeForWordAroundCaret , -- ** webFrameGetSecurityOrigin + WebFrameGetSecurityOriginMethodInfo , webFrameGetSecurityOrigin , -- ** webFrameGetTitle + WebFrameGetTitleMethodInfo , webFrameGetTitle , -- ** webFrameGetUri + WebFrameGetUriMethodInfo , webFrameGetUri , -- ** webFrameGetVerticalScrollbarPolicy + WebFrameGetVerticalScrollbarPolicyMethodInfo, webFrameGetVerticalScrollbarPolicy , -- ** webFrameGetWebView + WebFrameGetWebViewMethodInfo , webFrameGetWebView , -- ** webFrameLoadAlternateString + WebFrameLoadAlternateStringMethodInfo , webFrameLoadAlternateString , -- ** webFrameLoadRequest + WebFrameLoadRequestMethodInfo , webFrameLoadRequest , -- ** webFrameLoadString + WebFrameLoadStringMethodInfo , webFrameLoadString , -- ** webFrameLoadUri + WebFrameLoadUriMethodInfo , webFrameLoadUri , @@ -101,22 +122,27 @@ -- ** webFramePrint + WebFramePrintMethodInfo , webFramePrint , -- ** webFramePrintFull + WebFramePrintFullMethodInfo , webFramePrintFull , -- ** webFrameReload + WebFrameReloadMethodInfo , webFrameReload , -- ** webFrameReplaceSelection + WebFrameReplaceSelectionMethodInfo , webFrameReplaceSelection , -- ** webFrameStopLoading + WebFrameStopLoadingMethodInfo , webFrameStopLoading , @@ -326,6 +352,64 @@ noWebFrame :: Maybe WebFrame noWebFrame = Nothing +type family ResolveWebFrameMethod (t :: Symbol) (o :: *) :: * where + ResolveWebFrameMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebFrameMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebFrameMethod "findFrame" o = WebFrameFindFrameMethodInfo + ResolveWebFrameMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebFrameMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebFrameMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebFrameMethod "loadAlternateString" o = WebFrameLoadAlternateStringMethodInfo + ResolveWebFrameMethod "loadRequest" o = WebFrameLoadRequestMethodInfo + ResolveWebFrameMethod "loadString" o = WebFrameLoadStringMethodInfo + ResolveWebFrameMethod "loadUri" o = WebFrameLoadUriMethodInfo + ResolveWebFrameMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebFrameMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebFrameMethod "print" o = WebFramePrintMethodInfo + ResolveWebFrameMethod "printFull" o = WebFramePrintFullMethodInfo + ResolveWebFrameMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebFrameMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebFrameMethod "reload" o = WebFrameReloadMethodInfo + ResolveWebFrameMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebFrameMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebFrameMethod "replaceSelection" o = WebFrameReplaceSelectionMethodInfo + ResolveWebFrameMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebFrameMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebFrameMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebFrameMethod "stopLoading" o = WebFrameStopLoadingMethodInfo + ResolveWebFrameMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebFrameMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebFrameMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebFrameMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebFrameMethod "getDataSource" o = WebFrameGetDataSourceMethodInfo + ResolveWebFrameMethod "getDomDocument" o = WebFrameGetDomDocumentMethodInfo + ResolveWebFrameMethod "getGlobalContext" o = WebFrameGetGlobalContextMethodInfo + ResolveWebFrameMethod "getHorizontalScrollbarPolicy" o = WebFrameGetHorizontalScrollbarPolicyMethodInfo + ResolveWebFrameMethod "getLoadStatus" o = WebFrameGetLoadStatusMethodInfo + ResolveWebFrameMethod "getName" o = WebFrameGetNameMethodInfo + ResolveWebFrameMethod "getNetworkResponse" o = WebFrameGetNetworkResponseMethodInfo + ResolveWebFrameMethod "getParent" o = WebFrameGetParentMethodInfo + ResolveWebFrameMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebFrameMethod "getProvisionalDataSource" o = WebFrameGetProvisionalDataSourceMethodInfo + ResolveWebFrameMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebFrameMethod "getRangeForWordAroundCaret" o = WebFrameGetRangeForWordAroundCaretMethodInfo + ResolveWebFrameMethod "getSecurityOrigin" o = WebFrameGetSecurityOriginMethodInfo + ResolveWebFrameMethod "getTitle" o = WebFrameGetTitleMethodInfo + ResolveWebFrameMethod "getUri" o = WebFrameGetUriMethodInfo + ResolveWebFrameMethod "getVerticalScrollbarPolicy" o = WebFrameGetVerticalScrollbarPolicyMethodInfo + ResolveWebFrameMethod "getWebView" o = WebFrameGetWebViewMethodInfo + ResolveWebFrameMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebFrameMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebFrameMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebFrameMethod t WebFrame, MethodInfo info WebFrame p) => IsLabelProxy t (WebFrame -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebFrameMethod t WebFrame, MethodInfo info WebFrame p) => IsLabel t (WebFrame -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- signal WebFrame::cleared type WebFrameClearedCallback = IO () @@ -440,10 +524,10 @@ CString -> Ptr () -> IO () -webFrameInsecureContentRunCallbackWrapper _cb _ security_origin url _ = do - security_origin' <- (newObject SecurityOrigin) security_origin +webFrameInsecureContentRunCallbackWrapper _cb _ securityOrigin url _ = do + securityOrigin' <- (newObject SecurityOrigin) securityOrigin url' <- cstringToText url - _cb security_origin' url' + _cb securityOrigin' url' onWebFrameInsecureContentRun :: (GObject a, MonadIO m) => a -> WebFrameInsecureContentRunCallback -> m SignalHandlerId onWebFrameInsecureContentRun obj cb = liftIO $ connectWebFrameInsecureContentRun obj cb SignalConnectBefore @@ -524,9 +608,9 @@ Int32 -> Ptr () -> IO () -webFrameResourceContentLengthReceivedCallbackWrapper _cb _ web_resource length_received _ = do - web_resource' <- (newObject WebResource) web_resource - _cb web_resource' length_received +webFrameResourceContentLengthReceivedCallbackWrapper _cb _ webResource lengthReceived _ = do + webResource' <- (newObject WebResource) webResource + _cb webResource' lengthReceived onWebFrameResourceContentLengthReceived :: (GObject a, MonadIO m) => a -> WebFrameResourceContentLengthReceivedCallback -> m SignalHandlerId onWebFrameResourceContentLengthReceived obj cb = liftIO $ connectWebFrameResourceContentLengthReceived obj cb SignalConnectBefore @@ -569,9 +653,9 @@ Ptr () -> Ptr () -> IO () -webFrameResourceLoadFailedCallbackWrapper _cb _ web_resource error_ _ = do - web_resource' <- (newObject WebResource) web_resource - _cb web_resource' error_ +webFrameResourceLoadFailedCallbackWrapper _cb _ webResource error_ _ = do + webResource' <- (newObject WebResource) webResource + _cb webResource' error_ onWebFrameResourceLoadFailed :: (GObject a, MonadIO m) => a -> WebFrameResourceLoadFailedCallback -> m SignalHandlerId onWebFrameResourceLoadFailed obj cb = liftIO $ connectWebFrameResourceLoadFailed obj cb SignalConnectBefore @@ -611,9 +695,9 @@ Ptr WebResource -> Ptr () -> IO () -webFrameResourceLoadFinishedCallbackWrapper _cb _ web_resource _ = do - web_resource' <- (newObject WebResource) web_resource - _cb web_resource' +webFrameResourceLoadFinishedCallbackWrapper _cb _ webResource _ = do + webResource' <- (newObject WebResource) webResource + _cb webResource' onWebFrameResourceLoadFinished :: (GObject a, MonadIO m) => a -> WebFrameResourceLoadFinishedCallback -> m SignalHandlerId onWebFrameResourceLoadFinished obj cb = liftIO $ connectWebFrameResourceLoadFinished obj cb SignalConnectBefore @@ -659,11 +743,11 @@ Ptr NetworkResponse -> Ptr () -> IO () -webFrameResourceRequestStartingCallbackWrapper _cb _ web_resource request response _ = do - web_resource' <- (newObject WebResource) web_resource +webFrameResourceRequestStartingCallbackWrapper _cb _ webResource request response _ = do + webResource' <- (newObject WebResource) webResource request' <- (newObject NetworkRequest) request response' <- (newObject NetworkResponse) response - _cb web_resource' request' response' + _cb webResource' request' response' onWebFrameResourceRequestStarting :: (GObject a, MonadIO m) => a -> WebFrameResourceRequestStartingCallback -> m SignalHandlerId onWebFrameResourceRequestStarting obj cb = liftIO $ connectWebFrameResourceRequestStarting obj cb SignalConnectBefore @@ -706,10 +790,10 @@ Ptr NetworkResponse -> Ptr () -> IO () -webFrameResourceResponseReceivedCallbackWrapper _cb _ web_resource response _ = do - web_resource' <- (newObject WebResource) web_resource +webFrameResourceResponseReceivedCallbackWrapper _cb _ webResource response _ = do + webResource' <- (newObject WebResource) webResource response' <- (newObject NetworkResponse) response - _cb web_resource' response' + _cb webResource' response' onWebFrameResourceResponseReceived :: (GObject a, MonadIO m) => a -> WebFrameResourceResponseReceivedCallback -> m SignalHandlerId onWebFrameResourceResponseReceived obj cb = liftIO $ connectWebFrameResourceResponseReceived obj cb SignalConnectBefore @@ -817,7 +901,7 @@ type AttrSetTypeConstraint WebFrameHorizontalScrollbarPolicyPropertyInfo = (~) () type AttrBaseTypeConstraint WebFrameHorizontalScrollbarPolicyPropertyInfo = WebFrameK type AttrGetType WebFrameHorizontalScrollbarPolicyPropertyInfo = Gtk.PolicyType - type AttrLabel WebFrameHorizontalScrollbarPolicyPropertyInfo = "WebFrame::horizontal-scrollbar-policy" + type AttrLabel WebFrameHorizontalScrollbarPolicyPropertyInfo = "horizontal-scrollbar-policy" attrGet _ = getWebFrameHorizontalScrollbarPolicy attrSet _ = undefined attrConstruct _ = undefined @@ -835,7 +919,7 @@ type AttrSetTypeConstraint WebFrameLoadStatusPropertyInfo = (~) () type AttrBaseTypeConstraint WebFrameLoadStatusPropertyInfo = WebFrameK type AttrGetType WebFrameLoadStatusPropertyInfo = LoadStatus - type AttrLabel WebFrameLoadStatusPropertyInfo = "WebFrame::load-status" + type AttrLabel WebFrameLoadStatusPropertyInfo = "load-status" attrGet _ = getWebFrameLoadStatus attrSet _ = undefined attrConstruct _ = undefined @@ -853,7 +937,7 @@ type AttrSetTypeConstraint WebFrameNamePropertyInfo = (~) () type AttrBaseTypeConstraint WebFrameNamePropertyInfo = WebFrameK type AttrGetType WebFrameNamePropertyInfo = T.Text - type AttrLabel WebFrameNamePropertyInfo = "WebFrame::name" + type AttrLabel WebFrameNamePropertyInfo = "name" attrGet _ = getWebFrameName attrSet _ = undefined attrConstruct _ = undefined @@ -871,7 +955,7 @@ type AttrSetTypeConstraint WebFrameTitlePropertyInfo = (~) () type AttrBaseTypeConstraint WebFrameTitlePropertyInfo = WebFrameK type AttrGetType WebFrameTitlePropertyInfo = T.Text - type AttrLabel WebFrameTitlePropertyInfo = "WebFrame::title" + type AttrLabel WebFrameTitlePropertyInfo = "title" attrGet _ = getWebFrameTitle attrSet _ = undefined attrConstruct _ = undefined @@ -889,7 +973,7 @@ type AttrSetTypeConstraint WebFrameUriPropertyInfo = (~) () type AttrBaseTypeConstraint WebFrameUriPropertyInfo = WebFrameK type AttrGetType WebFrameUriPropertyInfo = T.Text - type AttrLabel WebFrameUriPropertyInfo = "WebFrame::uri" + type AttrLabel WebFrameUriPropertyInfo = "uri" attrGet _ = getWebFrameUri attrSet _ = undefined attrConstruct _ = undefined @@ -907,13 +991,13 @@ type AttrSetTypeConstraint WebFrameVerticalScrollbarPolicyPropertyInfo = (~) () type AttrBaseTypeConstraint WebFrameVerticalScrollbarPolicyPropertyInfo = WebFrameK type AttrGetType WebFrameVerticalScrollbarPolicyPropertyInfo = Gtk.PolicyType - type AttrLabel WebFrameVerticalScrollbarPolicyPropertyInfo = "WebFrame::vertical-scrollbar-policy" + type AttrLabel WebFrameVerticalScrollbarPolicyPropertyInfo = "vertical-scrollbar-policy" attrGet _ = getWebFrameVerticalScrollbarPolicy attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList WebFrame = WebFrameAttributeList -type WebFrameAttributeList = ('[ '("horizontal-scrollbar-policy", WebFrameHorizontalScrollbarPolicyPropertyInfo), '("load-status", WebFrameLoadStatusPropertyInfo), '("name", WebFrameNamePropertyInfo), '("title", WebFrameTitlePropertyInfo), '("uri", WebFrameUriPropertyInfo), '("vertical-scrollbar-policy", WebFrameVerticalScrollbarPolicyPropertyInfo)] :: [(Symbol, *)]) +type WebFrameAttributeList = ('[ '("horizontalScrollbarPolicy", WebFrameHorizontalScrollbarPolicyPropertyInfo), '("loadStatus", WebFrameLoadStatusPropertyInfo), '("name", WebFrameNamePropertyInfo), '("title", WebFrameTitlePropertyInfo), '("uri", WebFrameUriPropertyInfo), '("verticalScrollbarPolicy", WebFrameVerticalScrollbarPolicyPropertyInfo)] :: [(Symbol, *)]) data WebFrameClearedSignalInfo instance SignalInfo WebFrameClearedSignalInfo where @@ -971,13 +1055,12 @@ connectSignal _ = connectWebFrameTitleChanged type instance SignalList WebFrame = WebFrameSignalList -type WebFrameSignalList = ('[ '("cleared", WebFrameClearedSignalInfo), '("hovering-over-link", WebFrameHoveringOverLinkSignalInfo), '("insecure-content-run", WebFrameInsecureContentRunSignalInfo), '("load-committed", WebFrameLoadCommittedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("resource-content-length-received", WebFrameResourceContentLengthReceivedSignalInfo), '("resource-load-failed", WebFrameResourceLoadFailedSignalInfo), '("resource-load-finished", WebFrameResourceLoadFinishedSignalInfo), '("resource-request-starting", WebFrameResourceRequestStartingSignalInfo), '("resource-response-received", WebFrameResourceResponseReceivedSignalInfo), '("scrollbars-policy-changed", WebFrameScrollbarsPolicyChangedSignalInfo), '("title-changed", WebFrameTitleChangedSignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebFrameSignalList = ('[ '("cleared", WebFrameClearedSignalInfo), '("hoveringOverLink", WebFrameHoveringOverLinkSignalInfo), '("insecureContentRun", WebFrameInsecureContentRunSignalInfo), '("loadCommitted", WebFrameLoadCommittedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("resourceContentLengthReceived", WebFrameResourceContentLengthReceivedSignalInfo), '("resourceLoadFailed", WebFrameResourceLoadFailedSignalInfo), '("resourceLoadFinished", WebFrameResourceLoadFinishedSignalInfo), '("resourceRequestStarting", WebFrameResourceRequestStartingSignalInfo), '("resourceResponseReceived", WebFrameResourceResponseReceivedSignalInfo), '("scrollbarsPolicyChanged", WebFrameScrollbarsPolicyChangedSignalInfo), '("titleChanged", WebFrameTitleChangedSignalInfo)] :: [(Symbol, *)]) -- method WebFrame::new -- method type : Constructor --- Args : [Arg {argName = "web_view", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "web_view", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "web_view", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebFrame" -- throws : False -- Skip return : False @@ -989,21 +1072,20 @@ {-# DEPRECATED webFrameNew ["(Since version 1.0.2)","#WebKitWebFrame can only be used to inspect existing","frames."]#-} webFrameNew :: (MonadIO m, WebViewK a) => - a -> -- web_view - m WebFrame -webFrameNew web_view = liftIO $ do - let web_view' = unsafeManagedPtrCastPtr web_view - result <- webkit_web_frame_new web_view' + a -- webView + -> m WebFrame -- result +webFrameNew webView = liftIO $ do + let webView' = unsafeManagedPtrCastPtr webView + result <- webkit_web_frame_new webView' checkUnexpectedReturnNULL "webkit_web_frame_new" result result' <- (wrapObject WebFrame) result - touchManagedPtr web_view + touchManagedPtr webView return result' -- method WebFrame::find_frame -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebFrame" -- throws : False -- Skip return : False @@ -1016,9 +1098,9 @@ webFrameFindFrame :: (MonadIO m, WebFrameK a) => - a -> -- _obj - T.Text -> -- name - m WebFrame + a -- _obj + -> T.Text -- name + -> m WebFrame -- result webFrameFindFrame _obj name = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj name' <- textToCString name @@ -1029,11 +1111,14 @@ freeMem name' return result' +data WebFrameFindFrameMethodInfo +instance (signature ~ (T.Text -> m WebFrame), MonadIO m, WebFrameK a) => MethodInfo WebFrameFindFrameMethodInfo a signature where + overloadedMethod _ = webFrameFindFrame + -- method WebFrame::get_data_source -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebDataSource" -- throws : False -- Skip return : False @@ -1045,8 +1130,8 @@ webFrameGetDataSource :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m WebDataSource + a -- _obj + -> m WebDataSource -- result webFrameGetDataSource _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_data_source _obj' @@ -1055,11 +1140,14 @@ touchManagedPtr _obj return result' +data WebFrameGetDataSourceMethodInfo +instance (signature ~ (m WebDataSource), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetDataSourceMethodInfo a signature where + overloadedMethod _ = webFrameGetDataSource + -- method WebFrame::get_dom_document -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMDocument" -- throws : False -- Skip return : False @@ -1071,8 +1159,8 @@ webFrameGetDomDocument :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m DOMDocument + a -- _obj + -> m DOMDocument -- result webFrameGetDomDocument _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_dom_document _obj' @@ -1081,11 +1169,14 @@ touchManagedPtr _obj return result' +data WebFrameGetDomDocumentMethodInfo +instance (signature ~ (m DOMDocument), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetDomDocumentMethodInfo a signature where + overloadedMethod _ = webFrameGetDomDocument + -- method WebFrame::get_global_context -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "JavaScriptCore" "GlobalContext" -- throws : False -- Skip return : False @@ -1097,8 +1188,8 @@ webFrameGetGlobalContext :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m JavaScriptCore.GlobalContext + a -- _obj + -> m JavaScriptCore.GlobalContext -- result webFrameGetGlobalContext _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_global_context _obj' @@ -1108,11 +1199,14 @@ touchManagedPtr _obj return result' +data WebFrameGetGlobalContextMethodInfo +instance (signature ~ (m JavaScriptCore.GlobalContext), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetGlobalContextMethodInfo a signature where + overloadedMethod _ = webFrameGetGlobalContext + -- method WebFrame::get_horizontal_scrollbar_policy -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "Gtk" "PolicyType" -- throws : False -- Skip return : False @@ -1124,8 +1218,8 @@ webFrameGetHorizontalScrollbarPolicy :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m Gtk.PolicyType + a -- _obj + -> m Gtk.PolicyType -- result webFrameGetHorizontalScrollbarPolicy _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_horizontal_scrollbar_policy _obj' @@ -1133,11 +1227,14 @@ touchManagedPtr _obj return result' +data WebFrameGetHorizontalScrollbarPolicyMethodInfo +instance (signature ~ (m Gtk.PolicyType), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetHorizontalScrollbarPolicyMethodInfo a signature where + overloadedMethod _ = webFrameGetHorizontalScrollbarPolicy + -- method WebFrame::get_load_status -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "LoadStatus" -- throws : False -- Skip return : False @@ -1149,8 +1246,8 @@ webFrameGetLoadStatus :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m LoadStatus + a -- _obj + -> m LoadStatus -- result webFrameGetLoadStatus _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_load_status _obj' @@ -1158,11 +1255,14 @@ touchManagedPtr _obj return result' +data WebFrameGetLoadStatusMethodInfo +instance (signature ~ (m LoadStatus), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetLoadStatusMethodInfo a signature where + overloadedMethod _ = webFrameGetLoadStatus + -- method WebFrame::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1174,8 +1274,8 @@ webFrameGetName :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webFrameGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_name _obj' @@ -1184,11 +1284,14 @@ touchManagedPtr _obj return result' +data WebFrameGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetNameMethodInfo a signature where + overloadedMethod _ = webFrameGetName + -- method WebFrame::get_network_response -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "NetworkResponse" -- throws : False -- Skip return : False @@ -1200,8 +1303,8 @@ webFrameGetNetworkResponse :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m NetworkResponse + a -- _obj + -> m NetworkResponse -- result webFrameGetNetworkResponse _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_network_response _obj' @@ -1210,11 +1313,14 @@ touchManagedPtr _obj return result' +data WebFrameGetNetworkResponseMethodInfo +instance (signature ~ (m NetworkResponse), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetNetworkResponseMethodInfo a signature where + overloadedMethod _ = webFrameGetNetworkResponse + -- method WebFrame::get_parent -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebFrame" -- throws : False -- Skip return : False @@ -1226,8 +1332,8 @@ webFrameGetParent :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m WebFrame + a -- _obj + -> m WebFrame -- result webFrameGetParent _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_parent _obj' @@ -1236,11 +1342,14 @@ touchManagedPtr _obj return result' +data WebFrameGetParentMethodInfo +instance (signature ~ (m WebFrame), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetParentMethodInfo a signature where + overloadedMethod _ = webFrameGetParent + -- method WebFrame::get_provisional_data_source -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebDataSource" -- throws : False -- Skip return : False @@ -1252,8 +1361,8 @@ webFrameGetProvisionalDataSource :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m WebDataSource + a -- _obj + -> m WebDataSource -- result webFrameGetProvisionalDataSource _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_provisional_data_source _obj' @@ -1262,11 +1371,14 @@ touchManagedPtr _obj return result' +data WebFrameGetProvisionalDataSourceMethodInfo +instance (signature ~ (m WebDataSource), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetProvisionalDataSourceMethodInfo a signature where + overloadedMethod _ = webFrameGetProvisionalDataSource + -- method WebFrame::get_range_for_word_around_caret -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "DOMRange" -- throws : False -- Skip return : False @@ -1278,8 +1390,8 @@ webFrameGetRangeForWordAroundCaret :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m DOMRange + a -- _obj + -> m DOMRange -- result webFrameGetRangeForWordAroundCaret _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_range_for_word_around_caret _obj' @@ -1288,11 +1400,14 @@ touchManagedPtr _obj return result' +data WebFrameGetRangeForWordAroundCaretMethodInfo +instance (signature ~ (m DOMRange), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetRangeForWordAroundCaretMethodInfo a signature where + overloadedMethod _ = webFrameGetRangeForWordAroundCaret + -- method WebFrame::get_security_origin -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "SecurityOrigin" -- throws : False -- Skip return : False @@ -1304,8 +1419,8 @@ webFrameGetSecurityOrigin :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m SecurityOrigin + a -- _obj + -> m SecurityOrigin -- result webFrameGetSecurityOrigin _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_security_origin _obj' @@ -1314,11 +1429,14 @@ touchManagedPtr _obj return result' +data WebFrameGetSecurityOriginMethodInfo +instance (signature ~ (m SecurityOrigin), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetSecurityOriginMethodInfo a signature where + overloadedMethod _ = webFrameGetSecurityOrigin + -- method WebFrame::get_title -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1330,8 +1448,8 @@ webFrameGetTitle :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webFrameGetTitle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_title _obj' @@ -1340,11 +1458,14 @@ touchManagedPtr _obj return result' +data WebFrameGetTitleMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetTitleMethodInfo a signature where + overloadedMethod _ = webFrameGetTitle + -- method WebFrame::get_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1356,8 +1477,8 @@ webFrameGetUri :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webFrameGetUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_uri _obj' @@ -1366,11 +1487,14 @@ touchManagedPtr _obj return result' +data WebFrameGetUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetUriMethodInfo a signature where + overloadedMethod _ = webFrameGetUri + -- method WebFrame::get_vertical_scrollbar_policy -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "Gtk" "PolicyType" -- throws : False -- Skip return : False @@ -1382,8 +1506,8 @@ webFrameGetVerticalScrollbarPolicy :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m Gtk.PolicyType + a -- _obj + -> m Gtk.PolicyType -- result webFrameGetVerticalScrollbarPolicy _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_vertical_scrollbar_policy _obj' @@ -1391,11 +1515,14 @@ touchManagedPtr _obj return result' +data WebFrameGetVerticalScrollbarPolicyMethodInfo +instance (signature ~ (m Gtk.PolicyType), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetVerticalScrollbarPolicyMethodInfo a signature where + overloadedMethod _ = webFrameGetVerticalScrollbarPolicy + -- method WebFrame::get_web_view -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebView" -- throws : False -- Skip return : False @@ -1407,8 +1534,8 @@ webFrameGetWebView :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m WebView + a -- _obj + -> m WebView -- result webFrameGetWebView _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_frame_get_web_view _obj' @@ -1417,11 +1544,14 @@ touchManagedPtr _obj return result' +data WebFrameGetWebViewMethodInfo +instance (signature ~ (m WebView), MonadIO m, WebFrameK a) => MethodInfo WebFrameGetWebViewMethodInfo a signature where + overloadedMethod _ = webFrameGetWebView + -- method WebFrame::load_alternate_string -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "base_url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "unreachable_url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "base_url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unreachable_url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "base_url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "unreachable_url", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1436,28 +1566,31 @@ webFrameLoadAlternateString :: (MonadIO m, WebFrameK a) => - a -> -- _obj - T.Text -> -- content - T.Text -> -- base_url - T.Text -> -- unreachable_url - m () -webFrameLoadAlternateString _obj content base_url unreachable_url = liftIO $ do + a -- _obj + -> T.Text -- content + -> T.Text -- baseUrl + -> T.Text -- unreachableUrl + -> m () -- result +webFrameLoadAlternateString _obj content baseUrl unreachableUrl = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj content' <- textToCString content - base_url' <- textToCString base_url - unreachable_url' <- textToCString unreachable_url - webkit_web_frame_load_alternate_string _obj' content' base_url' unreachable_url' + baseUrl' <- textToCString baseUrl + unreachableUrl' <- textToCString unreachableUrl + webkit_web_frame_load_alternate_string _obj' content' baseUrl' unreachableUrl' touchManagedPtr _obj freeMem content' - freeMem base_url' - freeMem unreachable_url' + freeMem baseUrl' + freeMem unreachableUrl' return () +data WebFrameLoadAlternateStringMethodInfo +instance (signature ~ (T.Text -> T.Text -> T.Text -> m ()), MonadIO m, WebFrameK a) => MethodInfo WebFrameLoadAlternateStringMethodInfo a signature where + overloadedMethod _ = webFrameLoadAlternateString + -- method WebFrame::load_request -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1470,9 +1603,9 @@ webFrameLoadRequest :: (MonadIO m, WebFrameK a, NetworkRequestK b) => - a -> -- _obj - b -> -- request - m () + a -- _obj + -> b -- request + -> m () -- result webFrameLoadRequest _obj request = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let request' = unsafeManagedPtrCastPtr request @@ -1481,11 +1614,14 @@ touchManagedPtr request return () +data WebFrameLoadRequestMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, WebFrameK a, NetworkRequestK b) => MethodInfo WebFrameLoadRequestMethodInfo a signature where + overloadedMethod _ = webFrameLoadRequest + -- method WebFrame::load_string -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "base_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "base_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "base_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1501,31 +1637,34 @@ webFrameLoadString :: (MonadIO m, WebFrameK a) => - a -> -- _obj - T.Text -> -- content - T.Text -> -- mime_type - T.Text -> -- encoding - T.Text -> -- base_uri - m () -webFrameLoadString _obj content mime_type encoding base_uri = liftIO $ do + a -- _obj + -> T.Text -- content + -> T.Text -- mimeType + -> T.Text -- encoding + -> T.Text -- baseUri + -> m () -- result +webFrameLoadString _obj content mimeType encoding baseUri = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj content' <- textToCString content - mime_type' <- textToCString mime_type + mimeType' <- textToCString mimeType encoding' <- textToCString encoding - base_uri' <- textToCString base_uri - webkit_web_frame_load_string _obj' content' mime_type' encoding' base_uri' + baseUri' <- textToCString baseUri + webkit_web_frame_load_string _obj' content' mimeType' encoding' baseUri' touchManagedPtr _obj freeMem content' - freeMem mime_type' + freeMem mimeType' freeMem encoding' - freeMem base_uri' + freeMem baseUri' return () +data WebFrameLoadStringMethodInfo +instance (signature ~ (T.Text -> T.Text -> T.Text -> T.Text -> m ()), MonadIO m, WebFrameK a) => MethodInfo WebFrameLoadStringMethodInfo a signature where + overloadedMethod _ = webFrameLoadString + -- method WebFrame::load_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1538,9 +1677,9 @@ webFrameLoadUri :: (MonadIO m, WebFrameK a) => - a -> -- _obj - T.Text -> -- uri - m () + a -- _obj + -> T.Text -- uri + -> m () -- result webFrameLoadUri _obj uri = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj uri' <- textToCString uri @@ -1549,11 +1688,14 @@ freeMem uri' return () +data WebFrameLoadUriMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, WebFrameK a) => MethodInfo WebFrameLoadUriMethodInfo a signature where + overloadedMethod _ = webFrameLoadUri + -- method WebFrame::print -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1565,19 +1707,22 @@ webFramePrint :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webFramePrint _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_frame_print _obj' touchManagedPtr _obj return () +data WebFramePrintMethodInfo +instance (signature ~ (m ()), MonadIO m, WebFrameK a) => MethodInfo WebFramePrintMethodInfo a signature where + overloadedMethod _ = webFramePrint + -- method WebFrame::print_full -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "operation", argType = TInterface "Gtk" "PrintOperation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "action", argType = TInterface "Gtk" "PrintOperationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "operation", argType = TInterface "Gtk" "PrintOperation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "action", argType = TInterface "Gtk" "PrintOperationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "operation", argType = TInterface "Gtk" "PrintOperation", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "action", argType = TInterface "Gtk" "PrintOperationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "Gtk" "PrintOperationResult" -- throws : True -- Skip return : False @@ -1592,10 +1737,10 @@ webFramePrintFull :: (MonadIO m, WebFrameK a, Gtk.PrintOperationK b) => - a -> -- _obj - b -> -- operation - Gtk.PrintOperationAction -> -- action - m Gtk.PrintOperationResult + a -- _obj + -> b -- operation + -> Gtk.PrintOperationAction -- action + -> m Gtk.PrintOperationResult -- result webFramePrintFull _obj operation action = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let operation' = unsafeManagedPtrCastPtr operation @@ -1610,11 +1755,14 @@ return () ) +data WebFramePrintFullMethodInfo +instance (signature ~ (b -> Gtk.PrintOperationAction -> m Gtk.PrintOperationResult), MonadIO m, WebFrameK a, Gtk.PrintOperationK b) => MethodInfo WebFramePrintFullMethodInfo a signature where + overloadedMethod _ = webFramePrintFull + -- method WebFrame::reload -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1626,19 +1774,22 @@ webFrameReload :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webFrameReload _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_frame_reload _obj' touchManagedPtr _obj return () +data WebFrameReloadMethodInfo +instance (signature ~ (m ()), MonadIO m, WebFrameK a) => MethodInfo WebFrameReloadMethodInfo a signature where + overloadedMethod _ = webFrameReload + -- method WebFrame::replace_selection -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1651,9 +1802,9 @@ webFrameReplaceSelection :: (MonadIO m, WebFrameK a) => - a -> -- _obj - T.Text -> -- text - m () + a -- _obj + -> T.Text -- text + -> m () -- result webFrameReplaceSelection _obj text = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj text' <- textToCString text @@ -1662,11 +1813,14 @@ freeMem text' return () +data WebFrameReplaceSelectionMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, WebFrameK a) => MethodInfo WebFrameReplaceSelectionMethodInfo a signature where + overloadedMethod _ = webFrameReplaceSelection + -- method WebFrame::stop_loading -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebFrame", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -1678,12 +1832,16 @@ webFrameStopLoading :: (MonadIO m, WebFrameK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webFrameStopLoading _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_frame_stop_loading _obj' touchManagedPtr _obj return () + +data WebFrameStopLoadingMethodInfo +instance (signature ~ (m ()), MonadIO m, WebFrameK a) => MethodInfo WebFrameStopLoadingMethodInfo a signature where + overloadedMethod _ = webFrameStopLoading diff --git a/GI/WebKit/Objects/WebFrame.hs-boot b/GI/WebKit/Objects/WebFrame.hs-boot --- a/GI/WebKit/Objects/WebFrame.hs-boot +++ b/GI/WebKit/Objects/WebFrame.hs-boot @@ -28,3 +28,28 @@ data WebFrameResourceResponseReceivedSignalInfo data WebFrameScrollbarsPolicyChangedSignalInfo data WebFrameTitleChangedSignalInfo +data WebFrameFindFrameMethodInfo +data WebFrameGetDataSourceMethodInfo +data WebFrameGetDomDocumentMethodInfo +data WebFrameGetGlobalContextMethodInfo +data WebFrameGetHorizontalScrollbarPolicyMethodInfo +data WebFrameGetLoadStatusMethodInfo +data WebFrameGetNameMethodInfo +data WebFrameGetNetworkResponseMethodInfo +data WebFrameGetParentMethodInfo +data WebFrameGetProvisionalDataSourceMethodInfo +data WebFrameGetRangeForWordAroundCaretMethodInfo +data WebFrameGetSecurityOriginMethodInfo +data WebFrameGetTitleMethodInfo +data WebFrameGetUriMethodInfo +data WebFrameGetVerticalScrollbarPolicyMethodInfo +data WebFrameGetWebViewMethodInfo +data WebFrameLoadAlternateStringMethodInfo +data WebFrameLoadRequestMethodInfo +data WebFrameLoadStringMethodInfo +data WebFrameLoadUriMethodInfo +data WebFramePrintMethodInfo +data WebFramePrintFullMethodInfo +data WebFrameReloadMethodInfo +data WebFrameReplaceSelectionMethodInfo +data WebFrameStopLoadingMethodInfo diff --git a/GI/WebKit/Objects/WebHistoryItem.hs b/GI/WebKit/Objects/WebHistoryItem.hs --- a/GI/WebKit/Objects/WebHistoryItem.hs +++ b/GI/WebKit/Objects/WebHistoryItem.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** webHistoryItemCopy + WebHistoryItemCopyMethodInfo , webHistoryItemCopy , -- ** webHistoryItemGetAlternateTitle + WebHistoryItemGetAlternateTitleMethodInfo, webHistoryItemGetAlternateTitle , -- ** webHistoryItemGetLastVisitedTime + WebHistoryItemGetLastVisitedTimeMethodInfo, webHistoryItemGetLastVisitedTime , -- ** webHistoryItemGetOriginalUri + WebHistoryItemGetOriginalUriMethodInfo , webHistoryItemGetOriginalUri , -- ** webHistoryItemGetTitle + WebHistoryItemGetTitleMethodInfo , webHistoryItemGetTitle , -- ** webHistoryItemGetUri + WebHistoryItemGetUriMethodInfo , webHistoryItemGetUri , @@ -49,6 +56,7 @@ -- ** webHistoryItemSetAlternateTitle + WebHistoryItemSetAlternateTitleMethodInfo, webHistoryItemSetAlternateTitle , @@ -118,6 +126,46 @@ noWebHistoryItem :: Maybe WebHistoryItem noWebHistoryItem = Nothing +type family ResolveWebHistoryItemMethod (t :: Symbol) (o :: *) :: * where + ResolveWebHistoryItemMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebHistoryItemMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebHistoryItemMethod "copy" o = WebHistoryItemCopyMethodInfo + ResolveWebHistoryItemMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebHistoryItemMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebHistoryItemMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebHistoryItemMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebHistoryItemMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebHistoryItemMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebHistoryItemMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebHistoryItemMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebHistoryItemMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebHistoryItemMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebHistoryItemMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebHistoryItemMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebHistoryItemMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebHistoryItemMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebHistoryItemMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebHistoryItemMethod "getAlternateTitle" o = WebHistoryItemGetAlternateTitleMethodInfo + ResolveWebHistoryItemMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebHistoryItemMethod "getLastVisitedTime" o = WebHistoryItemGetLastVisitedTimeMethodInfo + ResolveWebHistoryItemMethod "getOriginalUri" o = WebHistoryItemGetOriginalUriMethodInfo + ResolveWebHistoryItemMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebHistoryItemMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebHistoryItemMethod "getTitle" o = WebHistoryItemGetTitleMethodInfo + ResolveWebHistoryItemMethod "getUri" o = WebHistoryItemGetUriMethodInfo + ResolveWebHistoryItemMethod "setAlternateTitle" o = WebHistoryItemSetAlternateTitleMethodInfo + ResolveWebHistoryItemMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebHistoryItemMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebHistoryItemMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebHistoryItemMethod t WebHistoryItem, MethodInfo info WebHistoryItem p) => IsLabelProxy t (WebHistoryItem -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebHistoryItemMethod t WebHistoryItem, MethodInfo info WebHistoryItem p) => IsLabel t (WebHistoryItem -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "alternate-title" -- Type: TBasicType TUTF8 -- Flags: [PropertyReadable,PropertyWritable] @@ -137,7 +185,7 @@ type AttrSetTypeConstraint WebHistoryItemAlternateTitlePropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebHistoryItemAlternateTitlePropertyInfo = WebHistoryItemK type AttrGetType WebHistoryItemAlternateTitlePropertyInfo = T.Text - type AttrLabel WebHistoryItemAlternateTitlePropertyInfo = "WebHistoryItem::alternate-title" + type AttrLabel WebHistoryItemAlternateTitlePropertyInfo = "alternate-title" attrGet _ = getWebHistoryItemAlternateTitle attrSet _ = setWebHistoryItemAlternateTitle attrConstruct _ = constructWebHistoryItemAlternateTitle @@ -155,7 +203,7 @@ type AttrSetTypeConstraint WebHistoryItemLastVisitedTimePropertyInfo = (~) () type AttrBaseTypeConstraint WebHistoryItemLastVisitedTimePropertyInfo = WebHistoryItemK type AttrGetType WebHistoryItemLastVisitedTimePropertyInfo = Double - type AttrLabel WebHistoryItemLastVisitedTimePropertyInfo = "WebHistoryItem::last-visited-time" + type AttrLabel WebHistoryItemLastVisitedTimePropertyInfo = "last-visited-time" attrGet _ = getWebHistoryItemLastVisitedTime attrSet _ = undefined attrConstruct _ = undefined @@ -173,7 +221,7 @@ type AttrSetTypeConstraint WebHistoryItemOriginalUriPropertyInfo = (~) () type AttrBaseTypeConstraint WebHistoryItemOriginalUriPropertyInfo = WebHistoryItemK type AttrGetType WebHistoryItemOriginalUriPropertyInfo = T.Text - type AttrLabel WebHistoryItemOriginalUriPropertyInfo = "WebHistoryItem::original-uri" + type AttrLabel WebHistoryItemOriginalUriPropertyInfo = "original-uri" attrGet _ = getWebHistoryItemOriginalUri attrSet _ = undefined attrConstruct _ = undefined @@ -191,7 +239,7 @@ type AttrSetTypeConstraint WebHistoryItemTitlePropertyInfo = (~) () type AttrBaseTypeConstraint WebHistoryItemTitlePropertyInfo = WebHistoryItemK type AttrGetType WebHistoryItemTitlePropertyInfo = T.Text - type AttrLabel WebHistoryItemTitlePropertyInfo = "WebHistoryItem::title" + type AttrLabel WebHistoryItemTitlePropertyInfo = "title" attrGet _ = getWebHistoryItemTitle attrSet _ = undefined attrConstruct _ = undefined @@ -209,22 +257,21 @@ type AttrSetTypeConstraint WebHistoryItemUriPropertyInfo = (~) () type AttrBaseTypeConstraint WebHistoryItemUriPropertyInfo = WebHistoryItemK type AttrGetType WebHistoryItemUriPropertyInfo = T.Text - type AttrLabel WebHistoryItemUriPropertyInfo = "WebHistoryItem::uri" + type AttrLabel WebHistoryItemUriPropertyInfo = "uri" attrGet _ = getWebHistoryItemUri attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList WebHistoryItem = WebHistoryItemAttributeList -type WebHistoryItemAttributeList = ('[ '("alternate-title", WebHistoryItemAlternateTitlePropertyInfo), '("last-visited-time", WebHistoryItemLastVisitedTimePropertyInfo), '("original-uri", WebHistoryItemOriginalUriPropertyInfo), '("title", WebHistoryItemTitlePropertyInfo), '("uri", WebHistoryItemUriPropertyInfo)] :: [(Symbol, *)]) +type WebHistoryItemAttributeList = ('[ '("alternateTitle", WebHistoryItemAlternateTitlePropertyInfo), '("lastVisitedTime", WebHistoryItemLastVisitedTimePropertyInfo), '("originalUri", WebHistoryItemOriginalUriPropertyInfo), '("title", WebHistoryItemTitlePropertyInfo), '("uri", WebHistoryItemUriPropertyInfo)] :: [(Symbol, *)]) type instance SignalList WebHistoryItem = WebHistoryItemSignalList -type WebHistoryItemSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebHistoryItemSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method WebHistoryItem::new -- method type : Constructor -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TInterface "WebKit" "WebHistoryItem" -- throws : False -- Skip return : False @@ -235,7 +282,7 @@ webHistoryItemNew :: (MonadIO m) => - m WebHistoryItem + m WebHistoryItem -- result webHistoryItemNew = liftIO $ do result <- webkit_web_history_item_new checkUnexpectedReturnNULL "webkit_web_history_item_new" result @@ -244,9 +291,8 @@ -- method WebHistoryItem::new_with_data -- method type : Constructor --- Args : [Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebHistoryItem" -- throws : False -- Skip return : False @@ -259,9 +305,9 @@ webHistoryItemNewWithData :: (MonadIO m) => - T.Text -> -- uri - T.Text -> -- title - m WebHistoryItem + T.Text -- uri + -> T.Text -- title + -> m WebHistoryItem -- result webHistoryItemNewWithData uri title = liftIO $ do uri' <- textToCString uri title' <- textToCString title @@ -274,9 +320,8 @@ -- method WebHistoryItem::copy -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebHistoryItem" -- throws : False -- Skip return : False @@ -288,8 +333,8 @@ webHistoryItemCopy :: (MonadIO m, WebHistoryItemK a) => - a -> -- _obj - m WebHistoryItem + a -- _obj + -> m WebHistoryItem -- result webHistoryItemCopy _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_history_item_copy _obj' @@ -298,11 +343,14 @@ touchManagedPtr _obj return result' +data WebHistoryItemCopyMethodInfo +instance (signature ~ (m WebHistoryItem), MonadIO m, WebHistoryItemK a) => MethodInfo WebHistoryItemCopyMethodInfo a signature where + overloadedMethod _ = webHistoryItemCopy + -- method WebHistoryItem::get_alternate_title -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -314,8 +362,8 @@ webHistoryItemGetAlternateTitle :: (MonadIO m, WebHistoryItemK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webHistoryItemGetAlternateTitle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_history_item_get_alternate_title _obj' @@ -324,11 +372,14 @@ touchManagedPtr _obj return result' +data WebHistoryItemGetAlternateTitleMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebHistoryItemK a) => MethodInfo WebHistoryItemGetAlternateTitleMethodInfo a signature where + overloadedMethod _ = webHistoryItemGetAlternateTitle + -- method WebHistoryItem::get_last_visited_time -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TDouble -- throws : False -- Skip return : False @@ -340,8 +391,8 @@ webHistoryItemGetLastVisitedTime :: (MonadIO m, WebHistoryItemK a) => - a -> -- _obj - m Double + a -- _obj + -> m Double -- result webHistoryItemGetLastVisitedTime _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_history_item_get_last_visited_time _obj' @@ -349,11 +400,14 @@ touchManagedPtr _obj return result' +data WebHistoryItemGetLastVisitedTimeMethodInfo +instance (signature ~ (m Double), MonadIO m, WebHistoryItemK a) => MethodInfo WebHistoryItemGetLastVisitedTimeMethodInfo a signature where + overloadedMethod _ = webHistoryItemGetLastVisitedTime + -- method WebHistoryItem::get_original_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -365,8 +419,8 @@ webHistoryItemGetOriginalUri :: (MonadIO m, WebHistoryItemK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webHistoryItemGetOriginalUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_history_item_get_original_uri _obj' @@ -375,11 +429,14 @@ touchManagedPtr _obj return result' +data WebHistoryItemGetOriginalUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebHistoryItemK a) => MethodInfo WebHistoryItemGetOriginalUriMethodInfo a signature where + overloadedMethod _ = webHistoryItemGetOriginalUri + -- method WebHistoryItem::get_title -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -391,8 +448,8 @@ webHistoryItemGetTitle :: (MonadIO m, WebHistoryItemK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webHistoryItemGetTitle _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_history_item_get_title _obj' @@ -401,11 +458,14 @@ touchManagedPtr _obj return result' +data WebHistoryItemGetTitleMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebHistoryItemK a) => MethodInfo WebHistoryItemGetTitleMethodInfo a signature where + overloadedMethod _ = webHistoryItemGetTitle + -- method WebHistoryItem::get_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -417,8 +477,8 @@ webHistoryItemGetUri :: (MonadIO m, WebHistoryItemK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webHistoryItemGetUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_history_item_get_uri _obj' @@ -427,11 +487,14 @@ touchManagedPtr _obj return result' +data WebHistoryItemGetUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebHistoryItemK a) => MethodInfo WebHistoryItemGetUriMethodInfo a signature where + overloadedMethod _ = webHistoryItemGetUri + -- method WebHistoryItem::set_alternate_title -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "title", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -444,9 +507,9 @@ webHistoryItemSetAlternateTitle :: (MonadIO m, WebHistoryItemK a) => - a -> -- _obj - T.Text -> -- title - m () + a -- _obj + -> T.Text -- title + -> m () -- result webHistoryItemSetAlternateTitle _obj title = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj title' <- textToCString title @@ -454,5 +517,9 @@ touchManagedPtr _obj freeMem title' return () + +data WebHistoryItemSetAlternateTitleMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, WebHistoryItemK a) => MethodInfo WebHistoryItemSetAlternateTitleMethodInfo a signature where + overloadedMethod _ = webHistoryItemSetAlternateTitle diff --git a/GI/WebKit/Objects/WebHistoryItem.hs-boot b/GI/WebKit/Objects/WebHistoryItem.hs-boot --- a/GI/WebKit/Objects/WebHistoryItem.hs-boot +++ b/GI/WebKit/Objects/WebHistoryItem.hs-boot @@ -16,3 +16,10 @@ data WebHistoryItemOriginalUriPropertyInfo data WebHistoryItemTitlePropertyInfo data WebHistoryItemUriPropertyInfo +data WebHistoryItemCopyMethodInfo +data WebHistoryItemGetAlternateTitleMethodInfo +data WebHistoryItemGetLastVisitedTimeMethodInfo +data WebHistoryItemGetOriginalUriMethodInfo +data WebHistoryItemGetTitleMethodInfo +data WebHistoryItemGetUriMethodInfo +data WebHistoryItemSetAlternateTitleMethodInfo diff --git a/GI/WebKit/Objects/WebInspector.hs b/GI/WebKit/Objects/WebInspector.hs --- a/GI/WebKit/Objects/WebInspector.hs +++ b/GI/WebKit/Objects/WebInspector.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,26 +18,32 @@ -- * Methods -- ** webInspectorClose + WebInspectorCloseMethodInfo , webInspectorClose , -- ** webInspectorGetInspectedUri + WebInspectorGetInspectedUriMethodInfo , webInspectorGetInspectedUri , -- ** webInspectorGetWebView + WebInspectorGetWebViewMethodInfo , webInspectorGetWebView , -- ** webInspectorInspectCoordinates + WebInspectorInspectCoordinatesMethodInfo, webInspectorInspectCoordinates , -- ** webInspectorInspectNode + WebInspectorInspectNodeMethodInfo , webInspectorInspectNode , -- ** webInspectorShow + WebInspectorShowMethodInfo , webInspectorShow , @@ -178,6 +185,45 @@ noWebInspector :: Maybe WebInspector noWebInspector = Nothing +type family ResolveWebInspectorMethod (t :: Symbol) (o :: *) :: * where + ResolveWebInspectorMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebInspectorMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebInspectorMethod "close" o = WebInspectorCloseMethodInfo + ResolveWebInspectorMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebInspectorMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebInspectorMethod "inspectCoordinates" o = WebInspectorInspectCoordinatesMethodInfo + ResolveWebInspectorMethod "inspectNode" o = WebInspectorInspectNodeMethodInfo + ResolveWebInspectorMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebInspectorMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebInspectorMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebInspectorMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebInspectorMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebInspectorMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebInspectorMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebInspectorMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebInspectorMethod "show" o = WebInspectorShowMethodInfo + ResolveWebInspectorMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebInspectorMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebInspectorMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebInspectorMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebInspectorMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebInspectorMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebInspectorMethod "getInspectedUri" o = WebInspectorGetInspectedUriMethodInfo + ResolveWebInspectorMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebInspectorMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebInspectorMethod "getWebView" o = WebInspectorGetWebViewMethodInfo + ResolveWebInspectorMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebInspectorMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebInspectorMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebInspectorMethod t WebInspector, MethodInfo info WebInspector p) => IsLabelProxy t (WebInspector -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebInspectorMethod t WebInspector, MethodInfo info WebInspector p) => IsLabel t (WebInspector -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- signal WebInspector::attach-window type WebInspectorAttachWindowCallback = IO Bool @@ -363,9 +409,9 @@ Ptr WebView -> Ptr () -> IO (Ptr WebView) -webInspectorInspectWebViewCallbackWrapper _cb _ web_view _ = do - web_view' <- (newObject WebView) web_view - result <- _cb web_view' +webInspectorInspectWebViewCallbackWrapper _cb _ webView _ = do + webView' <- (newObject WebView) webView + result <- _cb webView' let result' = unsafeManagedPtrCastPtr result return result' @@ -433,7 +479,7 @@ type AttrSetTypeConstraint WebInspectorInspectedUriPropertyInfo = (~) () type AttrBaseTypeConstraint WebInspectorInspectedUriPropertyInfo = WebInspectorK type AttrGetType WebInspectorInspectedUriPropertyInfo = T.Text - type AttrLabel WebInspectorInspectedUriPropertyInfo = "WebInspector::inspected-uri" + type AttrLabel WebInspectorInspectedUriPropertyInfo = "inspected-uri" attrGet _ = getWebInspectorInspectedUri attrSet _ = undefined attrConstruct _ = undefined @@ -457,7 +503,7 @@ type AttrSetTypeConstraint WebInspectorJavascriptProfilingEnabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebInspectorJavascriptProfilingEnabledPropertyInfo = WebInspectorK type AttrGetType WebInspectorJavascriptProfilingEnabledPropertyInfo = Bool - type AttrLabel WebInspectorJavascriptProfilingEnabledPropertyInfo = "WebInspector::javascript-profiling-enabled" + type AttrLabel WebInspectorJavascriptProfilingEnabledPropertyInfo = "javascript-profiling-enabled" attrGet _ = getWebInspectorJavascriptProfilingEnabled attrSet _ = setWebInspectorJavascriptProfilingEnabled attrConstruct _ = constructWebInspectorJavascriptProfilingEnabled @@ -481,7 +527,7 @@ type AttrSetTypeConstraint WebInspectorTimelineProfilingEnabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebInspectorTimelineProfilingEnabledPropertyInfo = WebInspectorK type AttrGetType WebInspectorTimelineProfilingEnabledPropertyInfo = Bool - type AttrLabel WebInspectorTimelineProfilingEnabledPropertyInfo = "WebInspector::timeline-profiling-enabled" + type AttrLabel WebInspectorTimelineProfilingEnabledPropertyInfo = "timeline-profiling-enabled" attrGet _ = getWebInspectorTimelineProfilingEnabled attrSet _ = setWebInspectorTimelineProfilingEnabled attrConstruct _ = constructWebInspectorTimelineProfilingEnabled @@ -499,13 +545,13 @@ type AttrSetTypeConstraint WebInspectorWebViewPropertyInfo = (~) () type AttrBaseTypeConstraint WebInspectorWebViewPropertyInfo = WebInspectorK type AttrGetType WebInspectorWebViewPropertyInfo = WebView - type AttrLabel WebInspectorWebViewPropertyInfo = "WebInspector::web-view" + type AttrLabel WebInspectorWebViewPropertyInfo = "web-view" attrGet _ = getWebInspectorWebView attrSet _ = undefined attrConstruct _ = undefined type instance AttributeList WebInspector = WebInspectorAttributeList -type WebInspectorAttributeList = ('[ '("inspected-uri", WebInspectorInspectedUriPropertyInfo), '("javascript-profiling-enabled", WebInspectorJavascriptProfilingEnabledPropertyInfo), '("timeline-profiling-enabled", WebInspectorTimelineProfilingEnabledPropertyInfo), '("web-view", WebInspectorWebViewPropertyInfo)] :: [(Symbol, *)]) +type WebInspectorAttributeList = ('[ '("inspectedUri", WebInspectorInspectedUriPropertyInfo), '("javascriptProfilingEnabled", WebInspectorJavascriptProfilingEnabledPropertyInfo), '("timelineProfilingEnabled", WebInspectorTimelineProfilingEnabledPropertyInfo), '("webView", WebInspectorWebViewPropertyInfo)] :: [(Symbol, *)]) data WebInspectorAttachWindowSignalInfo instance SignalInfo WebInspectorAttachWindowSignalInfo where @@ -538,13 +584,12 @@ connectSignal _ = connectWebInspectorShowWindow type instance SignalList WebInspector = WebInspectorSignalList -type WebInspectorSignalList = ('[ '("attach-window", WebInspectorAttachWindowSignalInfo), '("close-window", WebInspectorCloseWindowSignalInfo), '("detach-window", WebInspectorDetachWindowSignalInfo), '("finished", WebInspectorFinishedSignalInfo), '("inspect-web-view", WebInspectorInspectWebViewSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("show-window", WebInspectorShowWindowSignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebInspectorSignalList = ('[ '("attachWindow", WebInspectorAttachWindowSignalInfo), '("closeWindow", WebInspectorCloseWindowSignalInfo), '("detachWindow", WebInspectorDetachWindowSignalInfo), '("finished", WebInspectorFinishedSignalInfo), '("inspectWebView", WebInspectorInspectWebViewSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("showWindow", WebInspectorShowWindowSignalInfo)] :: [(Symbol, *)]) -- method WebInspector::close -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -556,19 +601,22 @@ webInspectorClose :: (MonadIO m, WebInspectorK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webInspectorClose _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_inspector_close _obj' touchManagedPtr _obj return () +data WebInspectorCloseMethodInfo +instance (signature ~ (m ()), MonadIO m, WebInspectorK a) => MethodInfo WebInspectorCloseMethodInfo a signature where + overloadedMethod _ = webInspectorClose + -- method WebInspector::get_inspected_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -580,8 +628,8 @@ webInspectorGetInspectedUri :: (MonadIO m, WebInspectorK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webInspectorGetInspectedUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_inspector_get_inspected_uri _obj' @@ -590,11 +638,14 @@ touchManagedPtr _obj return result' +data WebInspectorGetInspectedUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebInspectorK a) => MethodInfo WebInspectorGetInspectedUriMethodInfo a signature where + overloadedMethod _ = webInspectorGetInspectedUri + -- method WebInspector::get_web_view -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebView" -- throws : False -- Skip return : False @@ -606,8 +657,8 @@ webInspectorGetWebView :: (MonadIO m, WebInspectorK a) => - a -> -- _obj - m WebView + a -- _obj + -> m WebView -- result webInspectorGetWebView _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_inspector_get_web_view _obj' @@ -616,11 +667,14 @@ touchManagedPtr _obj return result' +data WebInspectorGetWebViewMethodInfo +instance (signature ~ (m WebView), MonadIO m, WebInspectorK a) => MethodInfo WebInspectorGetWebViewMethodInfo a signature where + overloadedMethod _ = webInspectorGetWebView + -- method WebInspector::inspect_coordinates -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "x", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "y", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -634,10 +688,10 @@ webInspectorInspectCoordinates :: (MonadIO m, WebInspectorK a) => - a -> -- _obj - Double -> -- x - Double -> -- y - m () + a -- _obj + -> Double -- x + -> Double -- y + -> m () -- result webInspectorInspectCoordinates _obj x y = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let x' = realToFrac x @@ -646,11 +700,14 @@ touchManagedPtr _obj return () +data WebInspectorInspectCoordinatesMethodInfo +instance (signature ~ (Double -> Double -> m ()), MonadIO m, WebInspectorK a) => MethodInfo WebInspectorInspectCoordinatesMethodInfo a signature where + overloadedMethod _ = webInspectorInspectCoordinates + -- method WebInspector::inspect_node -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "node", argType = TInterface "WebKit" "DOMNode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -663,9 +720,9 @@ webInspectorInspectNode :: (MonadIO m, WebInspectorK a, DOMNodeK b) => - a -> -- _obj - b -> -- node - m () + a -- _obj + -> b -- node + -> m () -- result webInspectorInspectNode _obj node = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let node' = unsafeManagedPtrCastPtr node @@ -674,11 +731,14 @@ touchManagedPtr node return () +data WebInspectorInspectNodeMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, WebInspectorK a, DOMNodeK b) => MethodInfo WebInspectorInspectNodeMethodInfo a signature where + overloadedMethod _ = webInspectorInspectNode + -- method WebInspector::show -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebInspector", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -690,12 +750,16 @@ webInspectorShow :: (MonadIO m, WebInspectorK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webInspectorShow _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_inspector_show _obj' touchManagedPtr _obj return () + +data WebInspectorShowMethodInfo +instance (signature ~ (m ()), MonadIO m, WebInspectorK a) => MethodInfo WebInspectorShowMethodInfo a signature where + overloadedMethod _ = webInspectorShow diff --git a/GI/WebKit/Objects/WebInspector.hs-boot b/GI/WebKit/Objects/WebInspector.hs-boot --- a/GI/WebKit/Objects/WebInspector.hs-boot +++ b/GI/WebKit/Objects/WebInspector.hs-boot @@ -21,3 +21,9 @@ data WebInspectorFinishedSignalInfo data WebInspectorInspectWebViewSignalInfo data WebInspectorShowWindowSignalInfo +data WebInspectorCloseMethodInfo +data WebInspectorGetInspectedUriMethodInfo +data WebInspectorGetWebViewMethodInfo +data WebInspectorInspectCoordinatesMethodInfo +data WebInspectorInspectNodeMethodInfo +data WebInspectorShowMethodInfo diff --git a/GI/WebKit/Objects/WebNavigationAction.hs b/GI/WebKit/Objects/WebNavigationAction.hs --- a/GI/WebKit/Objects/WebNavigationAction.hs +++ b/GI/WebKit/Objects/WebNavigationAction.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,30 +18,37 @@ -- * Methods -- ** webNavigationActionGetButton + WebNavigationActionGetButtonMethodInfo , webNavigationActionGetButton , -- ** webNavigationActionGetModifierState + WebNavigationActionGetModifierStateMethodInfo, webNavigationActionGetModifierState , -- ** webNavigationActionGetOriginalUri + WebNavigationActionGetOriginalUriMethodInfo, webNavigationActionGetOriginalUri , -- ** webNavigationActionGetReason + WebNavigationActionGetReasonMethodInfo , webNavigationActionGetReason , -- ** webNavigationActionGetTargetFrame + WebNavigationActionGetTargetFrameMethodInfo, webNavigationActionGetTargetFrame , -- ** webNavigationActionSetOriginalUri + WebNavigationActionSetOriginalUriMethodInfo, webNavigationActionSetOriginalUri , -- ** webNavigationActionSetReason + WebNavigationActionSetReasonMethodInfo , webNavigationActionSetReason , @@ -115,6 +123,46 @@ noWebNavigationAction :: Maybe WebNavigationAction noWebNavigationAction = Nothing +type family ResolveWebNavigationActionMethod (t :: Symbol) (o :: *) :: * where + ResolveWebNavigationActionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebNavigationActionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebNavigationActionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebNavigationActionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebNavigationActionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebNavigationActionMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebNavigationActionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebNavigationActionMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebNavigationActionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebNavigationActionMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebNavigationActionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebNavigationActionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebNavigationActionMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebNavigationActionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebNavigationActionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebNavigationActionMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebNavigationActionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebNavigationActionMethod "getButton" o = WebNavigationActionGetButtonMethodInfo + ResolveWebNavigationActionMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebNavigationActionMethod "getModifierState" o = WebNavigationActionGetModifierStateMethodInfo + ResolveWebNavigationActionMethod "getOriginalUri" o = WebNavigationActionGetOriginalUriMethodInfo + ResolveWebNavigationActionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebNavigationActionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebNavigationActionMethod "getReason" o = WebNavigationActionGetReasonMethodInfo + ResolveWebNavigationActionMethod "getTargetFrame" o = WebNavigationActionGetTargetFrameMethodInfo + ResolveWebNavigationActionMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebNavigationActionMethod "setOriginalUri" o = WebNavigationActionSetOriginalUriMethodInfo + ResolveWebNavigationActionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebNavigationActionMethod "setReason" o = WebNavigationActionSetReasonMethodInfo + ResolveWebNavigationActionMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebNavigationActionMethod t WebNavigationAction, MethodInfo info WebNavigationAction p) => IsLabelProxy t (WebNavigationAction -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebNavigationActionMethod t WebNavigationAction, MethodInfo info WebNavigationAction p) => IsLabel t (WebNavigationAction -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "button" -- Type: TBasicType TInt32 -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly] @@ -131,7 +179,7 @@ type AttrSetTypeConstraint WebNavigationActionButtonPropertyInfo = (~) Int32 type AttrBaseTypeConstraint WebNavigationActionButtonPropertyInfo = WebNavigationActionK type AttrGetType WebNavigationActionButtonPropertyInfo = Int32 - type AttrLabel WebNavigationActionButtonPropertyInfo = "WebNavigationAction::button" + type AttrLabel WebNavigationActionButtonPropertyInfo = "button" attrGet _ = getWebNavigationActionButton attrSet _ = undefined attrConstruct _ = constructWebNavigationActionButton @@ -152,7 +200,7 @@ type AttrSetTypeConstraint WebNavigationActionModifierStatePropertyInfo = (~) Int32 type AttrBaseTypeConstraint WebNavigationActionModifierStatePropertyInfo = WebNavigationActionK type AttrGetType WebNavigationActionModifierStatePropertyInfo = Int32 - type AttrLabel WebNavigationActionModifierStatePropertyInfo = "WebNavigationAction::modifier-state" + type AttrLabel WebNavigationActionModifierStatePropertyInfo = "modifier-state" attrGet _ = getWebNavigationActionModifierState attrSet _ = undefined attrConstruct _ = constructWebNavigationActionModifierState @@ -176,7 +224,7 @@ type AttrSetTypeConstraint WebNavigationActionOriginalUriPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebNavigationActionOriginalUriPropertyInfo = WebNavigationActionK type AttrGetType WebNavigationActionOriginalUriPropertyInfo = T.Text - type AttrLabel WebNavigationActionOriginalUriPropertyInfo = "WebNavigationAction::original-uri" + type AttrLabel WebNavigationActionOriginalUriPropertyInfo = "original-uri" attrGet _ = getWebNavigationActionOriginalUri attrSet _ = setWebNavigationActionOriginalUri attrConstruct _ = constructWebNavigationActionOriginalUri @@ -200,7 +248,7 @@ type AttrSetTypeConstraint WebNavigationActionReasonPropertyInfo = (~) WebNavigationReason type AttrBaseTypeConstraint WebNavigationActionReasonPropertyInfo = WebNavigationActionK type AttrGetType WebNavigationActionReasonPropertyInfo = WebNavigationReason - type AttrLabel WebNavigationActionReasonPropertyInfo = "WebNavigationAction::reason" + type AttrLabel WebNavigationActionReasonPropertyInfo = "reason" attrGet _ = getWebNavigationActionReason attrSet _ = setWebNavigationActionReason attrConstruct _ = constructWebNavigationActionReason @@ -221,22 +269,21 @@ type AttrSetTypeConstraint WebNavigationActionTargetFramePropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebNavigationActionTargetFramePropertyInfo = WebNavigationActionK type AttrGetType WebNavigationActionTargetFramePropertyInfo = T.Text - type AttrLabel WebNavigationActionTargetFramePropertyInfo = "WebNavigationAction::target-frame" + type AttrLabel WebNavigationActionTargetFramePropertyInfo = "target-frame" attrGet _ = getWebNavigationActionTargetFrame attrSet _ = undefined attrConstruct _ = constructWebNavigationActionTargetFrame type instance AttributeList WebNavigationAction = WebNavigationActionAttributeList -type WebNavigationActionAttributeList = ('[ '("button", WebNavigationActionButtonPropertyInfo), '("modifier-state", WebNavigationActionModifierStatePropertyInfo), '("original-uri", WebNavigationActionOriginalUriPropertyInfo), '("reason", WebNavigationActionReasonPropertyInfo), '("target-frame", WebNavigationActionTargetFramePropertyInfo)] :: [(Symbol, *)]) +type WebNavigationActionAttributeList = ('[ '("button", WebNavigationActionButtonPropertyInfo), '("modifierState", WebNavigationActionModifierStatePropertyInfo), '("originalUri", WebNavigationActionOriginalUriPropertyInfo), '("reason", WebNavigationActionReasonPropertyInfo), '("targetFrame", WebNavigationActionTargetFramePropertyInfo)] :: [(Symbol, *)]) type instance SignalList WebNavigationAction = WebNavigationActionSignalList -type WebNavigationActionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebNavigationActionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method WebNavigationAction::get_button -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt32 -- throws : False -- Skip return : False @@ -248,19 +295,22 @@ webNavigationActionGetButton :: (MonadIO m, WebNavigationActionK a) => - a -> -- _obj - m Int32 + a -- _obj + -> m Int32 -- result webNavigationActionGetButton _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_navigation_action_get_button _obj' touchManagedPtr _obj return result +data WebNavigationActionGetButtonMethodInfo +instance (signature ~ (m Int32), MonadIO m, WebNavigationActionK a) => MethodInfo WebNavigationActionGetButtonMethodInfo a signature where + overloadedMethod _ = webNavigationActionGetButton + -- method WebNavigationAction::get_modifier_state -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TInt32 -- throws : False -- Skip return : False @@ -272,19 +322,22 @@ webNavigationActionGetModifierState :: (MonadIO m, WebNavigationActionK a) => - a -> -- _obj - m Int32 + a -- _obj + -> m Int32 -- result webNavigationActionGetModifierState _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_navigation_action_get_modifier_state _obj' touchManagedPtr _obj return result +data WebNavigationActionGetModifierStateMethodInfo +instance (signature ~ (m Int32), MonadIO m, WebNavigationActionK a) => MethodInfo WebNavigationActionGetModifierStateMethodInfo a signature where + overloadedMethod _ = webNavigationActionGetModifierState + -- method WebNavigationAction::get_original_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -296,8 +349,8 @@ webNavigationActionGetOriginalUri :: (MonadIO m, WebNavigationActionK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webNavigationActionGetOriginalUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_navigation_action_get_original_uri _obj' @@ -306,11 +359,14 @@ touchManagedPtr _obj return result' +data WebNavigationActionGetOriginalUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebNavigationActionK a) => MethodInfo WebNavigationActionGetOriginalUriMethodInfo a signature where + overloadedMethod _ = webNavigationActionGetOriginalUri + -- method WebNavigationAction::get_reason -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebNavigationReason" -- throws : False -- Skip return : False @@ -322,8 +378,8 @@ webNavigationActionGetReason :: (MonadIO m, WebNavigationActionK a) => - a -> -- _obj - m WebNavigationReason + a -- _obj + -> m WebNavigationReason -- result webNavigationActionGetReason _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_navigation_action_get_reason _obj' @@ -331,11 +387,14 @@ touchManagedPtr _obj return result' +data WebNavigationActionGetReasonMethodInfo +instance (signature ~ (m WebNavigationReason), MonadIO m, WebNavigationActionK a) => MethodInfo WebNavigationActionGetReasonMethodInfo a signature where + overloadedMethod _ = webNavigationActionGetReason + -- method WebNavigationAction::get_target_frame -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -347,8 +406,8 @@ webNavigationActionGetTargetFrame :: (MonadIO m, WebNavigationActionK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webNavigationActionGetTargetFrame _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_navigation_action_get_target_frame _obj' @@ -357,11 +416,14 @@ touchManagedPtr _obj return result' +data WebNavigationActionGetTargetFrameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebNavigationActionK a) => MethodInfo WebNavigationActionGetTargetFrameMethodInfo a signature where + overloadedMethod _ = webNavigationActionGetTargetFrame + -- method WebNavigationAction::set_original_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "originalUri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "originalUri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "originalUri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -374,9 +436,9 @@ webNavigationActionSetOriginalUri :: (MonadIO m, WebNavigationActionK a) => - a -> -- _obj - T.Text -> -- originalUri - m () + a -- _obj + -> T.Text -- originalUri + -> m () -- result webNavigationActionSetOriginalUri _obj originalUri = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj originalUri' <- textToCString originalUri @@ -385,11 +447,14 @@ freeMem originalUri' return () +data WebNavigationActionSetOriginalUriMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, WebNavigationActionK a) => MethodInfo WebNavigationActionSetOriginalUriMethodInfo a signature where + overloadedMethod _ = webNavigationActionSetOriginalUri + -- method WebNavigationAction::set_reason -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "reason", argType = TInterface "WebKit" "WebNavigationReason", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "reason", argType = TInterface "WebKit" "WebNavigationReason", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebNavigationAction", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "reason", argType = TInterface "WebKit" "WebNavigationReason", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -402,14 +467,18 @@ webNavigationActionSetReason :: (MonadIO m, WebNavigationActionK a) => - a -> -- _obj - WebNavigationReason -> -- reason - m () + a -- _obj + -> WebNavigationReason -- reason + -> m () -- result webNavigationActionSetReason _obj reason = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let reason' = (fromIntegral . fromEnum) reason webkit_web_navigation_action_set_reason _obj' reason' touchManagedPtr _obj return () + +data WebNavigationActionSetReasonMethodInfo +instance (signature ~ (WebNavigationReason -> m ()), MonadIO m, WebNavigationActionK a) => MethodInfo WebNavigationActionSetReasonMethodInfo a signature where + overloadedMethod _ = webNavigationActionSetReason diff --git a/GI/WebKit/Objects/WebNavigationAction.hs-boot b/GI/WebKit/Objects/WebNavigationAction.hs-boot --- a/GI/WebKit/Objects/WebNavigationAction.hs-boot +++ b/GI/WebKit/Objects/WebNavigationAction.hs-boot @@ -16,3 +16,10 @@ data WebNavigationActionOriginalUriPropertyInfo data WebNavigationActionReasonPropertyInfo data WebNavigationActionTargetFramePropertyInfo +data WebNavigationActionGetButtonMethodInfo +data WebNavigationActionGetModifierStateMethodInfo +data WebNavigationActionGetOriginalUriMethodInfo +data WebNavigationActionGetReasonMethodInfo +data WebNavigationActionGetTargetFrameMethodInfo +data WebNavigationActionSetOriginalUriMethodInfo +data WebNavigationActionSetReasonMethodInfo diff --git a/GI/WebKit/Objects/WebPlugin.hs b/GI/WebKit/Objects/WebPlugin.hs --- a/GI/WebKit/Objects/WebPlugin.hs +++ b/GI/WebKit/Objects/WebPlugin.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,22 +18,27 @@ -- * Methods -- ** webPluginGetDescription + WebPluginGetDescriptionMethodInfo , webPluginGetDescription , -- ** webPluginGetEnabled + WebPluginGetEnabledMethodInfo , webPluginGetEnabled , -- ** webPluginGetName + WebPluginGetNameMethodInfo , webPluginGetName , -- ** webPluginGetPath + WebPluginGetPathMethodInfo , webPluginGetPath , -- ** webPluginSetEnabled + WebPluginSetEnabledMethodInfo , webPluginSetEnabled , @@ -82,6 +88,44 @@ noWebPlugin :: Maybe WebPlugin noWebPlugin = Nothing +type family ResolveWebPluginMethod (t :: Symbol) (o :: *) :: * where + ResolveWebPluginMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebPluginMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebPluginMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebPluginMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebPluginMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebPluginMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebPluginMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebPluginMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebPluginMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebPluginMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebPluginMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebPluginMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebPluginMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebPluginMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebPluginMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebPluginMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebPluginMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebPluginMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebPluginMethod "getDescription" o = WebPluginGetDescriptionMethodInfo + ResolveWebPluginMethod "getEnabled" o = WebPluginGetEnabledMethodInfo + ResolveWebPluginMethod "getName" o = WebPluginGetNameMethodInfo + ResolveWebPluginMethod "getPath" o = WebPluginGetPathMethodInfo + ResolveWebPluginMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebPluginMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebPluginMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebPluginMethod "setEnabled" o = WebPluginSetEnabledMethodInfo + ResolveWebPluginMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebPluginMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebPluginMethod t WebPlugin, MethodInfo info WebPlugin p) => IsLabelProxy t (WebPlugin -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebPluginMethod t WebPlugin, MethodInfo info WebPlugin p) => IsLabel t (WebPlugin -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "enabled" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable] @@ -101,7 +145,7 @@ type AttrSetTypeConstraint WebPluginEnabledPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebPluginEnabledPropertyInfo = WebPluginK type AttrGetType WebPluginEnabledPropertyInfo = Bool - type AttrLabel WebPluginEnabledPropertyInfo = "WebPlugin::enabled" + type AttrLabel WebPluginEnabledPropertyInfo = "enabled" attrGet _ = getWebPluginEnabled attrSet _ = setWebPluginEnabled attrConstruct _ = constructWebPluginEnabled @@ -110,13 +154,12 @@ type WebPluginAttributeList = ('[ '("enabled", WebPluginEnabledPropertyInfo)] :: [(Symbol, *)]) type instance SignalList WebPlugin = WebPluginSignalList -type WebPluginSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebPluginSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method WebPlugin::get_description -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -128,8 +171,8 @@ webPluginGetDescription :: (MonadIO m, WebPluginK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webPluginGetDescription _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_plugin_get_description _obj' @@ -138,11 +181,14 @@ touchManagedPtr _obj return result' +data WebPluginGetDescriptionMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebPluginK a) => MethodInfo WebPluginGetDescriptionMethodInfo a signature where + overloadedMethod _ = webPluginGetDescription + -- method WebPlugin::get_enabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -154,8 +200,8 @@ webPluginGetEnabled :: (MonadIO m, WebPluginK a) => - a -> -- _obj - m Bool + a -- _obj + -> m Bool -- result webPluginGetEnabled _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_plugin_get_enabled _obj' @@ -163,11 +209,14 @@ touchManagedPtr _obj return result' +data WebPluginGetEnabledMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebPluginK a) => MethodInfo WebPluginGetEnabledMethodInfo a signature where + overloadedMethod _ = webPluginGetEnabled + -- method WebPlugin::get_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -179,8 +228,8 @@ webPluginGetName :: (MonadIO m, WebPluginK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webPluginGetName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_plugin_get_name _obj' @@ -189,11 +238,14 @@ touchManagedPtr _obj return result' +data WebPluginGetNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebPluginK a) => MethodInfo WebPluginGetNameMethodInfo a signature where + overloadedMethod _ = webPluginGetName + -- method WebPlugin::get_path -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -205,8 +257,8 @@ webPluginGetPath :: (MonadIO m, WebPluginK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webPluginGetPath _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_plugin_get_path _obj' @@ -215,11 +267,14 @@ touchManagedPtr _obj return result' +data WebPluginGetPathMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebPluginK a) => MethodInfo WebPluginGetPathMethodInfo a signature where + overloadedMethod _ = webPluginGetPath + -- method WebPlugin::set_enabled -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPlugin", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -232,14 +287,18 @@ webPluginSetEnabled :: (MonadIO m, WebPluginK a) => - a -> -- _obj - Bool -> -- enabled - m () + a -- _obj + -> Bool -- enabled + -> m () -- result webPluginSetEnabled _obj enabled = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let enabled' = (fromIntegral . fromEnum) enabled webkit_web_plugin_set_enabled _obj' enabled' touchManagedPtr _obj return () + +data WebPluginSetEnabledMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, WebPluginK a) => MethodInfo WebPluginSetEnabledMethodInfo a signature where + overloadedMethod _ = webPluginSetEnabled diff --git a/GI/WebKit/Objects/WebPlugin.hs-boot b/GI/WebKit/Objects/WebPlugin.hs-boot --- a/GI/WebKit/Objects/WebPlugin.hs-boot +++ b/GI/WebKit/Objects/WebPlugin.hs-boot @@ -12,3 +12,8 @@ class GObject o => WebPluginK o instance (GObject o, IsDescendantOf WebPlugin o) => WebPluginK o data WebPluginEnabledPropertyInfo +data WebPluginGetDescriptionMethodInfo +data WebPluginGetEnabledMethodInfo +data WebPluginGetNameMethodInfo +data WebPluginGetPathMethodInfo +data WebPluginSetEnabledMethodInfo diff --git a/GI/WebKit/Objects/WebPluginDatabase.hs b/GI/WebKit/Objects/WebPluginDatabase.hs --- a/GI/WebKit/Objects/WebPluginDatabase.hs +++ b/GI/WebKit/Objects/WebPluginDatabase.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** webPluginDatabaseGetPluginForMimetype + WebPluginDatabaseGetPluginForMimetypeMethodInfo, webPluginDatabaseGetPluginForMimetype , -- ** webPluginDatabaseGetPlugins + WebPluginDatabaseGetPluginsMethodInfo , webPluginDatabaseGetPlugins , @@ -29,6 +32,7 @@ -- ** webPluginDatabaseRefresh + WebPluginDatabaseRefreshMethodInfo , webPluginDatabaseRefresh , @@ -68,17 +72,52 @@ noWebPluginDatabase :: Maybe WebPluginDatabase noWebPluginDatabase = Nothing +type family ResolveWebPluginDatabaseMethod (t :: Symbol) (o :: *) :: * where + ResolveWebPluginDatabaseMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebPluginDatabaseMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebPluginDatabaseMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebPluginDatabaseMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebPluginDatabaseMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebPluginDatabaseMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebPluginDatabaseMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebPluginDatabaseMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebPluginDatabaseMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebPluginDatabaseMethod "refresh" o = WebPluginDatabaseRefreshMethodInfo + ResolveWebPluginDatabaseMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebPluginDatabaseMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebPluginDatabaseMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebPluginDatabaseMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebPluginDatabaseMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebPluginDatabaseMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebPluginDatabaseMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebPluginDatabaseMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebPluginDatabaseMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebPluginDatabaseMethod "getPluginForMimetype" o = WebPluginDatabaseGetPluginForMimetypeMethodInfo + ResolveWebPluginDatabaseMethod "getPlugins" o = WebPluginDatabaseGetPluginsMethodInfo + ResolveWebPluginDatabaseMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebPluginDatabaseMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebPluginDatabaseMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebPluginDatabaseMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebPluginDatabaseMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebPluginDatabaseMethod t WebPluginDatabase, MethodInfo info WebPluginDatabase p) => IsLabelProxy t (WebPluginDatabase -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebPluginDatabaseMethod t WebPluginDatabase, MethodInfo info WebPluginDatabase p) => IsLabel t (WebPluginDatabase -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList WebPluginDatabase = WebPluginDatabaseAttributeList type WebPluginDatabaseAttributeList = ('[ ] :: [(Symbol, *)]) type instance SignalList WebPluginDatabase = WebPluginDatabaseSignalList -type WebPluginDatabaseSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebPluginDatabaseSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method WebPluginDatabase::get_plugin_for_mimetype -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPluginDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebPluginDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPluginDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebPlugin" -- throws : False -- Skip return : False @@ -91,24 +130,27 @@ webPluginDatabaseGetPluginForMimetype :: (MonadIO m, WebPluginDatabaseK a) => - a -> -- _obj - T.Text -> -- mime_type - m WebPlugin -webPluginDatabaseGetPluginForMimetype _obj mime_type = liftIO $ do + a -- _obj + -> T.Text -- mimeType + -> m WebPlugin -- result +webPluginDatabaseGetPluginForMimetype _obj mimeType = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj - mime_type' <- textToCString mime_type - result <- webkit_web_plugin_database_get_plugin_for_mimetype _obj' mime_type' + mimeType' <- textToCString mimeType + result <- webkit_web_plugin_database_get_plugin_for_mimetype _obj' mimeType' checkUnexpectedReturnNULL "webkit_web_plugin_database_get_plugin_for_mimetype" result result' <- (wrapObject WebPlugin) result touchManagedPtr _obj - freeMem mime_type' + freeMem mimeType' return result' +data WebPluginDatabaseGetPluginForMimetypeMethodInfo +instance (signature ~ (T.Text -> m WebPlugin), MonadIO m, WebPluginDatabaseK a) => MethodInfo WebPluginDatabaseGetPluginForMimetypeMethodInfo a signature where + overloadedMethod _ = webPluginDatabaseGetPluginForMimetype + -- method WebPluginDatabase::get_plugins -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPluginDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebPluginDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPluginDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TGSList (TInterface "WebKit" "WebPlugin") -- throws : False -- Skip return : False @@ -120,8 +162,8 @@ webPluginDatabaseGetPlugins :: (MonadIO m, WebPluginDatabaseK a) => - a -> -- _obj - m [WebPlugin] + a -- _obj + -> m [WebPlugin] -- result webPluginDatabaseGetPlugins _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_plugin_database_get_plugins _obj' @@ -132,11 +174,14 @@ touchManagedPtr _obj return result'' +data WebPluginDatabaseGetPluginsMethodInfo +instance (signature ~ (m [WebPlugin]), MonadIO m, WebPluginDatabaseK a) => MethodInfo WebPluginDatabaseGetPluginsMethodInfo a signature where + overloadedMethod _ = webPluginDatabaseGetPlugins + -- method WebPluginDatabase::refresh -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPluginDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebPluginDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPluginDatabase", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -148,19 +193,22 @@ webPluginDatabaseRefresh :: (MonadIO m, WebPluginDatabaseK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webPluginDatabaseRefresh _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_plugin_database_refresh _obj' touchManagedPtr _obj return () +data WebPluginDatabaseRefreshMethodInfo +instance (signature ~ (m ()), MonadIO m, WebPluginDatabaseK a) => MethodInfo WebPluginDatabaseRefreshMethodInfo a signature where + overloadedMethod _ = webPluginDatabaseRefresh + -- method WebPluginDatabase::plugins_list_free -- method type : MemberFunction --- Args : [Arg {argName = "list", argType = TGSList (TInterface "WebKit" "WebPlugin"), direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "list", argType = TGSList (TInterface "WebKit" "WebPlugin"), direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "list", argType = TGSList (TInterface "WebKit" "WebPlugin"), direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -172,8 +220,8 @@ webPluginDatabasePluginsListFree :: (MonadIO m, WebPluginK a) => - [a] -> -- list - m () + [a] -- list + -> m () -- result webPluginDatabasePluginsListFree list = liftIO $ do let list' = map unsafeManagedPtrCastPtr list list'' <- packGSList list' diff --git a/GI/WebKit/Objects/WebPluginDatabase.hs-boot b/GI/WebKit/Objects/WebPluginDatabase.hs-boot --- a/GI/WebKit/Objects/WebPluginDatabase.hs-boot +++ b/GI/WebKit/Objects/WebPluginDatabase.hs-boot @@ -11,3 +11,6 @@ instance GObject WebPluginDatabase where class GObject o => WebPluginDatabaseK o instance (GObject o, IsDescendantOf WebPluginDatabase o) => WebPluginDatabaseK o +data WebPluginDatabaseGetPluginForMimetypeMethodInfo +data WebPluginDatabaseGetPluginsMethodInfo +data WebPluginDatabaseRefreshMethodInfo diff --git a/GI/WebKit/Objects/WebPolicyDecision.hs b/GI/WebKit/Objects/WebPolicyDecision.hs --- a/GI/WebKit/Objects/WebPolicyDecision.hs +++ b/GI/WebKit/Objects/WebPolicyDecision.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,14 +18,17 @@ -- * Methods -- ** webPolicyDecisionDownload + WebPolicyDecisionDownloadMethodInfo , webPolicyDecisionDownload , -- ** webPolicyDecisionIgnore + WebPolicyDecisionIgnoreMethodInfo , webPolicyDecisionIgnore , -- ** webPolicyDecisionUse + WebPolicyDecisionUseMethodInfo , webPolicyDecisionUse , @@ -64,17 +68,52 @@ noWebPolicyDecision :: Maybe WebPolicyDecision noWebPolicyDecision = Nothing +type family ResolveWebPolicyDecisionMethod (t :: Symbol) (o :: *) :: * where + ResolveWebPolicyDecisionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebPolicyDecisionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebPolicyDecisionMethod "download" o = WebPolicyDecisionDownloadMethodInfo + ResolveWebPolicyDecisionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebPolicyDecisionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebPolicyDecisionMethod "ignore" o = WebPolicyDecisionIgnoreMethodInfo + ResolveWebPolicyDecisionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebPolicyDecisionMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebPolicyDecisionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebPolicyDecisionMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebPolicyDecisionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebPolicyDecisionMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebPolicyDecisionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebPolicyDecisionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebPolicyDecisionMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebPolicyDecisionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebPolicyDecisionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebPolicyDecisionMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebPolicyDecisionMethod "use" o = WebPolicyDecisionUseMethodInfo + ResolveWebPolicyDecisionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebPolicyDecisionMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebPolicyDecisionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebPolicyDecisionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebPolicyDecisionMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebPolicyDecisionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebPolicyDecisionMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebPolicyDecisionMethod t WebPolicyDecision, MethodInfo info WebPolicyDecision p) => IsLabelProxy t (WebPolicyDecision -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebPolicyDecisionMethod t WebPolicyDecision, MethodInfo info WebPolicyDecision p) => IsLabel t (WebPolicyDecision -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + type instance AttributeList WebPolicyDecision = WebPolicyDecisionAttributeList type WebPolicyDecisionAttributeList = ('[ ] :: [(Symbol, *)]) type instance SignalList WebPolicyDecision = WebPolicyDecisionSignalList -type WebPolicyDecisionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebPolicyDecisionSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method WebPolicyDecision::download -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -86,19 +125,22 @@ webPolicyDecisionDownload :: (MonadIO m, WebPolicyDecisionK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webPolicyDecisionDownload _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_policy_decision_download _obj' touchManagedPtr _obj return () +data WebPolicyDecisionDownloadMethodInfo +instance (signature ~ (m ()), MonadIO m, WebPolicyDecisionK a) => MethodInfo WebPolicyDecisionDownloadMethodInfo a signature where + overloadedMethod _ = webPolicyDecisionDownload + -- method WebPolicyDecision::ignore -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -110,19 +152,22 @@ webPolicyDecisionIgnore :: (MonadIO m, WebPolicyDecisionK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webPolicyDecisionIgnore _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_policy_decision_ignore _obj' touchManagedPtr _obj return () +data WebPolicyDecisionIgnoreMethodInfo +instance (signature ~ (m ()), MonadIO m, WebPolicyDecisionK a) => MethodInfo WebPolicyDecisionIgnoreMethodInfo a signature where + overloadedMethod _ = webPolicyDecisionIgnore + -- method WebPolicyDecision::use -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebPolicyDecision", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TVoid -- throws : False -- Skip return : False @@ -134,12 +179,16 @@ webPolicyDecisionUse :: (MonadIO m, WebPolicyDecisionK a) => - a -> -- _obj - m () + a -- _obj + -> m () -- result webPolicyDecisionUse _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj webkit_web_policy_decision_use _obj' touchManagedPtr _obj return () + +data WebPolicyDecisionUseMethodInfo +instance (signature ~ (m ()), MonadIO m, WebPolicyDecisionK a) => MethodInfo WebPolicyDecisionUseMethodInfo a signature where + overloadedMethod _ = webPolicyDecisionUse diff --git a/GI/WebKit/Objects/WebPolicyDecision.hs-boot b/GI/WebKit/Objects/WebPolicyDecision.hs-boot --- a/GI/WebKit/Objects/WebPolicyDecision.hs-boot +++ b/GI/WebKit/Objects/WebPolicyDecision.hs-boot @@ -11,3 +11,6 @@ instance GObject WebPolicyDecision where class GObject o => WebPolicyDecisionK o instance (GObject o, IsDescendantOf WebPolicyDecision o) => WebPolicyDecisionK o +data WebPolicyDecisionDownloadMethodInfo +data WebPolicyDecisionIgnoreMethodInfo +data WebPolicyDecisionUseMethodInfo diff --git a/GI/WebKit/Objects/WebResource.hs b/GI/WebKit/Objects/WebResource.hs --- a/GI/WebKit/Objects/WebResource.hs +++ b/GI/WebKit/Objects/WebResource.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,22 +18,27 @@ -- * Methods -- ** webResourceGetData + WebResourceGetDataMethodInfo , webResourceGetData , -- ** webResourceGetEncoding + WebResourceGetEncodingMethodInfo , webResourceGetEncoding , -- ** webResourceGetFrameName + WebResourceGetFrameNameMethodInfo , webResourceGetFrameName , -- ** webResourceGetMimeType + WebResourceGetMimeTypeMethodInfo , webResourceGetMimeType , -- ** webResourceGetUri + WebResourceGetUriMethodInfo , webResourceGetUri , @@ -152,6 +158,42 @@ noWebResource :: Maybe WebResource noWebResource = Nothing +type family ResolveWebResourceMethod (t :: Symbol) (o :: *) :: * where + ResolveWebResourceMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebResourceMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebResourceMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebResourceMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebResourceMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebResourceMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebResourceMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebResourceMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebResourceMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebResourceMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebResourceMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebResourceMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebResourceMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebResourceMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebResourceMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebResourceMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebResourceMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebResourceMethod "getEncoding" o = WebResourceGetEncodingMethodInfo + ResolveWebResourceMethod "getFrameName" o = WebResourceGetFrameNameMethodInfo + ResolveWebResourceMethod "getMimeType" o = WebResourceGetMimeTypeMethodInfo + ResolveWebResourceMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebResourceMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebResourceMethod "getUri" o = WebResourceGetUriMethodInfo + ResolveWebResourceMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebResourceMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebResourceMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebResourceMethod t WebResource, MethodInfo info WebResource p) => IsLabelProxy t (WebResource -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebResourceMethod t WebResource, MethodInfo info WebResource p) => IsLabel t (WebResource -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- signal WebResource::content-length-received type WebResourceContentLengthReceivedCallback = Int32 -> @@ -179,8 +221,8 @@ Int32 -> Ptr () -> IO () -webResourceContentLengthReceivedCallbackWrapper _cb _ length_received _ = do - _cb length_received +webResourceContentLengthReceivedCallbackWrapper _cb _ lengthReceived _ = do + _cb lengthReceived onWebResourceContentLengthReceived :: (GObject a, MonadIO m) => a -> WebResourceContentLengthReceivedCallback -> m SignalHandlerId onWebResourceContentLengthReceived obj cb = liftIO $ connectWebResourceContentLengthReceived obj cb SignalConnectBefore @@ -327,7 +369,7 @@ type AttrSetTypeConstraint WebResourceEncodingPropertyInfo = (~) () type AttrBaseTypeConstraint WebResourceEncodingPropertyInfo = WebResourceK type AttrGetType WebResourceEncodingPropertyInfo = T.Text - type AttrLabel WebResourceEncodingPropertyInfo = "WebResource::encoding" + type AttrLabel WebResourceEncodingPropertyInfo = "encoding" attrGet _ = getWebResourceEncoding attrSet _ = undefined attrConstruct _ = undefined @@ -345,7 +387,7 @@ type AttrSetTypeConstraint WebResourceFrameNamePropertyInfo = (~) () type AttrBaseTypeConstraint WebResourceFrameNamePropertyInfo = WebResourceK type AttrGetType WebResourceFrameNamePropertyInfo = T.Text - type AttrLabel WebResourceFrameNamePropertyInfo = "WebResource::frame-name" + type AttrLabel WebResourceFrameNamePropertyInfo = "frame-name" attrGet _ = getWebResourceFrameName attrSet _ = undefined attrConstruct _ = undefined @@ -363,7 +405,7 @@ type AttrSetTypeConstraint WebResourceMimeTypePropertyInfo = (~) () type AttrBaseTypeConstraint WebResourceMimeTypePropertyInfo = WebResourceK type AttrGetType WebResourceMimeTypePropertyInfo = T.Text - type AttrLabel WebResourceMimeTypePropertyInfo = "WebResource::mime-type" + type AttrLabel WebResourceMimeTypePropertyInfo = "mime-type" attrGet _ = getWebResourceMimeType attrSet _ = undefined attrConstruct _ = undefined @@ -384,13 +426,13 @@ type AttrSetTypeConstraint WebResourceUriPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebResourceUriPropertyInfo = WebResourceK type AttrGetType WebResourceUriPropertyInfo = T.Text - type AttrLabel WebResourceUriPropertyInfo = "WebResource::uri" + type AttrLabel WebResourceUriPropertyInfo = "uri" attrGet _ = getWebResourceUri attrSet _ = undefined attrConstruct _ = constructWebResourceUri type instance AttributeList WebResource = WebResourceAttributeList -type WebResourceAttributeList = ('[ '("encoding", WebResourceEncodingPropertyInfo), '("frame-name", WebResourceFrameNamePropertyInfo), '("mime-type", WebResourceMimeTypePropertyInfo), '("uri", WebResourceUriPropertyInfo)] :: [(Symbol, *)]) +type WebResourceAttributeList = ('[ '("encoding", WebResourceEncodingPropertyInfo), '("frameName", WebResourceFrameNamePropertyInfo), '("mimeType", WebResourceMimeTypePropertyInfo), '("uri", WebResourceUriPropertyInfo)] :: [(Symbol, *)]) data WebResourceContentLengthReceivedSignalInfo instance SignalInfo WebResourceContentLengthReceivedSignalInfo where @@ -413,13 +455,12 @@ connectSignal _ = connectWebResourceResponseReceived type instance SignalList WebResource = WebResourceSignalList -type WebResourceSignalList = ('[ '("content-length-received", WebResourceContentLengthReceivedSignalInfo), '("load-failed", WebResourceLoadFailedSignalInfo), '("load-finished", WebResourceLoadFinishedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("response-received", WebResourceResponseReceivedSignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebResourceSignalList = ('[ '("contentLengthReceived", WebResourceContentLengthReceivedSignalInfo), '("loadFailed", WebResourceLoadFailedSignalInfo), '("loadFinished", WebResourceLoadFinishedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("responseReceived", WebResourceResponseReceivedSignalInfo)] :: [(Symbol, *)]) -- method WebResource::new -- method type : Constructor --- Args : [Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "size", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "frame_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "size", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "frame_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "data", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "size", argType = TBasicType TInt64, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "frame_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebResource" -- throws : False -- Skip return : False @@ -436,34 +477,33 @@ webResourceNew :: (MonadIO m) => - T.Text -> -- data - Int64 -> -- size - T.Text -> -- uri - T.Text -> -- mime_type - T.Text -> -- encoding - T.Text -> -- frame_name - m WebResource -webResourceNew data_ size uri mime_type encoding frame_name = liftIO $ do + T.Text -- data_ + -> Int64 -- size + -> T.Text -- uri + -> T.Text -- mimeType + -> T.Text -- encoding + -> T.Text -- frameName + -> m WebResource -- result +webResourceNew data_ size uri mimeType encoding frameName = liftIO $ do data_' <- textToCString data_ uri' <- textToCString uri - mime_type' <- textToCString mime_type + mimeType' <- textToCString mimeType encoding' <- textToCString encoding - frame_name' <- textToCString frame_name - result <- webkit_web_resource_new data_' size uri' mime_type' encoding' frame_name' + frameName' <- textToCString frameName + result <- webkit_web_resource_new data_' size uri' mimeType' encoding' frameName' checkUnexpectedReturnNULL "webkit_web_resource_new" result result' <- (wrapObject WebResource) result freeMem data_' freeMem uri' - freeMem mime_type' + freeMem mimeType' freeMem encoding' - freeMem frame_name' + freeMem frameName' return result' -- method WebResource::get_data -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "GLib" "String" -- throws : False -- Skip return : False @@ -475,8 +515,8 @@ webResourceGetData :: (MonadIO m, WebResourceK a) => - a -> -- _obj - m GLib.String + a -- _obj + -> m GLib.String -- result webResourceGetData _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_resource_get_data _obj' @@ -485,11 +525,14 @@ touchManagedPtr _obj return result' +data WebResourceGetDataMethodInfo +instance (signature ~ (m GLib.String), MonadIO m, WebResourceK a) => MethodInfo WebResourceGetDataMethodInfo a signature where + overloadedMethod _ = webResourceGetData + -- method WebResource::get_encoding -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -501,8 +544,8 @@ webResourceGetEncoding :: (MonadIO m, WebResourceK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webResourceGetEncoding _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_resource_get_encoding _obj' @@ -511,11 +554,14 @@ touchManagedPtr _obj return result' +data WebResourceGetEncodingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebResourceK a) => MethodInfo WebResourceGetEncodingMethodInfo a signature where + overloadedMethod _ = webResourceGetEncoding + -- method WebResource::get_frame_name -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -527,8 +573,8 @@ webResourceGetFrameName :: (MonadIO m, WebResourceK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webResourceGetFrameName _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_resource_get_frame_name _obj' @@ -537,11 +583,14 @@ touchManagedPtr _obj return result' +data WebResourceGetFrameNameMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebResourceK a) => MethodInfo WebResourceGetFrameNameMethodInfo a signature where + overloadedMethod _ = webResourceGetFrameName + -- method WebResource::get_mime_type -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -553,8 +602,8 @@ webResourceGetMimeType :: (MonadIO m, WebResourceK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webResourceGetMimeType _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_resource_get_mime_type _obj' @@ -563,11 +612,14 @@ touchManagedPtr _obj return result' +data WebResourceGetMimeTypeMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebResourceK a) => MethodInfo WebResourceGetMimeTypeMethodInfo a signature where + overloadedMethod _ = webResourceGetMimeType + -- method WebResource::get_uri -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebResource", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -579,8 +631,8 @@ webResourceGetUri :: (MonadIO m, WebResourceK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webResourceGetUri _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_resource_get_uri _obj' @@ -588,5 +640,9 @@ result' <- cstringToText result touchManagedPtr _obj return result' + +data WebResourceGetUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebResourceK a) => MethodInfo WebResourceGetUriMethodInfo a signature where + overloadedMethod _ = webResourceGetUri diff --git a/GI/WebKit/Objects/WebResource.hs-boot b/GI/WebKit/Objects/WebResource.hs-boot --- a/GI/WebKit/Objects/WebResource.hs-boot +++ b/GI/WebKit/Objects/WebResource.hs-boot @@ -19,3 +19,8 @@ data WebResourceLoadFailedSignalInfo data WebResourceLoadFinishedSignalInfo data WebResourceResponseReceivedSignalInfo +data WebResourceGetDataMethodInfo +data WebResourceGetEncodingMethodInfo +data WebResourceGetFrameNameMethodInfo +data WebResourceGetMimeTypeMethodInfo +data WebResourceGetUriMethodInfo diff --git a/GI/WebKit/Objects/WebSettings.hs b/GI/WebKit/Objects/WebSettings.hs --- a/GI/WebKit/Objects/WebSettings.hs +++ b/GI/WebKit/Objects/WebSettings.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,10 +18,12 @@ -- * Methods -- ** webSettingsCopy + WebSettingsCopyMethodInfo , webSettingsCopy , -- ** webSettingsGetUserAgent + WebSettingsGetUserAgentMethodInfo , webSettingsGetUserAgent , @@ -480,6 +483,41 @@ noWebSettings :: Maybe WebSettings noWebSettings = Nothing +type family ResolveWebSettingsMethod (t :: Symbol) (o :: *) :: * where + ResolveWebSettingsMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebSettingsMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebSettingsMethod "copy" o = WebSettingsCopyMethodInfo + ResolveWebSettingsMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebSettingsMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebSettingsMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebSettingsMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebSettingsMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebSettingsMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebSettingsMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebSettingsMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebSettingsMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebSettingsMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebSettingsMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebSettingsMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebSettingsMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebSettingsMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebSettingsMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebSettingsMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebSettingsMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebSettingsMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebSettingsMethod "getUserAgent" o = WebSettingsGetUserAgentMethodInfo + ResolveWebSettingsMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebSettingsMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebSettingsMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebSettingsMethod t WebSettings, MethodInfo info WebSettings p) => IsLabelProxy t (WebSettings -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebSettingsMethod t WebSettings, MethodInfo info WebSettings p) => IsLabel t (WebSettings -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "auto-load-images" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct] @@ -499,7 +537,7 @@ type AttrSetTypeConstraint WebSettingsAutoLoadImagesPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsAutoLoadImagesPropertyInfo = WebSettingsK type AttrGetType WebSettingsAutoLoadImagesPropertyInfo = Bool - type AttrLabel WebSettingsAutoLoadImagesPropertyInfo = "WebSettings::auto-load-images" + type AttrLabel WebSettingsAutoLoadImagesPropertyInfo = "auto-load-images" attrGet _ = getWebSettingsAutoLoadImages attrSet _ = setWebSettingsAutoLoadImages attrConstruct _ = constructWebSettingsAutoLoadImages @@ -523,7 +561,7 @@ type AttrSetTypeConstraint WebSettingsAutoResizeWindowPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsAutoResizeWindowPropertyInfo = WebSettingsK type AttrGetType WebSettingsAutoResizeWindowPropertyInfo = Bool - type AttrLabel WebSettingsAutoResizeWindowPropertyInfo = "WebSettings::auto-resize-window" + type AttrLabel WebSettingsAutoResizeWindowPropertyInfo = "auto-resize-window" attrGet _ = getWebSettingsAutoResizeWindow attrSet _ = setWebSettingsAutoResizeWindow attrConstruct _ = constructWebSettingsAutoResizeWindow @@ -547,7 +585,7 @@ type AttrSetTypeConstraint WebSettingsAutoShrinkImagesPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsAutoShrinkImagesPropertyInfo = WebSettingsK type AttrGetType WebSettingsAutoShrinkImagesPropertyInfo = Bool - type AttrLabel WebSettingsAutoShrinkImagesPropertyInfo = "WebSettings::auto-shrink-images" + type AttrLabel WebSettingsAutoShrinkImagesPropertyInfo = "auto-shrink-images" attrGet _ = getWebSettingsAutoShrinkImages attrSet _ = setWebSettingsAutoShrinkImages attrConstruct _ = constructWebSettingsAutoShrinkImages @@ -571,7 +609,7 @@ type AttrSetTypeConstraint WebSettingsCursiveFontFamilyPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebSettingsCursiveFontFamilyPropertyInfo = WebSettingsK type AttrGetType WebSettingsCursiveFontFamilyPropertyInfo = T.Text - type AttrLabel WebSettingsCursiveFontFamilyPropertyInfo = "WebSettings::cursive-font-family" + type AttrLabel WebSettingsCursiveFontFamilyPropertyInfo = "cursive-font-family" attrGet _ = getWebSettingsCursiveFontFamily attrSet _ = setWebSettingsCursiveFontFamily attrConstruct _ = constructWebSettingsCursiveFontFamily @@ -595,7 +633,7 @@ type AttrSetTypeConstraint WebSettingsDefaultEncodingPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebSettingsDefaultEncodingPropertyInfo = WebSettingsK type AttrGetType WebSettingsDefaultEncodingPropertyInfo = T.Text - type AttrLabel WebSettingsDefaultEncodingPropertyInfo = "WebSettings::default-encoding" + type AttrLabel WebSettingsDefaultEncodingPropertyInfo = "default-encoding" attrGet _ = getWebSettingsDefaultEncoding attrSet _ = setWebSettingsDefaultEncoding attrConstruct _ = constructWebSettingsDefaultEncoding @@ -619,7 +657,7 @@ type AttrSetTypeConstraint WebSettingsDefaultFontFamilyPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebSettingsDefaultFontFamilyPropertyInfo = WebSettingsK type AttrGetType WebSettingsDefaultFontFamilyPropertyInfo = T.Text - type AttrLabel WebSettingsDefaultFontFamilyPropertyInfo = "WebSettings::default-font-family" + type AttrLabel WebSettingsDefaultFontFamilyPropertyInfo = "default-font-family" attrGet _ = getWebSettingsDefaultFontFamily attrSet _ = setWebSettingsDefaultFontFamily attrConstruct _ = constructWebSettingsDefaultFontFamily @@ -643,7 +681,7 @@ type AttrSetTypeConstraint WebSettingsDefaultFontSizePropertyInfo = (~) Int32 type AttrBaseTypeConstraint WebSettingsDefaultFontSizePropertyInfo = WebSettingsK type AttrGetType WebSettingsDefaultFontSizePropertyInfo = Int32 - type AttrLabel WebSettingsDefaultFontSizePropertyInfo = "WebSettings::default-font-size" + type AttrLabel WebSettingsDefaultFontSizePropertyInfo = "default-font-size" attrGet _ = getWebSettingsDefaultFontSize attrSet _ = setWebSettingsDefaultFontSize attrConstruct _ = constructWebSettingsDefaultFontSize @@ -667,7 +705,7 @@ type AttrSetTypeConstraint WebSettingsDefaultMonospaceFontSizePropertyInfo = (~) Int32 type AttrBaseTypeConstraint WebSettingsDefaultMonospaceFontSizePropertyInfo = WebSettingsK type AttrGetType WebSettingsDefaultMonospaceFontSizePropertyInfo = Int32 - type AttrLabel WebSettingsDefaultMonospaceFontSizePropertyInfo = "WebSettings::default-monospace-font-size" + type AttrLabel WebSettingsDefaultMonospaceFontSizePropertyInfo = "default-monospace-font-size" attrGet _ = getWebSettingsDefaultMonospaceFontSize attrSet _ = setWebSettingsDefaultMonospaceFontSize attrConstruct _ = constructWebSettingsDefaultMonospaceFontSize @@ -691,7 +729,7 @@ type AttrSetTypeConstraint WebSettingsEditingBehaviorPropertyInfo = (~) EditingBehavior type AttrBaseTypeConstraint WebSettingsEditingBehaviorPropertyInfo = WebSettingsK type AttrGetType WebSettingsEditingBehaviorPropertyInfo = EditingBehavior - type AttrLabel WebSettingsEditingBehaviorPropertyInfo = "WebSettings::editing-behavior" + type AttrLabel WebSettingsEditingBehaviorPropertyInfo = "editing-behavior" attrGet _ = getWebSettingsEditingBehavior attrSet _ = setWebSettingsEditingBehavior attrConstruct _ = constructWebSettingsEditingBehavior @@ -715,7 +753,7 @@ type AttrSetTypeConstraint WebSettingsEnableAcceleratedCompositingPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableAcceleratedCompositingPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableAcceleratedCompositingPropertyInfo = Bool - type AttrLabel WebSettingsEnableAcceleratedCompositingPropertyInfo = "WebSettings::enable-accelerated-compositing" + type AttrLabel WebSettingsEnableAcceleratedCompositingPropertyInfo = "enable-accelerated-compositing" attrGet _ = getWebSettingsEnableAcceleratedCompositing attrSet _ = setWebSettingsEnableAcceleratedCompositing attrConstruct _ = constructWebSettingsEnableAcceleratedCompositing @@ -739,7 +777,7 @@ type AttrSetTypeConstraint WebSettingsEnableCaretBrowsingPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableCaretBrowsingPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableCaretBrowsingPropertyInfo = Bool - type AttrLabel WebSettingsEnableCaretBrowsingPropertyInfo = "WebSettings::enable-caret-browsing" + type AttrLabel WebSettingsEnableCaretBrowsingPropertyInfo = "enable-caret-browsing" attrGet _ = getWebSettingsEnableCaretBrowsing attrSet _ = setWebSettingsEnableCaretBrowsing attrConstruct _ = constructWebSettingsEnableCaretBrowsing @@ -763,7 +801,7 @@ type AttrSetTypeConstraint WebSettingsEnableDefaultContextMenuPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableDefaultContextMenuPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableDefaultContextMenuPropertyInfo = Bool - type AttrLabel WebSettingsEnableDefaultContextMenuPropertyInfo = "WebSettings::enable-default-context-menu" + type AttrLabel WebSettingsEnableDefaultContextMenuPropertyInfo = "enable-default-context-menu" attrGet _ = getWebSettingsEnableDefaultContextMenu attrSet _ = setWebSettingsEnableDefaultContextMenu attrConstruct _ = constructWebSettingsEnableDefaultContextMenu @@ -787,7 +825,7 @@ type AttrSetTypeConstraint WebSettingsEnableDeveloperExtrasPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableDeveloperExtrasPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableDeveloperExtrasPropertyInfo = Bool - type AttrLabel WebSettingsEnableDeveloperExtrasPropertyInfo = "WebSettings::enable-developer-extras" + type AttrLabel WebSettingsEnableDeveloperExtrasPropertyInfo = "enable-developer-extras" attrGet _ = getWebSettingsEnableDeveloperExtras attrSet _ = setWebSettingsEnableDeveloperExtras attrConstruct _ = constructWebSettingsEnableDeveloperExtras @@ -811,7 +849,7 @@ type AttrSetTypeConstraint WebSettingsEnableDisplayOfInsecureContentPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableDisplayOfInsecureContentPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableDisplayOfInsecureContentPropertyInfo = Bool - type AttrLabel WebSettingsEnableDisplayOfInsecureContentPropertyInfo = "WebSettings::enable-display-of-insecure-content" + type AttrLabel WebSettingsEnableDisplayOfInsecureContentPropertyInfo = "enable-display-of-insecure-content" attrGet _ = getWebSettingsEnableDisplayOfInsecureContent attrSet _ = setWebSettingsEnableDisplayOfInsecureContent attrConstruct _ = constructWebSettingsEnableDisplayOfInsecureContent @@ -835,7 +873,7 @@ type AttrSetTypeConstraint WebSettingsEnableDnsPrefetchingPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableDnsPrefetchingPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableDnsPrefetchingPropertyInfo = Bool - type AttrLabel WebSettingsEnableDnsPrefetchingPropertyInfo = "WebSettings::enable-dns-prefetching" + type AttrLabel WebSettingsEnableDnsPrefetchingPropertyInfo = "enable-dns-prefetching" attrGet _ = getWebSettingsEnableDnsPrefetching attrSet _ = setWebSettingsEnableDnsPrefetching attrConstruct _ = constructWebSettingsEnableDnsPrefetching @@ -859,7 +897,7 @@ type AttrSetTypeConstraint WebSettingsEnableDomPastePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableDomPastePropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableDomPastePropertyInfo = Bool - type AttrLabel WebSettingsEnableDomPastePropertyInfo = "WebSettings::enable-dom-paste" + type AttrLabel WebSettingsEnableDomPastePropertyInfo = "enable-dom-paste" attrGet _ = getWebSettingsEnableDomPaste attrSet _ = setWebSettingsEnableDomPaste attrConstruct _ = constructWebSettingsEnableDomPaste @@ -883,7 +921,7 @@ type AttrSetTypeConstraint WebSettingsEnableFileAccessFromFileUrisPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableFileAccessFromFileUrisPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableFileAccessFromFileUrisPropertyInfo = Bool - type AttrLabel WebSettingsEnableFileAccessFromFileUrisPropertyInfo = "WebSettings::enable-file-access-from-file-uris" + type AttrLabel WebSettingsEnableFileAccessFromFileUrisPropertyInfo = "enable-file-access-from-file-uris" attrGet _ = getWebSettingsEnableFileAccessFromFileUris attrSet _ = setWebSettingsEnableFileAccessFromFileUris attrConstruct _ = constructWebSettingsEnableFileAccessFromFileUris @@ -907,7 +945,7 @@ type AttrSetTypeConstraint WebSettingsEnableFrameFlatteningPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableFrameFlatteningPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableFrameFlatteningPropertyInfo = Bool - type AttrLabel WebSettingsEnableFrameFlatteningPropertyInfo = "WebSettings::enable-frame-flattening" + type AttrLabel WebSettingsEnableFrameFlatteningPropertyInfo = "enable-frame-flattening" attrGet _ = getWebSettingsEnableFrameFlattening attrSet _ = setWebSettingsEnableFrameFlattening attrConstruct _ = constructWebSettingsEnableFrameFlattening @@ -931,7 +969,7 @@ type AttrSetTypeConstraint WebSettingsEnableFullscreenPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableFullscreenPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableFullscreenPropertyInfo = Bool - type AttrLabel WebSettingsEnableFullscreenPropertyInfo = "WebSettings::enable-fullscreen" + type AttrLabel WebSettingsEnableFullscreenPropertyInfo = "enable-fullscreen" attrGet _ = getWebSettingsEnableFullscreen attrSet _ = setWebSettingsEnableFullscreen attrConstruct _ = constructWebSettingsEnableFullscreen @@ -955,7 +993,7 @@ type AttrSetTypeConstraint WebSettingsEnableHtml5DatabasePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableHtml5DatabasePropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableHtml5DatabasePropertyInfo = Bool - type AttrLabel WebSettingsEnableHtml5DatabasePropertyInfo = "WebSettings::enable-html5-database" + type AttrLabel WebSettingsEnableHtml5DatabasePropertyInfo = "enable-html5-database" attrGet _ = getWebSettingsEnableHtml5Database attrSet _ = setWebSettingsEnableHtml5Database attrConstruct _ = constructWebSettingsEnableHtml5Database @@ -979,7 +1017,7 @@ type AttrSetTypeConstraint WebSettingsEnableHtml5LocalStoragePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableHtml5LocalStoragePropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableHtml5LocalStoragePropertyInfo = Bool - type AttrLabel WebSettingsEnableHtml5LocalStoragePropertyInfo = "WebSettings::enable-html5-local-storage" + type AttrLabel WebSettingsEnableHtml5LocalStoragePropertyInfo = "enable-html5-local-storage" attrGet _ = getWebSettingsEnableHtml5LocalStorage attrSet _ = setWebSettingsEnableHtml5LocalStorage attrConstruct _ = constructWebSettingsEnableHtml5LocalStorage @@ -1003,7 +1041,7 @@ type AttrSetTypeConstraint WebSettingsEnableHyperlinkAuditingPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableHyperlinkAuditingPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableHyperlinkAuditingPropertyInfo = Bool - type AttrLabel WebSettingsEnableHyperlinkAuditingPropertyInfo = "WebSettings::enable-hyperlink-auditing" + type AttrLabel WebSettingsEnableHyperlinkAuditingPropertyInfo = "enable-hyperlink-auditing" attrGet _ = getWebSettingsEnableHyperlinkAuditing attrSet _ = setWebSettingsEnableHyperlinkAuditing attrConstruct _ = constructWebSettingsEnableHyperlinkAuditing @@ -1027,7 +1065,7 @@ type AttrSetTypeConstraint WebSettingsEnableJavaAppletPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableJavaAppletPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableJavaAppletPropertyInfo = Bool - type AttrLabel WebSettingsEnableJavaAppletPropertyInfo = "WebSettings::enable-java-applet" + type AttrLabel WebSettingsEnableJavaAppletPropertyInfo = "enable-java-applet" attrGet _ = getWebSettingsEnableJavaApplet attrSet _ = setWebSettingsEnableJavaApplet attrConstruct _ = constructWebSettingsEnableJavaApplet @@ -1051,7 +1089,7 @@ type AttrSetTypeConstraint WebSettingsEnableMediaStreamPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableMediaStreamPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableMediaStreamPropertyInfo = Bool - type AttrLabel WebSettingsEnableMediaStreamPropertyInfo = "WebSettings::enable-media-stream" + type AttrLabel WebSettingsEnableMediaStreamPropertyInfo = "enable-media-stream" attrGet _ = getWebSettingsEnableMediaStream attrSet _ = setWebSettingsEnableMediaStream attrConstruct _ = constructWebSettingsEnableMediaStream @@ -1075,7 +1113,7 @@ type AttrSetTypeConstraint WebSettingsEnableMediasourcePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableMediasourcePropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableMediasourcePropertyInfo = Bool - type AttrLabel WebSettingsEnableMediasourcePropertyInfo = "WebSettings::enable-mediasource" + type AttrLabel WebSettingsEnableMediasourcePropertyInfo = "enable-mediasource" attrGet _ = getWebSettingsEnableMediasource attrSet _ = setWebSettingsEnableMediasource attrConstruct _ = constructWebSettingsEnableMediasource @@ -1099,7 +1137,7 @@ type AttrSetTypeConstraint WebSettingsEnableOfflineWebApplicationCachePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableOfflineWebApplicationCachePropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableOfflineWebApplicationCachePropertyInfo = Bool - type AttrLabel WebSettingsEnableOfflineWebApplicationCachePropertyInfo = "WebSettings::enable-offline-web-application-cache" + type AttrLabel WebSettingsEnableOfflineWebApplicationCachePropertyInfo = "enable-offline-web-application-cache" attrGet _ = getWebSettingsEnableOfflineWebApplicationCache attrSet _ = setWebSettingsEnableOfflineWebApplicationCache attrConstruct _ = constructWebSettingsEnableOfflineWebApplicationCache @@ -1123,7 +1161,7 @@ type AttrSetTypeConstraint WebSettingsEnablePageCachePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnablePageCachePropertyInfo = WebSettingsK type AttrGetType WebSettingsEnablePageCachePropertyInfo = Bool - type AttrLabel WebSettingsEnablePageCachePropertyInfo = "WebSettings::enable-page-cache" + type AttrLabel WebSettingsEnablePageCachePropertyInfo = "enable-page-cache" attrGet _ = getWebSettingsEnablePageCache attrSet _ = setWebSettingsEnablePageCache attrConstruct _ = constructWebSettingsEnablePageCache @@ -1147,7 +1185,7 @@ type AttrSetTypeConstraint WebSettingsEnablePluginsPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnablePluginsPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnablePluginsPropertyInfo = Bool - type AttrLabel WebSettingsEnablePluginsPropertyInfo = "WebSettings::enable-plugins" + type AttrLabel WebSettingsEnablePluginsPropertyInfo = "enable-plugins" attrGet _ = getWebSettingsEnablePlugins attrSet _ = setWebSettingsEnablePlugins attrConstruct _ = constructWebSettingsEnablePlugins @@ -1171,7 +1209,7 @@ type AttrSetTypeConstraint WebSettingsEnablePrivateBrowsingPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnablePrivateBrowsingPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnablePrivateBrowsingPropertyInfo = Bool - type AttrLabel WebSettingsEnablePrivateBrowsingPropertyInfo = "WebSettings::enable-private-browsing" + type AttrLabel WebSettingsEnablePrivateBrowsingPropertyInfo = "enable-private-browsing" attrGet _ = getWebSettingsEnablePrivateBrowsing attrSet _ = setWebSettingsEnablePrivateBrowsing attrConstruct _ = constructWebSettingsEnablePrivateBrowsing @@ -1195,7 +1233,7 @@ type AttrSetTypeConstraint WebSettingsEnableRunningOfInsecureContentPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableRunningOfInsecureContentPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableRunningOfInsecureContentPropertyInfo = Bool - type AttrLabel WebSettingsEnableRunningOfInsecureContentPropertyInfo = "WebSettings::enable-running-of-insecure-content" + type AttrLabel WebSettingsEnableRunningOfInsecureContentPropertyInfo = "enable-running-of-insecure-content" attrGet _ = getWebSettingsEnableRunningOfInsecureContent attrSet _ = setWebSettingsEnableRunningOfInsecureContent attrConstruct _ = constructWebSettingsEnableRunningOfInsecureContent @@ -1219,7 +1257,7 @@ type AttrSetTypeConstraint WebSettingsEnableScriptsPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableScriptsPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableScriptsPropertyInfo = Bool - type AttrLabel WebSettingsEnableScriptsPropertyInfo = "WebSettings::enable-scripts" + type AttrLabel WebSettingsEnableScriptsPropertyInfo = "enable-scripts" attrGet _ = getWebSettingsEnableScripts attrSet _ = setWebSettingsEnableScripts attrConstruct _ = constructWebSettingsEnableScripts @@ -1243,7 +1281,7 @@ type AttrSetTypeConstraint WebSettingsEnableSiteSpecificQuirksPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableSiteSpecificQuirksPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableSiteSpecificQuirksPropertyInfo = Bool - type AttrLabel WebSettingsEnableSiteSpecificQuirksPropertyInfo = "WebSettings::enable-site-specific-quirks" + type AttrLabel WebSettingsEnableSiteSpecificQuirksPropertyInfo = "enable-site-specific-quirks" attrGet _ = getWebSettingsEnableSiteSpecificQuirks attrSet _ = setWebSettingsEnableSiteSpecificQuirks attrConstruct _ = constructWebSettingsEnableSiteSpecificQuirks @@ -1267,7 +1305,7 @@ type AttrSetTypeConstraint WebSettingsEnableSmoothScrollingPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableSmoothScrollingPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableSmoothScrollingPropertyInfo = Bool - type AttrLabel WebSettingsEnableSmoothScrollingPropertyInfo = "WebSettings::enable-smooth-scrolling" + type AttrLabel WebSettingsEnableSmoothScrollingPropertyInfo = "enable-smooth-scrolling" attrGet _ = getWebSettingsEnableSmoothScrolling attrSet _ = setWebSettingsEnableSmoothScrolling attrConstruct _ = constructWebSettingsEnableSmoothScrolling @@ -1291,7 +1329,7 @@ type AttrSetTypeConstraint WebSettingsEnableSpatialNavigationPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableSpatialNavigationPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableSpatialNavigationPropertyInfo = Bool - type AttrLabel WebSettingsEnableSpatialNavigationPropertyInfo = "WebSettings::enable-spatial-navigation" + type AttrLabel WebSettingsEnableSpatialNavigationPropertyInfo = "enable-spatial-navigation" attrGet _ = getWebSettingsEnableSpatialNavigation attrSet _ = setWebSettingsEnableSpatialNavigation attrConstruct _ = constructWebSettingsEnableSpatialNavigation @@ -1315,7 +1353,7 @@ type AttrSetTypeConstraint WebSettingsEnableSpellCheckingPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableSpellCheckingPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableSpellCheckingPropertyInfo = Bool - type AttrLabel WebSettingsEnableSpellCheckingPropertyInfo = "WebSettings::enable-spell-checking" + type AttrLabel WebSettingsEnableSpellCheckingPropertyInfo = "enable-spell-checking" attrGet _ = getWebSettingsEnableSpellChecking attrSet _ = setWebSettingsEnableSpellChecking attrConstruct _ = constructWebSettingsEnableSpellChecking @@ -1339,7 +1377,7 @@ type AttrSetTypeConstraint WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = Bool - type AttrLabel WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = "WebSettings::enable-universal-access-from-file-uris" + type AttrLabel WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo = "enable-universal-access-from-file-uris" attrGet _ = getWebSettingsEnableUniversalAccessFromFileUris attrSet _ = setWebSettingsEnableUniversalAccessFromFileUris attrConstruct _ = constructWebSettingsEnableUniversalAccessFromFileUris @@ -1363,7 +1401,7 @@ type AttrSetTypeConstraint WebSettingsEnableWebaudioPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableWebaudioPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableWebaudioPropertyInfo = Bool - type AttrLabel WebSettingsEnableWebaudioPropertyInfo = "WebSettings::enable-webaudio" + type AttrLabel WebSettingsEnableWebaudioPropertyInfo = "enable-webaudio" attrGet _ = getWebSettingsEnableWebaudio attrSet _ = setWebSettingsEnableWebaudio attrConstruct _ = constructWebSettingsEnableWebaudio @@ -1387,7 +1425,7 @@ type AttrSetTypeConstraint WebSettingsEnableWebglPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableWebglPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableWebglPropertyInfo = Bool - type AttrLabel WebSettingsEnableWebglPropertyInfo = "WebSettings::enable-webgl" + type AttrLabel WebSettingsEnableWebglPropertyInfo = "enable-webgl" attrGet _ = getWebSettingsEnableWebgl attrSet _ = setWebSettingsEnableWebgl attrConstruct _ = constructWebSettingsEnableWebgl @@ -1411,7 +1449,7 @@ type AttrSetTypeConstraint WebSettingsEnableXssAuditorPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnableXssAuditorPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnableXssAuditorPropertyInfo = Bool - type AttrLabel WebSettingsEnableXssAuditorPropertyInfo = "WebSettings::enable-xss-auditor" + type AttrLabel WebSettingsEnableXssAuditorPropertyInfo = "enable-xss-auditor" attrGet _ = getWebSettingsEnableXssAuditor attrSet _ = setWebSettingsEnableXssAuditor attrConstruct _ = constructWebSettingsEnableXssAuditor @@ -1435,7 +1473,7 @@ type AttrSetTypeConstraint WebSettingsEnforce96DpiPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsEnforce96DpiPropertyInfo = WebSettingsK type AttrGetType WebSettingsEnforce96DpiPropertyInfo = Bool - type AttrLabel WebSettingsEnforce96DpiPropertyInfo = "WebSettings::enforce-96-dpi" + type AttrLabel WebSettingsEnforce96DpiPropertyInfo = "enforce-96-dpi" attrGet _ = getWebSettingsEnforce96Dpi attrSet _ = setWebSettingsEnforce96Dpi attrConstruct _ = constructWebSettingsEnforce96Dpi @@ -1459,7 +1497,7 @@ type AttrSetTypeConstraint WebSettingsFantasyFontFamilyPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebSettingsFantasyFontFamilyPropertyInfo = WebSettingsK type AttrGetType WebSettingsFantasyFontFamilyPropertyInfo = T.Text - type AttrLabel WebSettingsFantasyFontFamilyPropertyInfo = "WebSettings::fantasy-font-family" + type AttrLabel WebSettingsFantasyFontFamilyPropertyInfo = "fantasy-font-family" attrGet _ = getWebSettingsFantasyFontFamily attrSet _ = setWebSettingsFantasyFontFamily attrConstruct _ = constructWebSettingsFantasyFontFamily @@ -1483,7 +1521,7 @@ type AttrSetTypeConstraint WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = WebSettingsK type AttrGetType WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = T.Text - type AttrLabel WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = "WebSettings::html5-local-storage-database-path" + type AttrLabel WebSettingsHtml5LocalStorageDatabasePathPropertyInfo = "html5-local-storage-database-path" attrGet _ = getWebSettingsHtml5LocalStorageDatabasePath attrSet _ = setWebSettingsHtml5LocalStorageDatabasePath attrConstruct _ = constructWebSettingsHtml5LocalStorageDatabasePath @@ -1507,7 +1545,7 @@ type AttrSetTypeConstraint WebSettingsJavascriptCanAccessClipboardPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsJavascriptCanAccessClipboardPropertyInfo = WebSettingsK type AttrGetType WebSettingsJavascriptCanAccessClipboardPropertyInfo = Bool - type AttrLabel WebSettingsJavascriptCanAccessClipboardPropertyInfo = "WebSettings::javascript-can-access-clipboard" + type AttrLabel WebSettingsJavascriptCanAccessClipboardPropertyInfo = "javascript-can-access-clipboard" attrGet _ = getWebSettingsJavascriptCanAccessClipboard attrSet _ = setWebSettingsJavascriptCanAccessClipboard attrConstruct _ = constructWebSettingsJavascriptCanAccessClipboard @@ -1531,7 +1569,7 @@ type AttrSetTypeConstraint WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = WebSettingsK type AttrGetType WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = Bool - type AttrLabel WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = "WebSettings::javascript-can-open-windows-automatically" + type AttrLabel WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo = "javascript-can-open-windows-automatically" attrGet _ = getWebSettingsJavascriptCanOpenWindowsAutomatically attrSet _ = setWebSettingsJavascriptCanOpenWindowsAutomatically attrConstruct _ = constructWebSettingsJavascriptCanOpenWindowsAutomatically @@ -1555,7 +1593,7 @@ type AttrSetTypeConstraint WebSettingsMediaPlaybackAllowsInlinePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsMediaPlaybackAllowsInlinePropertyInfo = WebSettingsK type AttrGetType WebSettingsMediaPlaybackAllowsInlinePropertyInfo = Bool - type AttrLabel WebSettingsMediaPlaybackAllowsInlinePropertyInfo = "WebSettings::media-playback-allows-inline" + type AttrLabel WebSettingsMediaPlaybackAllowsInlinePropertyInfo = "media-playback-allows-inline" attrGet _ = getWebSettingsMediaPlaybackAllowsInline attrSet _ = setWebSettingsMediaPlaybackAllowsInline attrConstruct _ = constructWebSettingsMediaPlaybackAllowsInline @@ -1579,7 +1617,7 @@ type AttrSetTypeConstraint WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = WebSettingsK type AttrGetType WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = Bool - type AttrLabel WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = "WebSettings::media-playback-requires-user-gesture" + type AttrLabel WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo = "media-playback-requires-user-gesture" attrGet _ = getWebSettingsMediaPlaybackRequiresUserGesture attrSet _ = setWebSettingsMediaPlaybackRequiresUserGesture attrConstruct _ = constructWebSettingsMediaPlaybackRequiresUserGesture @@ -1603,7 +1641,7 @@ type AttrSetTypeConstraint WebSettingsMinimumFontSizePropertyInfo = (~) Int32 type AttrBaseTypeConstraint WebSettingsMinimumFontSizePropertyInfo = WebSettingsK type AttrGetType WebSettingsMinimumFontSizePropertyInfo = Int32 - type AttrLabel WebSettingsMinimumFontSizePropertyInfo = "WebSettings::minimum-font-size" + type AttrLabel WebSettingsMinimumFontSizePropertyInfo = "minimum-font-size" attrGet _ = getWebSettingsMinimumFontSize attrSet _ = setWebSettingsMinimumFontSize attrConstruct _ = constructWebSettingsMinimumFontSize @@ -1627,7 +1665,7 @@ type AttrSetTypeConstraint WebSettingsMinimumLogicalFontSizePropertyInfo = (~) Int32 type AttrBaseTypeConstraint WebSettingsMinimumLogicalFontSizePropertyInfo = WebSettingsK type AttrGetType WebSettingsMinimumLogicalFontSizePropertyInfo = Int32 - type AttrLabel WebSettingsMinimumLogicalFontSizePropertyInfo = "WebSettings::minimum-logical-font-size" + type AttrLabel WebSettingsMinimumLogicalFontSizePropertyInfo = "minimum-logical-font-size" attrGet _ = getWebSettingsMinimumLogicalFontSize attrSet _ = setWebSettingsMinimumLogicalFontSize attrConstruct _ = constructWebSettingsMinimumLogicalFontSize @@ -1651,7 +1689,7 @@ type AttrSetTypeConstraint WebSettingsMonospaceFontFamilyPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebSettingsMonospaceFontFamilyPropertyInfo = WebSettingsK type AttrGetType WebSettingsMonospaceFontFamilyPropertyInfo = T.Text - type AttrLabel WebSettingsMonospaceFontFamilyPropertyInfo = "WebSettings::monospace-font-family" + type AttrLabel WebSettingsMonospaceFontFamilyPropertyInfo = "monospace-font-family" attrGet _ = getWebSettingsMonospaceFontFamily attrSet _ = setWebSettingsMonospaceFontFamily attrConstruct _ = constructWebSettingsMonospaceFontFamily @@ -1675,7 +1713,7 @@ type AttrSetTypeConstraint WebSettingsPrintBackgroundsPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsPrintBackgroundsPropertyInfo = WebSettingsK type AttrGetType WebSettingsPrintBackgroundsPropertyInfo = Bool - type AttrLabel WebSettingsPrintBackgroundsPropertyInfo = "WebSettings::print-backgrounds" + type AttrLabel WebSettingsPrintBackgroundsPropertyInfo = "print-backgrounds" attrGet _ = getWebSettingsPrintBackgrounds attrSet _ = setWebSettingsPrintBackgrounds attrConstruct _ = constructWebSettingsPrintBackgrounds @@ -1699,7 +1737,7 @@ type AttrSetTypeConstraint WebSettingsResizableTextAreasPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsResizableTextAreasPropertyInfo = WebSettingsK type AttrGetType WebSettingsResizableTextAreasPropertyInfo = Bool - type AttrLabel WebSettingsResizableTextAreasPropertyInfo = "WebSettings::resizable-text-areas" + type AttrLabel WebSettingsResizableTextAreasPropertyInfo = "resizable-text-areas" attrGet _ = getWebSettingsResizableTextAreas attrSet _ = setWebSettingsResizableTextAreas attrConstruct _ = constructWebSettingsResizableTextAreas @@ -1723,7 +1761,7 @@ type AttrSetTypeConstraint WebSettingsRespectImageOrientationPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsRespectImageOrientationPropertyInfo = WebSettingsK type AttrGetType WebSettingsRespectImageOrientationPropertyInfo = Bool - type AttrLabel WebSettingsRespectImageOrientationPropertyInfo = "WebSettings::respect-image-orientation" + type AttrLabel WebSettingsRespectImageOrientationPropertyInfo = "respect-image-orientation" attrGet _ = getWebSettingsRespectImageOrientation attrSet _ = setWebSettingsRespectImageOrientation attrConstruct _ = constructWebSettingsRespectImageOrientation @@ -1747,7 +1785,7 @@ type AttrSetTypeConstraint WebSettingsSansSerifFontFamilyPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebSettingsSansSerifFontFamilyPropertyInfo = WebSettingsK type AttrGetType WebSettingsSansSerifFontFamilyPropertyInfo = T.Text - type AttrLabel WebSettingsSansSerifFontFamilyPropertyInfo = "WebSettings::sans-serif-font-family" + type AttrLabel WebSettingsSansSerifFontFamilyPropertyInfo = "sans-serif-font-family" attrGet _ = getWebSettingsSansSerifFontFamily attrSet _ = setWebSettingsSansSerifFontFamily attrConstruct _ = constructWebSettingsSansSerifFontFamily @@ -1771,7 +1809,7 @@ type AttrSetTypeConstraint WebSettingsSerifFontFamilyPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebSettingsSerifFontFamilyPropertyInfo = WebSettingsK type AttrGetType WebSettingsSerifFontFamilyPropertyInfo = T.Text - type AttrLabel WebSettingsSerifFontFamilyPropertyInfo = "WebSettings::serif-font-family" + type AttrLabel WebSettingsSerifFontFamilyPropertyInfo = "serif-font-family" attrGet _ = getWebSettingsSerifFontFamily attrSet _ = setWebSettingsSerifFontFamily attrConstruct _ = constructWebSettingsSerifFontFamily @@ -1795,7 +1833,7 @@ type AttrSetTypeConstraint WebSettingsSpellCheckingLanguagesPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebSettingsSpellCheckingLanguagesPropertyInfo = WebSettingsK type AttrGetType WebSettingsSpellCheckingLanguagesPropertyInfo = T.Text - type AttrLabel WebSettingsSpellCheckingLanguagesPropertyInfo = "WebSettings::spell-checking-languages" + type AttrLabel WebSettingsSpellCheckingLanguagesPropertyInfo = "spell-checking-languages" attrGet _ = getWebSettingsSpellCheckingLanguages attrSet _ = setWebSettingsSpellCheckingLanguages attrConstruct _ = constructWebSettingsSpellCheckingLanguages @@ -1819,7 +1857,7 @@ type AttrSetTypeConstraint WebSettingsTabKeyCyclesThroughElementsPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebSettingsTabKeyCyclesThroughElementsPropertyInfo = WebSettingsK type AttrGetType WebSettingsTabKeyCyclesThroughElementsPropertyInfo = Bool - type AttrLabel WebSettingsTabKeyCyclesThroughElementsPropertyInfo = "WebSettings::tab-key-cycles-through-elements" + type AttrLabel WebSettingsTabKeyCyclesThroughElementsPropertyInfo = "tab-key-cycles-through-elements" attrGet _ = getWebSettingsTabKeyCyclesThroughElements attrSet _ = setWebSettingsTabKeyCyclesThroughElements attrConstruct _ = constructWebSettingsTabKeyCyclesThroughElements @@ -1843,7 +1881,7 @@ type AttrSetTypeConstraint WebSettingsUserAgentPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebSettingsUserAgentPropertyInfo = WebSettingsK type AttrGetType WebSettingsUserAgentPropertyInfo = T.Text - type AttrLabel WebSettingsUserAgentPropertyInfo = "WebSettings::user-agent" + type AttrLabel WebSettingsUserAgentPropertyInfo = "user-agent" attrGet _ = getWebSettingsUserAgent attrSet _ = setWebSettingsUserAgent attrConstruct _ = constructWebSettingsUserAgent @@ -1867,7 +1905,7 @@ type AttrSetTypeConstraint WebSettingsUserStylesheetUriPropertyInfo = (~) T.Text type AttrBaseTypeConstraint WebSettingsUserStylesheetUriPropertyInfo = WebSettingsK type AttrGetType WebSettingsUserStylesheetUriPropertyInfo = T.Text - type AttrLabel WebSettingsUserStylesheetUriPropertyInfo = "WebSettings::user-stylesheet-uri" + type AttrLabel WebSettingsUserStylesheetUriPropertyInfo = "user-stylesheet-uri" attrGet _ = getWebSettingsUserStylesheetUri attrSet _ = setWebSettingsUserStylesheetUri attrConstruct _ = constructWebSettingsUserStylesheetUri @@ -1891,22 +1929,21 @@ type AttrSetTypeConstraint WebSettingsZoomStepPropertyInfo = (~) Float type AttrBaseTypeConstraint WebSettingsZoomStepPropertyInfo = WebSettingsK type AttrGetType WebSettingsZoomStepPropertyInfo = Float - type AttrLabel WebSettingsZoomStepPropertyInfo = "WebSettings::zoom-step" + type AttrLabel WebSettingsZoomStepPropertyInfo = "zoom-step" attrGet _ = getWebSettingsZoomStep attrSet _ = setWebSettingsZoomStep attrConstruct _ = constructWebSettingsZoomStep type instance AttributeList WebSettings = WebSettingsAttributeList -type WebSettingsAttributeList = ('[ '("auto-load-images", WebSettingsAutoLoadImagesPropertyInfo), '("auto-resize-window", WebSettingsAutoResizeWindowPropertyInfo), '("auto-shrink-images", WebSettingsAutoShrinkImagesPropertyInfo), '("cursive-font-family", WebSettingsCursiveFontFamilyPropertyInfo), '("default-encoding", WebSettingsDefaultEncodingPropertyInfo), '("default-font-family", WebSettingsDefaultFontFamilyPropertyInfo), '("default-font-size", WebSettingsDefaultFontSizePropertyInfo), '("default-monospace-font-size", WebSettingsDefaultMonospaceFontSizePropertyInfo), '("editing-behavior", WebSettingsEditingBehaviorPropertyInfo), '("enable-accelerated-compositing", WebSettingsEnableAcceleratedCompositingPropertyInfo), '("enable-caret-browsing", WebSettingsEnableCaretBrowsingPropertyInfo), '("enable-default-context-menu", WebSettingsEnableDefaultContextMenuPropertyInfo), '("enable-developer-extras", WebSettingsEnableDeveloperExtrasPropertyInfo), '("enable-display-of-insecure-content", WebSettingsEnableDisplayOfInsecureContentPropertyInfo), '("enable-dns-prefetching", WebSettingsEnableDnsPrefetchingPropertyInfo), '("enable-dom-paste", WebSettingsEnableDomPastePropertyInfo), '("enable-file-access-from-file-uris", WebSettingsEnableFileAccessFromFileUrisPropertyInfo), '("enable-frame-flattening", WebSettingsEnableFrameFlatteningPropertyInfo), '("enable-fullscreen", WebSettingsEnableFullscreenPropertyInfo), '("enable-html5-database", WebSettingsEnableHtml5DatabasePropertyInfo), '("enable-html5-local-storage", WebSettingsEnableHtml5LocalStoragePropertyInfo), '("enable-hyperlink-auditing", WebSettingsEnableHyperlinkAuditingPropertyInfo), '("enable-java-applet", WebSettingsEnableJavaAppletPropertyInfo), '("enable-media-stream", WebSettingsEnableMediaStreamPropertyInfo), '("enable-mediasource", WebSettingsEnableMediasourcePropertyInfo), '("enable-offline-web-application-cache", WebSettingsEnableOfflineWebApplicationCachePropertyInfo), '("enable-page-cache", WebSettingsEnablePageCachePropertyInfo), '("enable-plugins", WebSettingsEnablePluginsPropertyInfo), '("enable-private-browsing", WebSettingsEnablePrivateBrowsingPropertyInfo), '("enable-running-of-insecure-content", WebSettingsEnableRunningOfInsecureContentPropertyInfo), '("enable-scripts", WebSettingsEnableScriptsPropertyInfo), '("enable-site-specific-quirks", WebSettingsEnableSiteSpecificQuirksPropertyInfo), '("enable-smooth-scrolling", WebSettingsEnableSmoothScrollingPropertyInfo), '("enable-spatial-navigation", WebSettingsEnableSpatialNavigationPropertyInfo), '("enable-spell-checking", WebSettingsEnableSpellCheckingPropertyInfo), '("enable-universal-access-from-file-uris", WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo), '("enable-webaudio", WebSettingsEnableWebaudioPropertyInfo), '("enable-webgl", WebSettingsEnableWebglPropertyInfo), '("enable-xss-auditor", WebSettingsEnableXssAuditorPropertyInfo), '("enforce-96-dpi", WebSettingsEnforce96DpiPropertyInfo), '("fantasy-font-family", WebSettingsFantasyFontFamilyPropertyInfo), '("html5-local-storage-database-path", WebSettingsHtml5LocalStorageDatabasePathPropertyInfo), '("javascript-can-access-clipboard", WebSettingsJavascriptCanAccessClipboardPropertyInfo), '("javascript-can-open-windows-automatically", WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo), '("media-playback-allows-inline", WebSettingsMediaPlaybackAllowsInlinePropertyInfo), '("media-playback-requires-user-gesture", WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo), '("minimum-font-size", WebSettingsMinimumFontSizePropertyInfo), '("minimum-logical-font-size", WebSettingsMinimumLogicalFontSizePropertyInfo), '("monospace-font-family", WebSettingsMonospaceFontFamilyPropertyInfo), '("print-backgrounds", WebSettingsPrintBackgroundsPropertyInfo), '("resizable-text-areas", WebSettingsResizableTextAreasPropertyInfo), '("respect-image-orientation", WebSettingsRespectImageOrientationPropertyInfo), '("sans-serif-font-family", WebSettingsSansSerifFontFamilyPropertyInfo), '("serif-font-family", WebSettingsSerifFontFamilyPropertyInfo), '("spell-checking-languages", WebSettingsSpellCheckingLanguagesPropertyInfo), '("tab-key-cycles-through-elements", WebSettingsTabKeyCyclesThroughElementsPropertyInfo), '("user-agent", WebSettingsUserAgentPropertyInfo), '("user-stylesheet-uri", WebSettingsUserStylesheetUriPropertyInfo), '("zoom-step", WebSettingsZoomStepPropertyInfo)] :: [(Symbol, *)]) +type WebSettingsAttributeList = ('[ '("autoLoadImages", WebSettingsAutoLoadImagesPropertyInfo), '("autoResizeWindow", WebSettingsAutoResizeWindowPropertyInfo), '("autoShrinkImages", WebSettingsAutoShrinkImagesPropertyInfo), '("cursiveFontFamily", WebSettingsCursiveFontFamilyPropertyInfo), '("defaultEncoding", WebSettingsDefaultEncodingPropertyInfo), '("defaultFontFamily", WebSettingsDefaultFontFamilyPropertyInfo), '("defaultFontSize", WebSettingsDefaultFontSizePropertyInfo), '("defaultMonospaceFontSize", WebSettingsDefaultMonospaceFontSizePropertyInfo), '("editingBehavior", WebSettingsEditingBehaviorPropertyInfo), '("enableAcceleratedCompositing", WebSettingsEnableAcceleratedCompositingPropertyInfo), '("enableCaretBrowsing", WebSettingsEnableCaretBrowsingPropertyInfo), '("enableDefaultContextMenu", WebSettingsEnableDefaultContextMenuPropertyInfo), '("enableDeveloperExtras", WebSettingsEnableDeveloperExtrasPropertyInfo), '("enableDisplayOfInsecureContent", WebSettingsEnableDisplayOfInsecureContentPropertyInfo), '("enableDnsPrefetching", WebSettingsEnableDnsPrefetchingPropertyInfo), '("enableDomPaste", WebSettingsEnableDomPastePropertyInfo), '("enableFileAccessFromFileUris", WebSettingsEnableFileAccessFromFileUrisPropertyInfo), '("enableFrameFlattening", WebSettingsEnableFrameFlatteningPropertyInfo), '("enableFullscreen", WebSettingsEnableFullscreenPropertyInfo), '("enableHtml5Database", WebSettingsEnableHtml5DatabasePropertyInfo), '("enableHtml5LocalStorage", WebSettingsEnableHtml5LocalStoragePropertyInfo), '("enableHyperlinkAuditing", WebSettingsEnableHyperlinkAuditingPropertyInfo), '("enableJavaApplet", WebSettingsEnableJavaAppletPropertyInfo), '("enableMediaStream", WebSettingsEnableMediaStreamPropertyInfo), '("enableMediasource", WebSettingsEnableMediasourcePropertyInfo), '("enableOfflineWebApplicationCache", WebSettingsEnableOfflineWebApplicationCachePropertyInfo), '("enablePageCache", WebSettingsEnablePageCachePropertyInfo), '("enablePlugins", WebSettingsEnablePluginsPropertyInfo), '("enablePrivateBrowsing", WebSettingsEnablePrivateBrowsingPropertyInfo), '("enableRunningOfInsecureContent", WebSettingsEnableRunningOfInsecureContentPropertyInfo), '("enableScripts", WebSettingsEnableScriptsPropertyInfo), '("enableSiteSpecificQuirks", WebSettingsEnableSiteSpecificQuirksPropertyInfo), '("enableSmoothScrolling", WebSettingsEnableSmoothScrollingPropertyInfo), '("enableSpatialNavigation", WebSettingsEnableSpatialNavigationPropertyInfo), '("enableSpellChecking", WebSettingsEnableSpellCheckingPropertyInfo), '("enableUniversalAccessFromFileUris", WebSettingsEnableUniversalAccessFromFileUrisPropertyInfo), '("enableWebaudio", WebSettingsEnableWebaudioPropertyInfo), '("enableWebgl", WebSettingsEnableWebglPropertyInfo), '("enableXssAuditor", WebSettingsEnableXssAuditorPropertyInfo), '("enforce96Dpi", WebSettingsEnforce96DpiPropertyInfo), '("fantasyFontFamily", WebSettingsFantasyFontFamilyPropertyInfo), '("html5LocalStorageDatabasePath", WebSettingsHtml5LocalStorageDatabasePathPropertyInfo), '("javascriptCanAccessClipboard", WebSettingsJavascriptCanAccessClipboardPropertyInfo), '("javascriptCanOpenWindowsAutomatically", WebSettingsJavascriptCanOpenWindowsAutomaticallyPropertyInfo), '("mediaPlaybackAllowsInline", WebSettingsMediaPlaybackAllowsInlinePropertyInfo), '("mediaPlaybackRequiresUserGesture", WebSettingsMediaPlaybackRequiresUserGesturePropertyInfo), '("minimumFontSize", WebSettingsMinimumFontSizePropertyInfo), '("minimumLogicalFontSize", WebSettingsMinimumLogicalFontSizePropertyInfo), '("monospaceFontFamily", WebSettingsMonospaceFontFamilyPropertyInfo), '("printBackgrounds", WebSettingsPrintBackgroundsPropertyInfo), '("resizableTextAreas", WebSettingsResizableTextAreasPropertyInfo), '("respectImageOrientation", WebSettingsRespectImageOrientationPropertyInfo), '("sansSerifFontFamily", WebSettingsSansSerifFontFamilyPropertyInfo), '("serifFontFamily", WebSettingsSerifFontFamilyPropertyInfo), '("spellCheckingLanguages", WebSettingsSpellCheckingLanguagesPropertyInfo), '("tabKeyCyclesThroughElements", WebSettingsTabKeyCyclesThroughElementsPropertyInfo), '("userAgent", WebSettingsUserAgentPropertyInfo), '("userStylesheetUri", WebSettingsUserStylesheetUriPropertyInfo), '("zoomStep", WebSettingsZoomStepPropertyInfo)] :: [(Symbol, *)]) type instance SignalList WebSettings = WebSettingsSignalList -type WebSettingsSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebSettingsSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method WebSettings::new -- method type : Constructor -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TInterface "WebKit" "WebSettings" -- throws : False -- Skip return : False @@ -1917,7 +1954,7 @@ webSettingsNew :: (MonadIO m) => - m WebSettings + m WebSettings -- result webSettingsNew = liftIO $ do result <- webkit_web_settings_new checkUnexpectedReturnNULL "webkit_web_settings_new" result @@ -1926,9 +1963,8 @@ -- method WebSettings::copy -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TInterface "WebKit" "WebSettings" -- throws : False -- Skip return : False @@ -1940,8 +1976,8 @@ webSettingsCopy :: (MonadIO m, WebSettingsK a) => - a -> -- _obj - m WebSettings + a -- _obj + -> m WebSettings -- result webSettingsCopy _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_settings_copy _obj' @@ -1950,11 +1986,14 @@ touchManagedPtr _obj return result' +data WebSettingsCopyMethodInfo +instance (signature ~ (m WebSettings), MonadIO m, WebSettingsK a) => MethodInfo WebSettingsCopyMethodInfo a signature where + overloadedMethod _ = webSettingsCopy + -- method WebSettings::get_user_agent -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TUTF8 -- throws : False -- Skip return : False @@ -1966,8 +2005,8 @@ webSettingsGetUserAgent :: (MonadIO m, WebSettingsK a) => - a -> -- _obj - m T.Text + a -- _obj + -> m T.Text -- result webSettingsGetUserAgent _obj = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj result <- webkit_web_settings_get_user_agent _obj' @@ -1975,5 +2014,9 @@ result' <- cstringToText result touchManagedPtr _obj return result' + +data WebSettingsGetUserAgentMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebSettingsK a) => MethodInfo WebSettingsGetUserAgentMethodInfo a signature where + overloadedMethod _ = webSettingsGetUserAgent diff --git a/GI/WebKit/Objects/WebSettings.hs-boot b/GI/WebKit/Objects/WebSettings.hs-boot --- a/GI/WebKit/Objects/WebSettings.hs-boot +++ b/GI/WebKit/Objects/WebSettings.hs-boot @@ -70,3 +70,5 @@ data WebSettingsUserAgentPropertyInfo data WebSettingsUserStylesheetUriPropertyInfo data WebSettingsZoomStepPropertyInfo +data WebSettingsCopyMethodInfo +data WebSettingsGetUserAgentMethodInfo diff --git a/GI/WebKit/Objects/WebView.hs b/GI/WebKit/Objects/WebView.hs --- a/GI/WebKit/Objects/WebView.hs +++ b/GI/WebKit/Objects/WebView.hs @@ -1,6647 +1,7341 @@ -{- | -Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte -License : LGPL-2.1 -Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) --} - -module GI.WebKit.Objects.WebView - ( - --- * Exported types - WebView(..) , - WebViewK , - toWebView , - noWebView , - - - -- * Methods --- ** webViewCanCopyClipboard - webViewCanCopyClipboard , - - --- ** webViewCanCutClipboard - webViewCanCutClipboard , - - --- ** webViewCanGoBack - webViewCanGoBack , - - --- ** webViewCanGoBackOrForward - webViewCanGoBackOrForward , - - --- ** webViewCanGoForward - webViewCanGoForward , - - --- ** webViewCanPasteClipboard - webViewCanPasteClipboard , - - --- ** webViewCanRedo - webViewCanRedo , - - --- ** webViewCanShowMimeType - webViewCanShowMimeType , - - --- ** webViewCanUndo - webViewCanUndo , - - --- ** webViewCopyClipboard - webViewCopyClipboard , - - --- ** webViewCutClipboard - webViewCutClipboard , - - --- ** webViewDeleteSelection - webViewDeleteSelection , - - --- ** webViewExecuteScript - webViewExecuteScript , - - --- ** webViewGetBackForwardList - webViewGetBackForwardList , - - --- ** webViewGetCopyTargetList - webViewGetCopyTargetList , - - --- ** webViewGetCustomEncoding - webViewGetCustomEncoding , - - --- ** webViewGetDomDocument - webViewGetDomDocument , - - --- ** webViewGetEditable - webViewGetEditable , - - --- ** webViewGetEncoding - webViewGetEncoding , - - --- ** webViewGetFocusedFrame - webViewGetFocusedFrame , - - --- ** webViewGetFullContentZoom - webViewGetFullContentZoom , - - --- ** webViewGetHitTestResult - webViewGetHitTestResult , - - --- ** webViewGetIconPixbuf - webViewGetIconPixbuf , - - --- ** webViewGetIconUri - webViewGetIconUri , - - --- ** webViewGetInspector - webViewGetInspector , - - --- ** webViewGetLoadStatus - webViewGetLoadStatus , - - --- ** webViewGetMainFrame - webViewGetMainFrame , - - --- ** webViewGetPasteTargetList - webViewGetPasteTargetList , - - --- ** webViewGetProgress - webViewGetProgress , - - --- ** webViewGetSettings - webViewGetSettings , - - --- ** webViewGetSnapshot - webViewGetSnapshot , - - --- ** webViewGetTitle - webViewGetTitle , - - --- ** webViewGetTransparent - webViewGetTransparent , - - --- ** webViewGetUri - webViewGetUri , - - --- ** webViewGetViewMode - webViewGetViewMode , - - --- ** webViewGetViewSourceMode - webViewGetViewSourceMode , - - --- ** webViewGetViewportAttributes - webViewGetViewportAttributes , - - --- ** webViewGetWindowFeatures - webViewGetWindowFeatures , - - --- ** webViewGetZoomLevel - webViewGetZoomLevel , - - --- ** webViewGoBack - webViewGoBack , - - --- ** webViewGoBackOrForward - webViewGoBackOrForward , - - --- ** webViewGoForward - webViewGoForward , - - --- ** webViewGoToBackForwardItem - webViewGoToBackForwardItem , - - --- ** webViewHasSelection - webViewHasSelection , - - --- ** webViewLoadHtmlString - webViewLoadHtmlString , - - --- ** webViewLoadRequest - webViewLoadRequest , - - --- ** webViewLoadString - webViewLoadString , - - --- ** webViewLoadUri - webViewLoadUri , - - --- ** webViewMarkTextMatches - webViewMarkTextMatches , - - --- ** webViewMoveCursor - webViewMoveCursor , - - --- ** webViewNew - webViewNew , - - --- ** webViewOpen - webViewOpen , - - --- ** webViewPasteClipboard - webViewPasteClipboard , - - --- ** webViewRedo - webViewRedo , - - --- ** webViewReload - webViewReload , - - --- ** webViewReloadBypassCache - webViewReloadBypassCache , - - --- ** webViewSearchText - webViewSearchText , - - --- ** webViewSelectAll - webViewSelectAll , - - --- ** webViewSetCustomEncoding - webViewSetCustomEncoding , - - --- ** webViewSetEditable - webViewSetEditable , - - --- ** webViewSetFullContentZoom - webViewSetFullContentZoom , - - --- ** webViewSetHighlightTextMatches - webViewSetHighlightTextMatches , - - --- ** webViewSetMaintainsBackForwardList - webViewSetMaintainsBackForwardList , - - --- ** webViewSetSettings - webViewSetSettings , - - --- ** webViewSetTransparent - webViewSetTransparent , - - --- ** webViewSetViewMode - webViewSetViewMode , - - --- ** webViewSetViewSourceMode - webViewSetViewSourceMode , - - --- ** webViewSetZoomLevel - webViewSetZoomLevel , - - --- ** webViewStopLoading - webViewStopLoading , - - --- ** webViewTryGetFaviconPixbuf - webViewTryGetFaviconPixbuf , - - --- ** webViewUndo - webViewUndo , - - --- ** webViewUnmarkTextMatches - webViewUnmarkTextMatches , - - --- ** webViewZoomIn - webViewZoomIn , - - --- ** webViewZoomOut - webViewZoomOut , - - - - - -- * Properties --- ** CopyTargetList - WebViewCopyTargetListPropertyInfo , - getWebViewCopyTargetList , - - --- ** CustomEncoding - WebViewCustomEncodingPropertyInfo , - constructWebViewCustomEncoding , - getWebViewCustomEncoding , - setWebViewCustomEncoding , - - --- ** Editable - WebViewEditablePropertyInfo , - constructWebViewEditable , - getWebViewEditable , - setWebViewEditable , - - --- ** Encoding - WebViewEncodingPropertyInfo , - getWebViewEncoding , - - --- ** FullContentZoom - WebViewFullContentZoomPropertyInfo , - constructWebViewFullContentZoom , - getWebViewFullContentZoom , - setWebViewFullContentZoom , - - --- ** IconUri - WebViewIconUriPropertyInfo , - getWebViewIconUri , - - --- ** ImContext - WebViewImContextPropertyInfo , - getWebViewImContext , - - --- ** LoadStatus - WebViewLoadStatusPropertyInfo , - getWebViewLoadStatus , - - --- ** PasteTargetList - WebViewPasteTargetListPropertyInfo , - getWebViewPasteTargetList , - - --- ** Progress - WebViewProgressPropertyInfo , - getWebViewProgress , - - --- ** SelfScrolling - WebViewSelfScrollingPropertyInfo , - constructWebViewSelfScrolling , - getWebViewSelfScrolling , - - --- ** Settings - WebViewSettingsPropertyInfo , - constructWebViewSettings , - getWebViewSettings , - setWebViewSettings , - - --- ** Title - WebViewTitlePropertyInfo , - getWebViewTitle , - - --- ** Transparent - WebViewTransparentPropertyInfo , - constructWebViewTransparent , - getWebViewTransparent , - setWebViewTransparent , - - --- ** Uri - WebViewUriPropertyInfo , - getWebViewUri , - - --- ** ViewMode - WebViewViewModePropertyInfo , - constructWebViewViewMode , - getWebViewViewMode , - setWebViewViewMode , - - --- ** ViewportAttributes - WebViewViewportAttributesPropertyInfo , - getWebViewViewportAttributes , - - --- ** WebInspector - WebViewWebInspectorPropertyInfo , - getWebViewWebInspector , - - --- ** WindowFeatures - WebViewWindowFeaturesPropertyInfo , - constructWebViewWindowFeatures , - getWebViewWindowFeatures , - setWebViewWindowFeatures , - - --- ** ZoomLevel - WebViewZoomLevelPropertyInfo , - constructWebViewZoomLevel , - getWebViewZoomLevel , - setWebViewZoomLevel , - - - - - -- * Signals --- ** CloseWebView - WebViewCloseWebViewCallback , - WebViewCloseWebViewCallbackC , - WebViewCloseWebViewSignalInfo , - afterWebViewCloseWebView , - mkWebViewCloseWebViewCallback , - noWebViewCloseWebViewCallback , - onWebViewCloseWebView , - webViewCloseWebViewCallbackWrapper , - webViewCloseWebViewClosure , - - --- ** ConsoleMessage - WebViewConsoleMessageCallback , - WebViewConsoleMessageCallbackC , - WebViewConsoleMessageSignalInfo , - afterWebViewConsoleMessage , - mkWebViewConsoleMessageCallback , - noWebViewConsoleMessageCallback , - onWebViewConsoleMessage , - webViewConsoleMessageCallbackWrapper , - webViewConsoleMessageClosure , - - --- ** ContextMenu - WebViewContextMenuCallback , - WebViewContextMenuCallbackC , - WebViewContextMenuSignalInfo , - afterWebViewContextMenu , - mkWebViewContextMenuCallback , - noWebViewContextMenuCallback , - onWebViewContextMenu , - webViewContextMenuCallbackWrapper , - webViewContextMenuClosure , - - --- ** CopyClipboard - WebViewCopyClipboardCallback , - WebViewCopyClipboardCallbackC , - WebViewCopyClipboardSignalInfo , - afterWebViewCopyClipboard , - mkWebViewCopyClipboardCallback , - noWebViewCopyClipboardCallback , - onWebViewCopyClipboard , - webViewCopyClipboardCallbackWrapper , - webViewCopyClipboardClosure , - - --- ** CreatePluginWidget - WebViewCreatePluginWidgetCallback , - WebViewCreatePluginWidgetCallbackC , - WebViewCreatePluginWidgetSignalInfo , - afterWebViewCreatePluginWidget , - mkWebViewCreatePluginWidgetCallback , - noWebViewCreatePluginWidgetCallback , - onWebViewCreatePluginWidget , - webViewCreatePluginWidgetCallbackWrapper, - webViewCreatePluginWidgetClosure , - - --- ** CreateWebView - WebViewCreateWebViewCallback , - WebViewCreateWebViewCallbackC , - WebViewCreateWebViewSignalInfo , - afterWebViewCreateWebView , - mkWebViewCreateWebViewCallback , - noWebViewCreateWebViewCallback , - onWebViewCreateWebView , - webViewCreateWebViewCallbackWrapper , - webViewCreateWebViewClosure , - - --- ** CutClipboard - WebViewCutClipboardCallback , - WebViewCutClipboardCallbackC , - WebViewCutClipboardSignalInfo , - afterWebViewCutClipboard , - mkWebViewCutClipboardCallback , - noWebViewCutClipboardCallback , - onWebViewCutClipboard , - webViewCutClipboardCallbackWrapper , - webViewCutClipboardClosure , - - --- ** DatabaseQuotaExceeded - WebViewDatabaseQuotaExceededCallback , - WebViewDatabaseQuotaExceededCallbackC , - WebViewDatabaseQuotaExceededSignalInfo , - afterWebViewDatabaseQuotaExceeded , - mkWebViewDatabaseQuotaExceededCallback , - noWebViewDatabaseQuotaExceededCallback , - onWebViewDatabaseQuotaExceeded , - webViewDatabaseQuotaExceededCallbackWrapper, - webViewDatabaseQuotaExceededClosure , - - --- ** DocumentLoadFinished - WebViewDocumentLoadFinishedCallback , - WebViewDocumentLoadFinishedCallbackC , - WebViewDocumentLoadFinishedSignalInfo , - afterWebViewDocumentLoadFinished , - mkWebViewDocumentLoadFinishedCallback , - noWebViewDocumentLoadFinishedCallback , - onWebViewDocumentLoadFinished , - webViewDocumentLoadFinishedCallbackWrapper, - webViewDocumentLoadFinishedClosure , - - --- ** DownloadRequested - WebViewDownloadRequestedCallback , - WebViewDownloadRequestedCallbackC , - WebViewDownloadRequestedSignalInfo , - afterWebViewDownloadRequested , - mkWebViewDownloadRequestedCallback , - noWebViewDownloadRequestedCallback , - onWebViewDownloadRequested , - webViewDownloadRequestedCallbackWrapper , - webViewDownloadRequestedClosure , - - --- ** EditingBegan - WebViewEditingBeganCallback , - WebViewEditingBeganCallbackC , - WebViewEditingBeganSignalInfo , - afterWebViewEditingBegan , - mkWebViewEditingBeganCallback , - noWebViewEditingBeganCallback , - onWebViewEditingBegan , - webViewEditingBeganCallbackWrapper , - webViewEditingBeganClosure , - - --- ** EditingEnded - WebViewEditingEndedCallback , - WebViewEditingEndedCallbackC , - WebViewEditingEndedSignalInfo , - afterWebViewEditingEnded , - mkWebViewEditingEndedCallback , - noWebViewEditingEndedCallback , - onWebViewEditingEnded , - webViewEditingEndedCallbackWrapper , - webViewEditingEndedClosure , - - --- ** EnteringFullscreen - WebViewEnteringFullscreenCallback , - WebViewEnteringFullscreenCallbackC , - WebViewEnteringFullscreenSignalInfo , - afterWebViewEnteringFullscreen , - mkWebViewEnteringFullscreenCallback , - noWebViewEnteringFullscreenCallback , - onWebViewEnteringFullscreen , - webViewEnteringFullscreenCallbackWrapper, - webViewEnteringFullscreenClosure , - - --- ** FrameCreated - WebViewFrameCreatedCallback , - WebViewFrameCreatedCallbackC , - WebViewFrameCreatedSignalInfo , - afterWebViewFrameCreated , - mkWebViewFrameCreatedCallback , - noWebViewFrameCreatedCallback , - onWebViewFrameCreated , - webViewFrameCreatedCallbackWrapper , - webViewFrameCreatedClosure , - - --- ** GeolocationPolicyDecisionCancelled - WebViewGeolocationPolicyDecisionCancelledCallback, - WebViewGeolocationPolicyDecisionCancelledCallbackC, - WebViewGeolocationPolicyDecisionCancelledSignalInfo, - afterWebViewGeolocationPolicyDecisionCancelled, - mkWebViewGeolocationPolicyDecisionCancelledCallback, - noWebViewGeolocationPolicyDecisionCancelledCallback, - onWebViewGeolocationPolicyDecisionCancelled, - webViewGeolocationPolicyDecisionCancelledCallbackWrapper, - webViewGeolocationPolicyDecisionCancelledClosure, - - --- ** GeolocationPolicyDecisionRequested - WebViewGeolocationPolicyDecisionRequestedCallback, - WebViewGeolocationPolicyDecisionRequestedCallbackC, - WebViewGeolocationPolicyDecisionRequestedSignalInfo, - afterWebViewGeolocationPolicyDecisionRequested, - mkWebViewGeolocationPolicyDecisionRequestedCallback, - noWebViewGeolocationPolicyDecisionRequestedCallback, - onWebViewGeolocationPolicyDecisionRequested, - webViewGeolocationPolicyDecisionRequestedCallbackWrapper, - webViewGeolocationPolicyDecisionRequestedClosure, - - --- ** HoveringOverLink - WebViewHoveringOverLinkCallback , - WebViewHoveringOverLinkCallbackC , - WebViewHoveringOverLinkSignalInfo , - afterWebViewHoveringOverLink , - mkWebViewHoveringOverLinkCallback , - noWebViewHoveringOverLinkCallback , - onWebViewHoveringOverLink , - webViewHoveringOverLinkCallbackWrapper , - webViewHoveringOverLinkClosure , - - --- ** IconLoaded - WebViewIconLoadedCallback , - WebViewIconLoadedCallbackC , - WebViewIconLoadedSignalInfo , - afterWebViewIconLoaded , - mkWebViewIconLoadedCallback , - noWebViewIconLoadedCallback , - onWebViewIconLoaded , - webViewIconLoadedCallbackWrapper , - webViewIconLoadedClosure , - - --- ** LeavingFullscreen - WebViewLeavingFullscreenCallback , - WebViewLeavingFullscreenCallbackC , - WebViewLeavingFullscreenSignalInfo , - afterWebViewLeavingFullscreen , - mkWebViewLeavingFullscreenCallback , - noWebViewLeavingFullscreenCallback , - onWebViewLeavingFullscreen , - webViewLeavingFullscreenCallbackWrapper , - webViewLeavingFullscreenClosure , - - --- ** LoadCommitted - WebViewLoadCommittedCallback , - WebViewLoadCommittedCallbackC , - WebViewLoadCommittedSignalInfo , - afterWebViewLoadCommitted , - mkWebViewLoadCommittedCallback , - noWebViewLoadCommittedCallback , - onWebViewLoadCommitted , - webViewLoadCommittedCallbackWrapper , - webViewLoadCommittedClosure , - - --- ** LoadError - WebViewLoadErrorCallback , - WebViewLoadErrorCallbackC , - WebViewLoadErrorSignalInfo , - afterWebViewLoadError , - mkWebViewLoadErrorCallback , - noWebViewLoadErrorCallback , - onWebViewLoadError , - webViewLoadErrorCallbackWrapper , - webViewLoadErrorClosure , - - --- ** LoadFinished - WebViewLoadFinishedCallback , - WebViewLoadFinishedCallbackC , - WebViewLoadFinishedSignalInfo , - afterWebViewLoadFinished , - mkWebViewLoadFinishedCallback , - noWebViewLoadFinishedCallback , - onWebViewLoadFinished , - webViewLoadFinishedCallbackWrapper , - webViewLoadFinishedClosure , - - --- ** LoadProgressChanged - WebViewLoadProgressChangedCallback , - WebViewLoadProgressChangedCallbackC , - WebViewLoadProgressChangedSignalInfo , - afterWebViewLoadProgressChanged , - mkWebViewLoadProgressChangedCallback , - noWebViewLoadProgressChangedCallback , - onWebViewLoadProgressChanged , - webViewLoadProgressChangedCallbackWrapper, - webViewLoadProgressChangedClosure , - - --- ** LoadStarted - WebViewLoadStartedCallback , - WebViewLoadStartedCallbackC , - WebViewLoadStartedSignalInfo , - afterWebViewLoadStarted , - mkWebViewLoadStartedCallback , - noWebViewLoadStartedCallback , - onWebViewLoadStarted , - webViewLoadStartedCallbackWrapper , - webViewLoadStartedClosure , - - --- ** MimeTypePolicyDecisionRequested - WebViewMimeTypePolicyDecisionRequestedCallback, - WebViewMimeTypePolicyDecisionRequestedCallbackC, - WebViewMimeTypePolicyDecisionRequestedSignalInfo, - afterWebViewMimeTypePolicyDecisionRequested, - mkWebViewMimeTypePolicyDecisionRequestedCallback, - noWebViewMimeTypePolicyDecisionRequestedCallback, - onWebViewMimeTypePolicyDecisionRequested, - webViewMimeTypePolicyDecisionRequestedCallbackWrapper, - webViewMimeTypePolicyDecisionRequestedClosure, - - --- ** MoveCursor - WebViewMoveCursorCallback , - WebViewMoveCursorCallbackC , - WebViewMoveCursorSignalInfo , - afterWebViewMoveCursor , - mkWebViewMoveCursorCallback , - noWebViewMoveCursorCallback , - onWebViewMoveCursor , - webViewMoveCursorCallbackWrapper , - webViewMoveCursorClosure , - - --- ** NavigationPolicyDecisionRequested - WebViewNavigationPolicyDecisionRequestedCallback, - WebViewNavigationPolicyDecisionRequestedCallbackC, - WebViewNavigationPolicyDecisionRequestedSignalInfo, - afterWebViewNavigationPolicyDecisionRequested, - mkWebViewNavigationPolicyDecisionRequestedCallback, - noWebViewNavigationPolicyDecisionRequestedCallback, - onWebViewNavigationPolicyDecisionRequested, - webViewNavigationPolicyDecisionRequestedCallbackWrapper, - webViewNavigationPolicyDecisionRequestedClosure, - - --- ** NavigationRequested - WebViewNavigationRequestedCallback , - WebViewNavigationRequestedCallbackC , - WebViewNavigationRequestedSignalInfo , - afterWebViewNavigationRequested , - mkWebViewNavigationRequestedCallback , - noWebViewNavigationRequestedCallback , - onWebViewNavigationRequested , - webViewNavigationRequestedCallbackWrapper, - webViewNavigationRequestedClosure , - - --- ** NewWindowPolicyDecisionRequested - WebViewNewWindowPolicyDecisionRequestedCallback, - WebViewNewWindowPolicyDecisionRequestedCallbackC, - WebViewNewWindowPolicyDecisionRequestedSignalInfo, - afterWebViewNewWindowPolicyDecisionRequested, - mkWebViewNewWindowPolicyDecisionRequestedCallback, - noWebViewNewWindowPolicyDecisionRequestedCallback, - onWebViewNewWindowPolicyDecisionRequested, - webViewNewWindowPolicyDecisionRequestedCallbackWrapper, - webViewNewWindowPolicyDecisionRequestedClosure, - - --- ** OnloadEvent - WebViewOnloadEventCallback , - WebViewOnloadEventCallbackC , - WebViewOnloadEventSignalInfo , - afterWebViewOnloadEvent , - mkWebViewOnloadEventCallback , - noWebViewOnloadEventCallback , - onWebViewOnloadEvent , - webViewOnloadEventCallbackWrapper , - webViewOnloadEventClosure , - - --- ** PasteClipboard - WebViewPasteClipboardCallback , - WebViewPasteClipboardCallbackC , - WebViewPasteClipboardSignalInfo , - afterWebViewPasteClipboard , - mkWebViewPasteClipboardCallback , - noWebViewPasteClipboardCallback , - onWebViewPasteClipboard , - webViewPasteClipboardCallbackWrapper , - webViewPasteClipboardClosure , - - --- ** PopulatePopup - WebViewPopulatePopupCallback , - WebViewPopulatePopupCallbackC , - WebViewPopulatePopupSignalInfo , - afterWebViewPopulatePopup , - mkWebViewPopulatePopupCallback , - noWebViewPopulatePopupCallback , - onWebViewPopulatePopup , - webViewPopulatePopupCallbackWrapper , - webViewPopulatePopupClosure , - - --- ** PrintRequested - WebViewPrintRequestedCallback , - WebViewPrintRequestedCallbackC , - WebViewPrintRequestedSignalInfo , - afterWebViewPrintRequested , - mkWebViewPrintRequestedCallback , - noWebViewPrintRequestedCallback , - onWebViewPrintRequested , - webViewPrintRequestedCallbackWrapper , - webViewPrintRequestedClosure , - - --- ** Redo - WebViewRedoCallback , - WebViewRedoCallbackC , - WebViewRedoSignalInfo , - afterWebViewRedo , - mkWebViewRedoCallback , - noWebViewRedoCallback , - onWebViewRedo , - webViewRedoCallbackWrapper , - webViewRedoClosure , - - --- ** ResourceContentLengthReceived - WebViewResourceContentLengthReceivedCallback, - WebViewResourceContentLengthReceivedCallbackC, - WebViewResourceContentLengthReceivedSignalInfo, - afterWebViewResourceContentLengthReceived, - mkWebViewResourceContentLengthReceivedCallback, - noWebViewResourceContentLengthReceivedCallback, - onWebViewResourceContentLengthReceived , - webViewResourceContentLengthReceivedCallbackWrapper, - webViewResourceContentLengthReceivedClosure, - - --- ** ResourceLoadFailed - WebViewResourceLoadFailedCallback , - WebViewResourceLoadFailedCallbackC , - WebViewResourceLoadFailedSignalInfo , - afterWebViewResourceLoadFailed , - mkWebViewResourceLoadFailedCallback , - noWebViewResourceLoadFailedCallback , - onWebViewResourceLoadFailed , - webViewResourceLoadFailedCallbackWrapper, - webViewResourceLoadFailedClosure , - - --- ** ResourceLoadFinished - WebViewResourceLoadFinishedCallback , - WebViewResourceLoadFinishedCallbackC , - WebViewResourceLoadFinishedSignalInfo , - afterWebViewResourceLoadFinished , - mkWebViewResourceLoadFinishedCallback , - noWebViewResourceLoadFinishedCallback , - onWebViewResourceLoadFinished , - webViewResourceLoadFinishedCallbackWrapper, - webViewResourceLoadFinishedClosure , - - --- ** ResourceRequestStarting - WebViewResourceRequestStartingCallback , - WebViewResourceRequestStartingCallbackC , - WebViewResourceRequestStartingSignalInfo, - afterWebViewResourceRequestStarting , - mkWebViewResourceRequestStartingCallback, - noWebViewResourceRequestStartingCallback, - onWebViewResourceRequestStarting , - webViewResourceRequestStartingCallbackWrapper, - webViewResourceRequestStartingClosure , - - --- ** ResourceResponseReceived - WebViewResourceResponseReceivedCallback , - WebViewResourceResponseReceivedCallbackC, - WebViewResourceResponseReceivedSignalInfo, - afterWebViewResourceResponseReceived , - mkWebViewResourceResponseReceivedCallback, - noWebViewResourceResponseReceivedCallback, - onWebViewResourceResponseReceived , - webViewResourceResponseReceivedCallbackWrapper, - webViewResourceResponseReceivedClosure , - - --- ** RunFileChooser - WebViewRunFileChooserCallback , - WebViewRunFileChooserCallbackC , - WebViewRunFileChooserSignalInfo , - afterWebViewRunFileChooser , - mkWebViewRunFileChooserCallback , - noWebViewRunFileChooserCallback , - onWebViewRunFileChooser , - webViewRunFileChooserCallbackWrapper , - webViewRunFileChooserClosure , - - --- ** ScriptAlert - WebViewScriptAlertCallback , - WebViewScriptAlertCallbackC , - WebViewScriptAlertSignalInfo , - afterWebViewScriptAlert , - mkWebViewScriptAlertCallback , - noWebViewScriptAlertCallback , - onWebViewScriptAlert , - webViewScriptAlertCallbackWrapper , - webViewScriptAlertClosure , - - --- ** ScriptConfirm - WebViewScriptConfirmCallback , - WebViewScriptConfirmCallbackC , - WebViewScriptConfirmSignalInfo , - afterWebViewScriptConfirm , - mkWebViewScriptConfirmCallback , - noWebViewScriptConfirmCallback , - onWebViewScriptConfirm , - webViewScriptConfirmCallbackWrapper , - webViewScriptConfirmClosure , - - --- ** ScriptPrompt - WebViewScriptPromptCallback , - WebViewScriptPromptCallbackC , - WebViewScriptPromptSignalInfo , - afterWebViewScriptPrompt , - mkWebViewScriptPromptCallback , - noWebViewScriptPromptCallback , - onWebViewScriptPrompt , - webViewScriptPromptCallbackWrapper , - webViewScriptPromptClosure , - - --- ** SelectAll - WebViewSelectAllCallback , - WebViewSelectAllCallbackC , - WebViewSelectAllSignalInfo , - afterWebViewSelectAll , - mkWebViewSelectAllCallback , - noWebViewSelectAllCallback , - onWebViewSelectAll , - webViewSelectAllCallbackWrapper , - webViewSelectAllClosure , - - --- ** SelectionChanged - WebViewSelectionChangedCallback , - WebViewSelectionChangedCallbackC , - WebViewSelectionChangedSignalInfo , - afterWebViewSelectionChanged , - mkWebViewSelectionChangedCallback , - noWebViewSelectionChangedCallback , - onWebViewSelectionChanged , - webViewSelectionChangedCallbackWrapper , - webViewSelectionChangedClosure , - - --- ** ShouldApplyStyle - WebViewShouldApplyStyleCallback , - WebViewShouldApplyStyleCallbackC , - WebViewShouldApplyStyleSignalInfo , - afterWebViewShouldApplyStyle , - mkWebViewShouldApplyStyleCallback , - noWebViewShouldApplyStyleCallback , - onWebViewShouldApplyStyle , - webViewShouldApplyStyleCallbackWrapper , - webViewShouldApplyStyleClosure , - - --- ** ShouldBeginEditing - WebViewShouldBeginEditingCallback , - WebViewShouldBeginEditingCallbackC , - WebViewShouldBeginEditingSignalInfo , - afterWebViewShouldBeginEditing , - mkWebViewShouldBeginEditingCallback , - noWebViewShouldBeginEditingCallback , - onWebViewShouldBeginEditing , - webViewShouldBeginEditingCallbackWrapper, - webViewShouldBeginEditingClosure , - - --- ** ShouldChangeSelectedRange - WebViewShouldChangeSelectedRangeCallback, - WebViewShouldChangeSelectedRangeCallbackC, - WebViewShouldChangeSelectedRangeSignalInfo, - afterWebViewShouldChangeSelectedRange , - mkWebViewShouldChangeSelectedRangeCallback, - noWebViewShouldChangeSelectedRangeCallback, - onWebViewShouldChangeSelectedRange , - webViewShouldChangeSelectedRangeCallbackWrapper, - webViewShouldChangeSelectedRangeClosure , - - --- ** ShouldDeleteRange - WebViewShouldDeleteRangeCallback , - WebViewShouldDeleteRangeCallbackC , - WebViewShouldDeleteRangeSignalInfo , - afterWebViewShouldDeleteRange , - mkWebViewShouldDeleteRangeCallback , - noWebViewShouldDeleteRangeCallback , - onWebViewShouldDeleteRange , - webViewShouldDeleteRangeCallbackWrapper , - webViewShouldDeleteRangeClosure , - - --- ** ShouldEndEditing - WebViewShouldEndEditingCallback , - WebViewShouldEndEditingCallbackC , - WebViewShouldEndEditingSignalInfo , - afterWebViewShouldEndEditing , - mkWebViewShouldEndEditingCallback , - noWebViewShouldEndEditingCallback , - onWebViewShouldEndEditing , - webViewShouldEndEditingCallbackWrapper , - webViewShouldEndEditingClosure , - - --- ** ShouldInsertNode - WebViewShouldInsertNodeCallback , - WebViewShouldInsertNodeCallbackC , - WebViewShouldInsertNodeSignalInfo , - afterWebViewShouldInsertNode , - mkWebViewShouldInsertNodeCallback , - noWebViewShouldInsertNodeCallback , - onWebViewShouldInsertNode , - webViewShouldInsertNodeCallbackWrapper , - webViewShouldInsertNodeClosure , - - --- ** ShouldInsertText - WebViewShouldInsertTextCallback , - WebViewShouldInsertTextCallbackC , - WebViewShouldInsertTextSignalInfo , - afterWebViewShouldInsertText , - mkWebViewShouldInsertTextCallback , - noWebViewShouldInsertTextCallback , - onWebViewShouldInsertText , - webViewShouldInsertTextCallbackWrapper , - webViewShouldInsertTextClosure , - - --- ** ShouldShowDeleteInterfaceForElement - WebViewShouldShowDeleteInterfaceForElementCallback, - WebViewShouldShowDeleteInterfaceForElementCallbackC, - WebViewShouldShowDeleteInterfaceForElementSignalInfo, - afterWebViewShouldShowDeleteInterfaceForElement, - mkWebViewShouldShowDeleteInterfaceForElementCallback, - noWebViewShouldShowDeleteInterfaceForElementCallback, - onWebViewShouldShowDeleteInterfaceForElement, - webViewShouldShowDeleteInterfaceForElementCallbackWrapper, - webViewShouldShowDeleteInterfaceForElementClosure, - - --- ** StatusBarTextChanged - WebViewStatusBarTextChangedCallback , - WebViewStatusBarTextChangedCallbackC , - WebViewStatusBarTextChangedSignalInfo , - afterWebViewStatusBarTextChanged , - mkWebViewStatusBarTextChangedCallback , - noWebViewStatusBarTextChangedCallback , - onWebViewStatusBarTextChanged , - webViewStatusBarTextChangedCallbackWrapper, - webViewStatusBarTextChangedClosure , - - --- ** TitleChanged - WebViewTitleChangedCallback , - WebViewTitleChangedCallbackC , - WebViewTitleChangedSignalInfo , - afterWebViewTitleChanged , - mkWebViewTitleChangedCallback , - noWebViewTitleChangedCallback , - onWebViewTitleChanged , - webViewTitleChangedCallbackWrapper , - webViewTitleChangedClosure , - - --- ** Undo - WebViewUndoCallback , - WebViewUndoCallbackC , - WebViewUndoSignalInfo , - afterWebViewUndo , - mkWebViewUndoCallback , - noWebViewUndoCallback , - onWebViewUndo , - webViewUndoCallbackWrapper , - webViewUndoClosure , - - --- ** UserChangedContents - WebViewUserChangedContentsCallback , - WebViewUserChangedContentsCallbackC , - WebViewUserChangedContentsSignalInfo , - afterWebViewUserChangedContents , - mkWebViewUserChangedContentsCallback , - noWebViewUserChangedContentsCallback , - onWebViewUserChangedContents , - webViewUserChangedContentsCallbackWrapper, - webViewUserChangedContentsClosure , - - --- ** ViewportAttributesChanged - WebViewViewportAttributesChangedCallback, - WebViewViewportAttributesChangedCallbackC, - WebViewViewportAttributesChangedSignalInfo, - afterWebViewViewportAttributesChanged , - mkWebViewViewportAttributesChangedCallback, - noWebViewViewportAttributesChangedCallback, - onWebViewViewportAttributesChanged , - webViewViewportAttributesChangedCallbackWrapper, - webViewViewportAttributesChangedClosure , - - --- ** ViewportAttributesRecomputeRequested - WebViewViewportAttributesRecomputeRequestedCallback, - WebViewViewportAttributesRecomputeRequestedCallbackC, - WebViewViewportAttributesRecomputeRequestedSignalInfo, - afterWebViewViewportAttributesRecomputeRequested, - mkWebViewViewportAttributesRecomputeRequestedCallback, - noWebViewViewportAttributesRecomputeRequestedCallback, - onWebViewViewportAttributesRecomputeRequested, - webViewViewportAttributesRecomputeRequestedCallbackWrapper, - webViewViewportAttributesRecomputeRequestedClosure, - - --- ** WebViewReady - WebViewWebViewReadyCallback , - WebViewWebViewReadyCallbackC , - WebViewWebViewReadySignalInfo , - afterWebViewWebViewReady , - mkWebViewWebViewReadyCallback , - noWebViewWebViewReadyCallback , - onWebViewWebViewReady , - webViewWebViewReadyCallbackWrapper , - webViewWebViewReadyClosure , - - --- ** WindowObjectCleared - WebViewWindowObjectClearedCallback , - WebViewWindowObjectClearedCallbackC , - WebViewWindowObjectClearedSignalInfo , - afterWebViewWindowObjectCleared , - mkWebViewWindowObjectClearedCallback , - noWebViewWindowObjectClearedCallback , - onWebViewWindowObjectCleared , - webViewWindowObjectClearedCallbackWrapper, - webViewWindowObjectClearedClosure , - - - - - ) where - -import Prelude () -import Data.GI.Base.ShortPrelude - -import qualified Data.Text as T -import qualified Data.ByteString.Char8 as B -import qualified Data.Map as Map - -import GI.WebKit.Types -import GI.WebKit.Callbacks -import qualified GI.Atk as Atk -import qualified GI.GObject as GObject -import qualified GI.Gdk as Gdk -import qualified GI.GdkPixbuf as GdkPixbuf -import qualified GI.Gtk as Gtk -import qualified GI.Cairo as Cairo - -newtype WebView = WebView (ForeignPtr WebView) -foreign import ccall "webkit_web_view_get_type" - c_webkit_web_view_get_type :: IO GType - -type instance ParentTypes WebView = WebViewParentTypes -type WebViewParentTypes = '[Gtk.Container, Gtk.Widget, GObject.Object, Atk.ImplementorIface, Gtk.Buildable, Gtk.Scrollable] - -instance GObject WebView where - gobjectIsInitiallyUnowned _ = True - gobjectType _ = c_webkit_web_view_get_type - - -class GObject o => WebViewK o -instance (GObject o, IsDescendantOf WebView o) => WebViewK o - -toWebView :: WebViewK o => o -> IO WebView -toWebView = unsafeCastTo WebView - -noWebView :: Maybe WebView -noWebView = Nothing - --- signal WebView::close-web-view -type WebViewCloseWebViewCallback = - IO Bool - -noWebViewCloseWebViewCallback :: Maybe WebViewCloseWebViewCallback -noWebViewCloseWebViewCallback = Nothing - -type WebViewCloseWebViewCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewCloseWebViewCallback :: WebViewCloseWebViewCallbackC -> IO (FunPtr WebViewCloseWebViewCallbackC) - -webViewCloseWebViewClosure :: WebViewCloseWebViewCallback -> IO Closure -webViewCloseWebViewClosure cb = newCClosure =<< mkWebViewCloseWebViewCallback wrapped - where wrapped = webViewCloseWebViewCallbackWrapper cb - -webViewCloseWebViewCallbackWrapper :: - WebViewCloseWebViewCallback -> - Ptr () -> - Ptr () -> - IO CInt -webViewCloseWebViewCallbackWrapper _cb _ _ = do - result <- _cb - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewCloseWebView :: (GObject a, MonadIO m) => a -> WebViewCloseWebViewCallback -> m SignalHandlerId -onWebViewCloseWebView obj cb = liftIO $ connectWebViewCloseWebView obj cb SignalConnectBefore -afterWebViewCloseWebView :: (GObject a, MonadIO m) => a -> WebViewCloseWebViewCallback -> m SignalHandlerId -afterWebViewCloseWebView obj cb = connectWebViewCloseWebView obj cb SignalConnectAfter - -connectWebViewCloseWebView :: (GObject a, MonadIO m) => - a -> WebViewCloseWebViewCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewCloseWebView obj cb after = liftIO $ do - cb' <- mkWebViewCloseWebViewCallback (webViewCloseWebViewCallbackWrapper cb) - connectSignalFunPtr obj "close-web-view" cb' after - --- signal WebView::console-message -type WebViewConsoleMessageCallback = - T.Text -> - Int32 -> - T.Text -> - IO Bool - -noWebViewConsoleMessageCallback :: Maybe WebViewConsoleMessageCallback -noWebViewConsoleMessageCallback = Nothing - -type WebViewConsoleMessageCallbackC = - Ptr () -> -- object - CString -> - Int32 -> - CString -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewConsoleMessageCallback :: WebViewConsoleMessageCallbackC -> IO (FunPtr WebViewConsoleMessageCallbackC) - -webViewConsoleMessageClosure :: WebViewConsoleMessageCallback -> IO Closure -webViewConsoleMessageClosure cb = newCClosure =<< mkWebViewConsoleMessageCallback wrapped - where wrapped = webViewConsoleMessageCallbackWrapper cb - -webViewConsoleMessageCallbackWrapper :: - WebViewConsoleMessageCallback -> - Ptr () -> - CString -> - Int32 -> - CString -> - Ptr () -> - IO CInt -webViewConsoleMessageCallbackWrapper _cb _ message line source_id _ = do - message' <- cstringToText message - source_id' <- cstringToText source_id - result <- _cb message' line source_id' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewConsoleMessage :: (GObject a, MonadIO m) => a -> WebViewConsoleMessageCallback -> m SignalHandlerId -onWebViewConsoleMessage obj cb = liftIO $ connectWebViewConsoleMessage obj cb SignalConnectBefore -afterWebViewConsoleMessage :: (GObject a, MonadIO m) => a -> WebViewConsoleMessageCallback -> m SignalHandlerId -afterWebViewConsoleMessage obj cb = connectWebViewConsoleMessage obj cb SignalConnectAfter - -connectWebViewConsoleMessage :: (GObject a, MonadIO m) => - a -> WebViewConsoleMessageCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewConsoleMessage obj cb after = liftIO $ do - cb' <- mkWebViewConsoleMessageCallback (webViewConsoleMessageCallbackWrapper cb) - connectSignalFunPtr obj "console-message" cb' after - --- signal WebView::context-menu -type WebViewContextMenuCallback = - Gtk.Widget -> - HitTestResult -> - Bool -> - IO Bool - -noWebViewContextMenuCallback :: Maybe WebViewContextMenuCallback -noWebViewContextMenuCallback = Nothing - -type WebViewContextMenuCallbackC = - Ptr () -> -- object - Ptr Gtk.Widget -> - Ptr HitTestResult -> - CInt -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewContextMenuCallback :: WebViewContextMenuCallbackC -> IO (FunPtr WebViewContextMenuCallbackC) - -webViewContextMenuClosure :: WebViewContextMenuCallback -> IO Closure -webViewContextMenuClosure cb = newCClosure =<< mkWebViewContextMenuCallback wrapped - where wrapped = webViewContextMenuCallbackWrapper cb - -webViewContextMenuCallbackWrapper :: - WebViewContextMenuCallback -> - Ptr () -> - Ptr Gtk.Widget -> - Ptr HitTestResult -> - CInt -> - Ptr () -> - IO CInt -webViewContextMenuCallbackWrapper _cb _ default_menu hit_test_result triggered_with_keyboard _ = do - default_menu' <- (newObject Gtk.Widget) default_menu - hit_test_result' <- (newObject HitTestResult) hit_test_result - let triggered_with_keyboard' = (/= 0) triggered_with_keyboard - result <- _cb default_menu' hit_test_result' triggered_with_keyboard' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewContextMenu :: (GObject a, MonadIO m) => a -> WebViewContextMenuCallback -> m SignalHandlerId -onWebViewContextMenu obj cb = liftIO $ connectWebViewContextMenu obj cb SignalConnectBefore -afterWebViewContextMenu :: (GObject a, MonadIO m) => a -> WebViewContextMenuCallback -> m SignalHandlerId -afterWebViewContextMenu obj cb = connectWebViewContextMenu obj cb SignalConnectAfter - -connectWebViewContextMenu :: (GObject a, MonadIO m) => - a -> WebViewContextMenuCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewContextMenu obj cb after = liftIO $ do - cb' <- mkWebViewContextMenuCallback (webViewContextMenuCallbackWrapper cb) - connectSignalFunPtr obj "context-menu" cb' after - --- signal WebView::copy-clipboard -type WebViewCopyClipboardCallback = - IO () - -noWebViewCopyClipboardCallback :: Maybe WebViewCopyClipboardCallback -noWebViewCopyClipboardCallback = Nothing - -type WebViewCopyClipboardCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewCopyClipboardCallback :: WebViewCopyClipboardCallbackC -> IO (FunPtr WebViewCopyClipboardCallbackC) - -webViewCopyClipboardClosure :: WebViewCopyClipboardCallback -> IO Closure -webViewCopyClipboardClosure cb = newCClosure =<< mkWebViewCopyClipboardCallback wrapped - where wrapped = webViewCopyClipboardCallbackWrapper cb - -webViewCopyClipboardCallbackWrapper :: - WebViewCopyClipboardCallback -> - Ptr () -> - Ptr () -> - IO () -webViewCopyClipboardCallbackWrapper _cb _ _ = do - _cb - -onWebViewCopyClipboard :: (GObject a, MonadIO m) => a -> WebViewCopyClipboardCallback -> m SignalHandlerId -onWebViewCopyClipboard obj cb = liftIO $ connectWebViewCopyClipboard obj cb SignalConnectBefore -afterWebViewCopyClipboard :: (GObject a, MonadIO m) => a -> WebViewCopyClipboardCallback -> m SignalHandlerId -afterWebViewCopyClipboard obj cb = connectWebViewCopyClipboard obj cb SignalConnectAfter - -connectWebViewCopyClipboard :: (GObject a, MonadIO m) => - a -> WebViewCopyClipboardCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewCopyClipboard obj cb after = liftIO $ do - cb' <- mkWebViewCopyClipboardCallback (webViewCopyClipboardCallbackWrapper cb) - connectSignalFunPtr obj "copy-clipboard" cb' after - --- signal WebView::create-plugin-widget -type WebViewCreatePluginWidgetCallback = - T.Text -> - T.Text -> - Map.Map (Ptr ()) (Ptr ()) -> - IO Gtk.Widget - -noWebViewCreatePluginWidgetCallback :: Maybe WebViewCreatePluginWidgetCallback -noWebViewCreatePluginWidgetCallback = Nothing - -type WebViewCreatePluginWidgetCallbackC = - Ptr () -> -- object - CString -> - CString -> - Ptr (GHashTable (Ptr ()) (Ptr ())) -> - Ptr () -> -- user_data - IO (Ptr Gtk.Widget) - -foreign import ccall "wrapper" - mkWebViewCreatePluginWidgetCallback :: WebViewCreatePluginWidgetCallbackC -> IO (FunPtr WebViewCreatePluginWidgetCallbackC) - -webViewCreatePluginWidgetClosure :: WebViewCreatePluginWidgetCallback -> IO Closure -webViewCreatePluginWidgetClosure cb = newCClosure =<< mkWebViewCreatePluginWidgetCallback wrapped - where wrapped = webViewCreatePluginWidgetCallbackWrapper cb - -webViewCreatePluginWidgetCallbackWrapper :: - WebViewCreatePluginWidgetCallback -> - Ptr () -> - CString -> - CString -> - Ptr (GHashTable (Ptr ()) (Ptr ())) -> - Ptr () -> - IO (Ptr Gtk.Widget) -webViewCreatePluginWidgetCallbackWrapper _cb _ mime_type uri param _ = do - mime_type' <- cstringToText mime_type - uri' <- cstringToText uri - param' <- unpackGHashTable param - let param'' = mapFirst ptrUnpackPtr param' - let param''' = mapSecond ptrUnpackPtr param'' - let param'''' = Map.fromList param''' - result <- _cb mime_type' uri' param'''' - result' <- refObject result - return result' - -onWebViewCreatePluginWidget :: (GObject a, MonadIO m) => a -> WebViewCreatePluginWidgetCallback -> m SignalHandlerId -onWebViewCreatePluginWidget obj cb = liftIO $ connectWebViewCreatePluginWidget obj cb SignalConnectBefore -afterWebViewCreatePluginWidget :: (GObject a, MonadIO m) => a -> WebViewCreatePluginWidgetCallback -> m SignalHandlerId -afterWebViewCreatePluginWidget obj cb = connectWebViewCreatePluginWidget obj cb SignalConnectAfter - -connectWebViewCreatePluginWidget :: (GObject a, MonadIO m) => - a -> WebViewCreatePluginWidgetCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewCreatePluginWidget obj cb after = liftIO $ do - cb' <- mkWebViewCreatePluginWidgetCallback (webViewCreatePluginWidgetCallbackWrapper cb) - connectSignalFunPtr obj "create-plugin-widget" cb' after - --- signal WebView::create-web-view -type WebViewCreateWebViewCallback = - WebFrame -> - IO WebView - -noWebViewCreateWebViewCallback :: Maybe WebViewCreateWebViewCallback -noWebViewCreateWebViewCallback = Nothing - -type WebViewCreateWebViewCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr () -> -- user_data - IO (Ptr WebView) - -foreign import ccall "wrapper" - mkWebViewCreateWebViewCallback :: WebViewCreateWebViewCallbackC -> IO (FunPtr WebViewCreateWebViewCallbackC) - -webViewCreateWebViewClosure :: WebViewCreateWebViewCallback -> IO Closure -webViewCreateWebViewClosure cb = newCClosure =<< mkWebViewCreateWebViewCallback wrapped - where wrapped = webViewCreateWebViewCallbackWrapper cb - -webViewCreateWebViewCallbackWrapper :: - WebViewCreateWebViewCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr () -> - IO (Ptr WebView) -webViewCreateWebViewCallbackWrapper _cb _ frame _ = do - frame' <- (newObject WebFrame) frame - result <- _cb frame' - result' <- refObject result - return result' - -onWebViewCreateWebView :: (GObject a, MonadIO m) => a -> WebViewCreateWebViewCallback -> m SignalHandlerId -onWebViewCreateWebView obj cb = liftIO $ connectWebViewCreateWebView obj cb SignalConnectBefore -afterWebViewCreateWebView :: (GObject a, MonadIO m) => a -> WebViewCreateWebViewCallback -> m SignalHandlerId -afterWebViewCreateWebView obj cb = connectWebViewCreateWebView obj cb SignalConnectAfter - -connectWebViewCreateWebView :: (GObject a, MonadIO m) => - a -> WebViewCreateWebViewCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewCreateWebView obj cb after = liftIO $ do - cb' <- mkWebViewCreateWebViewCallback (webViewCreateWebViewCallbackWrapper cb) - connectSignalFunPtr obj "create-web-view" cb' after - --- signal WebView::cut-clipboard -type WebViewCutClipboardCallback = - IO () - -noWebViewCutClipboardCallback :: Maybe WebViewCutClipboardCallback -noWebViewCutClipboardCallback = Nothing - -type WebViewCutClipboardCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewCutClipboardCallback :: WebViewCutClipboardCallbackC -> IO (FunPtr WebViewCutClipboardCallbackC) - -webViewCutClipboardClosure :: WebViewCutClipboardCallback -> IO Closure -webViewCutClipboardClosure cb = newCClosure =<< mkWebViewCutClipboardCallback wrapped - where wrapped = webViewCutClipboardCallbackWrapper cb - -webViewCutClipboardCallbackWrapper :: - WebViewCutClipboardCallback -> - Ptr () -> - Ptr () -> - IO () -webViewCutClipboardCallbackWrapper _cb _ _ = do - _cb - -onWebViewCutClipboard :: (GObject a, MonadIO m) => a -> WebViewCutClipboardCallback -> m SignalHandlerId -onWebViewCutClipboard obj cb = liftIO $ connectWebViewCutClipboard obj cb SignalConnectBefore -afterWebViewCutClipboard :: (GObject a, MonadIO m) => a -> WebViewCutClipboardCallback -> m SignalHandlerId -afterWebViewCutClipboard obj cb = connectWebViewCutClipboard obj cb SignalConnectAfter - -connectWebViewCutClipboard :: (GObject a, MonadIO m) => - a -> WebViewCutClipboardCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewCutClipboard obj cb after = liftIO $ do - cb' <- mkWebViewCutClipboardCallback (webViewCutClipboardCallbackWrapper cb) - connectSignalFunPtr obj "cut-clipboard" cb' after - --- signal WebView::database-quota-exceeded -type WebViewDatabaseQuotaExceededCallback = - GObject.Object -> - GObject.Object -> - IO () - -noWebViewDatabaseQuotaExceededCallback :: Maybe WebViewDatabaseQuotaExceededCallback -noWebViewDatabaseQuotaExceededCallback = Nothing - -type WebViewDatabaseQuotaExceededCallbackC = - Ptr () -> -- object - Ptr GObject.Object -> - Ptr GObject.Object -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewDatabaseQuotaExceededCallback :: WebViewDatabaseQuotaExceededCallbackC -> IO (FunPtr WebViewDatabaseQuotaExceededCallbackC) - -webViewDatabaseQuotaExceededClosure :: WebViewDatabaseQuotaExceededCallback -> IO Closure -webViewDatabaseQuotaExceededClosure cb = newCClosure =<< mkWebViewDatabaseQuotaExceededCallback wrapped - where wrapped = webViewDatabaseQuotaExceededCallbackWrapper cb - -webViewDatabaseQuotaExceededCallbackWrapper :: - WebViewDatabaseQuotaExceededCallback -> - Ptr () -> - Ptr GObject.Object -> - Ptr GObject.Object -> - Ptr () -> - IO () -webViewDatabaseQuotaExceededCallbackWrapper _cb _ frame database _ = do - frame' <- (newObject GObject.Object) frame - database' <- (newObject GObject.Object) database - _cb frame' database' - -onWebViewDatabaseQuotaExceeded :: (GObject a, MonadIO m) => a -> WebViewDatabaseQuotaExceededCallback -> m SignalHandlerId -onWebViewDatabaseQuotaExceeded obj cb = liftIO $ connectWebViewDatabaseQuotaExceeded obj cb SignalConnectBefore -afterWebViewDatabaseQuotaExceeded :: (GObject a, MonadIO m) => a -> WebViewDatabaseQuotaExceededCallback -> m SignalHandlerId -afterWebViewDatabaseQuotaExceeded obj cb = connectWebViewDatabaseQuotaExceeded obj cb SignalConnectAfter - -connectWebViewDatabaseQuotaExceeded :: (GObject a, MonadIO m) => - a -> WebViewDatabaseQuotaExceededCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewDatabaseQuotaExceeded obj cb after = liftIO $ do - cb' <- mkWebViewDatabaseQuotaExceededCallback (webViewDatabaseQuotaExceededCallbackWrapper cb) - connectSignalFunPtr obj "database-quota-exceeded" cb' after - --- signal WebView::document-load-finished -type WebViewDocumentLoadFinishedCallback = - WebFrame -> - IO () - -noWebViewDocumentLoadFinishedCallback :: Maybe WebViewDocumentLoadFinishedCallback -noWebViewDocumentLoadFinishedCallback = Nothing - -type WebViewDocumentLoadFinishedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewDocumentLoadFinishedCallback :: WebViewDocumentLoadFinishedCallbackC -> IO (FunPtr WebViewDocumentLoadFinishedCallbackC) - -webViewDocumentLoadFinishedClosure :: WebViewDocumentLoadFinishedCallback -> IO Closure -webViewDocumentLoadFinishedClosure cb = newCClosure =<< mkWebViewDocumentLoadFinishedCallback wrapped - where wrapped = webViewDocumentLoadFinishedCallbackWrapper cb - -webViewDocumentLoadFinishedCallbackWrapper :: - WebViewDocumentLoadFinishedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr () -> - IO () -webViewDocumentLoadFinishedCallbackWrapper _cb _ web_frame _ = do - web_frame' <- (newObject WebFrame) web_frame - _cb web_frame' - -onWebViewDocumentLoadFinished :: (GObject a, MonadIO m) => a -> WebViewDocumentLoadFinishedCallback -> m SignalHandlerId -onWebViewDocumentLoadFinished obj cb = liftIO $ connectWebViewDocumentLoadFinished obj cb SignalConnectBefore -afterWebViewDocumentLoadFinished :: (GObject a, MonadIO m) => a -> WebViewDocumentLoadFinishedCallback -> m SignalHandlerId -afterWebViewDocumentLoadFinished obj cb = connectWebViewDocumentLoadFinished obj cb SignalConnectAfter - -connectWebViewDocumentLoadFinished :: (GObject a, MonadIO m) => - a -> WebViewDocumentLoadFinishedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewDocumentLoadFinished obj cb after = liftIO $ do - cb' <- mkWebViewDocumentLoadFinishedCallback (webViewDocumentLoadFinishedCallbackWrapper cb) - connectSignalFunPtr obj "document-load-finished" cb' after - --- signal WebView::download-requested -type WebViewDownloadRequestedCallback = - Download -> - IO Bool - -noWebViewDownloadRequestedCallback :: Maybe WebViewDownloadRequestedCallback -noWebViewDownloadRequestedCallback = Nothing - -type WebViewDownloadRequestedCallbackC = - Ptr () -> -- object - Ptr Download -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewDownloadRequestedCallback :: WebViewDownloadRequestedCallbackC -> IO (FunPtr WebViewDownloadRequestedCallbackC) - -webViewDownloadRequestedClosure :: WebViewDownloadRequestedCallback -> IO Closure -webViewDownloadRequestedClosure cb = newCClosure =<< mkWebViewDownloadRequestedCallback wrapped - where wrapped = webViewDownloadRequestedCallbackWrapper cb - -webViewDownloadRequestedCallbackWrapper :: - WebViewDownloadRequestedCallback -> - Ptr () -> - Ptr Download -> - Ptr () -> - IO CInt -webViewDownloadRequestedCallbackWrapper _cb _ download _ = do - download' <- (newObject Download) download - result <- _cb download' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewDownloadRequested :: (GObject a, MonadIO m) => a -> WebViewDownloadRequestedCallback -> m SignalHandlerId -onWebViewDownloadRequested obj cb = liftIO $ connectWebViewDownloadRequested obj cb SignalConnectBefore -afterWebViewDownloadRequested :: (GObject a, MonadIO m) => a -> WebViewDownloadRequestedCallback -> m SignalHandlerId -afterWebViewDownloadRequested obj cb = connectWebViewDownloadRequested obj cb SignalConnectAfter - -connectWebViewDownloadRequested :: (GObject a, MonadIO m) => - a -> WebViewDownloadRequestedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewDownloadRequested obj cb after = liftIO $ do - cb' <- mkWebViewDownloadRequestedCallback (webViewDownloadRequestedCallbackWrapper cb) - connectSignalFunPtr obj "download-requested" cb' after - --- signal WebView::editing-began -type WebViewEditingBeganCallback = - IO () - -noWebViewEditingBeganCallback :: Maybe WebViewEditingBeganCallback -noWebViewEditingBeganCallback = Nothing - -type WebViewEditingBeganCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewEditingBeganCallback :: WebViewEditingBeganCallbackC -> IO (FunPtr WebViewEditingBeganCallbackC) - -webViewEditingBeganClosure :: WebViewEditingBeganCallback -> IO Closure -webViewEditingBeganClosure cb = newCClosure =<< mkWebViewEditingBeganCallback wrapped - where wrapped = webViewEditingBeganCallbackWrapper cb - -webViewEditingBeganCallbackWrapper :: - WebViewEditingBeganCallback -> - Ptr () -> - Ptr () -> - IO () -webViewEditingBeganCallbackWrapper _cb _ _ = do - _cb - -onWebViewEditingBegan :: (GObject a, MonadIO m) => a -> WebViewEditingBeganCallback -> m SignalHandlerId -onWebViewEditingBegan obj cb = liftIO $ connectWebViewEditingBegan obj cb SignalConnectBefore -afterWebViewEditingBegan :: (GObject a, MonadIO m) => a -> WebViewEditingBeganCallback -> m SignalHandlerId -afterWebViewEditingBegan obj cb = connectWebViewEditingBegan obj cb SignalConnectAfter - -connectWebViewEditingBegan :: (GObject a, MonadIO m) => - a -> WebViewEditingBeganCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewEditingBegan obj cb after = liftIO $ do - cb' <- mkWebViewEditingBeganCallback (webViewEditingBeganCallbackWrapper cb) - connectSignalFunPtr obj "editing-began" cb' after - --- signal WebView::editing-ended -type WebViewEditingEndedCallback = - IO () - -noWebViewEditingEndedCallback :: Maybe WebViewEditingEndedCallback -noWebViewEditingEndedCallback = Nothing - -type WebViewEditingEndedCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewEditingEndedCallback :: WebViewEditingEndedCallbackC -> IO (FunPtr WebViewEditingEndedCallbackC) - -webViewEditingEndedClosure :: WebViewEditingEndedCallback -> IO Closure -webViewEditingEndedClosure cb = newCClosure =<< mkWebViewEditingEndedCallback wrapped - where wrapped = webViewEditingEndedCallbackWrapper cb - -webViewEditingEndedCallbackWrapper :: - WebViewEditingEndedCallback -> - Ptr () -> - Ptr () -> - IO () -webViewEditingEndedCallbackWrapper _cb _ _ = do - _cb - -onWebViewEditingEnded :: (GObject a, MonadIO m) => a -> WebViewEditingEndedCallback -> m SignalHandlerId -onWebViewEditingEnded obj cb = liftIO $ connectWebViewEditingEnded obj cb SignalConnectBefore -afterWebViewEditingEnded :: (GObject a, MonadIO m) => a -> WebViewEditingEndedCallback -> m SignalHandlerId -afterWebViewEditingEnded obj cb = connectWebViewEditingEnded obj cb SignalConnectAfter - -connectWebViewEditingEnded :: (GObject a, MonadIO m) => - a -> WebViewEditingEndedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewEditingEnded obj cb after = liftIO $ do - cb' <- mkWebViewEditingEndedCallback (webViewEditingEndedCallbackWrapper cb) - connectSignalFunPtr obj "editing-ended" cb' after - --- signal WebView::entering-fullscreen -type WebViewEnteringFullscreenCallback = - DOMHTMLElement -> - IO Bool - -noWebViewEnteringFullscreenCallback :: Maybe WebViewEnteringFullscreenCallback -noWebViewEnteringFullscreenCallback = Nothing - -type WebViewEnteringFullscreenCallbackC = - Ptr () -> -- object - Ptr DOMHTMLElement -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewEnteringFullscreenCallback :: WebViewEnteringFullscreenCallbackC -> IO (FunPtr WebViewEnteringFullscreenCallbackC) - -webViewEnteringFullscreenClosure :: WebViewEnteringFullscreenCallback -> IO Closure -webViewEnteringFullscreenClosure cb = newCClosure =<< mkWebViewEnteringFullscreenCallback wrapped - where wrapped = webViewEnteringFullscreenCallbackWrapper cb - -webViewEnteringFullscreenCallbackWrapper :: - WebViewEnteringFullscreenCallback -> - Ptr () -> - Ptr DOMHTMLElement -> - Ptr () -> - IO CInt -webViewEnteringFullscreenCallbackWrapper _cb _ element _ = do - element' <- (newObject DOMHTMLElement) element - result <- _cb element' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewEnteringFullscreen :: (GObject a, MonadIO m) => a -> WebViewEnteringFullscreenCallback -> m SignalHandlerId -onWebViewEnteringFullscreen obj cb = liftIO $ connectWebViewEnteringFullscreen obj cb SignalConnectBefore -afterWebViewEnteringFullscreen :: (GObject a, MonadIO m) => a -> WebViewEnteringFullscreenCallback -> m SignalHandlerId -afterWebViewEnteringFullscreen obj cb = connectWebViewEnteringFullscreen obj cb SignalConnectAfter - -connectWebViewEnteringFullscreen :: (GObject a, MonadIO m) => - a -> WebViewEnteringFullscreenCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewEnteringFullscreen obj cb after = liftIO $ do - cb' <- mkWebViewEnteringFullscreenCallback (webViewEnteringFullscreenCallbackWrapper cb) - connectSignalFunPtr obj "entering-fullscreen" cb' after - --- signal WebView::frame-created -type WebViewFrameCreatedCallback = - WebFrame -> - IO () - -noWebViewFrameCreatedCallback :: Maybe WebViewFrameCreatedCallback -noWebViewFrameCreatedCallback = Nothing - -type WebViewFrameCreatedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewFrameCreatedCallback :: WebViewFrameCreatedCallbackC -> IO (FunPtr WebViewFrameCreatedCallbackC) - -webViewFrameCreatedClosure :: WebViewFrameCreatedCallback -> IO Closure -webViewFrameCreatedClosure cb = newCClosure =<< mkWebViewFrameCreatedCallback wrapped - where wrapped = webViewFrameCreatedCallbackWrapper cb - -webViewFrameCreatedCallbackWrapper :: - WebViewFrameCreatedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr () -> - IO () -webViewFrameCreatedCallbackWrapper _cb _ web_frame _ = do - web_frame' <- (newObject WebFrame) web_frame - _cb web_frame' - -onWebViewFrameCreated :: (GObject a, MonadIO m) => a -> WebViewFrameCreatedCallback -> m SignalHandlerId -onWebViewFrameCreated obj cb = liftIO $ connectWebViewFrameCreated obj cb SignalConnectBefore -afterWebViewFrameCreated :: (GObject a, MonadIO m) => a -> WebViewFrameCreatedCallback -> m SignalHandlerId -afterWebViewFrameCreated obj cb = connectWebViewFrameCreated obj cb SignalConnectAfter - -connectWebViewFrameCreated :: (GObject a, MonadIO m) => - a -> WebViewFrameCreatedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewFrameCreated obj cb after = liftIO $ do - cb' <- mkWebViewFrameCreatedCallback (webViewFrameCreatedCallbackWrapper cb) - connectSignalFunPtr obj "frame-created" cb' after - --- signal WebView::geolocation-policy-decision-cancelled -type WebViewGeolocationPolicyDecisionCancelledCallback = - WebFrame -> - IO () - -noWebViewGeolocationPolicyDecisionCancelledCallback :: Maybe WebViewGeolocationPolicyDecisionCancelledCallback -noWebViewGeolocationPolicyDecisionCancelledCallback = Nothing - -type WebViewGeolocationPolicyDecisionCancelledCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewGeolocationPolicyDecisionCancelledCallback :: WebViewGeolocationPolicyDecisionCancelledCallbackC -> IO (FunPtr WebViewGeolocationPolicyDecisionCancelledCallbackC) - -webViewGeolocationPolicyDecisionCancelledClosure :: WebViewGeolocationPolicyDecisionCancelledCallback -> IO Closure -webViewGeolocationPolicyDecisionCancelledClosure cb = newCClosure =<< mkWebViewGeolocationPolicyDecisionCancelledCallback wrapped - where wrapped = webViewGeolocationPolicyDecisionCancelledCallbackWrapper cb - -webViewGeolocationPolicyDecisionCancelledCallbackWrapper :: - WebViewGeolocationPolicyDecisionCancelledCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr () -> - IO () -webViewGeolocationPolicyDecisionCancelledCallbackWrapper _cb _ frame _ = do - frame' <- (newObject WebFrame) frame - _cb frame' - -onWebViewGeolocationPolicyDecisionCancelled :: (GObject a, MonadIO m) => a -> WebViewGeolocationPolicyDecisionCancelledCallback -> m SignalHandlerId -onWebViewGeolocationPolicyDecisionCancelled obj cb = liftIO $ connectWebViewGeolocationPolicyDecisionCancelled obj cb SignalConnectBefore -afterWebViewGeolocationPolicyDecisionCancelled :: (GObject a, MonadIO m) => a -> WebViewGeolocationPolicyDecisionCancelledCallback -> m SignalHandlerId -afterWebViewGeolocationPolicyDecisionCancelled obj cb = connectWebViewGeolocationPolicyDecisionCancelled obj cb SignalConnectAfter - -connectWebViewGeolocationPolicyDecisionCancelled :: (GObject a, MonadIO m) => - a -> WebViewGeolocationPolicyDecisionCancelledCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewGeolocationPolicyDecisionCancelled obj cb after = liftIO $ do - cb' <- mkWebViewGeolocationPolicyDecisionCancelledCallback (webViewGeolocationPolicyDecisionCancelledCallbackWrapper cb) - connectSignalFunPtr obj "geolocation-policy-decision-cancelled" cb' after - --- signal WebView::geolocation-policy-decision-requested -type WebViewGeolocationPolicyDecisionRequestedCallback = - WebFrame -> - GeolocationPolicyDecision -> - IO Bool - -noWebViewGeolocationPolicyDecisionRequestedCallback :: Maybe WebViewGeolocationPolicyDecisionRequestedCallback -noWebViewGeolocationPolicyDecisionRequestedCallback = Nothing - -type WebViewGeolocationPolicyDecisionRequestedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr GeolocationPolicyDecision -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewGeolocationPolicyDecisionRequestedCallback :: WebViewGeolocationPolicyDecisionRequestedCallbackC -> IO (FunPtr WebViewGeolocationPolicyDecisionRequestedCallbackC) - -webViewGeolocationPolicyDecisionRequestedClosure :: WebViewGeolocationPolicyDecisionRequestedCallback -> IO Closure -webViewGeolocationPolicyDecisionRequestedClosure cb = newCClosure =<< mkWebViewGeolocationPolicyDecisionRequestedCallback wrapped - where wrapped = webViewGeolocationPolicyDecisionRequestedCallbackWrapper cb - -webViewGeolocationPolicyDecisionRequestedCallbackWrapper :: - WebViewGeolocationPolicyDecisionRequestedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr GeolocationPolicyDecision -> - Ptr () -> - IO CInt -webViewGeolocationPolicyDecisionRequestedCallbackWrapper _cb _ frame policy_decision _ = do - frame' <- (newObject WebFrame) frame - policy_decision' <- (newObject GeolocationPolicyDecision) policy_decision - result <- _cb frame' policy_decision' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewGeolocationPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewGeolocationPolicyDecisionRequestedCallback -> m SignalHandlerId -onWebViewGeolocationPolicyDecisionRequested obj cb = liftIO $ connectWebViewGeolocationPolicyDecisionRequested obj cb SignalConnectBefore -afterWebViewGeolocationPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewGeolocationPolicyDecisionRequestedCallback -> m SignalHandlerId -afterWebViewGeolocationPolicyDecisionRequested obj cb = connectWebViewGeolocationPolicyDecisionRequested obj cb SignalConnectAfter - -connectWebViewGeolocationPolicyDecisionRequested :: (GObject a, MonadIO m) => - a -> WebViewGeolocationPolicyDecisionRequestedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewGeolocationPolicyDecisionRequested obj cb after = liftIO $ do - cb' <- mkWebViewGeolocationPolicyDecisionRequestedCallback (webViewGeolocationPolicyDecisionRequestedCallbackWrapper cb) - connectSignalFunPtr obj "geolocation-policy-decision-requested" cb' after - --- signal WebView::hovering-over-link -type WebViewHoveringOverLinkCallback = - T.Text -> - T.Text -> - IO () - -noWebViewHoveringOverLinkCallback :: Maybe WebViewHoveringOverLinkCallback -noWebViewHoveringOverLinkCallback = Nothing - -type WebViewHoveringOverLinkCallbackC = - Ptr () -> -- object - CString -> - CString -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewHoveringOverLinkCallback :: WebViewHoveringOverLinkCallbackC -> IO (FunPtr WebViewHoveringOverLinkCallbackC) - -webViewHoveringOverLinkClosure :: WebViewHoveringOverLinkCallback -> IO Closure -webViewHoveringOverLinkClosure cb = newCClosure =<< mkWebViewHoveringOverLinkCallback wrapped - where wrapped = webViewHoveringOverLinkCallbackWrapper cb - -webViewHoveringOverLinkCallbackWrapper :: - WebViewHoveringOverLinkCallback -> - Ptr () -> - CString -> - CString -> - Ptr () -> - IO () -webViewHoveringOverLinkCallbackWrapper _cb _ title uri _ = do - title' <- cstringToText title - uri' <- cstringToText uri - _cb title' uri' - -onWebViewHoveringOverLink :: (GObject a, MonadIO m) => a -> WebViewHoveringOverLinkCallback -> m SignalHandlerId -onWebViewHoveringOverLink obj cb = liftIO $ connectWebViewHoveringOverLink obj cb SignalConnectBefore -afterWebViewHoveringOverLink :: (GObject a, MonadIO m) => a -> WebViewHoveringOverLinkCallback -> m SignalHandlerId -afterWebViewHoveringOverLink obj cb = connectWebViewHoveringOverLink obj cb SignalConnectAfter - -connectWebViewHoveringOverLink :: (GObject a, MonadIO m) => - a -> WebViewHoveringOverLinkCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewHoveringOverLink obj cb after = liftIO $ do - cb' <- mkWebViewHoveringOverLinkCallback (webViewHoveringOverLinkCallbackWrapper cb) - connectSignalFunPtr obj "hovering-over-link" cb' after - --- signal WebView::icon-loaded -type WebViewIconLoadedCallback = - T.Text -> - IO () - -noWebViewIconLoadedCallback :: Maybe WebViewIconLoadedCallback -noWebViewIconLoadedCallback = Nothing - -type WebViewIconLoadedCallbackC = - Ptr () -> -- object - CString -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewIconLoadedCallback :: WebViewIconLoadedCallbackC -> IO (FunPtr WebViewIconLoadedCallbackC) - -webViewIconLoadedClosure :: WebViewIconLoadedCallback -> IO Closure -webViewIconLoadedClosure cb = newCClosure =<< mkWebViewIconLoadedCallback wrapped - where wrapped = webViewIconLoadedCallbackWrapper cb - -webViewIconLoadedCallbackWrapper :: - WebViewIconLoadedCallback -> - Ptr () -> - CString -> - Ptr () -> - IO () -webViewIconLoadedCallbackWrapper _cb _ icon_uri _ = do - icon_uri' <- cstringToText icon_uri - _cb icon_uri' - -onWebViewIconLoaded :: (GObject a, MonadIO m) => a -> WebViewIconLoadedCallback -> m SignalHandlerId -onWebViewIconLoaded obj cb = liftIO $ connectWebViewIconLoaded obj cb SignalConnectBefore -afterWebViewIconLoaded :: (GObject a, MonadIO m) => a -> WebViewIconLoadedCallback -> m SignalHandlerId -afterWebViewIconLoaded obj cb = connectWebViewIconLoaded obj cb SignalConnectAfter - -connectWebViewIconLoaded :: (GObject a, MonadIO m) => - a -> WebViewIconLoadedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewIconLoaded obj cb after = liftIO $ do - cb' <- mkWebViewIconLoadedCallback (webViewIconLoadedCallbackWrapper cb) - connectSignalFunPtr obj "icon-loaded" cb' after - --- signal WebView::leaving-fullscreen -type WebViewLeavingFullscreenCallback = - DOMHTMLElement -> - IO Bool - -noWebViewLeavingFullscreenCallback :: Maybe WebViewLeavingFullscreenCallback -noWebViewLeavingFullscreenCallback = Nothing - -type WebViewLeavingFullscreenCallbackC = - Ptr () -> -- object - Ptr DOMHTMLElement -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewLeavingFullscreenCallback :: WebViewLeavingFullscreenCallbackC -> IO (FunPtr WebViewLeavingFullscreenCallbackC) - -webViewLeavingFullscreenClosure :: WebViewLeavingFullscreenCallback -> IO Closure -webViewLeavingFullscreenClosure cb = newCClosure =<< mkWebViewLeavingFullscreenCallback wrapped - where wrapped = webViewLeavingFullscreenCallbackWrapper cb - -webViewLeavingFullscreenCallbackWrapper :: - WebViewLeavingFullscreenCallback -> - Ptr () -> - Ptr DOMHTMLElement -> - Ptr () -> - IO CInt -webViewLeavingFullscreenCallbackWrapper _cb _ element _ = do - element' <- (newObject DOMHTMLElement) element - result <- _cb element' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewLeavingFullscreen :: (GObject a, MonadIO m) => a -> WebViewLeavingFullscreenCallback -> m SignalHandlerId -onWebViewLeavingFullscreen obj cb = liftIO $ connectWebViewLeavingFullscreen obj cb SignalConnectBefore -afterWebViewLeavingFullscreen :: (GObject a, MonadIO m) => a -> WebViewLeavingFullscreenCallback -> m SignalHandlerId -afterWebViewLeavingFullscreen obj cb = connectWebViewLeavingFullscreen obj cb SignalConnectAfter - -connectWebViewLeavingFullscreen :: (GObject a, MonadIO m) => - a -> WebViewLeavingFullscreenCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewLeavingFullscreen obj cb after = liftIO $ do - cb' <- mkWebViewLeavingFullscreenCallback (webViewLeavingFullscreenCallbackWrapper cb) - connectSignalFunPtr obj "leaving-fullscreen" cb' after - --- signal WebView::load-committed -type WebViewLoadCommittedCallback = - WebFrame -> - IO () - -noWebViewLoadCommittedCallback :: Maybe WebViewLoadCommittedCallback -noWebViewLoadCommittedCallback = Nothing - -type WebViewLoadCommittedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewLoadCommittedCallback :: WebViewLoadCommittedCallbackC -> IO (FunPtr WebViewLoadCommittedCallbackC) - -webViewLoadCommittedClosure :: WebViewLoadCommittedCallback -> IO Closure -webViewLoadCommittedClosure cb = newCClosure =<< mkWebViewLoadCommittedCallback wrapped - where wrapped = webViewLoadCommittedCallbackWrapper cb - -webViewLoadCommittedCallbackWrapper :: - WebViewLoadCommittedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr () -> - IO () -webViewLoadCommittedCallbackWrapper _cb _ frame _ = do - frame' <- (newObject WebFrame) frame - _cb frame' - -onWebViewLoadCommitted :: (GObject a, MonadIO m) => a -> WebViewLoadCommittedCallback -> m SignalHandlerId -onWebViewLoadCommitted obj cb = liftIO $ connectWebViewLoadCommitted obj cb SignalConnectBefore -afterWebViewLoadCommitted :: (GObject a, MonadIO m) => a -> WebViewLoadCommittedCallback -> m SignalHandlerId -afterWebViewLoadCommitted obj cb = connectWebViewLoadCommitted obj cb SignalConnectAfter - -connectWebViewLoadCommitted :: (GObject a, MonadIO m) => - a -> WebViewLoadCommittedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewLoadCommitted obj cb after = liftIO $ do - cb' <- mkWebViewLoadCommittedCallback (webViewLoadCommittedCallbackWrapper cb) - connectSignalFunPtr obj "load-committed" cb' after - --- signal WebView::load-error -type WebViewLoadErrorCallback = - WebFrame -> - T.Text -> - GError -> - IO Bool - -noWebViewLoadErrorCallback :: Maybe WebViewLoadErrorCallback -noWebViewLoadErrorCallback = Nothing - -type WebViewLoadErrorCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - CString -> - Ptr GError -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewLoadErrorCallback :: WebViewLoadErrorCallbackC -> IO (FunPtr WebViewLoadErrorCallbackC) - -webViewLoadErrorClosure :: WebViewLoadErrorCallback -> IO Closure -webViewLoadErrorClosure cb = newCClosure =<< mkWebViewLoadErrorCallback wrapped - where wrapped = webViewLoadErrorCallbackWrapper cb - -webViewLoadErrorCallbackWrapper :: - WebViewLoadErrorCallback -> - Ptr () -> - Ptr WebFrame -> - CString -> - Ptr GError -> - Ptr () -> - IO CInt -webViewLoadErrorCallbackWrapper _cb _ web_frame uri web_error _ = do - web_frame' <- (newObject WebFrame) web_frame - uri' <- cstringToText uri - web_error' <- (newBoxed GError) web_error - result <- _cb web_frame' uri' web_error' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewLoadError :: (GObject a, MonadIO m) => a -> WebViewLoadErrorCallback -> m SignalHandlerId -onWebViewLoadError obj cb = liftIO $ connectWebViewLoadError obj cb SignalConnectBefore -afterWebViewLoadError :: (GObject a, MonadIO m) => a -> WebViewLoadErrorCallback -> m SignalHandlerId -afterWebViewLoadError obj cb = connectWebViewLoadError obj cb SignalConnectAfter - -connectWebViewLoadError :: (GObject a, MonadIO m) => - a -> WebViewLoadErrorCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewLoadError obj cb after = liftIO $ do - cb' <- mkWebViewLoadErrorCallback (webViewLoadErrorCallbackWrapper cb) - connectSignalFunPtr obj "load-error" cb' after - --- signal WebView::load-finished -type WebViewLoadFinishedCallback = - WebFrame -> - IO () - -noWebViewLoadFinishedCallback :: Maybe WebViewLoadFinishedCallback -noWebViewLoadFinishedCallback = Nothing - -type WebViewLoadFinishedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewLoadFinishedCallback :: WebViewLoadFinishedCallbackC -> IO (FunPtr WebViewLoadFinishedCallbackC) - -webViewLoadFinishedClosure :: WebViewLoadFinishedCallback -> IO Closure -webViewLoadFinishedClosure cb = newCClosure =<< mkWebViewLoadFinishedCallback wrapped - where wrapped = webViewLoadFinishedCallbackWrapper cb - -webViewLoadFinishedCallbackWrapper :: - WebViewLoadFinishedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr () -> - IO () -webViewLoadFinishedCallbackWrapper _cb _ frame _ = do - frame' <- (newObject WebFrame) frame - _cb frame' - -onWebViewLoadFinished :: (GObject a, MonadIO m) => a -> WebViewLoadFinishedCallback -> m SignalHandlerId -onWebViewLoadFinished obj cb = liftIO $ connectWebViewLoadFinished obj cb SignalConnectBefore -afterWebViewLoadFinished :: (GObject a, MonadIO m) => a -> WebViewLoadFinishedCallback -> m SignalHandlerId -afterWebViewLoadFinished obj cb = connectWebViewLoadFinished obj cb SignalConnectAfter - -connectWebViewLoadFinished :: (GObject a, MonadIO m) => - a -> WebViewLoadFinishedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewLoadFinished obj cb after = liftIO $ do - cb' <- mkWebViewLoadFinishedCallback (webViewLoadFinishedCallbackWrapper cb) - connectSignalFunPtr obj "load-finished" cb' after - --- signal WebView::load-progress-changed -type WebViewLoadProgressChangedCallback = - Int32 -> - IO () - -noWebViewLoadProgressChangedCallback :: Maybe WebViewLoadProgressChangedCallback -noWebViewLoadProgressChangedCallback = Nothing - -type WebViewLoadProgressChangedCallbackC = - Ptr () -> -- object - Int32 -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewLoadProgressChangedCallback :: WebViewLoadProgressChangedCallbackC -> IO (FunPtr WebViewLoadProgressChangedCallbackC) - -webViewLoadProgressChangedClosure :: WebViewLoadProgressChangedCallback -> IO Closure -webViewLoadProgressChangedClosure cb = newCClosure =<< mkWebViewLoadProgressChangedCallback wrapped - where wrapped = webViewLoadProgressChangedCallbackWrapper cb - -webViewLoadProgressChangedCallbackWrapper :: - WebViewLoadProgressChangedCallback -> - Ptr () -> - Int32 -> - Ptr () -> - IO () -webViewLoadProgressChangedCallbackWrapper _cb _ progress _ = do - _cb progress - -onWebViewLoadProgressChanged :: (GObject a, MonadIO m) => a -> WebViewLoadProgressChangedCallback -> m SignalHandlerId -onWebViewLoadProgressChanged obj cb = liftIO $ connectWebViewLoadProgressChanged obj cb SignalConnectBefore -afterWebViewLoadProgressChanged :: (GObject a, MonadIO m) => a -> WebViewLoadProgressChangedCallback -> m SignalHandlerId -afterWebViewLoadProgressChanged obj cb = connectWebViewLoadProgressChanged obj cb SignalConnectAfter - -connectWebViewLoadProgressChanged :: (GObject a, MonadIO m) => - a -> WebViewLoadProgressChangedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewLoadProgressChanged obj cb after = liftIO $ do - cb' <- mkWebViewLoadProgressChangedCallback (webViewLoadProgressChangedCallbackWrapper cb) - connectSignalFunPtr obj "load-progress-changed" cb' after - --- signal WebView::load-started -type WebViewLoadStartedCallback = - WebFrame -> - IO () - -noWebViewLoadStartedCallback :: Maybe WebViewLoadStartedCallback -noWebViewLoadStartedCallback = Nothing - -type WebViewLoadStartedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewLoadStartedCallback :: WebViewLoadStartedCallbackC -> IO (FunPtr WebViewLoadStartedCallbackC) - -webViewLoadStartedClosure :: WebViewLoadStartedCallback -> IO Closure -webViewLoadStartedClosure cb = newCClosure =<< mkWebViewLoadStartedCallback wrapped - where wrapped = webViewLoadStartedCallbackWrapper cb - -webViewLoadStartedCallbackWrapper :: - WebViewLoadStartedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr () -> - IO () -webViewLoadStartedCallbackWrapper _cb _ frame _ = do - frame' <- (newObject WebFrame) frame - _cb frame' - -onWebViewLoadStarted :: (GObject a, MonadIO m) => a -> WebViewLoadStartedCallback -> m SignalHandlerId -onWebViewLoadStarted obj cb = liftIO $ connectWebViewLoadStarted obj cb SignalConnectBefore -afterWebViewLoadStarted :: (GObject a, MonadIO m) => a -> WebViewLoadStartedCallback -> m SignalHandlerId -afterWebViewLoadStarted obj cb = connectWebViewLoadStarted obj cb SignalConnectAfter - -connectWebViewLoadStarted :: (GObject a, MonadIO m) => - a -> WebViewLoadStartedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewLoadStarted obj cb after = liftIO $ do - cb' <- mkWebViewLoadStartedCallback (webViewLoadStartedCallbackWrapper cb) - connectSignalFunPtr obj "load-started" cb' after - --- signal WebView::mime-type-policy-decision-requested -type WebViewMimeTypePolicyDecisionRequestedCallback = - WebFrame -> - NetworkRequest -> - T.Text -> - WebPolicyDecision -> - IO Bool - -noWebViewMimeTypePolicyDecisionRequestedCallback :: Maybe WebViewMimeTypePolicyDecisionRequestedCallback -noWebViewMimeTypePolicyDecisionRequestedCallback = Nothing - -type WebViewMimeTypePolicyDecisionRequestedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr NetworkRequest -> - CString -> - Ptr WebPolicyDecision -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewMimeTypePolicyDecisionRequestedCallback :: WebViewMimeTypePolicyDecisionRequestedCallbackC -> IO (FunPtr WebViewMimeTypePolicyDecisionRequestedCallbackC) - -webViewMimeTypePolicyDecisionRequestedClosure :: WebViewMimeTypePolicyDecisionRequestedCallback -> IO Closure -webViewMimeTypePolicyDecisionRequestedClosure cb = newCClosure =<< mkWebViewMimeTypePolicyDecisionRequestedCallback wrapped - where wrapped = webViewMimeTypePolicyDecisionRequestedCallbackWrapper cb - -webViewMimeTypePolicyDecisionRequestedCallbackWrapper :: - WebViewMimeTypePolicyDecisionRequestedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr NetworkRequest -> - CString -> - Ptr WebPolicyDecision -> - Ptr () -> - IO CInt -webViewMimeTypePolicyDecisionRequestedCallbackWrapper _cb _ frame request mimetype policy_decision _ = do - frame' <- (newObject WebFrame) frame - request' <- (newObject NetworkRequest) request - mimetype' <- cstringToText mimetype - policy_decision' <- (newObject WebPolicyDecision) policy_decision - result <- _cb frame' request' mimetype' policy_decision' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewMimeTypePolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewMimeTypePolicyDecisionRequestedCallback -> m SignalHandlerId -onWebViewMimeTypePolicyDecisionRequested obj cb = liftIO $ connectWebViewMimeTypePolicyDecisionRequested obj cb SignalConnectBefore -afterWebViewMimeTypePolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewMimeTypePolicyDecisionRequestedCallback -> m SignalHandlerId -afterWebViewMimeTypePolicyDecisionRequested obj cb = connectWebViewMimeTypePolicyDecisionRequested obj cb SignalConnectAfter - -connectWebViewMimeTypePolicyDecisionRequested :: (GObject a, MonadIO m) => - a -> WebViewMimeTypePolicyDecisionRequestedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewMimeTypePolicyDecisionRequested obj cb after = liftIO $ do - cb' <- mkWebViewMimeTypePolicyDecisionRequestedCallback (webViewMimeTypePolicyDecisionRequestedCallbackWrapper cb) - connectSignalFunPtr obj "mime-type-policy-decision-requested" cb' after - --- signal WebView::move-cursor -type WebViewMoveCursorCallback = - Gtk.MovementStep -> - Int32 -> - IO Bool - -noWebViewMoveCursorCallback :: Maybe WebViewMoveCursorCallback -noWebViewMoveCursorCallback = Nothing - -type WebViewMoveCursorCallbackC = - Ptr () -> -- object - CUInt -> - Int32 -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewMoveCursorCallback :: WebViewMoveCursorCallbackC -> IO (FunPtr WebViewMoveCursorCallbackC) - -webViewMoveCursorClosure :: WebViewMoveCursorCallback -> IO Closure -webViewMoveCursorClosure cb = newCClosure =<< mkWebViewMoveCursorCallback wrapped - where wrapped = webViewMoveCursorCallbackWrapper cb - -webViewMoveCursorCallbackWrapper :: - WebViewMoveCursorCallback -> - Ptr () -> - CUInt -> - Int32 -> - Ptr () -> - IO CInt -webViewMoveCursorCallbackWrapper _cb _ step count _ = do - let step' = (toEnum . fromIntegral) step - result <- _cb step' count - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewMoveCursor :: (GObject a, MonadIO m) => a -> WebViewMoveCursorCallback -> m SignalHandlerId -onWebViewMoveCursor obj cb = liftIO $ connectWebViewMoveCursor obj cb SignalConnectBefore -afterWebViewMoveCursor :: (GObject a, MonadIO m) => a -> WebViewMoveCursorCallback -> m SignalHandlerId -afterWebViewMoveCursor obj cb = connectWebViewMoveCursor obj cb SignalConnectAfter - -connectWebViewMoveCursor :: (GObject a, MonadIO m) => - a -> WebViewMoveCursorCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewMoveCursor obj cb after = liftIO $ do - cb' <- mkWebViewMoveCursorCallback (webViewMoveCursorCallbackWrapper cb) - connectSignalFunPtr obj "move-cursor" cb' after - --- signal WebView::navigation-policy-decision-requested -type WebViewNavigationPolicyDecisionRequestedCallback = - WebFrame -> - NetworkRequest -> - WebNavigationAction -> - WebPolicyDecision -> - IO Bool - -noWebViewNavigationPolicyDecisionRequestedCallback :: Maybe WebViewNavigationPolicyDecisionRequestedCallback -noWebViewNavigationPolicyDecisionRequestedCallback = Nothing - -type WebViewNavigationPolicyDecisionRequestedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr NetworkRequest -> - Ptr WebNavigationAction -> - Ptr WebPolicyDecision -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewNavigationPolicyDecisionRequestedCallback :: WebViewNavigationPolicyDecisionRequestedCallbackC -> IO (FunPtr WebViewNavigationPolicyDecisionRequestedCallbackC) - -webViewNavigationPolicyDecisionRequestedClosure :: WebViewNavigationPolicyDecisionRequestedCallback -> IO Closure -webViewNavigationPolicyDecisionRequestedClosure cb = newCClosure =<< mkWebViewNavigationPolicyDecisionRequestedCallback wrapped - where wrapped = webViewNavigationPolicyDecisionRequestedCallbackWrapper cb - -webViewNavigationPolicyDecisionRequestedCallbackWrapper :: - WebViewNavigationPolicyDecisionRequestedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr NetworkRequest -> - Ptr WebNavigationAction -> - Ptr WebPolicyDecision -> - Ptr () -> - IO CInt -webViewNavigationPolicyDecisionRequestedCallbackWrapper _cb _ frame request navigation_action policy_decision _ = do - frame' <- (newObject WebFrame) frame - request' <- (newObject NetworkRequest) request - navigation_action' <- (newObject WebNavigationAction) navigation_action - policy_decision' <- (newObject WebPolicyDecision) policy_decision - result <- _cb frame' request' navigation_action' policy_decision' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewNavigationPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewNavigationPolicyDecisionRequestedCallback -> m SignalHandlerId -onWebViewNavigationPolicyDecisionRequested obj cb = liftIO $ connectWebViewNavigationPolicyDecisionRequested obj cb SignalConnectBefore -afterWebViewNavigationPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewNavigationPolicyDecisionRequestedCallback -> m SignalHandlerId -afterWebViewNavigationPolicyDecisionRequested obj cb = connectWebViewNavigationPolicyDecisionRequested obj cb SignalConnectAfter - -connectWebViewNavigationPolicyDecisionRequested :: (GObject a, MonadIO m) => - a -> WebViewNavigationPolicyDecisionRequestedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewNavigationPolicyDecisionRequested obj cb after = liftIO $ do - cb' <- mkWebViewNavigationPolicyDecisionRequestedCallback (webViewNavigationPolicyDecisionRequestedCallbackWrapper cb) - connectSignalFunPtr obj "navigation-policy-decision-requested" cb' after - --- signal WebView::navigation-requested -type WebViewNavigationRequestedCallback = - WebFrame -> - NetworkRequest -> - IO NavigationResponse - -noWebViewNavigationRequestedCallback :: Maybe WebViewNavigationRequestedCallback -noWebViewNavigationRequestedCallback = Nothing - -type WebViewNavigationRequestedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr NetworkRequest -> - Ptr () -> -- user_data - IO CUInt - -foreign import ccall "wrapper" - mkWebViewNavigationRequestedCallback :: WebViewNavigationRequestedCallbackC -> IO (FunPtr WebViewNavigationRequestedCallbackC) - -webViewNavigationRequestedClosure :: WebViewNavigationRequestedCallback -> IO Closure -webViewNavigationRequestedClosure cb = newCClosure =<< mkWebViewNavigationRequestedCallback wrapped - where wrapped = webViewNavigationRequestedCallbackWrapper cb - -webViewNavigationRequestedCallbackWrapper :: - WebViewNavigationRequestedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr NetworkRequest -> - Ptr () -> - IO CUInt -webViewNavigationRequestedCallbackWrapper _cb _ frame request _ = do - frame' <- (newObject WebFrame) frame - request' <- (newObject NetworkRequest) request - result <- _cb frame' request' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewNavigationRequested :: (GObject a, MonadIO m) => a -> WebViewNavigationRequestedCallback -> m SignalHandlerId -onWebViewNavigationRequested obj cb = liftIO $ connectWebViewNavigationRequested obj cb SignalConnectBefore -afterWebViewNavigationRequested :: (GObject a, MonadIO m) => a -> WebViewNavigationRequestedCallback -> m SignalHandlerId -afterWebViewNavigationRequested obj cb = connectWebViewNavigationRequested obj cb SignalConnectAfter - -connectWebViewNavigationRequested :: (GObject a, MonadIO m) => - a -> WebViewNavigationRequestedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewNavigationRequested obj cb after = liftIO $ do - cb' <- mkWebViewNavigationRequestedCallback (webViewNavigationRequestedCallbackWrapper cb) - connectSignalFunPtr obj "navigation-requested" cb' after - --- signal WebView::new-window-policy-decision-requested -type WebViewNewWindowPolicyDecisionRequestedCallback = - WebFrame -> - NetworkRequest -> - WebNavigationAction -> - WebPolicyDecision -> - IO Bool - -noWebViewNewWindowPolicyDecisionRequestedCallback :: Maybe WebViewNewWindowPolicyDecisionRequestedCallback -noWebViewNewWindowPolicyDecisionRequestedCallback = Nothing - -type WebViewNewWindowPolicyDecisionRequestedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr NetworkRequest -> - Ptr WebNavigationAction -> - Ptr WebPolicyDecision -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewNewWindowPolicyDecisionRequestedCallback :: WebViewNewWindowPolicyDecisionRequestedCallbackC -> IO (FunPtr WebViewNewWindowPolicyDecisionRequestedCallbackC) - -webViewNewWindowPolicyDecisionRequestedClosure :: WebViewNewWindowPolicyDecisionRequestedCallback -> IO Closure -webViewNewWindowPolicyDecisionRequestedClosure cb = newCClosure =<< mkWebViewNewWindowPolicyDecisionRequestedCallback wrapped - where wrapped = webViewNewWindowPolicyDecisionRequestedCallbackWrapper cb - -webViewNewWindowPolicyDecisionRequestedCallbackWrapper :: - WebViewNewWindowPolicyDecisionRequestedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr NetworkRequest -> - Ptr WebNavigationAction -> - Ptr WebPolicyDecision -> - Ptr () -> - IO CInt -webViewNewWindowPolicyDecisionRequestedCallbackWrapper _cb _ frame request navigation_action policy_decision _ = do - frame' <- (newObject WebFrame) frame - request' <- (newObject NetworkRequest) request - navigation_action' <- (newObject WebNavigationAction) navigation_action - policy_decision' <- (newObject WebPolicyDecision) policy_decision - result <- _cb frame' request' navigation_action' policy_decision' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewNewWindowPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewNewWindowPolicyDecisionRequestedCallback -> m SignalHandlerId -onWebViewNewWindowPolicyDecisionRequested obj cb = liftIO $ connectWebViewNewWindowPolicyDecisionRequested obj cb SignalConnectBefore -afterWebViewNewWindowPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewNewWindowPolicyDecisionRequestedCallback -> m SignalHandlerId -afterWebViewNewWindowPolicyDecisionRequested obj cb = connectWebViewNewWindowPolicyDecisionRequested obj cb SignalConnectAfter - -connectWebViewNewWindowPolicyDecisionRequested :: (GObject a, MonadIO m) => - a -> WebViewNewWindowPolicyDecisionRequestedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewNewWindowPolicyDecisionRequested obj cb after = liftIO $ do - cb' <- mkWebViewNewWindowPolicyDecisionRequestedCallback (webViewNewWindowPolicyDecisionRequestedCallbackWrapper cb) - connectSignalFunPtr obj "new-window-policy-decision-requested" cb' after - --- signal WebView::onload-event -type WebViewOnloadEventCallback = - WebFrame -> - IO () - -noWebViewOnloadEventCallback :: Maybe WebViewOnloadEventCallback -noWebViewOnloadEventCallback = Nothing - -type WebViewOnloadEventCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewOnloadEventCallback :: WebViewOnloadEventCallbackC -> IO (FunPtr WebViewOnloadEventCallbackC) - -webViewOnloadEventClosure :: WebViewOnloadEventCallback -> IO Closure -webViewOnloadEventClosure cb = newCClosure =<< mkWebViewOnloadEventCallback wrapped - where wrapped = webViewOnloadEventCallbackWrapper cb - -webViewOnloadEventCallbackWrapper :: - WebViewOnloadEventCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr () -> - IO () -webViewOnloadEventCallbackWrapper _cb _ frame _ = do - frame' <- (newObject WebFrame) frame - _cb frame' - -onWebViewOnloadEvent :: (GObject a, MonadIO m) => a -> WebViewOnloadEventCallback -> m SignalHandlerId -onWebViewOnloadEvent obj cb = liftIO $ connectWebViewOnloadEvent obj cb SignalConnectBefore -afterWebViewOnloadEvent :: (GObject a, MonadIO m) => a -> WebViewOnloadEventCallback -> m SignalHandlerId -afterWebViewOnloadEvent obj cb = connectWebViewOnloadEvent obj cb SignalConnectAfter - -connectWebViewOnloadEvent :: (GObject a, MonadIO m) => - a -> WebViewOnloadEventCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewOnloadEvent obj cb after = liftIO $ do - cb' <- mkWebViewOnloadEventCallback (webViewOnloadEventCallbackWrapper cb) - connectSignalFunPtr obj "onload-event" cb' after - --- signal WebView::paste-clipboard -type WebViewPasteClipboardCallback = - IO () - -noWebViewPasteClipboardCallback :: Maybe WebViewPasteClipboardCallback -noWebViewPasteClipboardCallback = Nothing - -type WebViewPasteClipboardCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewPasteClipboardCallback :: WebViewPasteClipboardCallbackC -> IO (FunPtr WebViewPasteClipboardCallbackC) - -webViewPasteClipboardClosure :: WebViewPasteClipboardCallback -> IO Closure -webViewPasteClipboardClosure cb = newCClosure =<< mkWebViewPasteClipboardCallback wrapped - where wrapped = webViewPasteClipboardCallbackWrapper cb - -webViewPasteClipboardCallbackWrapper :: - WebViewPasteClipboardCallback -> - Ptr () -> - Ptr () -> - IO () -webViewPasteClipboardCallbackWrapper _cb _ _ = do - _cb - -onWebViewPasteClipboard :: (GObject a, MonadIO m) => a -> WebViewPasteClipboardCallback -> m SignalHandlerId -onWebViewPasteClipboard obj cb = liftIO $ connectWebViewPasteClipboard obj cb SignalConnectBefore -afterWebViewPasteClipboard :: (GObject a, MonadIO m) => a -> WebViewPasteClipboardCallback -> m SignalHandlerId -afterWebViewPasteClipboard obj cb = connectWebViewPasteClipboard obj cb SignalConnectAfter - -connectWebViewPasteClipboard :: (GObject a, MonadIO m) => - a -> WebViewPasteClipboardCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewPasteClipboard obj cb after = liftIO $ do - cb' <- mkWebViewPasteClipboardCallback (webViewPasteClipboardCallbackWrapper cb) - connectSignalFunPtr obj "paste-clipboard" cb' after - --- signal WebView::populate-popup -type WebViewPopulatePopupCallback = - Gtk.Menu -> - IO () - -noWebViewPopulatePopupCallback :: Maybe WebViewPopulatePopupCallback -noWebViewPopulatePopupCallback = Nothing - -type WebViewPopulatePopupCallbackC = - Ptr () -> -- object - Ptr Gtk.Menu -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewPopulatePopupCallback :: WebViewPopulatePopupCallbackC -> IO (FunPtr WebViewPopulatePopupCallbackC) - -webViewPopulatePopupClosure :: WebViewPopulatePopupCallback -> IO Closure -webViewPopulatePopupClosure cb = newCClosure =<< mkWebViewPopulatePopupCallback wrapped - where wrapped = webViewPopulatePopupCallbackWrapper cb - -webViewPopulatePopupCallbackWrapper :: - WebViewPopulatePopupCallback -> - Ptr () -> - Ptr Gtk.Menu -> - Ptr () -> - IO () -webViewPopulatePopupCallbackWrapper _cb _ menu _ = do - menu' <- (newObject Gtk.Menu) menu - _cb menu' - -onWebViewPopulatePopup :: (GObject a, MonadIO m) => a -> WebViewPopulatePopupCallback -> m SignalHandlerId -onWebViewPopulatePopup obj cb = liftIO $ connectWebViewPopulatePopup obj cb SignalConnectBefore -afterWebViewPopulatePopup :: (GObject a, MonadIO m) => a -> WebViewPopulatePopupCallback -> m SignalHandlerId -afterWebViewPopulatePopup obj cb = connectWebViewPopulatePopup obj cb SignalConnectAfter - -connectWebViewPopulatePopup :: (GObject a, MonadIO m) => - a -> WebViewPopulatePopupCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewPopulatePopup obj cb after = liftIO $ do - cb' <- mkWebViewPopulatePopupCallback (webViewPopulatePopupCallbackWrapper cb) - connectSignalFunPtr obj "populate-popup" cb' after - --- signal WebView::print-requested -type WebViewPrintRequestedCallback = - WebFrame -> - IO Bool - -noWebViewPrintRequestedCallback :: Maybe WebViewPrintRequestedCallback -noWebViewPrintRequestedCallback = Nothing - -type WebViewPrintRequestedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewPrintRequestedCallback :: WebViewPrintRequestedCallbackC -> IO (FunPtr WebViewPrintRequestedCallbackC) - -webViewPrintRequestedClosure :: WebViewPrintRequestedCallback -> IO Closure -webViewPrintRequestedClosure cb = newCClosure =<< mkWebViewPrintRequestedCallback wrapped - where wrapped = webViewPrintRequestedCallbackWrapper cb - -webViewPrintRequestedCallbackWrapper :: - WebViewPrintRequestedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr () -> - IO CInt -webViewPrintRequestedCallbackWrapper _cb _ web_frame _ = do - web_frame' <- (newObject WebFrame) web_frame - result <- _cb web_frame' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewPrintRequested :: (GObject a, MonadIO m) => a -> WebViewPrintRequestedCallback -> m SignalHandlerId -onWebViewPrintRequested obj cb = liftIO $ connectWebViewPrintRequested obj cb SignalConnectBefore -afterWebViewPrintRequested :: (GObject a, MonadIO m) => a -> WebViewPrintRequestedCallback -> m SignalHandlerId -afterWebViewPrintRequested obj cb = connectWebViewPrintRequested obj cb SignalConnectAfter - -connectWebViewPrintRequested :: (GObject a, MonadIO m) => - a -> WebViewPrintRequestedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewPrintRequested obj cb after = liftIO $ do - cb' <- mkWebViewPrintRequestedCallback (webViewPrintRequestedCallbackWrapper cb) - connectSignalFunPtr obj "print-requested" cb' after - --- signal WebView::redo -type WebViewRedoCallback = - IO () - -noWebViewRedoCallback :: Maybe WebViewRedoCallback -noWebViewRedoCallback = Nothing - -type WebViewRedoCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewRedoCallback :: WebViewRedoCallbackC -> IO (FunPtr WebViewRedoCallbackC) - -webViewRedoClosure :: WebViewRedoCallback -> IO Closure -webViewRedoClosure cb = newCClosure =<< mkWebViewRedoCallback wrapped - where wrapped = webViewRedoCallbackWrapper cb - -webViewRedoCallbackWrapper :: - WebViewRedoCallback -> - Ptr () -> - Ptr () -> - IO () -webViewRedoCallbackWrapper _cb _ _ = do - _cb - -onWebViewRedo :: (GObject a, MonadIO m) => a -> WebViewRedoCallback -> m SignalHandlerId -onWebViewRedo obj cb = liftIO $ connectWebViewRedo obj cb SignalConnectBefore -afterWebViewRedo :: (GObject a, MonadIO m) => a -> WebViewRedoCallback -> m SignalHandlerId -afterWebViewRedo obj cb = connectWebViewRedo obj cb SignalConnectAfter - -connectWebViewRedo :: (GObject a, MonadIO m) => - a -> WebViewRedoCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewRedo obj cb after = liftIO $ do - cb' <- mkWebViewRedoCallback (webViewRedoCallbackWrapper cb) - connectSignalFunPtr obj "redo" cb' after - --- signal WebView::resource-content-length-received -type WebViewResourceContentLengthReceivedCallback = - WebFrame -> - WebResource -> - Int32 -> - IO () - -noWebViewResourceContentLengthReceivedCallback :: Maybe WebViewResourceContentLengthReceivedCallback -noWebViewResourceContentLengthReceivedCallback = Nothing - -type WebViewResourceContentLengthReceivedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr WebResource -> - Int32 -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewResourceContentLengthReceivedCallback :: WebViewResourceContentLengthReceivedCallbackC -> IO (FunPtr WebViewResourceContentLengthReceivedCallbackC) - -webViewResourceContentLengthReceivedClosure :: WebViewResourceContentLengthReceivedCallback -> IO Closure -webViewResourceContentLengthReceivedClosure cb = newCClosure =<< mkWebViewResourceContentLengthReceivedCallback wrapped - where wrapped = webViewResourceContentLengthReceivedCallbackWrapper cb - -webViewResourceContentLengthReceivedCallbackWrapper :: - WebViewResourceContentLengthReceivedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr WebResource -> - Int32 -> - Ptr () -> - IO () -webViewResourceContentLengthReceivedCallbackWrapper _cb _ web_frame web_resource length_received _ = do - web_frame' <- (newObject WebFrame) web_frame - web_resource' <- (newObject WebResource) web_resource - _cb web_frame' web_resource' length_received - -onWebViewResourceContentLengthReceived :: (GObject a, MonadIO m) => a -> WebViewResourceContentLengthReceivedCallback -> m SignalHandlerId -onWebViewResourceContentLengthReceived obj cb = liftIO $ connectWebViewResourceContentLengthReceived obj cb SignalConnectBefore -afterWebViewResourceContentLengthReceived :: (GObject a, MonadIO m) => a -> WebViewResourceContentLengthReceivedCallback -> m SignalHandlerId -afterWebViewResourceContentLengthReceived obj cb = connectWebViewResourceContentLengthReceived obj cb SignalConnectAfter - -connectWebViewResourceContentLengthReceived :: (GObject a, MonadIO m) => - a -> WebViewResourceContentLengthReceivedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewResourceContentLengthReceived obj cb after = liftIO $ do - cb' <- mkWebViewResourceContentLengthReceivedCallback (webViewResourceContentLengthReceivedCallbackWrapper cb) - connectSignalFunPtr obj "resource-content-length-received" cb' after - --- signal WebView::resource-load-failed -type WebViewResourceLoadFailedCallback = - WebFrame -> - WebResource -> - GError -> - IO () - -noWebViewResourceLoadFailedCallback :: Maybe WebViewResourceLoadFailedCallback -noWebViewResourceLoadFailedCallback = Nothing - -type WebViewResourceLoadFailedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr WebResource -> - Ptr GError -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewResourceLoadFailedCallback :: WebViewResourceLoadFailedCallbackC -> IO (FunPtr WebViewResourceLoadFailedCallbackC) - -webViewResourceLoadFailedClosure :: WebViewResourceLoadFailedCallback -> IO Closure -webViewResourceLoadFailedClosure cb = newCClosure =<< mkWebViewResourceLoadFailedCallback wrapped - where wrapped = webViewResourceLoadFailedCallbackWrapper cb - -webViewResourceLoadFailedCallbackWrapper :: - WebViewResourceLoadFailedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr WebResource -> - Ptr GError -> - Ptr () -> - IO () -webViewResourceLoadFailedCallbackWrapper _cb _ web_frame web_resource error_ _ = do - web_frame' <- (newObject WebFrame) web_frame - web_resource' <- (newObject WebResource) web_resource - error_' <- (newBoxed GError) error_ - _cb web_frame' web_resource' error_' - -onWebViewResourceLoadFailed :: (GObject a, MonadIO m) => a -> WebViewResourceLoadFailedCallback -> m SignalHandlerId -onWebViewResourceLoadFailed obj cb = liftIO $ connectWebViewResourceLoadFailed obj cb SignalConnectBefore -afterWebViewResourceLoadFailed :: (GObject a, MonadIO m) => a -> WebViewResourceLoadFailedCallback -> m SignalHandlerId -afterWebViewResourceLoadFailed obj cb = connectWebViewResourceLoadFailed obj cb SignalConnectAfter - -connectWebViewResourceLoadFailed :: (GObject a, MonadIO m) => - a -> WebViewResourceLoadFailedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewResourceLoadFailed obj cb after = liftIO $ do - cb' <- mkWebViewResourceLoadFailedCallback (webViewResourceLoadFailedCallbackWrapper cb) - connectSignalFunPtr obj "resource-load-failed" cb' after - --- signal WebView::resource-load-finished -type WebViewResourceLoadFinishedCallback = - WebFrame -> - WebResource -> - IO () - -noWebViewResourceLoadFinishedCallback :: Maybe WebViewResourceLoadFinishedCallback -noWebViewResourceLoadFinishedCallback = Nothing - -type WebViewResourceLoadFinishedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr WebResource -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewResourceLoadFinishedCallback :: WebViewResourceLoadFinishedCallbackC -> IO (FunPtr WebViewResourceLoadFinishedCallbackC) - -webViewResourceLoadFinishedClosure :: WebViewResourceLoadFinishedCallback -> IO Closure -webViewResourceLoadFinishedClosure cb = newCClosure =<< mkWebViewResourceLoadFinishedCallback wrapped - where wrapped = webViewResourceLoadFinishedCallbackWrapper cb - -webViewResourceLoadFinishedCallbackWrapper :: - WebViewResourceLoadFinishedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr WebResource -> - Ptr () -> - IO () -webViewResourceLoadFinishedCallbackWrapper _cb _ web_frame web_resource _ = do - web_frame' <- (newObject WebFrame) web_frame - web_resource' <- (newObject WebResource) web_resource - _cb web_frame' web_resource' - -onWebViewResourceLoadFinished :: (GObject a, MonadIO m) => a -> WebViewResourceLoadFinishedCallback -> m SignalHandlerId -onWebViewResourceLoadFinished obj cb = liftIO $ connectWebViewResourceLoadFinished obj cb SignalConnectBefore -afterWebViewResourceLoadFinished :: (GObject a, MonadIO m) => a -> WebViewResourceLoadFinishedCallback -> m SignalHandlerId -afterWebViewResourceLoadFinished obj cb = connectWebViewResourceLoadFinished obj cb SignalConnectAfter - -connectWebViewResourceLoadFinished :: (GObject a, MonadIO m) => - a -> WebViewResourceLoadFinishedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewResourceLoadFinished obj cb after = liftIO $ do - cb' <- mkWebViewResourceLoadFinishedCallback (webViewResourceLoadFinishedCallbackWrapper cb) - connectSignalFunPtr obj "resource-load-finished" cb' after - --- signal WebView::resource-request-starting -type WebViewResourceRequestStartingCallback = - WebFrame -> - WebResource -> - NetworkRequest -> - NetworkResponse -> - IO () - -noWebViewResourceRequestStartingCallback :: Maybe WebViewResourceRequestStartingCallback -noWebViewResourceRequestStartingCallback = Nothing - -type WebViewResourceRequestStartingCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr WebResource -> - Ptr NetworkRequest -> - Ptr NetworkResponse -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewResourceRequestStartingCallback :: WebViewResourceRequestStartingCallbackC -> IO (FunPtr WebViewResourceRequestStartingCallbackC) - -webViewResourceRequestStartingClosure :: WebViewResourceRequestStartingCallback -> IO Closure -webViewResourceRequestStartingClosure cb = newCClosure =<< mkWebViewResourceRequestStartingCallback wrapped - where wrapped = webViewResourceRequestStartingCallbackWrapper cb - -webViewResourceRequestStartingCallbackWrapper :: - WebViewResourceRequestStartingCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr WebResource -> - Ptr NetworkRequest -> - Ptr NetworkResponse -> - Ptr () -> - IO () -webViewResourceRequestStartingCallbackWrapper _cb _ web_frame web_resource request response _ = do - web_frame' <- (newObject WebFrame) web_frame - web_resource' <- (newObject WebResource) web_resource - request' <- (newObject NetworkRequest) request - response' <- (newObject NetworkResponse) response - _cb web_frame' web_resource' request' response' - -onWebViewResourceRequestStarting :: (GObject a, MonadIO m) => a -> WebViewResourceRequestStartingCallback -> m SignalHandlerId -onWebViewResourceRequestStarting obj cb = liftIO $ connectWebViewResourceRequestStarting obj cb SignalConnectBefore -afterWebViewResourceRequestStarting :: (GObject a, MonadIO m) => a -> WebViewResourceRequestStartingCallback -> m SignalHandlerId -afterWebViewResourceRequestStarting obj cb = connectWebViewResourceRequestStarting obj cb SignalConnectAfter - -connectWebViewResourceRequestStarting :: (GObject a, MonadIO m) => - a -> WebViewResourceRequestStartingCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewResourceRequestStarting obj cb after = liftIO $ do - cb' <- mkWebViewResourceRequestStartingCallback (webViewResourceRequestStartingCallbackWrapper cb) - connectSignalFunPtr obj "resource-request-starting" cb' after - --- signal WebView::resource-response-received -type WebViewResourceResponseReceivedCallback = - WebFrame -> - WebResource -> - NetworkResponse -> - IO () - -noWebViewResourceResponseReceivedCallback :: Maybe WebViewResourceResponseReceivedCallback -noWebViewResourceResponseReceivedCallback = Nothing - -type WebViewResourceResponseReceivedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr WebResource -> - Ptr NetworkResponse -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewResourceResponseReceivedCallback :: WebViewResourceResponseReceivedCallbackC -> IO (FunPtr WebViewResourceResponseReceivedCallbackC) - -webViewResourceResponseReceivedClosure :: WebViewResourceResponseReceivedCallback -> IO Closure -webViewResourceResponseReceivedClosure cb = newCClosure =<< mkWebViewResourceResponseReceivedCallback wrapped - where wrapped = webViewResourceResponseReceivedCallbackWrapper cb - -webViewResourceResponseReceivedCallbackWrapper :: - WebViewResourceResponseReceivedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr WebResource -> - Ptr NetworkResponse -> - Ptr () -> - IO () -webViewResourceResponseReceivedCallbackWrapper _cb _ web_frame web_resource response _ = do - web_frame' <- (newObject WebFrame) web_frame - web_resource' <- (newObject WebResource) web_resource - response' <- (newObject NetworkResponse) response - _cb web_frame' web_resource' response' - -onWebViewResourceResponseReceived :: (GObject a, MonadIO m) => a -> WebViewResourceResponseReceivedCallback -> m SignalHandlerId -onWebViewResourceResponseReceived obj cb = liftIO $ connectWebViewResourceResponseReceived obj cb SignalConnectBefore -afterWebViewResourceResponseReceived :: (GObject a, MonadIO m) => a -> WebViewResourceResponseReceivedCallback -> m SignalHandlerId -afterWebViewResourceResponseReceived obj cb = connectWebViewResourceResponseReceived obj cb SignalConnectAfter - -connectWebViewResourceResponseReceived :: (GObject a, MonadIO m) => - a -> WebViewResourceResponseReceivedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewResourceResponseReceived obj cb after = liftIO $ do - cb' <- mkWebViewResourceResponseReceivedCallback (webViewResourceResponseReceivedCallbackWrapper cb) - connectSignalFunPtr obj "resource-response-received" cb' after - --- signal WebView::run-file-chooser -type WebViewRunFileChooserCallback = - FileChooserRequest -> - IO Bool - -noWebViewRunFileChooserCallback :: Maybe WebViewRunFileChooserCallback -noWebViewRunFileChooserCallback = Nothing - -type WebViewRunFileChooserCallbackC = - Ptr () -> -- object - Ptr FileChooserRequest -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewRunFileChooserCallback :: WebViewRunFileChooserCallbackC -> IO (FunPtr WebViewRunFileChooserCallbackC) - -webViewRunFileChooserClosure :: WebViewRunFileChooserCallback -> IO Closure -webViewRunFileChooserClosure cb = newCClosure =<< mkWebViewRunFileChooserCallback wrapped - where wrapped = webViewRunFileChooserCallbackWrapper cb - -webViewRunFileChooserCallbackWrapper :: - WebViewRunFileChooserCallback -> - Ptr () -> - Ptr FileChooserRequest -> - Ptr () -> - IO CInt -webViewRunFileChooserCallbackWrapper _cb _ request _ = do - request' <- (newObject FileChooserRequest) request - result <- _cb request' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewRunFileChooser :: (GObject a, MonadIO m) => a -> WebViewRunFileChooserCallback -> m SignalHandlerId -onWebViewRunFileChooser obj cb = liftIO $ connectWebViewRunFileChooser obj cb SignalConnectBefore -afterWebViewRunFileChooser :: (GObject a, MonadIO m) => a -> WebViewRunFileChooserCallback -> m SignalHandlerId -afterWebViewRunFileChooser obj cb = connectWebViewRunFileChooser obj cb SignalConnectAfter - -connectWebViewRunFileChooser :: (GObject a, MonadIO m) => - a -> WebViewRunFileChooserCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewRunFileChooser obj cb after = liftIO $ do - cb' <- mkWebViewRunFileChooserCallback (webViewRunFileChooserCallbackWrapper cb) - connectSignalFunPtr obj "run-file-chooser" cb' after - --- signal WebView::script-alert -type WebViewScriptAlertCallback = - WebFrame -> - T.Text -> - IO Bool - -noWebViewScriptAlertCallback :: Maybe WebViewScriptAlertCallback -noWebViewScriptAlertCallback = Nothing - -type WebViewScriptAlertCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - CString -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewScriptAlertCallback :: WebViewScriptAlertCallbackC -> IO (FunPtr WebViewScriptAlertCallbackC) - -webViewScriptAlertClosure :: WebViewScriptAlertCallback -> IO Closure -webViewScriptAlertClosure cb = newCClosure =<< mkWebViewScriptAlertCallback wrapped - where wrapped = webViewScriptAlertCallbackWrapper cb - -webViewScriptAlertCallbackWrapper :: - WebViewScriptAlertCallback -> - Ptr () -> - Ptr WebFrame -> - CString -> - Ptr () -> - IO CInt -webViewScriptAlertCallbackWrapper _cb _ frame message _ = do - frame' <- (newObject WebFrame) frame - message' <- cstringToText message - result <- _cb frame' message' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewScriptAlert :: (GObject a, MonadIO m) => a -> WebViewScriptAlertCallback -> m SignalHandlerId -onWebViewScriptAlert obj cb = liftIO $ connectWebViewScriptAlert obj cb SignalConnectBefore -afterWebViewScriptAlert :: (GObject a, MonadIO m) => a -> WebViewScriptAlertCallback -> m SignalHandlerId -afterWebViewScriptAlert obj cb = connectWebViewScriptAlert obj cb SignalConnectAfter - -connectWebViewScriptAlert :: (GObject a, MonadIO m) => - a -> WebViewScriptAlertCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewScriptAlert obj cb after = liftIO $ do - cb' <- mkWebViewScriptAlertCallback (webViewScriptAlertCallbackWrapper cb) - connectSignalFunPtr obj "script-alert" cb' after - --- signal WebView::script-confirm -type WebViewScriptConfirmCallback = - WebFrame -> - T.Text -> - Ptr () -> - IO Bool - -noWebViewScriptConfirmCallback :: Maybe WebViewScriptConfirmCallback -noWebViewScriptConfirmCallback = Nothing - -type WebViewScriptConfirmCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - CString -> - Ptr () -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewScriptConfirmCallback :: WebViewScriptConfirmCallbackC -> IO (FunPtr WebViewScriptConfirmCallbackC) - -webViewScriptConfirmClosure :: WebViewScriptConfirmCallback -> IO Closure -webViewScriptConfirmClosure cb = newCClosure =<< mkWebViewScriptConfirmCallback wrapped - where wrapped = webViewScriptConfirmCallbackWrapper cb - -webViewScriptConfirmCallbackWrapper :: - WebViewScriptConfirmCallback -> - Ptr () -> - Ptr WebFrame -> - CString -> - Ptr () -> - Ptr () -> - IO CInt -webViewScriptConfirmCallbackWrapper _cb _ frame message confirmed _ = do - frame' <- (newObject WebFrame) frame - message' <- cstringToText message - result <- _cb frame' message' confirmed - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewScriptConfirm :: (GObject a, MonadIO m) => a -> WebViewScriptConfirmCallback -> m SignalHandlerId -onWebViewScriptConfirm obj cb = liftIO $ connectWebViewScriptConfirm obj cb SignalConnectBefore -afterWebViewScriptConfirm :: (GObject a, MonadIO m) => a -> WebViewScriptConfirmCallback -> m SignalHandlerId -afterWebViewScriptConfirm obj cb = connectWebViewScriptConfirm obj cb SignalConnectAfter - -connectWebViewScriptConfirm :: (GObject a, MonadIO m) => - a -> WebViewScriptConfirmCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewScriptConfirm obj cb after = liftIO $ do - cb' <- mkWebViewScriptConfirmCallback (webViewScriptConfirmCallbackWrapper cb) - connectSignalFunPtr obj "script-confirm" cb' after - --- signal WebView::script-prompt -type WebViewScriptPromptCallback = - WebFrame -> - T.Text -> - T.Text -> - Ptr () -> - IO Bool - -noWebViewScriptPromptCallback :: Maybe WebViewScriptPromptCallback -noWebViewScriptPromptCallback = Nothing - -type WebViewScriptPromptCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - CString -> - CString -> - Ptr () -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewScriptPromptCallback :: WebViewScriptPromptCallbackC -> IO (FunPtr WebViewScriptPromptCallbackC) - -webViewScriptPromptClosure :: WebViewScriptPromptCallback -> IO Closure -webViewScriptPromptClosure cb = newCClosure =<< mkWebViewScriptPromptCallback wrapped - where wrapped = webViewScriptPromptCallbackWrapper cb - -webViewScriptPromptCallbackWrapper :: - WebViewScriptPromptCallback -> - Ptr () -> - Ptr WebFrame -> - CString -> - CString -> - Ptr () -> - Ptr () -> - IO CInt -webViewScriptPromptCallbackWrapper _cb _ frame message default_ text _ = do - frame' <- (newObject WebFrame) frame - message' <- cstringToText message - default_' <- cstringToText default_ - result <- _cb frame' message' default_' text - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewScriptPrompt :: (GObject a, MonadIO m) => a -> WebViewScriptPromptCallback -> m SignalHandlerId -onWebViewScriptPrompt obj cb = liftIO $ connectWebViewScriptPrompt obj cb SignalConnectBefore -afterWebViewScriptPrompt :: (GObject a, MonadIO m) => a -> WebViewScriptPromptCallback -> m SignalHandlerId -afterWebViewScriptPrompt obj cb = connectWebViewScriptPrompt obj cb SignalConnectAfter - -connectWebViewScriptPrompt :: (GObject a, MonadIO m) => - a -> WebViewScriptPromptCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewScriptPrompt obj cb after = liftIO $ do - cb' <- mkWebViewScriptPromptCallback (webViewScriptPromptCallbackWrapper cb) - connectSignalFunPtr obj "script-prompt" cb' after - --- signal WebView::select-all -type WebViewSelectAllCallback = - IO () - -noWebViewSelectAllCallback :: Maybe WebViewSelectAllCallback -noWebViewSelectAllCallback = Nothing - -type WebViewSelectAllCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewSelectAllCallback :: WebViewSelectAllCallbackC -> IO (FunPtr WebViewSelectAllCallbackC) - -webViewSelectAllClosure :: WebViewSelectAllCallback -> IO Closure -webViewSelectAllClosure cb = newCClosure =<< mkWebViewSelectAllCallback wrapped - where wrapped = webViewSelectAllCallbackWrapper cb - -webViewSelectAllCallbackWrapper :: - WebViewSelectAllCallback -> - Ptr () -> - Ptr () -> - IO () -webViewSelectAllCallbackWrapper _cb _ _ = do - _cb - -onWebViewSelectAll :: (GObject a, MonadIO m) => a -> WebViewSelectAllCallback -> m SignalHandlerId -onWebViewSelectAll obj cb = liftIO $ connectWebViewSelectAll obj cb SignalConnectBefore -afterWebViewSelectAll :: (GObject a, MonadIO m) => a -> WebViewSelectAllCallback -> m SignalHandlerId -afterWebViewSelectAll obj cb = connectWebViewSelectAll obj cb SignalConnectAfter - -connectWebViewSelectAll :: (GObject a, MonadIO m) => - a -> WebViewSelectAllCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewSelectAll obj cb after = liftIO $ do - cb' <- mkWebViewSelectAllCallback (webViewSelectAllCallbackWrapper cb) - connectSignalFunPtr obj "select-all" cb' after - --- signal WebView::selection-changed -type WebViewSelectionChangedCallback = - IO () - -noWebViewSelectionChangedCallback :: Maybe WebViewSelectionChangedCallback -noWebViewSelectionChangedCallback = Nothing - -type WebViewSelectionChangedCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewSelectionChangedCallback :: WebViewSelectionChangedCallbackC -> IO (FunPtr WebViewSelectionChangedCallbackC) - -webViewSelectionChangedClosure :: WebViewSelectionChangedCallback -> IO Closure -webViewSelectionChangedClosure cb = newCClosure =<< mkWebViewSelectionChangedCallback wrapped - where wrapped = webViewSelectionChangedCallbackWrapper cb - -webViewSelectionChangedCallbackWrapper :: - WebViewSelectionChangedCallback -> - Ptr () -> - Ptr () -> - IO () -webViewSelectionChangedCallbackWrapper _cb _ _ = do - _cb - -onWebViewSelectionChanged :: (GObject a, MonadIO m) => a -> WebViewSelectionChangedCallback -> m SignalHandlerId -onWebViewSelectionChanged obj cb = liftIO $ connectWebViewSelectionChanged obj cb SignalConnectBefore -afterWebViewSelectionChanged :: (GObject a, MonadIO m) => a -> WebViewSelectionChangedCallback -> m SignalHandlerId -afterWebViewSelectionChanged obj cb = connectWebViewSelectionChanged obj cb SignalConnectAfter - -connectWebViewSelectionChanged :: (GObject a, MonadIO m) => - a -> WebViewSelectionChangedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewSelectionChanged obj cb after = liftIO $ do - cb' <- mkWebViewSelectionChangedCallback (webViewSelectionChangedCallbackWrapper cb) - connectSignalFunPtr obj "selection-changed" cb' after - --- signal WebView::should-apply-style -type WebViewShouldApplyStyleCallback = - DOMCSSStyleDeclaration -> - DOMRange -> - IO Bool - -noWebViewShouldApplyStyleCallback :: Maybe WebViewShouldApplyStyleCallback -noWebViewShouldApplyStyleCallback = Nothing - -type WebViewShouldApplyStyleCallbackC = - Ptr () -> -- object - Ptr DOMCSSStyleDeclaration -> - Ptr DOMRange -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewShouldApplyStyleCallback :: WebViewShouldApplyStyleCallbackC -> IO (FunPtr WebViewShouldApplyStyleCallbackC) - -webViewShouldApplyStyleClosure :: WebViewShouldApplyStyleCallback -> IO Closure -webViewShouldApplyStyleClosure cb = newCClosure =<< mkWebViewShouldApplyStyleCallback wrapped - where wrapped = webViewShouldApplyStyleCallbackWrapper cb - -webViewShouldApplyStyleCallbackWrapper :: - WebViewShouldApplyStyleCallback -> - Ptr () -> - Ptr DOMCSSStyleDeclaration -> - Ptr DOMRange -> - Ptr () -> - IO CInt -webViewShouldApplyStyleCallbackWrapper _cb _ set range _ = do - set' <- (newObject DOMCSSStyleDeclaration) set - range' <- (newObject DOMRange) range - result <- _cb set' range' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewShouldApplyStyle :: (GObject a, MonadIO m) => a -> WebViewShouldApplyStyleCallback -> m SignalHandlerId -onWebViewShouldApplyStyle obj cb = liftIO $ connectWebViewShouldApplyStyle obj cb SignalConnectBefore -afterWebViewShouldApplyStyle :: (GObject a, MonadIO m) => a -> WebViewShouldApplyStyleCallback -> m SignalHandlerId -afterWebViewShouldApplyStyle obj cb = connectWebViewShouldApplyStyle obj cb SignalConnectAfter - -connectWebViewShouldApplyStyle :: (GObject a, MonadIO m) => - a -> WebViewShouldApplyStyleCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewShouldApplyStyle obj cb after = liftIO $ do - cb' <- mkWebViewShouldApplyStyleCallback (webViewShouldApplyStyleCallbackWrapper cb) - connectSignalFunPtr obj "should-apply-style" cb' after - --- signal WebView::should-begin-editing -type WebViewShouldBeginEditingCallback = - DOMRange -> - IO Bool - -noWebViewShouldBeginEditingCallback :: Maybe WebViewShouldBeginEditingCallback -noWebViewShouldBeginEditingCallback = Nothing - -type WebViewShouldBeginEditingCallbackC = - Ptr () -> -- object - Ptr DOMRange -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewShouldBeginEditingCallback :: WebViewShouldBeginEditingCallbackC -> IO (FunPtr WebViewShouldBeginEditingCallbackC) - -webViewShouldBeginEditingClosure :: WebViewShouldBeginEditingCallback -> IO Closure -webViewShouldBeginEditingClosure cb = newCClosure =<< mkWebViewShouldBeginEditingCallback wrapped - where wrapped = webViewShouldBeginEditingCallbackWrapper cb - -webViewShouldBeginEditingCallbackWrapper :: - WebViewShouldBeginEditingCallback -> - Ptr () -> - Ptr DOMRange -> - Ptr () -> - IO CInt -webViewShouldBeginEditingCallbackWrapper _cb _ range _ = do - range' <- (newObject DOMRange) range - result <- _cb range' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewShouldBeginEditing :: (GObject a, MonadIO m) => a -> WebViewShouldBeginEditingCallback -> m SignalHandlerId -onWebViewShouldBeginEditing obj cb = liftIO $ connectWebViewShouldBeginEditing obj cb SignalConnectBefore -afterWebViewShouldBeginEditing :: (GObject a, MonadIO m) => a -> WebViewShouldBeginEditingCallback -> m SignalHandlerId -afterWebViewShouldBeginEditing obj cb = connectWebViewShouldBeginEditing obj cb SignalConnectAfter - -connectWebViewShouldBeginEditing :: (GObject a, MonadIO m) => - a -> WebViewShouldBeginEditingCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewShouldBeginEditing obj cb after = liftIO $ do - cb' <- mkWebViewShouldBeginEditingCallback (webViewShouldBeginEditingCallbackWrapper cb) - connectSignalFunPtr obj "should-begin-editing" cb' after - --- signal WebView::should-change-selected-range -type WebViewShouldChangeSelectedRangeCallback = - DOMRange -> - DOMRange -> - SelectionAffinity -> - Bool -> - IO Bool - -noWebViewShouldChangeSelectedRangeCallback :: Maybe WebViewShouldChangeSelectedRangeCallback -noWebViewShouldChangeSelectedRangeCallback = Nothing - -type WebViewShouldChangeSelectedRangeCallbackC = - Ptr () -> -- object - Ptr DOMRange -> - Ptr DOMRange -> - CUInt -> - CInt -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewShouldChangeSelectedRangeCallback :: WebViewShouldChangeSelectedRangeCallbackC -> IO (FunPtr WebViewShouldChangeSelectedRangeCallbackC) - -webViewShouldChangeSelectedRangeClosure :: WebViewShouldChangeSelectedRangeCallback -> IO Closure -webViewShouldChangeSelectedRangeClosure cb = newCClosure =<< mkWebViewShouldChangeSelectedRangeCallback wrapped - where wrapped = webViewShouldChangeSelectedRangeCallbackWrapper cb - -webViewShouldChangeSelectedRangeCallbackWrapper :: - WebViewShouldChangeSelectedRangeCallback -> - Ptr () -> - Ptr DOMRange -> - Ptr DOMRange -> - CUInt -> - CInt -> - Ptr () -> - IO CInt -webViewShouldChangeSelectedRangeCallbackWrapper _cb _ fromRange toRange affinity stillSelecting _ = do - fromRange' <- (newObject DOMRange) fromRange - toRange' <- (newObject DOMRange) toRange - let affinity' = (toEnum . fromIntegral) affinity - let stillSelecting' = (/= 0) stillSelecting - result <- _cb fromRange' toRange' affinity' stillSelecting' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewShouldChangeSelectedRange :: (GObject a, MonadIO m) => a -> WebViewShouldChangeSelectedRangeCallback -> m SignalHandlerId -onWebViewShouldChangeSelectedRange obj cb = liftIO $ connectWebViewShouldChangeSelectedRange obj cb SignalConnectBefore -afterWebViewShouldChangeSelectedRange :: (GObject a, MonadIO m) => a -> WebViewShouldChangeSelectedRangeCallback -> m SignalHandlerId -afterWebViewShouldChangeSelectedRange obj cb = connectWebViewShouldChangeSelectedRange obj cb SignalConnectAfter - -connectWebViewShouldChangeSelectedRange :: (GObject a, MonadIO m) => - a -> WebViewShouldChangeSelectedRangeCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewShouldChangeSelectedRange obj cb after = liftIO $ do - cb' <- mkWebViewShouldChangeSelectedRangeCallback (webViewShouldChangeSelectedRangeCallbackWrapper cb) - connectSignalFunPtr obj "should-change-selected-range" cb' after - --- signal WebView::should-delete-range -type WebViewShouldDeleteRangeCallback = - DOMRange -> - IO Bool - -noWebViewShouldDeleteRangeCallback :: Maybe WebViewShouldDeleteRangeCallback -noWebViewShouldDeleteRangeCallback = Nothing - -type WebViewShouldDeleteRangeCallbackC = - Ptr () -> -- object - Ptr DOMRange -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewShouldDeleteRangeCallback :: WebViewShouldDeleteRangeCallbackC -> IO (FunPtr WebViewShouldDeleteRangeCallbackC) - -webViewShouldDeleteRangeClosure :: WebViewShouldDeleteRangeCallback -> IO Closure -webViewShouldDeleteRangeClosure cb = newCClosure =<< mkWebViewShouldDeleteRangeCallback wrapped - where wrapped = webViewShouldDeleteRangeCallbackWrapper cb - -webViewShouldDeleteRangeCallbackWrapper :: - WebViewShouldDeleteRangeCallback -> - Ptr () -> - Ptr DOMRange -> - Ptr () -> - IO CInt -webViewShouldDeleteRangeCallbackWrapper _cb _ range _ = do - range' <- (newObject DOMRange) range - result <- _cb range' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewShouldDeleteRange :: (GObject a, MonadIO m) => a -> WebViewShouldDeleteRangeCallback -> m SignalHandlerId -onWebViewShouldDeleteRange obj cb = liftIO $ connectWebViewShouldDeleteRange obj cb SignalConnectBefore -afterWebViewShouldDeleteRange :: (GObject a, MonadIO m) => a -> WebViewShouldDeleteRangeCallback -> m SignalHandlerId -afterWebViewShouldDeleteRange obj cb = connectWebViewShouldDeleteRange obj cb SignalConnectAfter - -connectWebViewShouldDeleteRange :: (GObject a, MonadIO m) => - a -> WebViewShouldDeleteRangeCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewShouldDeleteRange obj cb after = liftIO $ do - cb' <- mkWebViewShouldDeleteRangeCallback (webViewShouldDeleteRangeCallbackWrapper cb) - connectSignalFunPtr obj "should-delete-range" cb' after - --- signal WebView::should-end-editing -type WebViewShouldEndEditingCallback = - DOMRange -> - IO Bool - -noWebViewShouldEndEditingCallback :: Maybe WebViewShouldEndEditingCallback -noWebViewShouldEndEditingCallback = Nothing - -type WebViewShouldEndEditingCallbackC = - Ptr () -> -- object - Ptr DOMRange -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewShouldEndEditingCallback :: WebViewShouldEndEditingCallbackC -> IO (FunPtr WebViewShouldEndEditingCallbackC) - -webViewShouldEndEditingClosure :: WebViewShouldEndEditingCallback -> IO Closure -webViewShouldEndEditingClosure cb = newCClosure =<< mkWebViewShouldEndEditingCallback wrapped - where wrapped = webViewShouldEndEditingCallbackWrapper cb - -webViewShouldEndEditingCallbackWrapper :: - WebViewShouldEndEditingCallback -> - Ptr () -> - Ptr DOMRange -> - Ptr () -> - IO CInt -webViewShouldEndEditingCallbackWrapper _cb _ range _ = do - range' <- (newObject DOMRange) range - result <- _cb range' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewShouldEndEditing :: (GObject a, MonadIO m) => a -> WebViewShouldEndEditingCallback -> m SignalHandlerId -onWebViewShouldEndEditing obj cb = liftIO $ connectWebViewShouldEndEditing obj cb SignalConnectBefore -afterWebViewShouldEndEditing :: (GObject a, MonadIO m) => a -> WebViewShouldEndEditingCallback -> m SignalHandlerId -afterWebViewShouldEndEditing obj cb = connectWebViewShouldEndEditing obj cb SignalConnectAfter - -connectWebViewShouldEndEditing :: (GObject a, MonadIO m) => - a -> WebViewShouldEndEditingCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewShouldEndEditing obj cb after = liftIO $ do - cb' <- mkWebViewShouldEndEditingCallback (webViewShouldEndEditingCallbackWrapper cb) - connectSignalFunPtr obj "should-end-editing" cb' after - --- signal WebView::should-insert-node -type WebViewShouldInsertNodeCallback = - DOMNode -> - DOMRange -> - InsertAction -> - IO Bool - -noWebViewShouldInsertNodeCallback :: Maybe WebViewShouldInsertNodeCallback -noWebViewShouldInsertNodeCallback = Nothing - -type WebViewShouldInsertNodeCallbackC = - Ptr () -> -- object - Ptr DOMNode -> - Ptr DOMRange -> - CUInt -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewShouldInsertNodeCallback :: WebViewShouldInsertNodeCallbackC -> IO (FunPtr WebViewShouldInsertNodeCallbackC) - -webViewShouldInsertNodeClosure :: WebViewShouldInsertNodeCallback -> IO Closure -webViewShouldInsertNodeClosure cb = newCClosure =<< mkWebViewShouldInsertNodeCallback wrapped - where wrapped = webViewShouldInsertNodeCallbackWrapper cb - -webViewShouldInsertNodeCallbackWrapper :: - WebViewShouldInsertNodeCallback -> - Ptr () -> - Ptr DOMNode -> - Ptr DOMRange -> - CUInt -> - Ptr () -> - IO CInt -webViewShouldInsertNodeCallbackWrapper _cb _ node range action _ = do - node' <- (newObject DOMNode) node - range' <- (newObject DOMRange) range - let action' = (toEnum . fromIntegral) action - result <- _cb node' range' action' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewShouldInsertNode :: (GObject a, MonadIO m) => a -> WebViewShouldInsertNodeCallback -> m SignalHandlerId -onWebViewShouldInsertNode obj cb = liftIO $ connectWebViewShouldInsertNode obj cb SignalConnectBefore -afterWebViewShouldInsertNode :: (GObject a, MonadIO m) => a -> WebViewShouldInsertNodeCallback -> m SignalHandlerId -afterWebViewShouldInsertNode obj cb = connectWebViewShouldInsertNode obj cb SignalConnectAfter - -connectWebViewShouldInsertNode :: (GObject a, MonadIO m) => - a -> WebViewShouldInsertNodeCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewShouldInsertNode obj cb after = liftIO $ do - cb' <- mkWebViewShouldInsertNodeCallback (webViewShouldInsertNodeCallbackWrapper cb) - connectSignalFunPtr obj "should-insert-node" cb' after - --- signal WebView::should-insert-text -type WebViewShouldInsertTextCallback = - T.Text -> - DOMRange -> - InsertAction -> - IO Bool - -noWebViewShouldInsertTextCallback :: Maybe WebViewShouldInsertTextCallback -noWebViewShouldInsertTextCallback = Nothing - -type WebViewShouldInsertTextCallbackC = - Ptr () -> -- object - CString -> - Ptr DOMRange -> - CUInt -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewShouldInsertTextCallback :: WebViewShouldInsertTextCallbackC -> IO (FunPtr WebViewShouldInsertTextCallbackC) - -webViewShouldInsertTextClosure :: WebViewShouldInsertTextCallback -> IO Closure -webViewShouldInsertTextClosure cb = newCClosure =<< mkWebViewShouldInsertTextCallback wrapped - where wrapped = webViewShouldInsertTextCallbackWrapper cb - -webViewShouldInsertTextCallbackWrapper :: - WebViewShouldInsertTextCallback -> - Ptr () -> - CString -> - Ptr DOMRange -> - CUInt -> - Ptr () -> - IO CInt -webViewShouldInsertTextCallbackWrapper _cb _ string range action _ = do - string' <- cstringToText string - range' <- (newObject DOMRange) range - let action' = (toEnum . fromIntegral) action - result <- _cb string' range' action' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewShouldInsertText :: (GObject a, MonadIO m) => a -> WebViewShouldInsertTextCallback -> m SignalHandlerId -onWebViewShouldInsertText obj cb = liftIO $ connectWebViewShouldInsertText obj cb SignalConnectBefore -afterWebViewShouldInsertText :: (GObject a, MonadIO m) => a -> WebViewShouldInsertTextCallback -> m SignalHandlerId -afterWebViewShouldInsertText obj cb = connectWebViewShouldInsertText obj cb SignalConnectAfter - -connectWebViewShouldInsertText :: (GObject a, MonadIO m) => - a -> WebViewShouldInsertTextCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewShouldInsertText obj cb after = liftIO $ do - cb' <- mkWebViewShouldInsertTextCallback (webViewShouldInsertTextCallbackWrapper cb) - connectSignalFunPtr obj "should-insert-text" cb' after - --- signal WebView::should-show-delete-interface-for-element -type WebViewShouldShowDeleteInterfaceForElementCallback = - DOMHTMLElement -> - IO Bool - -noWebViewShouldShowDeleteInterfaceForElementCallback :: Maybe WebViewShouldShowDeleteInterfaceForElementCallback -noWebViewShouldShowDeleteInterfaceForElementCallback = Nothing - -type WebViewShouldShowDeleteInterfaceForElementCallbackC = - Ptr () -> -- object - Ptr DOMHTMLElement -> - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewShouldShowDeleteInterfaceForElementCallback :: WebViewShouldShowDeleteInterfaceForElementCallbackC -> IO (FunPtr WebViewShouldShowDeleteInterfaceForElementCallbackC) - -webViewShouldShowDeleteInterfaceForElementClosure :: WebViewShouldShowDeleteInterfaceForElementCallback -> IO Closure -webViewShouldShowDeleteInterfaceForElementClosure cb = newCClosure =<< mkWebViewShouldShowDeleteInterfaceForElementCallback wrapped - where wrapped = webViewShouldShowDeleteInterfaceForElementCallbackWrapper cb - -webViewShouldShowDeleteInterfaceForElementCallbackWrapper :: - WebViewShouldShowDeleteInterfaceForElementCallback -> - Ptr () -> - Ptr DOMHTMLElement -> - Ptr () -> - IO CInt -webViewShouldShowDeleteInterfaceForElementCallbackWrapper _cb _ element _ = do - element' <- (newObject DOMHTMLElement) element - result <- _cb element' - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewShouldShowDeleteInterfaceForElement :: (GObject a, MonadIO m) => a -> WebViewShouldShowDeleteInterfaceForElementCallback -> m SignalHandlerId -onWebViewShouldShowDeleteInterfaceForElement obj cb = liftIO $ connectWebViewShouldShowDeleteInterfaceForElement obj cb SignalConnectBefore -afterWebViewShouldShowDeleteInterfaceForElement :: (GObject a, MonadIO m) => a -> WebViewShouldShowDeleteInterfaceForElementCallback -> m SignalHandlerId -afterWebViewShouldShowDeleteInterfaceForElement obj cb = connectWebViewShouldShowDeleteInterfaceForElement obj cb SignalConnectAfter - -connectWebViewShouldShowDeleteInterfaceForElement :: (GObject a, MonadIO m) => - a -> WebViewShouldShowDeleteInterfaceForElementCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewShouldShowDeleteInterfaceForElement obj cb after = liftIO $ do - cb' <- mkWebViewShouldShowDeleteInterfaceForElementCallback (webViewShouldShowDeleteInterfaceForElementCallbackWrapper cb) - connectSignalFunPtr obj "should-show-delete-interface-for-element" cb' after - --- signal WebView::status-bar-text-changed -type WebViewStatusBarTextChangedCallback = - T.Text -> - IO () - -noWebViewStatusBarTextChangedCallback :: Maybe WebViewStatusBarTextChangedCallback -noWebViewStatusBarTextChangedCallback = Nothing - -type WebViewStatusBarTextChangedCallbackC = - Ptr () -> -- object - CString -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewStatusBarTextChangedCallback :: WebViewStatusBarTextChangedCallbackC -> IO (FunPtr WebViewStatusBarTextChangedCallbackC) - -webViewStatusBarTextChangedClosure :: WebViewStatusBarTextChangedCallback -> IO Closure -webViewStatusBarTextChangedClosure cb = newCClosure =<< mkWebViewStatusBarTextChangedCallback wrapped - where wrapped = webViewStatusBarTextChangedCallbackWrapper cb - -webViewStatusBarTextChangedCallbackWrapper :: - WebViewStatusBarTextChangedCallback -> - Ptr () -> - CString -> - Ptr () -> - IO () -webViewStatusBarTextChangedCallbackWrapper _cb _ object _ = do - object' <- cstringToText object - _cb object' - -onWebViewStatusBarTextChanged :: (GObject a, MonadIO m) => a -> WebViewStatusBarTextChangedCallback -> m SignalHandlerId -onWebViewStatusBarTextChanged obj cb = liftIO $ connectWebViewStatusBarTextChanged obj cb SignalConnectBefore -afterWebViewStatusBarTextChanged :: (GObject a, MonadIO m) => a -> WebViewStatusBarTextChangedCallback -> m SignalHandlerId -afterWebViewStatusBarTextChanged obj cb = connectWebViewStatusBarTextChanged obj cb SignalConnectAfter - -connectWebViewStatusBarTextChanged :: (GObject a, MonadIO m) => - a -> WebViewStatusBarTextChangedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewStatusBarTextChanged obj cb after = liftIO $ do - cb' <- mkWebViewStatusBarTextChangedCallback (webViewStatusBarTextChangedCallbackWrapper cb) - connectSignalFunPtr obj "status-bar-text-changed" cb' after - --- signal WebView::title-changed -type WebViewTitleChangedCallback = - WebFrame -> - T.Text -> - IO () - -noWebViewTitleChangedCallback :: Maybe WebViewTitleChangedCallback -noWebViewTitleChangedCallback = Nothing - -type WebViewTitleChangedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - CString -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewTitleChangedCallback :: WebViewTitleChangedCallbackC -> IO (FunPtr WebViewTitleChangedCallbackC) - -webViewTitleChangedClosure :: WebViewTitleChangedCallback -> IO Closure -webViewTitleChangedClosure cb = newCClosure =<< mkWebViewTitleChangedCallback wrapped - where wrapped = webViewTitleChangedCallbackWrapper cb - -webViewTitleChangedCallbackWrapper :: - WebViewTitleChangedCallback -> - Ptr () -> - Ptr WebFrame -> - CString -> - Ptr () -> - IO () -webViewTitleChangedCallbackWrapper _cb _ frame title _ = do - frame' <- (newObject WebFrame) frame - title' <- cstringToText title - _cb frame' title' - -onWebViewTitleChanged :: (GObject a, MonadIO m) => a -> WebViewTitleChangedCallback -> m SignalHandlerId -onWebViewTitleChanged obj cb = liftIO $ connectWebViewTitleChanged obj cb SignalConnectBefore -afterWebViewTitleChanged :: (GObject a, MonadIO m) => a -> WebViewTitleChangedCallback -> m SignalHandlerId -afterWebViewTitleChanged obj cb = connectWebViewTitleChanged obj cb SignalConnectAfter - -connectWebViewTitleChanged :: (GObject a, MonadIO m) => - a -> WebViewTitleChangedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewTitleChanged obj cb after = liftIO $ do - cb' <- mkWebViewTitleChangedCallback (webViewTitleChangedCallbackWrapper cb) - connectSignalFunPtr obj "title-changed" cb' after - --- signal WebView::undo -type WebViewUndoCallback = - IO () - -noWebViewUndoCallback :: Maybe WebViewUndoCallback -noWebViewUndoCallback = Nothing - -type WebViewUndoCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewUndoCallback :: WebViewUndoCallbackC -> IO (FunPtr WebViewUndoCallbackC) - -webViewUndoClosure :: WebViewUndoCallback -> IO Closure -webViewUndoClosure cb = newCClosure =<< mkWebViewUndoCallback wrapped - where wrapped = webViewUndoCallbackWrapper cb - -webViewUndoCallbackWrapper :: - WebViewUndoCallback -> - Ptr () -> - Ptr () -> - IO () -webViewUndoCallbackWrapper _cb _ _ = do - _cb - -onWebViewUndo :: (GObject a, MonadIO m) => a -> WebViewUndoCallback -> m SignalHandlerId -onWebViewUndo obj cb = liftIO $ connectWebViewUndo obj cb SignalConnectBefore -afterWebViewUndo :: (GObject a, MonadIO m) => a -> WebViewUndoCallback -> m SignalHandlerId -afterWebViewUndo obj cb = connectWebViewUndo obj cb SignalConnectAfter - -connectWebViewUndo :: (GObject a, MonadIO m) => - a -> WebViewUndoCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewUndo obj cb after = liftIO $ do - cb' <- mkWebViewUndoCallback (webViewUndoCallbackWrapper cb) - connectSignalFunPtr obj "undo" cb' after - --- signal WebView::user-changed-contents -type WebViewUserChangedContentsCallback = - IO () - -noWebViewUserChangedContentsCallback :: Maybe WebViewUserChangedContentsCallback -noWebViewUserChangedContentsCallback = Nothing - -type WebViewUserChangedContentsCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewUserChangedContentsCallback :: WebViewUserChangedContentsCallbackC -> IO (FunPtr WebViewUserChangedContentsCallbackC) - -webViewUserChangedContentsClosure :: WebViewUserChangedContentsCallback -> IO Closure -webViewUserChangedContentsClosure cb = newCClosure =<< mkWebViewUserChangedContentsCallback wrapped - where wrapped = webViewUserChangedContentsCallbackWrapper cb - -webViewUserChangedContentsCallbackWrapper :: - WebViewUserChangedContentsCallback -> - Ptr () -> - Ptr () -> - IO () -webViewUserChangedContentsCallbackWrapper _cb _ _ = do - _cb - -onWebViewUserChangedContents :: (GObject a, MonadIO m) => a -> WebViewUserChangedContentsCallback -> m SignalHandlerId -onWebViewUserChangedContents obj cb = liftIO $ connectWebViewUserChangedContents obj cb SignalConnectBefore -afterWebViewUserChangedContents :: (GObject a, MonadIO m) => a -> WebViewUserChangedContentsCallback -> m SignalHandlerId -afterWebViewUserChangedContents obj cb = connectWebViewUserChangedContents obj cb SignalConnectAfter - -connectWebViewUserChangedContents :: (GObject a, MonadIO m) => - a -> WebViewUserChangedContentsCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewUserChangedContents obj cb after = liftIO $ do - cb' <- mkWebViewUserChangedContentsCallback (webViewUserChangedContentsCallbackWrapper cb) - connectSignalFunPtr obj "user-changed-contents" cb' after - --- signal WebView::viewport-attributes-changed -type WebViewViewportAttributesChangedCallback = - ViewportAttributes -> - IO () - -noWebViewViewportAttributesChangedCallback :: Maybe WebViewViewportAttributesChangedCallback -noWebViewViewportAttributesChangedCallback = Nothing - -type WebViewViewportAttributesChangedCallbackC = - Ptr () -> -- object - Ptr ViewportAttributes -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewViewportAttributesChangedCallback :: WebViewViewportAttributesChangedCallbackC -> IO (FunPtr WebViewViewportAttributesChangedCallbackC) - -webViewViewportAttributesChangedClosure :: WebViewViewportAttributesChangedCallback -> IO Closure -webViewViewportAttributesChangedClosure cb = newCClosure =<< mkWebViewViewportAttributesChangedCallback wrapped - where wrapped = webViewViewportAttributesChangedCallbackWrapper cb - -webViewViewportAttributesChangedCallbackWrapper :: - WebViewViewportAttributesChangedCallback -> - Ptr () -> - Ptr ViewportAttributes -> - Ptr () -> - IO () -webViewViewportAttributesChangedCallbackWrapper _cb _ object _ = do - object' <- (newObject ViewportAttributes) object - _cb object' - -onWebViewViewportAttributesChanged :: (GObject a, MonadIO m) => a -> WebViewViewportAttributesChangedCallback -> m SignalHandlerId -onWebViewViewportAttributesChanged obj cb = liftIO $ connectWebViewViewportAttributesChanged obj cb SignalConnectBefore -afterWebViewViewportAttributesChanged :: (GObject a, MonadIO m) => a -> WebViewViewportAttributesChangedCallback -> m SignalHandlerId -afterWebViewViewportAttributesChanged obj cb = connectWebViewViewportAttributesChanged obj cb SignalConnectAfter - -connectWebViewViewportAttributesChanged :: (GObject a, MonadIO m) => - a -> WebViewViewportAttributesChangedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewViewportAttributesChanged obj cb after = liftIO $ do - cb' <- mkWebViewViewportAttributesChangedCallback (webViewViewportAttributesChangedCallbackWrapper cb) - connectSignalFunPtr obj "viewport-attributes-changed" cb' after - --- signal WebView::viewport-attributes-recompute-requested -type WebViewViewportAttributesRecomputeRequestedCallback = - ViewportAttributes -> - IO () - -noWebViewViewportAttributesRecomputeRequestedCallback :: Maybe WebViewViewportAttributesRecomputeRequestedCallback -noWebViewViewportAttributesRecomputeRequestedCallback = Nothing - -type WebViewViewportAttributesRecomputeRequestedCallbackC = - Ptr () -> -- object - Ptr ViewportAttributes -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewViewportAttributesRecomputeRequestedCallback :: WebViewViewportAttributesRecomputeRequestedCallbackC -> IO (FunPtr WebViewViewportAttributesRecomputeRequestedCallbackC) - -webViewViewportAttributesRecomputeRequestedClosure :: WebViewViewportAttributesRecomputeRequestedCallback -> IO Closure -webViewViewportAttributesRecomputeRequestedClosure cb = newCClosure =<< mkWebViewViewportAttributesRecomputeRequestedCallback wrapped - where wrapped = webViewViewportAttributesRecomputeRequestedCallbackWrapper cb - -webViewViewportAttributesRecomputeRequestedCallbackWrapper :: - WebViewViewportAttributesRecomputeRequestedCallback -> - Ptr () -> - Ptr ViewportAttributes -> - Ptr () -> - IO () -webViewViewportAttributesRecomputeRequestedCallbackWrapper _cb _ object _ = do - object' <- (newObject ViewportAttributes) object - _cb object' - -onWebViewViewportAttributesRecomputeRequested :: (GObject a, MonadIO m) => a -> WebViewViewportAttributesRecomputeRequestedCallback -> m SignalHandlerId -onWebViewViewportAttributesRecomputeRequested obj cb = liftIO $ connectWebViewViewportAttributesRecomputeRequested obj cb SignalConnectBefore -afterWebViewViewportAttributesRecomputeRequested :: (GObject a, MonadIO m) => a -> WebViewViewportAttributesRecomputeRequestedCallback -> m SignalHandlerId -afterWebViewViewportAttributesRecomputeRequested obj cb = connectWebViewViewportAttributesRecomputeRequested obj cb SignalConnectAfter - -connectWebViewViewportAttributesRecomputeRequested :: (GObject a, MonadIO m) => - a -> WebViewViewportAttributesRecomputeRequestedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewViewportAttributesRecomputeRequested obj cb after = liftIO $ do - cb' <- mkWebViewViewportAttributesRecomputeRequestedCallback (webViewViewportAttributesRecomputeRequestedCallbackWrapper cb) - connectSignalFunPtr obj "viewport-attributes-recompute-requested" cb' after - --- signal WebView::web-view-ready -type WebViewWebViewReadyCallback = - IO Bool - -noWebViewWebViewReadyCallback :: Maybe WebViewWebViewReadyCallback -noWebViewWebViewReadyCallback = Nothing - -type WebViewWebViewReadyCallbackC = - Ptr () -> -- object - Ptr () -> -- user_data - IO CInt - -foreign import ccall "wrapper" - mkWebViewWebViewReadyCallback :: WebViewWebViewReadyCallbackC -> IO (FunPtr WebViewWebViewReadyCallbackC) - -webViewWebViewReadyClosure :: WebViewWebViewReadyCallback -> IO Closure -webViewWebViewReadyClosure cb = newCClosure =<< mkWebViewWebViewReadyCallback wrapped - where wrapped = webViewWebViewReadyCallbackWrapper cb - -webViewWebViewReadyCallbackWrapper :: - WebViewWebViewReadyCallback -> - Ptr () -> - Ptr () -> - IO CInt -webViewWebViewReadyCallbackWrapper _cb _ _ = do - result <- _cb - let result' = (fromIntegral . fromEnum) result - return result' - -onWebViewWebViewReady :: (GObject a, MonadIO m) => a -> WebViewWebViewReadyCallback -> m SignalHandlerId -onWebViewWebViewReady obj cb = liftIO $ connectWebViewWebViewReady obj cb SignalConnectBefore -afterWebViewWebViewReady :: (GObject a, MonadIO m) => a -> WebViewWebViewReadyCallback -> m SignalHandlerId -afterWebViewWebViewReady obj cb = connectWebViewWebViewReady obj cb SignalConnectAfter - -connectWebViewWebViewReady :: (GObject a, MonadIO m) => - a -> WebViewWebViewReadyCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewWebViewReady obj cb after = liftIO $ do - cb' <- mkWebViewWebViewReadyCallback (webViewWebViewReadyCallbackWrapper cb) - connectSignalFunPtr obj "web-view-ready" cb' after - --- signal WebView::window-object-cleared -type WebViewWindowObjectClearedCallback = - WebFrame -> - Ptr () -> - Ptr () -> - IO () - -noWebViewWindowObjectClearedCallback :: Maybe WebViewWindowObjectClearedCallback -noWebViewWindowObjectClearedCallback = Nothing - -type WebViewWindowObjectClearedCallbackC = - Ptr () -> -- object - Ptr WebFrame -> - Ptr () -> - Ptr () -> - Ptr () -> -- user_data - IO () - -foreign import ccall "wrapper" - mkWebViewWindowObjectClearedCallback :: WebViewWindowObjectClearedCallbackC -> IO (FunPtr WebViewWindowObjectClearedCallbackC) - -webViewWindowObjectClearedClosure :: WebViewWindowObjectClearedCallback -> IO Closure -webViewWindowObjectClearedClosure cb = newCClosure =<< mkWebViewWindowObjectClearedCallback wrapped - where wrapped = webViewWindowObjectClearedCallbackWrapper cb - -webViewWindowObjectClearedCallbackWrapper :: - WebViewWindowObjectClearedCallback -> - Ptr () -> - Ptr WebFrame -> - Ptr () -> - Ptr () -> - Ptr () -> - IO () -webViewWindowObjectClearedCallbackWrapper _cb _ frame context window_object _ = do - frame' <- (newObject WebFrame) frame - _cb frame' context window_object - -onWebViewWindowObjectCleared :: (GObject a, MonadIO m) => a -> WebViewWindowObjectClearedCallback -> m SignalHandlerId -onWebViewWindowObjectCleared obj cb = liftIO $ connectWebViewWindowObjectCleared obj cb SignalConnectBefore -afterWebViewWindowObjectCleared :: (GObject a, MonadIO m) => a -> WebViewWindowObjectClearedCallback -> m SignalHandlerId -afterWebViewWindowObjectCleared obj cb = connectWebViewWindowObjectCleared obj cb SignalConnectAfter - -connectWebViewWindowObjectCleared :: (GObject a, MonadIO m) => - a -> WebViewWindowObjectClearedCallback -> SignalConnectMode -> m SignalHandlerId -connectWebViewWindowObjectCleared obj cb after = liftIO $ do - cb' <- mkWebViewWindowObjectClearedCallback (webViewWindowObjectClearedCallbackWrapper cb) - connectSignalFunPtr obj "window-object-cleared" cb' after - --- VVV Prop "copy-target-list" - -- Type: TInterface "Gtk" "TargetList" - -- Flags: [PropertyReadable] - -getWebViewCopyTargetList :: (MonadIO m, WebViewK o) => o -> m Gtk.TargetList -getWebViewCopyTargetList obj = liftIO $ getObjectPropertyBoxed obj "copy-target-list" Gtk.TargetList - -data WebViewCopyTargetListPropertyInfo -instance AttrInfo WebViewCopyTargetListPropertyInfo where - type AttrAllowedOps WebViewCopyTargetListPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint WebViewCopyTargetListPropertyInfo = (~) () - type AttrBaseTypeConstraint WebViewCopyTargetListPropertyInfo = WebViewK - type AttrGetType WebViewCopyTargetListPropertyInfo = Gtk.TargetList - type AttrLabel WebViewCopyTargetListPropertyInfo = "WebView::copy-target-list" - attrGet _ = getWebViewCopyTargetList - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "custom-encoding" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable,PropertyWritable] - -getWebViewCustomEncoding :: (MonadIO m, WebViewK o) => o -> m T.Text -getWebViewCustomEncoding obj = liftIO $ getObjectPropertyString obj "custom-encoding" - -setWebViewCustomEncoding :: (MonadIO m, WebViewK o) => o -> T.Text -> m () -setWebViewCustomEncoding obj val = liftIO $ setObjectPropertyString obj "custom-encoding" val - -constructWebViewCustomEncoding :: T.Text -> IO ([Char], GValue) -constructWebViewCustomEncoding val = constructObjectPropertyString "custom-encoding" val - -data WebViewCustomEncodingPropertyInfo -instance AttrInfo WebViewCustomEncodingPropertyInfo where - type AttrAllowedOps WebViewCustomEncodingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint WebViewCustomEncodingPropertyInfo = (~) T.Text - type AttrBaseTypeConstraint WebViewCustomEncodingPropertyInfo = WebViewK - type AttrGetType WebViewCustomEncodingPropertyInfo = T.Text - type AttrLabel WebViewCustomEncodingPropertyInfo = "WebView::custom-encoding" - attrGet _ = getWebViewCustomEncoding - attrSet _ = setWebViewCustomEncoding - attrConstruct _ = constructWebViewCustomEncoding - --- VVV Prop "editable" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getWebViewEditable :: (MonadIO m, WebViewK o) => o -> m Bool -getWebViewEditable obj = liftIO $ getObjectPropertyBool obj "editable" - -setWebViewEditable :: (MonadIO m, WebViewK o) => o -> Bool -> m () -setWebViewEditable obj val = liftIO $ setObjectPropertyBool obj "editable" val - -constructWebViewEditable :: Bool -> IO ([Char], GValue) -constructWebViewEditable val = constructObjectPropertyBool "editable" val - -data WebViewEditablePropertyInfo -instance AttrInfo WebViewEditablePropertyInfo where - type AttrAllowedOps WebViewEditablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint WebViewEditablePropertyInfo = (~) Bool - type AttrBaseTypeConstraint WebViewEditablePropertyInfo = WebViewK - type AttrGetType WebViewEditablePropertyInfo = Bool - type AttrLabel WebViewEditablePropertyInfo = "WebView::editable" - attrGet _ = getWebViewEditable - attrSet _ = setWebViewEditable - attrConstruct _ = constructWebViewEditable - --- VVV Prop "encoding" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getWebViewEncoding :: (MonadIO m, WebViewK o) => o -> m T.Text -getWebViewEncoding obj = liftIO $ getObjectPropertyString obj "encoding" - -data WebViewEncodingPropertyInfo -instance AttrInfo WebViewEncodingPropertyInfo where - type AttrAllowedOps WebViewEncodingPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint WebViewEncodingPropertyInfo = (~) () - type AttrBaseTypeConstraint WebViewEncodingPropertyInfo = WebViewK - type AttrGetType WebViewEncodingPropertyInfo = T.Text - type AttrLabel WebViewEncodingPropertyInfo = "WebView::encoding" - attrGet _ = getWebViewEncoding - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "full-content-zoom" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getWebViewFullContentZoom :: (MonadIO m, WebViewK o) => o -> m Bool -getWebViewFullContentZoom obj = liftIO $ getObjectPropertyBool obj "full-content-zoom" - -setWebViewFullContentZoom :: (MonadIO m, WebViewK o) => o -> Bool -> m () -setWebViewFullContentZoom obj val = liftIO $ setObjectPropertyBool obj "full-content-zoom" val - -constructWebViewFullContentZoom :: Bool -> IO ([Char], GValue) -constructWebViewFullContentZoom val = constructObjectPropertyBool "full-content-zoom" val - -data WebViewFullContentZoomPropertyInfo -instance AttrInfo WebViewFullContentZoomPropertyInfo where - type AttrAllowedOps WebViewFullContentZoomPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint WebViewFullContentZoomPropertyInfo = (~) Bool - type AttrBaseTypeConstraint WebViewFullContentZoomPropertyInfo = WebViewK - type AttrGetType WebViewFullContentZoomPropertyInfo = Bool - type AttrLabel WebViewFullContentZoomPropertyInfo = "WebView::full-content-zoom" - attrGet _ = getWebViewFullContentZoom - attrSet _ = setWebViewFullContentZoom - attrConstruct _ = constructWebViewFullContentZoom - --- VVV Prop "icon-uri" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getWebViewIconUri :: (MonadIO m, WebViewK o) => o -> m T.Text -getWebViewIconUri obj = liftIO $ getObjectPropertyString obj "icon-uri" - -data WebViewIconUriPropertyInfo -instance AttrInfo WebViewIconUriPropertyInfo where - type AttrAllowedOps WebViewIconUriPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint WebViewIconUriPropertyInfo = (~) () - type AttrBaseTypeConstraint WebViewIconUriPropertyInfo = WebViewK - type AttrGetType WebViewIconUriPropertyInfo = T.Text - type AttrLabel WebViewIconUriPropertyInfo = "WebView::icon-uri" - attrGet _ = getWebViewIconUri - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "im-context" - -- Type: TInterface "Gtk" "IMContext" - -- Flags: [PropertyReadable] - -getWebViewImContext :: (MonadIO m, WebViewK o) => o -> m Gtk.IMContext -getWebViewImContext obj = liftIO $ getObjectPropertyObject obj "im-context" Gtk.IMContext - -data WebViewImContextPropertyInfo -instance AttrInfo WebViewImContextPropertyInfo where - type AttrAllowedOps WebViewImContextPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint WebViewImContextPropertyInfo = (~) () - type AttrBaseTypeConstraint WebViewImContextPropertyInfo = WebViewK - type AttrGetType WebViewImContextPropertyInfo = Gtk.IMContext - type AttrLabel WebViewImContextPropertyInfo = "WebView::im-context" - attrGet _ = getWebViewImContext - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "load-status" - -- Type: TInterface "WebKit" "LoadStatus" - -- Flags: [PropertyReadable] - -getWebViewLoadStatus :: (MonadIO m, WebViewK o) => o -> m LoadStatus -getWebViewLoadStatus obj = liftIO $ getObjectPropertyEnum obj "load-status" - -data WebViewLoadStatusPropertyInfo -instance AttrInfo WebViewLoadStatusPropertyInfo where - type AttrAllowedOps WebViewLoadStatusPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint WebViewLoadStatusPropertyInfo = (~) () - type AttrBaseTypeConstraint WebViewLoadStatusPropertyInfo = WebViewK - type AttrGetType WebViewLoadStatusPropertyInfo = LoadStatus - type AttrLabel WebViewLoadStatusPropertyInfo = "WebView::load-status" - attrGet _ = getWebViewLoadStatus - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "paste-target-list" - -- Type: TInterface "Gtk" "TargetList" - -- Flags: [PropertyReadable] - -getWebViewPasteTargetList :: (MonadIO m, WebViewK o) => o -> m Gtk.TargetList -getWebViewPasteTargetList obj = liftIO $ getObjectPropertyBoxed obj "paste-target-list" Gtk.TargetList - -data WebViewPasteTargetListPropertyInfo -instance AttrInfo WebViewPasteTargetListPropertyInfo where - type AttrAllowedOps WebViewPasteTargetListPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint WebViewPasteTargetListPropertyInfo = (~) () - type AttrBaseTypeConstraint WebViewPasteTargetListPropertyInfo = WebViewK - type AttrGetType WebViewPasteTargetListPropertyInfo = Gtk.TargetList - type AttrLabel WebViewPasteTargetListPropertyInfo = "WebView::paste-target-list" - attrGet _ = getWebViewPasteTargetList - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "progress" - -- Type: TBasicType TDouble - -- Flags: [PropertyReadable] - -getWebViewProgress :: (MonadIO m, WebViewK o) => o -> m Double -getWebViewProgress obj = liftIO $ getObjectPropertyDouble obj "progress" - -data WebViewProgressPropertyInfo -instance AttrInfo WebViewProgressPropertyInfo where - type AttrAllowedOps WebViewProgressPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint WebViewProgressPropertyInfo = (~) () - type AttrBaseTypeConstraint WebViewProgressPropertyInfo = WebViewK - type AttrGetType WebViewProgressPropertyInfo = Double - type AttrLabel WebViewProgressPropertyInfo = "WebView::progress" - attrGet _ = getWebViewProgress - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "self-scrolling" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly] - -getWebViewSelfScrolling :: (MonadIO m, WebViewK o) => o -> m Bool -getWebViewSelfScrolling obj = liftIO $ getObjectPropertyBool obj "self-scrolling" - -constructWebViewSelfScrolling :: Bool -> IO ([Char], GValue) -constructWebViewSelfScrolling val = constructObjectPropertyBool "self-scrolling" val - -data WebViewSelfScrollingPropertyInfo -instance AttrInfo WebViewSelfScrollingPropertyInfo where - type AttrAllowedOps WebViewSelfScrollingPropertyInfo = '[ 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint WebViewSelfScrollingPropertyInfo = (~) Bool - type AttrBaseTypeConstraint WebViewSelfScrollingPropertyInfo = WebViewK - type AttrGetType WebViewSelfScrollingPropertyInfo = Bool - type AttrLabel WebViewSelfScrollingPropertyInfo = "WebView::self-scrolling" - attrGet _ = getWebViewSelfScrolling - attrSet _ = undefined - attrConstruct _ = constructWebViewSelfScrolling - --- VVV Prop "settings" - -- Type: TInterface "WebKit" "WebSettings" - -- Flags: [PropertyReadable,PropertyWritable] - -getWebViewSettings :: (MonadIO m, WebViewK o) => o -> m WebSettings -getWebViewSettings obj = liftIO $ getObjectPropertyObject obj "settings" WebSettings - -setWebViewSettings :: (MonadIO m, WebViewK o, WebSettingsK a) => o -> a -> m () -setWebViewSettings obj val = liftIO $ setObjectPropertyObject obj "settings" val - -constructWebViewSettings :: (WebSettingsK a) => a -> IO ([Char], GValue) -constructWebViewSettings val = constructObjectPropertyObject "settings" val - -data WebViewSettingsPropertyInfo -instance AttrInfo WebViewSettingsPropertyInfo where - type AttrAllowedOps WebViewSettingsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint WebViewSettingsPropertyInfo = WebSettingsK - type AttrBaseTypeConstraint WebViewSettingsPropertyInfo = WebViewK - type AttrGetType WebViewSettingsPropertyInfo = WebSettings - type AttrLabel WebViewSettingsPropertyInfo = "WebView::settings" - attrGet _ = getWebViewSettings - attrSet _ = setWebViewSettings - attrConstruct _ = constructWebViewSettings - --- VVV Prop "title" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getWebViewTitle :: (MonadIO m, WebViewK o) => o -> m T.Text -getWebViewTitle obj = liftIO $ getObjectPropertyString obj "title" - -data WebViewTitlePropertyInfo -instance AttrInfo WebViewTitlePropertyInfo where - type AttrAllowedOps WebViewTitlePropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint WebViewTitlePropertyInfo = (~) () - type AttrBaseTypeConstraint WebViewTitlePropertyInfo = WebViewK - type AttrGetType WebViewTitlePropertyInfo = T.Text - type AttrLabel WebViewTitlePropertyInfo = "WebView::title" - attrGet _ = getWebViewTitle - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "transparent" - -- Type: TBasicType TBoolean - -- Flags: [PropertyReadable,PropertyWritable] - -getWebViewTransparent :: (MonadIO m, WebViewK o) => o -> m Bool -getWebViewTransparent obj = liftIO $ getObjectPropertyBool obj "transparent" - -setWebViewTransparent :: (MonadIO m, WebViewK o) => o -> Bool -> m () -setWebViewTransparent obj val = liftIO $ setObjectPropertyBool obj "transparent" val - -constructWebViewTransparent :: Bool -> IO ([Char], GValue) -constructWebViewTransparent val = constructObjectPropertyBool "transparent" val - -data WebViewTransparentPropertyInfo -instance AttrInfo WebViewTransparentPropertyInfo where - type AttrAllowedOps WebViewTransparentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint WebViewTransparentPropertyInfo = (~) Bool - type AttrBaseTypeConstraint WebViewTransparentPropertyInfo = WebViewK - type AttrGetType WebViewTransparentPropertyInfo = Bool - type AttrLabel WebViewTransparentPropertyInfo = "WebView::transparent" - attrGet _ = getWebViewTransparent - attrSet _ = setWebViewTransparent - attrConstruct _ = constructWebViewTransparent - --- VVV Prop "uri" - -- Type: TBasicType TUTF8 - -- Flags: [PropertyReadable] - -getWebViewUri :: (MonadIO m, WebViewK o) => o -> m T.Text -getWebViewUri obj = liftIO $ getObjectPropertyString obj "uri" - -data WebViewUriPropertyInfo -instance AttrInfo WebViewUriPropertyInfo where - type AttrAllowedOps WebViewUriPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint WebViewUriPropertyInfo = (~) () - type AttrBaseTypeConstraint WebViewUriPropertyInfo = WebViewK - type AttrGetType WebViewUriPropertyInfo = T.Text - type AttrLabel WebViewUriPropertyInfo = "WebView::uri" - attrGet _ = getWebViewUri - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "view-mode" - -- Type: TInterface "WebKit" "WebViewViewMode" - -- Flags: [PropertyReadable,PropertyWritable] - -getWebViewViewMode :: (MonadIO m, WebViewK o) => o -> m WebViewViewMode -getWebViewViewMode obj = liftIO $ getObjectPropertyEnum obj "view-mode" - -setWebViewViewMode :: (MonadIO m, WebViewK o) => o -> WebViewViewMode -> m () -setWebViewViewMode obj val = liftIO $ setObjectPropertyEnum obj "view-mode" val - -constructWebViewViewMode :: WebViewViewMode -> IO ([Char], GValue) -constructWebViewViewMode val = constructObjectPropertyEnum "view-mode" val - -data WebViewViewModePropertyInfo -instance AttrInfo WebViewViewModePropertyInfo where - type AttrAllowedOps WebViewViewModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint WebViewViewModePropertyInfo = (~) WebViewViewMode - type AttrBaseTypeConstraint WebViewViewModePropertyInfo = WebViewK - type AttrGetType WebViewViewModePropertyInfo = WebViewViewMode - type AttrLabel WebViewViewModePropertyInfo = "WebView::view-mode" - attrGet _ = getWebViewViewMode - attrSet _ = setWebViewViewMode - attrConstruct _ = constructWebViewViewMode - --- VVV Prop "viewport-attributes" - -- Type: TInterface "WebKit" "ViewportAttributes" - -- Flags: [PropertyReadable] - -getWebViewViewportAttributes :: (MonadIO m, WebViewK o) => o -> m ViewportAttributes -getWebViewViewportAttributes obj = liftIO $ getObjectPropertyObject obj "viewport-attributes" ViewportAttributes - -data WebViewViewportAttributesPropertyInfo -instance AttrInfo WebViewViewportAttributesPropertyInfo where - type AttrAllowedOps WebViewViewportAttributesPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint WebViewViewportAttributesPropertyInfo = (~) () - type AttrBaseTypeConstraint WebViewViewportAttributesPropertyInfo = WebViewK - type AttrGetType WebViewViewportAttributesPropertyInfo = ViewportAttributes - type AttrLabel WebViewViewportAttributesPropertyInfo = "WebView::viewport-attributes" - attrGet _ = getWebViewViewportAttributes - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "web-inspector" - -- Type: TInterface "WebKit" "WebInspector" - -- Flags: [PropertyReadable] - -getWebViewWebInspector :: (MonadIO m, WebViewK o) => o -> m WebInspector -getWebViewWebInspector obj = liftIO $ getObjectPropertyObject obj "web-inspector" WebInspector - -data WebViewWebInspectorPropertyInfo -instance AttrInfo WebViewWebInspectorPropertyInfo where - type AttrAllowedOps WebViewWebInspectorPropertyInfo = '[ 'AttrGet] - type AttrSetTypeConstraint WebViewWebInspectorPropertyInfo = (~) () - type AttrBaseTypeConstraint WebViewWebInspectorPropertyInfo = WebViewK - type AttrGetType WebViewWebInspectorPropertyInfo = WebInspector - type AttrLabel WebViewWebInspectorPropertyInfo = "WebView::web-inspector" - attrGet _ = getWebViewWebInspector - attrSet _ = undefined - attrConstruct _ = undefined - --- VVV Prop "window-features" - -- Type: TInterface "WebKit" "WebWindowFeatures" - -- Flags: [PropertyReadable,PropertyWritable] - -getWebViewWindowFeatures :: (MonadIO m, WebViewK o) => o -> m WebWindowFeatures -getWebViewWindowFeatures obj = liftIO $ getObjectPropertyObject obj "window-features" WebWindowFeatures - -setWebViewWindowFeatures :: (MonadIO m, WebViewK o, WebWindowFeaturesK a) => o -> a -> m () -setWebViewWindowFeatures obj val = liftIO $ setObjectPropertyObject obj "window-features" val - -constructWebViewWindowFeatures :: (WebWindowFeaturesK a) => a -> IO ([Char], GValue) -constructWebViewWindowFeatures val = constructObjectPropertyObject "window-features" val - -data WebViewWindowFeaturesPropertyInfo -instance AttrInfo WebViewWindowFeaturesPropertyInfo where - type AttrAllowedOps WebViewWindowFeaturesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint WebViewWindowFeaturesPropertyInfo = WebWindowFeaturesK - type AttrBaseTypeConstraint WebViewWindowFeaturesPropertyInfo = WebViewK - type AttrGetType WebViewWindowFeaturesPropertyInfo = WebWindowFeatures - type AttrLabel WebViewWindowFeaturesPropertyInfo = "WebView::window-features" - attrGet _ = getWebViewWindowFeatures - attrSet _ = setWebViewWindowFeatures - attrConstruct _ = constructWebViewWindowFeatures - --- VVV Prop "zoom-level" - -- Type: TBasicType TFloat - -- Flags: [PropertyReadable,PropertyWritable] - -getWebViewZoomLevel :: (MonadIO m, WebViewK o) => o -> m Float -getWebViewZoomLevel obj = liftIO $ getObjectPropertyFloat obj "zoom-level" - -setWebViewZoomLevel :: (MonadIO m, WebViewK o) => o -> Float -> m () -setWebViewZoomLevel obj val = liftIO $ setObjectPropertyFloat obj "zoom-level" val - -constructWebViewZoomLevel :: Float -> IO ([Char], GValue) -constructWebViewZoomLevel val = constructObjectPropertyFloat "zoom-level" val - -data WebViewZoomLevelPropertyInfo -instance AttrInfo WebViewZoomLevelPropertyInfo where - type AttrAllowedOps WebViewZoomLevelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] - type AttrSetTypeConstraint WebViewZoomLevelPropertyInfo = (~) Float - type AttrBaseTypeConstraint WebViewZoomLevelPropertyInfo = WebViewK - type AttrGetType WebViewZoomLevelPropertyInfo = Float - type AttrLabel WebViewZoomLevelPropertyInfo = "WebView::zoom-level" - attrGet _ = getWebViewZoomLevel - attrSet _ = setWebViewZoomLevel - attrConstruct _ = constructWebViewZoomLevel - -type instance AttributeList WebView = WebViewAttributeList -type WebViewAttributeList = ('[ '("app-paintable", Gtk.WidgetAppPaintablePropertyInfo), '("border-width", Gtk.ContainerBorderWidthPropertyInfo), '("can-default", Gtk.WidgetCanDefaultPropertyInfo), '("can-focus", Gtk.WidgetCanFocusPropertyInfo), '("child", Gtk.ContainerChildPropertyInfo), '("composite-child", Gtk.WidgetCompositeChildPropertyInfo), '("copy-target-list", WebViewCopyTargetListPropertyInfo), '("custom-encoding", WebViewCustomEncodingPropertyInfo), '("double-buffered", Gtk.WidgetDoubleBufferedPropertyInfo), '("editable", WebViewEditablePropertyInfo), '("encoding", WebViewEncodingPropertyInfo), '("events", Gtk.WidgetEventsPropertyInfo), '("expand", Gtk.WidgetExpandPropertyInfo), '("full-content-zoom", WebViewFullContentZoomPropertyInfo), '("hadjustment", Gtk.ScrollableHadjustmentPropertyInfo), '("halign", Gtk.WidgetHalignPropertyInfo), '("has-default", Gtk.WidgetHasDefaultPropertyInfo), '("has-focus", Gtk.WidgetHasFocusPropertyInfo), '("has-tooltip", Gtk.WidgetHasTooltipPropertyInfo), '("height-request", Gtk.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.WidgetHexpandPropertyInfo), '("hexpand-set", Gtk.WidgetHexpandSetPropertyInfo), '("hscroll-policy", Gtk.ScrollableHscrollPolicyPropertyInfo), '("icon-uri", WebViewIconUriPropertyInfo), '("im-context", WebViewImContextPropertyInfo), '("is-focus", Gtk.WidgetIsFocusPropertyInfo), '("load-status", WebViewLoadStatusPropertyInfo), '("margin", Gtk.WidgetMarginPropertyInfo), '("margin-bottom", Gtk.WidgetMarginBottomPropertyInfo), '("margin-end", Gtk.WidgetMarginEndPropertyInfo), '("margin-left", Gtk.WidgetMarginLeftPropertyInfo), '("margin-right", Gtk.WidgetMarginRightPropertyInfo), '("margin-start", Gtk.WidgetMarginStartPropertyInfo), '("margin-top", Gtk.WidgetMarginTopPropertyInfo), '("name", Gtk.WidgetNamePropertyInfo), '("no-show-all", Gtk.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.WidgetOpacityPropertyInfo), '("parent", Gtk.WidgetParentPropertyInfo), '("paste-target-list", WebViewPasteTargetListPropertyInfo), '("progress", WebViewProgressPropertyInfo), '("receives-default", Gtk.WidgetReceivesDefaultPropertyInfo), '("resize-mode", Gtk.ContainerResizeModePropertyInfo), '("scale-factor", Gtk.WidgetScaleFactorPropertyInfo), '("self-scrolling", WebViewSelfScrollingPropertyInfo), '("sensitive", Gtk.WidgetSensitivePropertyInfo), '("settings", WebViewSettingsPropertyInfo), '("style", Gtk.WidgetStylePropertyInfo), '("title", WebViewTitlePropertyInfo), '("tooltip-markup", Gtk.WidgetTooltipMarkupPropertyInfo), '("tooltip-text", Gtk.WidgetTooltipTextPropertyInfo), '("transparent", WebViewTransparentPropertyInfo), '("uri", WebViewUriPropertyInfo), '("vadjustment", Gtk.ScrollableVadjustmentPropertyInfo), '("valign", Gtk.WidgetValignPropertyInfo), '("vexpand", Gtk.WidgetVexpandPropertyInfo), '("vexpand-set", Gtk.WidgetVexpandSetPropertyInfo), '("view-mode", WebViewViewModePropertyInfo), '("viewport-attributes", WebViewViewportAttributesPropertyInfo), '("visible", Gtk.WidgetVisiblePropertyInfo), '("vscroll-policy", Gtk.ScrollableVscrollPolicyPropertyInfo), '("web-inspector", WebViewWebInspectorPropertyInfo), '("width-request", Gtk.WidgetWidthRequestPropertyInfo), '("window", Gtk.WidgetWindowPropertyInfo), '("window-features", WebViewWindowFeaturesPropertyInfo), '("zoom-level", WebViewZoomLevelPropertyInfo)] :: [(Symbol, *)]) - -data WebViewCloseWebViewSignalInfo -instance SignalInfo WebViewCloseWebViewSignalInfo where - type HaskellCallbackType WebViewCloseWebViewSignalInfo = WebViewCloseWebViewCallback - connectSignal _ = connectWebViewCloseWebView - -data WebViewConsoleMessageSignalInfo -instance SignalInfo WebViewConsoleMessageSignalInfo where - type HaskellCallbackType WebViewConsoleMessageSignalInfo = WebViewConsoleMessageCallback - connectSignal _ = connectWebViewConsoleMessage - -data WebViewContextMenuSignalInfo -instance SignalInfo WebViewContextMenuSignalInfo where - type HaskellCallbackType WebViewContextMenuSignalInfo = WebViewContextMenuCallback - connectSignal _ = connectWebViewContextMenu - -data WebViewCopyClipboardSignalInfo -instance SignalInfo WebViewCopyClipboardSignalInfo where - type HaskellCallbackType WebViewCopyClipboardSignalInfo = WebViewCopyClipboardCallback - connectSignal _ = connectWebViewCopyClipboard - -data WebViewCreatePluginWidgetSignalInfo -instance SignalInfo WebViewCreatePluginWidgetSignalInfo where - type HaskellCallbackType WebViewCreatePluginWidgetSignalInfo = WebViewCreatePluginWidgetCallback - connectSignal _ = connectWebViewCreatePluginWidget - -data WebViewCreateWebViewSignalInfo -instance SignalInfo WebViewCreateWebViewSignalInfo where - type HaskellCallbackType WebViewCreateWebViewSignalInfo = WebViewCreateWebViewCallback - connectSignal _ = connectWebViewCreateWebView - -data WebViewCutClipboardSignalInfo -instance SignalInfo WebViewCutClipboardSignalInfo where - type HaskellCallbackType WebViewCutClipboardSignalInfo = WebViewCutClipboardCallback - connectSignal _ = connectWebViewCutClipboard - -data WebViewDatabaseQuotaExceededSignalInfo -instance SignalInfo WebViewDatabaseQuotaExceededSignalInfo where - type HaskellCallbackType WebViewDatabaseQuotaExceededSignalInfo = WebViewDatabaseQuotaExceededCallback - connectSignal _ = connectWebViewDatabaseQuotaExceeded - -data WebViewDocumentLoadFinishedSignalInfo -instance SignalInfo WebViewDocumentLoadFinishedSignalInfo where - type HaskellCallbackType WebViewDocumentLoadFinishedSignalInfo = WebViewDocumentLoadFinishedCallback - connectSignal _ = connectWebViewDocumentLoadFinished - -data WebViewDownloadRequestedSignalInfo -instance SignalInfo WebViewDownloadRequestedSignalInfo where - type HaskellCallbackType WebViewDownloadRequestedSignalInfo = WebViewDownloadRequestedCallback - connectSignal _ = connectWebViewDownloadRequested - -data WebViewEditingBeganSignalInfo -instance SignalInfo WebViewEditingBeganSignalInfo where - type HaskellCallbackType WebViewEditingBeganSignalInfo = WebViewEditingBeganCallback - connectSignal _ = connectWebViewEditingBegan - -data WebViewEditingEndedSignalInfo -instance SignalInfo WebViewEditingEndedSignalInfo where - type HaskellCallbackType WebViewEditingEndedSignalInfo = WebViewEditingEndedCallback - connectSignal _ = connectWebViewEditingEnded - -data WebViewEnteringFullscreenSignalInfo -instance SignalInfo WebViewEnteringFullscreenSignalInfo where - type HaskellCallbackType WebViewEnteringFullscreenSignalInfo = WebViewEnteringFullscreenCallback - connectSignal _ = connectWebViewEnteringFullscreen - -data WebViewFrameCreatedSignalInfo -instance SignalInfo WebViewFrameCreatedSignalInfo where - type HaskellCallbackType WebViewFrameCreatedSignalInfo = WebViewFrameCreatedCallback - connectSignal _ = connectWebViewFrameCreated - -data WebViewGeolocationPolicyDecisionCancelledSignalInfo -instance SignalInfo WebViewGeolocationPolicyDecisionCancelledSignalInfo where - type HaskellCallbackType WebViewGeolocationPolicyDecisionCancelledSignalInfo = WebViewGeolocationPolicyDecisionCancelledCallback - connectSignal _ = connectWebViewGeolocationPolicyDecisionCancelled - -data WebViewGeolocationPolicyDecisionRequestedSignalInfo -instance SignalInfo WebViewGeolocationPolicyDecisionRequestedSignalInfo where - type HaskellCallbackType WebViewGeolocationPolicyDecisionRequestedSignalInfo = WebViewGeolocationPolicyDecisionRequestedCallback - connectSignal _ = connectWebViewGeolocationPolicyDecisionRequested - -data WebViewHoveringOverLinkSignalInfo -instance SignalInfo WebViewHoveringOverLinkSignalInfo where - type HaskellCallbackType WebViewHoveringOverLinkSignalInfo = WebViewHoveringOverLinkCallback - connectSignal _ = connectWebViewHoveringOverLink - -data WebViewIconLoadedSignalInfo -instance SignalInfo WebViewIconLoadedSignalInfo where - type HaskellCallbackType WebViewIconLoadedSignalInfo = WebViewIconLoadedCallback - connectSignal _ = connectWebViewIconLoaded - -data WebViewLeavingFullscreenSignalInfo -instance SignalInfo WebViewLeavingFullscreenSignalInfo where - type HaskellCallbackType WebViewLeavingFullscreenSignalInfo = WebViewLeavingFullscreenCallback - connectSignal _ = connectWebViewLeavingFullscreen - -data WebViewLoadCommittedSignalInfo -instance SignalInfo WebViewLoadCommittedSignalInfo where - type HaskellCallbackType WebViewLoadCommittedSignalInfo = WebViewLoadCommittedCallback - connectSignal _ = connectWebViewLoadCommitted - -data WebViewLoadErrorSignalInfo -instance SignalInfo WebViewLoadErrorSignalInfo where - type HaskellCallbackType WebViewLoadErrorSignalInfo = WebViewLoadErrorCallback - connectSignal _ = connectWebViewLoadError - -data WebViewLoadFinishedSignalInfo -instance SignalInfo WebViewLoadFinishedSignalInfo where - type HaskellCallbackType WebViewLoadFinishedSignalInfo = WebViewLoadFinishedCallback - connectSignal _ = connectWebViewLoadFinished - -data WebViewLoadProgressChangedSignalInfo -instance SignalInfo WebViewLoadProgressChangedSignalInfo where - type HaskellCallbackType WebViewLoadProgressChangedSignalInfo = WebViewLoadProgressChangedCallback - connectSignal _ = connectWebViewLoadProgressChanged - -data WebViewLoadStartedSignalInfo -instance SignalInfo WebViewLoadStartedSignalInfo where - type HaskellCallbackType WebViewLoadStartedSignalInfo = WebViewLoadStartedCallback - connectSignal _ = connectWebViewLoadStarted - -data WebViewMimeTypePolicyDecisionRequestedSignalInfo -instance SignalInfo WebViewMimeTypePolicyDecisionRequestedSignalInfo where - type HaskellCallbackType WebViewMimeTypePolicyDecisionRequestedSignalInfo = WebViewMimeTypePolicyDecisionRequestedCallback - connectSignal _ = connectWebViewMimeTypePolicyDecisionRequested - -data WebViewMoveCursorSignalInfo -instance SignalInfo WebViewMoveCursorSignalInfo where - type HaskellCallbackType WebViewMoveCursorSignalInfo = WebViewMoveCursorCallback - connectSignal _ = connectWebViewMoveCursor - -data WebViewNavigationPolicyDecisionRequestedSignalInfo -instance SignalInfo WebViewNavigationPolicyDecisionRequestedSignalInfo where - type HaskellCallbackType WebViewNavigationPolicyDecisionRequestedSignalInfo = WebViewNavigationPolicyDecisionRequestedCallback - connectSignal _ = connectWebViewNavigationPolicyDecisionRequested - -data WebViewNavigationRequestedSignalInfo -instance SignalInfo WebViewNavigationRequestedSignalInfo where - type HaskellCallbackType WebViewNavigationRequestedSignalInfo = WebViewNavigationRequestedCallback - connectSignal _ = connectWebViewNavigationRequested - -data WebViewNewWindowPolicyDecisionRequestedSignalInfo -instance SignalInfo WebViewNewWindowPolicyDecisionRequestedSignalInfo where - type HaskellCallbackType WebViewNewWindowPolicyDecisionRequestedSignalInfo = WebViewNewWindowPolicyDecisionRequestedCallback - connectSignal _ = connectWebViewNewWindowPolicyDecisionRequested - -data WebViewOnloadEventSignalInfo -instance SignalInfo WebViewOnloadEventSignalInfo where - type HaskellCallbackType WebViewOnloadEventSignalInfo = WebViewOnloadEventCallback - connectSignal _ = connectWebViewOnloadEvent - -data WebViewPasteClipboardSignalInfo -instance SignalInfo WebViewPasteClipboardSignalInfo where - type HaskellCallbackType WebViewPasteClipboardSignalInfo = WebViewPasteClipboardCallback - connectSignal _ = connectWebViewPasteClipboard - -data WebViewPopulatePopupSignalInfo -instance SignalInfo WebViewPopulatePopupSignalInfo where - type HaskellCallbackType WebViewPopulatePopupSignalInfo = WebViewPopulatePopupCallback - connectSignal _ = connectWebViewPopulatePopup - -data WebViewPrintRequestedSignalInfo -instance SignalInfo WebViewPrintRequestedSignalInfo where - type HaskellCallbackType WebViewPrintRequestedSignalInfo = WebViewPrintRequestedCallback - connectSignal _ = connectWebViewPrintRequested - -data WebViewRedoSignalInfo -instance SignalInfo WebViewRedoSignalInfo where - type HaskellCallbackType WebViewRedoSignalInfo = WebViewRedoCallback - connectSignal _ = connectWebViewRedo - -data WebViewResourceContentLengthReceivedSignalInfo -instance SignalInfo WebViewResourceContentLengthReceivedSignalInfo where - type HaskellCallbackType WebViewResourceContentLengthReceivedSignalInfo = WebViewResourceContentLengthReceivedCallback - connectSignal _ = connectWebViewResourceContentLengthReceived - -data WebViewResourceLoadFailedSignalInfo -instance SignalInfo WebViewResourceLoadFailedSignalInfo where - type HaskellCallbackType WebViewResourceLoadFailedSignalInfo = WebViewResourceLoadFailedCallback - connectSignal _ = connectWebViewResourceLoadFailed - -data WebViewResourceLoadFinishedSignalInfo -instance SignalInfo WebViewResourceLoadFinishedSignalInfo where - type HaskellCallbackType WebViewResourceLoadFinishedSignalInfo = WebViewResourceLoadFinishedCallback - connectSignal _ = connectWebViewResourceLoadFinished - -data WebViewResourceRequestStartingSignalInfo -instance SignalInfo WebViewResourceRequestStartingSignalInfo where - type HaskellCallbackType WebViewResourceRequestStartingSignalInfo = WebViewResourceRequestStartingCallback - connectSignal _ = connectWebViewResourceRequestStarting - -data WebViewResourceResponseReceivedSignalInfo -instance SignalInfo WebViewResourceResponseReceivedSignalInfo where - type HaskellCallbackType WebViewResourceResponseReceivedSignalInfo = WebViewResourceResponseReceivedCallback - connectSignal _ = connectWebViewResourceResponseReceived - -data WebViewRunFileChooserSignalInfo -instance SignalInfo WebViewRunFileChooserSignalInfo where - type HaskellCallbackType WebViewRunFileChooserSignalInfo = WebViewRunFileChooserCallback - connectSignal _ = connectWebViewRunFileChooser - -data WebViewScriptAlertSignalInfo -instance SignalInfo WebViewScriptAlertSignalInfo where - type HaskellCallbackType WebViewScriptAlertSignalInfo = WebViewScriptAlertCallback - connectSignal _ = connectWebViewScriptAlert - -data WebViewScriptConfirmSignalInfo -instance SignalInfo WebViewScriptConfirmSignalInfo where - type HaskellCallbackType WebViewScriptConfirmSignalInfo = WebViewScriptConfirmCallback - connectSignal _ = connectWebViewScriptConfirm - -data WebViewScriptPromptSignalInfo -instance SignalInfo WebViewScriptPromptSignalInfo where - type HaskellCallbackType WebViewScriptPromptSignalInfo = WebViewScriptPromptCallback - connectSignal _ = connectWebViewScriptPrompt - -data WebViewSelectAllSignalInfo -instance SignalInfo WebViewSelectAllSignalInfo where - type HaskellCallbackType WebViewSelectAllSignalInfo = WebViewSelectAllCallback - connectSignal _ = connectWebViewSelectAll - -data WebViewSelectionChangedSignalInfo -instance SignalInfo WebViewSelectionChangedSignalInfo where - type HaskellCallbackType WebViewSelectionChangedSignalInfo = WebViewSelectionChangedCallback - connectSignal _ = connectWebViewSelectionChanged - -data WebViewShouldApplyStyleSignalInfo -instance SignalInfo WebViewShouldApplyStyleSignalInfo where - type HaskellCallbackType WebViewShouldApplyStyleSignalInfo = WebViewShouldApplyStyleCallback - connectSignal _ = connectWebViewShouldApplyStyle - -data WebViewShouldBeginEditingSignalInfo -instance SignalInfo WebViewShouldBeginEditingSignalInfo where - type HaskellCallbackType WebViewShouldBeginEditingSignalInfo = WebViewShouldBeginEditingCallback - connectSignal _ = connectWebViewShouldBeginEditing - -data WebViewShouldChangeSelectedRangeSignalInfo -instance SignalInfo WebViewShouldChangeSelectedRangeSignalInfo where - type HaskellCallbackType WebViewShouldChangeSelectedRangeSignalInfo = WebViewShouldChangeSelectedRangeCallback - connectSignal _ = connectWebViewShouldChangeSelectedRange - -data WebViewShouldDeleteRangeSignalInfo -instance SignalInfo WebViewShouldDeleteRangeSignalInfo where - type HaskellCallbackType WebViewShouldDeleteRangeSignalInfo = WebViewShouldDeleteRangeCallback - connectSignal _ = connectWebViewShouldDeleteRange - -data WebViewShouldEndEditingSignalInfo -instance SignalInfo WebViewShouldEndEditingSignalInfo where - type HaskellCallbackType WebViewShouldEndEditingSignalInfo = WebViewShouldEndEditingCallback - connectSignal _ = connectWebViewShouldEndEditing - -data WebViewShouldInsertNodeSignalInfo -instance SignalInfo WebViewShouldInsertNodeSignalInfo where - type HaskellCallbackType WebViewShouldInsertNodeSignalInfo = WebViewShouldInsertNodeCallback - connectSignal _ = connectWebViewShouldInsertNode - -data WebViewShouldInsertTextSignalInfo -instance SignalInfo WebViewShouldInsertTextSignalInfo where - type HaskellCallbackType WebViewShouldInsertTextSignalInfo = WebViewShouldInsertTextCallback - connectSignal _ = connectWebViewShouldInsertText - -data WebViewShouldShowDeleteInterfaceForElementSignalInfo -instance SignalInfo WebViewShouldShowDeleteInterfaceForElementSignalInfo where - type HaskellCallbackType WebViewShouldShowDeleteInterfaceForElementSignalInfo = WebViewShouldShowDeleteInterfaceForElementCallback - connectSignal _ = connectWebViewShouldShowDeleteInterfaceForElement - -data WebViewStatusBarTextChangedSignalInfo -instance SignalInfo WebViewStatusBarTextChangedSignalInfo where - type HaskellCallbackType WebViewStatusBarTextChangedSignalInfo = WebViewStatusBarTextChangedCallback - connectSignal _ = connectWebViewStatusBarTextChanged - -data WebViewTitleChangedSignalInfo -instance SignalInfo WebViewTitleChangedSignalInfo where - type HaskellCallbackType WebViewTitleChangedSignalInfo = WebViewTitleChangedCallback - connectSignal _ = connectWebViewTitleChanged - -data WebViewUndoSignalInfo -instance SignalInfo WebViewUndoSignalInfo where - type HaskellCallbackType WebViewUndoSignalInfo = WebViewUndoCallback - connectSignal _ = connectWebViewUndo - -data WebViewUserChangedContentsSignalInfo -instance SignalInfo WebViewUserChangedContentsSignalInfo where - type HaskellCallbackType WebViewUserChangedContentsSignalInfo = WebViewUserChangedContentsCallback - connectSignal _ = connectWebViewUserChangedContents - -data WebViewViewportAttributesChangedSignalInfo -instance SignalInfo WebViewViewportAttributesChangedSignalInfo where - type HaskellCallbackType WebViewViewportAttributesChangedSignalInfo = WebViewViewportAttributesChangedCallback - connectSignal _ = connectWebViewViewportAttributesChanged - -data WebViewViewportAttributesRecomputeRequestedSignalInfo -instance SignalInfo WebViewViewportAttributesRecomputeRequestedSignalInfo where - type HaskellCallbackType WebViewViewportAttributesRecomputeRequestedSignalInfo = WebViewViewportAttributesRecomputeRequestedCallback - connectSignal _ = connectWebViewViewportAttributesRecomputeRequested - -data WebViewWebViewReadySignalInfo -instance SignalInfo WebViewWebViewReadySignalInfo where - type HaskellCallbackType WebViewWebViewReadySignalInfo = WebViewWebViewReadyCallback - connectSignal _ = connectWebViewWebViewReady - -data WebViewWindowObjectClearedSignalInfo -instance SignalInfo WebViewWindowObjectClearedSignalInfo where - type HaskellCallbackType WebViewWindowObjectClearedSignalInfo = WebViewWindowObjectClearedCallback - connectSignal _ = connectWebViewWindowObjectCleared - -type instance SignalList WebView = WebViewSignalList -type WebViewSignalList = ('[ '("accel-closures-changed", Gtk.WidgetAccelClosuresChangedSignalInfo), '("add", Gtk.ContainerAddSignalInfo), '("button-press-event", Gtk.WidgetButtonPressEventSignalInfo), '("button-release-event", Gtk.WidgetButtonReleaseEventSignalInfo), '("can-activate-accel", Gtk.WidgetCanActivateAccelSignalInfo), '("check-resize", Gtk.ContainerCheckResizeSignalInfo), '("child-notify", Gtk.WidgetChildNotifySignalInfo), '("close-web-view", WebViewCloseWebViewSignalInfo), '("composited-changed", Gtk.WidgetCompositedChangedSignalInfo), '("configure-event", Gtk.WidgetConfigureEventSignalInfo), '("console-message", WebViewConsoleMessageSignalInfo), '("context-menu", WebViewContextMenuSignalInfo), '("copy-clipboard", WebViewCopyClipboardSignalInfo), '("create-plugin-widget", WebViewCreatePluginWidgetSignalInfo), '("create-web-view", WebViewCreateWebViewSignalInfo), '("cut-clipboard", WebViewCutClipboardSignalInfo), '("damage-event", Gtk.WidgetDamageEventSignalInfo), '("database-quota-exceeded", WebViewDatabaseQuotaExceededSignalInfo), '("delete-event", Gtk.WidgetDeleteEventSignalInfo), '("destroy", Gtk.WidgetDestroySignalInfo), '("destroy-event", Gtk.WidgetDestroyEventSignalInfo), '("direction-changed", Gtk.WidgetDirectionChangedSignalInfo), '("document-load-finished", WebViewDocumentLoadFinishedSignalInfo), '("download-requested", WebViewDownloadRequestedSignalInfo), '("drag-begin", Gtk.WidgetDragBeginSignalInfo), '("drag-data-delete", Gtk.WidgetDragDataDeleteSignalInfo), '("drag-data-get", Gtk.WidgetDragDataGetSignalInfo), '("drag-data-received", Gtk.WidgetDragDataReceivedSignalInfo), '("drag-drop", Gtk.WidgetDragDropSignalInfo), '("drag-end", Gtk.WidgetDragEndSignalInfo), '("drag-failed", Gtk.WidgetDragFailedSignalInfo), '("drag-leave", Gtk.WidgetDragLeaveSignalInfo), '("drag-motion", Gtk.WidgetDragMotionSignalInfo), '("draw", Gtk.WidgetDrawSignalInfo), '("editing-began", WebViewEditingBeganSignalInfo), '("editing-ended", WebViewEditingEndedSignalInfo), '("enter-notify-event", Gtk.WidgetEnterNotifyEventSignalInfo), '("entering-fullscreen", WebViewEnteringFullscreenSignalInfo), '("event", Gtk.WidgetEventSignalInfo), '("event-after", Gtk.WidgetEventAfterSignalInfo), '("focus", Gtk.WidgetFocusSignalInfo), '("focus-in-event", Gtk.WidgetFocusInEventSignalInfo), '("focus-out-event", Gtk.WidgetFocusOutEventSignalInfo), '("frame-created", WebViewFrameCreatedSignalInfo), '("geolocation-policy-decision-cancelled", WebViewGeolocationPolicyDecisionCancelledSignalInfo), '("geolocation-policy-decision-requested", WebViewGeolocationPolicyDecisionRequestedSignalInfo), '("grab-broken-event", Gtk.WidgetGrabBrokenEventSignalInfo), '("grab-focus", Gtk.WidgetGrabFocusSignalInfo), '("grab-notify", Gtk.WidgetGrabNotifySignalInfo), '("hide", Gtk.WidgetHideSignalInfo), '("hierarchy-changed", Gtk.WidgetHierarchyChangedSignalInfo), '("hovering-over-link", WebViewHoveringOverLinkSignalInfo), '("icon-loaded", WebViewIconLoadedSignalInfo), '("key-press-event", Gtk.WidgetKeyPressEventSignalInfo), '("key-release-event", Gtk.WidgetKeyReleaseEventSignalInfo), '("keynav-failed", Gtk.WidgetKeynavFailedSignalInfo), '("leave-notify-event", Gtk.WidgetLeaveNotifyEventSignalInfo), '("leaving-fullscreen", WebViewLeavingFullscreenSignalInfo), '("load-committed", WebViewLoadCommittedSignalInfo), '("load-error", WebViewLoadErrorSignalInfo), '("load-finished", WebViewLoadFinishedSignalInfo), '("load-progress-changed", WebViewLoadProgressChangedSignalInfo), '("load-started", WebViewLoadStartedSignalInfo), '("map", Gtk.WidgetMapSignalInfo), '("map-event", Gtk.WidgetMapEventSignalInfo), '("mime-type-policy-decision-requested", WebViewMimeTypePolicyDecisionRequestedSignalInfo), '("mnemonic-activate", Gtk.WidgetMnemonicActivateSignalInfo), '("motion-notify-event", Gtk.WidgetMotionNotifyEventSignalInfo), '("move-cursor", WebViewMoveCursorSignalInfo), '("move-focus", Gtk.WidgetMoveFocusSignalInfo), '("navigation-policy-decision-requested", WebViewNavigationPolicyDecisionRequestedSignalInfo), '("navigation-requested", WebViewNavigationRequestedSignalInfo), '("new-window-policy-decision-requested", WebViewNewWindowPolicyDecisionRequestedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("onload-event", WebViewOnloadEventSignalInfo), '("parent-set", Gtk.WidgetParentSetSignalInfo), '("paste-clipboard", WebViewPasteClipboardSignalInfo), '("populate-popup", WebViewPopulatePopupSignalInfo), '("popup-menu", Gtk.WidgetPopupMenuSignalInfo), '("print-requested", WebViewPrintRequestedSignalInfo), '("property-notify-event", Gtk.WidgetPropertyNotifyEventSignalInfo), '("proximity-in-event", Gtk.WidgetProximityInEventSignalInfo), '("proximity-out-event", Gtk.WidgetProximityOutEventSignalInfo), '("query-tooltip", Gtk.WidgetQueryTooltipSignalInfo), '("realize", Gtk.WidgetRealizeSignalInfo), '("redo", WebViewRedoSignalInfo), '("remove", Gtk.ContainerRemoveSignalInfo), '("resource-content-length-received", WebViewResourceContentLengthReceivedSignalInfo), '("resource-load-failed", WebViewResourceLoadFailedSignalInfo), '("resource-load-finished", WebViewResourceLoadFinishedSignalInfo), '("resource-request-starting", WebViewResourceRequestStartingSignalInfo), '("resource-response-received", WebViewResourceResponseReceivedSignalInfo), '("run-file-chooser", WebViewRunFileChooserSignalInfo), '("screen-changed", Gtk.WidgetScreenChangedSignalInfo), '("script-alert", WebViewScriptAlertSignalInfo), '("script-confirm", WebViewScriptConfirmSignalInfo), '("script-prompt", WebViewScriptPromptSignalInfo), '("scroll-event", Gtk.WidgetScrollEventSignalInfo), '("select-all", WebViewSelectAllSignalInfo), '("selection-changed", WebViewSelectionChangedSignalInfo), '("selection-clear-event", Gtk.WidgetSelectionClearEventSignalInfo), '("selection-get", Gtk.WidgetSelectionGetSignalInfo), '("selection-notify-event", Gtk.WidgetSelectionNotifyEventSignalInfo), '("selection-received", Gtk.WidgetSelectionReceivedSignalInfo), '("selection-request-event", Gtk.WidgetSelectionRequestEventSignalInfo), '("set-focus-child", Gtk.ContainerSetFocusChildSignalInfo), '("should-apply-style", WebViewShouldApplyStyleSignalInfo), '("should-begin-editing", WebViewShouldBeginEditingSignalInfo), '("should-change-selected-range", WebViewShouldChangeSelectedRangeSignalInfo), '("should-delete-range", WebViewShouldDeleteRangeSignalInfo), '("should-end-editing", WebViewShouldEndEditingSignalInfo), '("should-insert-node", WebViewShouldInsertNodeSignalInfo), '("should-insert-text", WebViewShouldInsertTextSignalInfo), '("should-show-delete-interface-for-element", WebViewShouldShowDeleteInterfaceForElementSignalInfo), '("show", Gtk.WidgetShowSignalInfo), '("show-help", Gtk.WidgetShowHelpSignalInfo), '("size-allocate", Gtk.WidgetSizeAllocateSignalInfo), '("state-changed", Gtk.WidgetStateChangedSignalInfo), '("state-flags-changed", Gtk.WidgetStateFlagsChangedSignalInfo), '("status-bar-text-changed", WebViewStatusBarTextChangedSignalInfo), '("style-set", Gtk.WidgetStyleSetSignalInfo), '("style-updated", Gtk.WidgetStyleUpdatedSignalInfo), '("title-changed", WebViewTitleChangedSignalInfo), '("touch-event", Gtk.WidgetTouchEventSignalInfo), '("undo", WebViewUndoSignalInfo), '("unmap", Gtk.WidgetUnmapSignalInfo), '("unmap-event", Gtk.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.WidgetUnrealizeSignalInfo), '("user-changed-contents", WebViewUserChangedContentsSignalInfo), '("viewport-attributes-changed", WebViewViewportAttributesChangedSignalInfo), '("viewport-attributes-recompute-requested", WebViewViewportAttributesRecomputeRequestedSignalInfo), '("visibility-notify-event", Gtk.WidgetVisibilityNotifyEventSignalInfo), '("web-view-ready", WebViewWebViewReadySignalInfo), '("window-object-cleared", WebViewWindowObjectClearedSignalInfo), '("window-state-event", Gtk.WidgetWindowStateEventSignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) - --- method WebView::new --- method type : Constructor --- Args : [] --- Lengths : [] --- hInArgs : [] --- returnType : TInterface "WebKit" "WebView" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_new" webkit_web_view_new :: - IO (Ptr WebView) - - -webViewNew :: - (MonadIO m) => - m WebView -webViewNew = liftIO $ do - result <- webkit_web_view_new - checkUnexpectedReturnNULL "webkit_web_view_new" result - result' <- (newObject WebView) result - return result' - --- method WebView::can_copy_clipboard --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_can_copy_clipboard" webkit_web_view_can_copy_clipboard :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewCanCopyClipboard :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewCanCopyClipboard _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_can_copy_clipboard _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::can_cut_clipboard --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_can_cut_clipboard" webkit_web_view_can_cut_clipboard :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewCanCutClipboard :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewCanCutClipboard _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_can_cut_clipboard _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::can_go_back --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_can_go_back" webkit_web_view_can_go_back :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewCanGoBack :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewCanGoBack _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_can_go_back _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::can_go_back_or_forward --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "steps", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "steps", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_can_go_back_or_forward" webkit_web_view_can_go_back_or_forward :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - Int32 -> -- steps : TBasicType TInt32 - IO CInt - - -webViewCanGoBackOrForward :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Int32 -> -- steps - m Bool -webViewCanGoBackOrForward _obj steps = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_can_go_back_or_forward _obj' steps - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::can_go_forward --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_can_go_forward" webkit_web_view_can_go_forward :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewCanGoForward :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewCanGoForward _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_can_go_forward _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::can_paste_clipboard --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_can_paste_clipboard" webkit_web_view_can_paste_clipboard :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewCanPasteClipboard :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewCanPasteClipboard _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_can_paste_clipboard _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::can_redo --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_can_redo" webkit_web_view_can_redo :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewCanRedo :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewCanRedo _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_can_redo _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::can_show_mime_type --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_can_show_mime_type" webkit_web_view_can_show_mime_type :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CString -> -- mime_type : TBasicType TUTF8 - IO CInt - - -webViewCanShowMimeType :: - (MonadIO m, WebViewK a) => - a -> -- _obj - T.Text -> -- mime_type - m Bool -webViewCanShowMimeType _obj mime_type = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - mime_type' <- textToCString mime_type - result <- webkit_web_view_can_show_mime_type _obj' mime_type' - let result' = (/= 0) result - touchManagedPtr _obj - freeMem mime_type' - return result' - --- method WebView::can_undo --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_can_undo" webkit_web_view_can_undo :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewCanUndo :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewCanUndo _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_can_undo _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::copy_clipboard --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_copy_clipboard" webkit_web_view_copy_clipboard :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewCopyClipboard :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewCopyClipboard _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_copy_clipboard _obj' - touchManagedPtr _obj - return () - --- method WebView::cut_clipboard --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_cut_clipboard" webkit_web_view_cut_clipboard :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewCutClipboard :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewCutClipboard _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_cut_clipboard _obj' - touchManagedPtr _obj - return () - --- method WebView::delete_selection --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_delete_selection" webkit_web_view_delete_selection :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewDeleteSelection :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewDeleteSelection _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_delete_selection _obj' - touchManagedPtr _obj - return () - --- method WebView::execute_script --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "script", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "script", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_execute_script" webkit_web_view_execute_script :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CString -> -- script : TBasicType TUTF8 - IO () - - -webViewExecuteScript :: - (MonadIO m, WebViewK a) => - a -> -- _obj - T.Text -> -- script - m () -webViewExecuteScript _obj script = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - script' <- textToCString script - webkit_web_view_execute_script _obj' script' - touchManagedPtr _obj - freeMem script' - return () - --- method WebView::get_back_forward_list --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "WebBackForwardList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_back_forward_list" webkit_web_view_get_back_forward_list :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr WebBackForwardList) - - -webViewGetBackForwardList :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m WebBackForwardList -webViewGetBackForwardList _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_back_forward_list _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_back_forward_list" result - result' <- (newObject WebBackForwardList) result - touchManagedPtr _obj - return result' - --- method WebView::get_copy_target_list --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "Gtk" "TargetList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_copy_target_list" webkit_web_view_get_copy_target_list :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr Gtk.TargetList) - - -webViewGetCopyTargetList :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Gtk.TargetList -webViewGetCopyTargetList _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_copy_target_list _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_copy_target_list" result - result' <- (wrapBoxed Gtk.TargetList) result - touchManagedPtr _obj - return result' - --- method WebView::get_custom_encoding --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_custom_encoding" webkit_web_view_get_custom_encoding :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CString - - -webViewGetCustomEncoding :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m T.Text -webViewGetCustomEncoding _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_custom_encoding _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_custom_encoding" result - result' <- cstringToText result - touchManagedPtr _obj - return result' - --- method WebView::get_dom_document --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "DOMDocument" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_dom_document" webkit_web_view_get_dom_document :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr DOMDocument) - - -webViewGetDomDocument :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m DOMDocument -webViewGetDomDocument _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_dom_document _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_dom_document" result - result' <- (newObject DOMDocument) result - touchManagedPtr _obj - return result' - --- method WebView::get_editable --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_editable" webkit_web_view_get_editable :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewGetEditable :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewGetEditable _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_editable _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::get_encoding --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_encoding" webkit_web_view_get_encoding :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CString - - -webViewGetEncoding :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m T.Text -webViewGetEncoding _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_encoding _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_encoding" result - result' <- cstringToText result - touchManagedPtr _obj - return result' - --- method WebView::get_focused_frame --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "WebFrame" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_focused_frame" webkit_web_view_get_focused_frame :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr WebFrame) - - -webViewGetFocusedFrame :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m WebFrame -webViewGetFocusedFrame _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_focused_frame _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_focused_frame" result - result' <- (newObject WebFrame) result - touchManagedPtr _obj - return result' - --- method WebView::get_full_content_zoom --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_full_content_zoom" webkit_web_view_get_full_content_zoom :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewGetFullContentZoom :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewGetFullContentZoom _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_full_content_zoom _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::get_hit_test_result --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event", argType = TInterface "Gdk" "EventButton", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "event", argType = TInterface "Gdk" "EventButton", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "HitTestResult" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_hit_test_result" webkit_web_view_get_hit_test_result :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - Ptr Gdk.EventButton -> -- event : TInterface "Gdk" "EventButton" - IO (Ptr HitTestResult) - - -webViewGetHitTestResult :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Gdk.EventButton -> -- event - m HitTestResult -webViewGetHitTestResult _obj event = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let event' = unsafeManagedPtrGetPtr event - result <- webkit_web_view_get_hit_test_result _obj' event' - checkUnexpectedReturnNULL "webkit_web_view_get_hit_test_result" result - result' <- (wrapObject HitTestResult) result - touchManagedPtr _obj - touchManagedPtr event - return result' - --- method WebView::get_icon_pixbuf --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "GdkPixbuf" "Pixbuf" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_icon_pixbuf" webkit_web_view_get_icon_pixbuf :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr GdkPixbuf.Pixbuf) - -{-# DEPRECATED webViewGetIconPixbuf ["(Since version 1.8)","Use webkit_web_view_try_get_favicon_pixbuf() instead."]#-} -webViewGetIconPixbuf :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m GdkPixbuf.Pixbuf -webViewGetIconPixbuf _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_icon_pixbuf _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_icon_pixbuf" result - result' <- (wrapObject GdkPixbuf.Pixbuf) result - touchManagedPtr _obj - return result' - --- method WebView::get_icon_uri --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_icon_uri" webkit_web_view_get_icon_uri :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CString - - -webViewGetIconUri :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m T.Text -webViewGetIconUri _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_icon_uri _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_icon_uri" result - result' <- cstringToText result - touchManagedPtr _obj - return result' - --- method WebView::get_inspector --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "WebInspector" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_inspector" webkit_web_view_get_inspector :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr WebInspector) - - -webViewGetInspector :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m WebInspector -webViewGetInspector _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_inspector _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_inspector" result - result' <- (newObject WebInspector) result - touchManagedPtr _obj - return result' - --- method WebView::get_load_status --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "LoadStatus" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_load_status" webkit_web_view_get_load_status :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CUInt - - -webViewGetLoadStatus :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m LoadStatus -webViewGetLoadStatus _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_load_status _obj' - let result' = (toEnum . fromIntegral) result - touchManagedPtr _obj - return result' - --- method WebView::get_main_frame --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "WebFrame" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_main_frame" webkit_web_view_get_main_frame :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr WebFrame) - - -webViewGetMainFrame :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m WebFrame -webViewGetMainFrame _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_main_frame _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_main_frame" result - result' <- (newObject WebFrame) result - touchManagedPtr _obj - return result' - --- method WebView::get_paste_target_list --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "Gtk" "TargetList" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_paste_target_list" webkit_web_view_get_paste_target_list :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr Gtk.TargetList) - - -webViewGetPasteTargetList :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Gtk.TargetList -webViewGetPasteTargetList _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_paste_target_list _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_paste_target_list" result - result' <- (wrapBoxed Gtk.TargetList) result - touchManagedPtr _obj - return result' - --- method WebView::get_progress --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TDouble --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_progress" webkit_web_view_get_progress :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CDouble - - -webViewGetProgress :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Double -webViewGetProgress _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_progress _obj' - let result' = realToFrac result - touchManagedPtr _obj - return result' - --- method WebView::get_settings --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "WebSettings" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_settings" webkit_web_view_get_settings :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr WebSettings) - - -webViewGetSettings :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m WebSettings -webViewGetSettings _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_settings _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_settings" result - result' <- (newObject WebSettings) result - touchManagedPtr _obj - return result' - --- method WebView::get_snapshot --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "cairo" "Surface" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_snapshot" webkit_web_view_get_snapshot :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr Cairo.Surface) - - -webViewGetSnapshot :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Cairo.Surface -webViewGetSnapshot _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_snapshot _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_snapshot" result - result' <- (wrapBoxed Cairo.Surface) result - touchManagedPtr _obj - return result' - --- method WebView::get_title --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_title" webkit_web_view_get_title :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CString - - -webViewGetTitle :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m T.Text -webViewGetTitle _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_title _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_title" result - result' <- cstringToText result - touchManagedPtr _obj - return result' - --- method WebView::get_transparent --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_transparent" webkit_web_view_get_transparent :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewGetTransparent :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewGetTransparent _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_transparent _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::get_uri --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUTF8 --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_uri" webkit_web_view_get_uri :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CString - - -webViewGetUri :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m T.Text -webViewGetUri _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_uri _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_uri" result - result' <- cstringToText result - touchManagedPtr _obj - return result' - --- method WebView::get_view_mode --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "WebViewViewMode" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_view_mode" webkit_web_view_get_view_mode :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CUInt - - -webViewGetViewMode :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m WebViewViewMode -webViewGetViewMode _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_view_mode _obj' - let result' = (toEnum . fromIntegral) result - touchManagedPtr _obj - return result' - --- method WebView::get_view_source_mode --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_view_source_mode" webkit_web_view_get_view_source_mode :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewGetViewSourceMode :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewGetViewSourceMode _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_view_source_mode _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::get_viewport_attributes --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "ViewportAttributes" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_viewport_attributes" webkit_web_view_get_viewport_attributes :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr ViewportAttributes) - - -webViewGetViewportAttributes :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m ViewportAttributes -webViewGetViewportAttributes _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_viewport_attributes _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_viewport_attributes" result - result' <- (newObject ViewportAttributes) result - touchManagedPtr _obj - return result' - --- method WebView::get_window_features --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "WebKit" "WebWindowFeatures" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_window_features" webkit_web_view_get_window_features :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO (Ptr WebWindowFeatures) - - -webViewGetWindowFeatures :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m WebWindowFeatures -webViewGetWindowFeatures _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_window_features _obj' - checkUnexpectedReturnNULL "webkit_web_view_get_window_features" result - result' <- (newObject WebWindowFeatures) result - touchManagedPtr _obj - return result' - --- method WebView::get_zoom_level --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TFloat --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_get_zoom_level" webkit_web_view_get_zoom_level :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CFloat - - -webViewGetZoomLevel :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Float -webViewGetZoomLevel _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_get_zoom_level _obj' - let result' = realToFrac result - touchManagedPtr _obj - return result' - --- method WebView::go_back --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_go_back" webkit_web_view_go_back :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewGoBack :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewGoBack _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_go_back _obj' - touchManagedPtr _obj - return () - --- method WebView::go_back_or_forward --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "steps", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "steps", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_go_back_or_forward" webkit_web_view_go_back_or_forward :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - Int32 -> -- steps : TBasicType TInt32 - IO () - - -webViewGoBackOrForward :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Int32 -> -- steps - m () -webViewGoBackOrForward _obj steps = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_go_back_or_forward _obj' steps - touchManagedPtr _obj - return () - --- method WebView::go_forward --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_go_forward" webkit_web_view_go_forward :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewGoForward :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewGoForward _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_go_forward _obj' - touchManagedPtr _obj - return () - --- method WebView::go_to_back_forward_item --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_go_to_back_forward_item" webkit_web_view_go_to_back_forward_item :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - Ptr WebHistoryItem -> -- item : TInterface "WebKit" "WebHistoryItem" - IO CInt - - -webViewGoToBackForwardItem :: - (MonadIO m, WebViewK a, WebHistoryItemK b) => - a -> -- _obj - b -> -- item - m Bool -webViewGoToBackForwardItem _obj item = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let item' = unsafeManagedPtrCastPtr item - result <- webkit_web_view_go_to_back_forward_item _obj' item' - let result' = (/= 0) result - touchManagedPtr _obj - touchManagedPtr item - return result' - --- method WebView::has_selection --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_has_selection" webkit_web_view_has_selection :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO CInt - - -webViewHasSelection :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m Bool -webViewHasSelection _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_has_selection _obj' - let result' = (/= 0) result - touchManagedPtr _obj - return result' - --- method WebView::load_html_string --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "base_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "base_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_load_html_string" webkit_web_view_load_html_string :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CString -> -- content : TBasicType TUTF8 - CString -> -- base_uri : TBasicType TUTF8 - IO () - -{-# DEPRECATED webViewLoadHtmlString ["(Since version 1.1.1)","Use webkit_web_view_load_string() instead."]#-} -webViewLoadHtmlString :: - (MonadIO m, WebViewK a) => - a -> -- _obj - T.Text -> -- content - T.Text -> -- base_uri - m () -webViewLoadHtmlString _obj content base_uri = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - content' <- textToCString content - base_uri' <- textToCString base_uri - webkit_web_view_load_html_string _obj' content' base_uri' - touchManagedPtr _obj - freeMem content' - freeMem base_uri' - return () - --- method WebView::load_request --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_load_request" webkit_web_view_load_request :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - Ptr NetworkRequest -> -- request : TInterface "WebKit" "NetworkRequest" - IO () - - -webViewLoadRequest :: - (MonadIO m, WebViewK a, NetworkRequestK b) => - a -> -- _obj - b -> -- request - m () -webViewLoadRequest _obj request = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let request' = unsafeManagedPtrCastPtr request - webkit_web_view_load_request _obj' request' - touchManagedPtr _obj - touchManagedPtr request - return () - --- method WebView::load_string --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "base_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "base_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_load_string" webkit_web_view_load_string :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CString -> -- content : TBasicType TUTF8 - CString -> -- mime_type : TBasicType TUTF8 - CString -> -- encoding : TBasicType TUTF8 - CString -> -- base_uri : TBasicType TUTF8 - IO () - - -webViewLoadString :: - (MonadIO m, WebViewK a) => - a -> -- _obj - T.Text -> -- content - T.Text -> -- mime_type - T.Text -> -- encoding - T.Text -> -- base_uri - m () -webViewLoadString _obj content mime_type encoding base_uri = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - content' <- textToCString content - mime_type' <- textToCString mime_type - encoding' <- textToCString encoding - base_uri' <- textToCString base_uri - webkit_web_view_load_string _obj' content' mime_type' encoding' base_uri' - touchManagedPtr _obj - freeMem content' - freeMem mime_type' - freeMem encoding' - freeMem base_uri' - return () - --- method WebView::load_uri --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_load_uri" webkit_web_view_load_uri :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CString -> -- uri : TBasicType TUTF8 - IO () - - -webViewLoadUri :: - (MonadIO m, WebViewK a) => - a -> -- _obj - T.Text -> -- uri - m () -webViewLoadUri _obj uri = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - uri' <- textToCString uri - webkit_web_view_load_uri _obj' uri' - touchManagedPtr _obj - freeMem uri' - return () - --- method WebView::mark_text_matches --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "case_sensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "limit", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "case_sensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "limit", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TUInt32 --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_mark_text_matches" webkit_web_view_mark_text_matches :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CString -> -- string : TBasicType TUTF8 - CInt -> -- case_sensitive : TBasicType TBoolean - Word32 -> -- limit : TBasicType TUInt32 - IO Word32 - - -webViewMarkTextMatches :: - (MonadIO m, WebViewK a) => - a -> -- _obj - T.Text -> -- string - Bool -> -- case_sensitive - Word32 -> -- limit - m Word32 -webViewMarkTextMatches _obj string case_sensitive limit = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - string' <- textToCString string - let case_sensitive' = (fromIntegral . fromEnum) case_sensitive - result <- webkit_web_view_mark_text_matches _obj' string' case_sensitive' limit - touchManagedPtr _obj - freeMem string' - return result - --- method WebView::move_cursor --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "step", argType = TInterface "Gtk" "MovementStep", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "count", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "step", argType = TInterface "Gtk" "MovementStep", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "count", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_move_cursor" webkit_web_view_move_cursor :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CUInt -> -- step : TInterface "Gtk" "MovementStep" - Int32 -> -- count : TBasicType TInt32 - IO () - - -webViewMoveCursor :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Gtk.MovementStep -> -- step - Int32 -> -- count - m () -webViewMoveCursor _obj step count = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let step' = (fromIntegral . fromEnum) step - webkit_web_view_move_cursor _obj' step' count - touchManagedPtr _obj - return () - --- method WebView::open --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_open" webkit_web_view_open :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CString -> -- uri : TBasicType TUTF8 - IO () - -{-# DEPRECATED webViewOpen ["(Since version 1.1.1)","Use webkit_web_view_load_uri() instead."]#-} -webViewOpen :: - (MonadIO m, WebViewK a) => - a -> -- _obj - T.Text -> -- uri - m () -webViewOpen _obj uri = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - uri' <- textToCString uri - webkit_web_view_open _obj' uri' - touchManagedPtr _obj - freeMem uri' - return () - --- method WebView::paste_clipboard --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_paste_clipboard" webkit_web_view_paste_clipboard :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewPasteClipboard :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewPasteClipboard _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_paste_clipboard _obj' - touchManagedPtr _obj - return () - --- method WebView::redo --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_redo" webkit_web_view_redo :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewRedo :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewRedo _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_redo _obj' - touchManagedPtr _obj - return () - --- method WebView::reload --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_reload" webkit_web_view_reload :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewReload :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewReload _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_reload _obj' - touchManagedPtr _obj - return () - --- method WebView::reload_bypass_cache --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_reload_bypass_cache" webkit_web_view_reload_bypass_cache :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewReloadBypassCache :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewReloadBypassCache _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_reload_bypass_cache _obj' - touchManagedPtr _obj - return () - --- method WebView::search_text --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "case_sensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "forward", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wrap", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "case_sensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "forward", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "wrap", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TBoolean --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_search_text" webkit_web_view_search_text :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CString -> -- text : TBasicType TUTF8 - CInt -> -- case_sensitive : TBasicType TBoolean - CInt -> -- forward : TBasicType TBoolean - CInt -> -- wrap : TBasicType TBoolean - IO CInt - - -webViewSearchText :: - (MonadIO m, WebViewK a) => - a -> -- _obj - T.Text -> -- text - Bool -> -- case_sensitive - Bool -> -- forward - Bool -> -- wrap - m Bool -webViewSearchText _obj text case_sensitive forward wrap = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - text' <- textToCString text - let case_sensitive' = (fromIntegral . fromEnum) case_sensitive - let forward' = (fromIntegral . fromEnum) forward - let wrap' = (fromIntegral . fromEnum) wrap - result <- webkit_web_view_search_text _obj' text' case_sensitive' forward' wrap' - let result' = (/= 0) result - touchManagedPtr _obj - freeMem text' - return result' - --- method WebView::select_all --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_select_all" webkit_web_view_select_all :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewSelectAll :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewSelectAll _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_select_all _obj' - touchManagedPtr _obj - return () - --- method WebView::set_custom_encoding --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_set_custom_encoding" webkit_web_view_set_custom_encoding :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CString -> -- encoding : TBasicType TUTF8 - IO () - - -webViewSetCustomEncoding :: - (MonadIO m, WebViewK a) => - a -> -- _obj - T.Text -> -- encoding - m () -webViewSetCustomEncoding _obj encoding = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - encoding' <- textToCString encoding - webkit_web_view_set_custom_encoding _obj' encoding' - touchManagedPtr _obj - freeMem encoding' - return () - --- method WebView::set_editable --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "flag", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "flag", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_set_editable" webkit_web_view_set_editable :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CInt -> -- flag : TBasicType TBoolean - IO () - - -webViewSetEditable :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Bool -> -- flag - m () -webViewSetEditable _obj flag = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let flag' = (fromIntegral . fromEnum) flag - webkit_web_view_set_editable _obj' flag' - touchManagedPtr _obj - return () - --- method WebView::set_full_content_zoom --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "full_content_zoom", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "full_content_zoom", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_set_full_content_zoom" webkit_web_view_set_full_content_zoom :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CInt -> -- full_content_zoom : TBasicType TBoolean - IO () - - -webViewSetFullContentZoom :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Bool -> -- full_content_zoom - m () -webViewSetFullContentZoom _obj full_content_zoom = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let full_content_zoom' = (fromIntegral . fromEnum) full_content_zoom - webkit_web_view_set_full_content_zoom _obj' full_content_zoom' - touchManagedPtr _obj - return () - --- method WebView::set_highlight_text_matches --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "highlight", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "highlight", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_set_highlight_text_matches" webkit_web_view_set_highlight_text_matches :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CInt -> -- highlight : TBasicType TBoolean - IO () - - -webViewSetHighlightTextMatches :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Bool -> -- highlight - m () -webViewSetHighlightTextMatches _obj highlight = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let highlight' = (fromIntegral . fromEnum) highlight - webkit_web_view_set_highlight_text_matches _obj' highlight' - touchManagedPtr _obj - return () - --- method WebView::set_maintains_back_forward_list --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "flag", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "flag", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_set_maintains_back_forward_list" webkit_web_view_set_maintains_back_forward_list :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CInt -> -- flag : TBasicType TBoolean - IO () - - -webViewSetMaintainsBackForwardList :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Bool -> -- flag - m () -webViewSetMaintainsBackForwardList _obj flag = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let flag' = (fromIntegral . fromEnum) flag - webkit_web_view_set_maintains_back_forward_list _obj' flag' - touchManagedPtr _obj - return () - --- method WebView::set_settings --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "settings", argType = TInterface "WebKit" "WebSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "settings", argType = TInterface "WebKit" "WebSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_set_settings" webkit_web_view_set_settings :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - Ptr WebSettings -> -- settings : TInterface "WebKit" "WebSettings" - IO () - - -webViewSetSettings :: - (MonadIO m, WebViewK a, WebSettingsK b) => - a -> -- _obj - b -> -- settings - m () -webViewSetSettings _obj settings = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let settings' = unsafeManagedPtrCastPtr settings - webkit_web_view_set_settings _obj' settings' - touchManagedPtr _obj - touchManagedPtr settings - return () - --- method WebView::set_transparent --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "flag", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "flag", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_set_transparent" webkit_web_view_set_transparent :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CInt -> -- flag : TBasicType TBoolean - IO () - - -webViewSetTransparent :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Bool -> -- flag - m () -webViewSetTransparent _obj flag = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let flag' = (fromIntegral . fromEnum) flag - webkit_web_view_set_transparent _obj' flag' - touchManagedPtr _obj - return () - --- method WebView::set_view_mode --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mode", argType = TInterface "WebKit" "WebViewViewMode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "mode", argType = TInterface "WebKit" "WebViewViewMode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_set_view_mode" webkit_web_view_set_view_mode :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CUInt -> -- mode : TInterface "WebKit" "WebViewViewMode" - IO () - - -webViewSetViewMode :: - (MonadIO m, WebViewK a) => - a -> -- _obj - WebViewViewMode -> -- mode - m () -webViewSetViewMode _obj mode = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let mode' = (fromIntegral . fromEnum) mode - webkit_web_view_set_view_mode _obj' mode' - touchManagedPtr _obj - return () - --- method WebView::set_view_source_mode --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "view_source_mode", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "view_source_mode", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_set_view_source_mode" webkit_web_view_set_view_source_mode :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CInt -> -- view_source_mode : TBasicType TBoolean - IO () - - -webViewSetViewSourceMode :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Bool -> -- view_source_mode - m () -webViewSetViewSourceMode _obj view_source_mode = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let view_source_mode' = (fromIntegral . fromEnum) view_source_mode - webkit_web_view_set_view_source_mode _obj' view_source_mode' - touchManagedPtr _obj - return () - --- method WebView::set_zoom_level --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "zoom_level", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "zoom_level", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_set_zoom_level" webkit_web_view_set_zoom_level :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - CFloat -> -- zoom_level : TBasicType TFloat - IO () - - -webViewSetZoomLevel :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Float -> -- zoom_level - m () -webViewSetZoomLevel _obj zoom_level = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - let zoom_level' = realToFrac zoom_level - webkit_web_view_set_zoom_level _obj' zoom_level' - touchManagedPtr _obj - return () - --- method WebView::stop_loading --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_stop_loading" webkit_web_view_stop_loading :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewStopLoading :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewStopLoading _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_stop_loading _obj' - touchManagedPtr _obj - return () - --- method WebView::try_get_favicon_pixbuf --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "width", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "height", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "width", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "height", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TInterface "GdkPixbuf" "Pixbuf" --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_try_get_favicon_pixbuf" webkit_web_view_try_get_favicon_pixbuf :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - Word32 -> -- width : TBasicType TUInt32 - Word32 -> -- height : TBasicType TUInt32 - IO (Ptr GdkPixbuf.Pixbuf) - - -webViewTryGetFaviconPixbuf :: - (MonadIO m, WebViewK a) => - a -> -- _obj - Word32 -> -- width - Word32 -> -- height - m GdkPixbuf.Pixbuf -webViewTryGetFaviconPixbuf _obj width height = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - result <- webkit_web_view_try_get_favicon_pixbuf _obj' width height - checkUnexpectedReturnNULL "webkit_web_view_try_get_favicon_pixbuf" result - result' <- (wrapObject GdkPixbuf.Pixbuf) result - touchManagedPtr _obj - return result' - --- method WebView::undo --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_undo" webkit_web_view_undo :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewUndo :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewUndo _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_undo _obj' - touchManagedPtr _obj - return () - --- method WebView::unmark_text_matches --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_unmark_text_matches" webkit_web_view_unmark_text_matches :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewUnmarkTextMatches :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewUnmarkTextMatches _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_unmark_text_matches _obj' - touchManagedPtr _obj - return () - --- method WebView::zoom_in --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_zoom_in" webkit_web_view_zoom_in :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewZoomIn :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewZoomIn _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_zoom_in _obj' - touchManagedPtr _obj - return () - --- method WebView::zoom_out --- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] --- returnType : TBasicType TVoid --- throws : False --- Skip return : False - -foreign import ccall "webkit_web_view_zoom_out" webkit_web_view_zoom_out :: - Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" - IO () - - -webViewZoomOut :: - (MonadIO m, WebViewK a) => - a -> -- _obj - m () -webViewZoomOut _obj = liftIO $ do - let _obj' = unsafeManagedPtrCastPtr _obj - webkit_web_view_zoom_out _obj' - touchManagedPtr _obj - return () + +{- | +Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte +License : LGPL-2.1 +Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) +-} + +module GI.WebKit.Objects.WebView + ( + +-- * Exported types + WebView(..) , + WebViewK , + toWebView , + noWebView , + + + -- * Methods +-- ** webViewCanCopyClipboard + WebViewCanCopyClipboardMethodInfo , + webViewCanCopyClipboard , + + +-- ** webViewCanCutClipboard + WebViewCanCutClipboardMethodInfo , + webViewCanCutClipboard , + + +-- ** webViewCanGoBack + WebViewCanGoBackMethodInfo , + webViewCanGoBack , + + +-- ** webViewCanGoBackOrForward + WebViewCanGoBackOrForwardMethodInfo , + webViewCanGoBackOrForward , + + +-- ** webViewCanGoForward + WebViewCanGoForwardMethodInfo , + webViewCanGoForward , + + +-- ** webViewCanPasteClipboard + WebViewCanPasteClipboardMethodInfo , + webViewCanPasteClipboard , + + +-- ** webViewCanRedo + WebViewCanRedoMethodInfo , + webViewCanRedo , + + +-- ** webViewCanShowMimeType + WebViewCanShowMimeTypeMethodInfo , + webViewCanShowMimeType , + + +-- ** webViewCanUndo + WebViewCanUndoMethodInfo , + webViewCanUndo , + + +-- ** webViewCopyClipboard + WebViewCopyClipboardMethodInfo , + webViewCopyClipboard , + + +-- ** webViewCutClipboard + WebViewCutClipboardMethodInfo , + webViewCutClipboard , + + +-- ** webViewDeleteSelection + WebViewDeleteSelectionMethodInfo , + webViewDeleteSelection , + + +-- ** webViewExecuteScript + WebViewExecuteScriptMethodInfo , + webViewExecuteScript , + + +-- ** webViewGetBackForwardList + WebViewGetBackForwardListMethodInfo , + webViewGetBackForwardList , + + +-- ** webViewGetCopyTargetList + WebViewGetCopyTargetListMethodInfo , + webViewGetCopyTargetList , + + +-- ** webViewGetCustomEncoding + WebViewGetCustomEncodingMethodInfo , + webViewGetCustomEncoding , + + +-- ** webViewGetDomDocument + WebViewGetDomDocumentMethodInfo , + webViewGetDomDocument , + + +-- ** webViewGetEditable + WebViewGetEditableMethodInfo , + webViewGetEditable , + + +-- ** webViewGetEncoding + WebViewGetEncodingMethodInfo , + webViewGetEncoding , + + +-- ** webViewGetFocusedFrame + WebViewGetFocusedFrameMethodInfo , + webViewGetFocusedFrame , + + +-- ** webViewGetFullContentZoom + WebViewGetFullContentZoomMethodInfo , + webViewGetFullContentZoom , + + +-- ** webViewGetHitTestResult + WebViewGetHitTestResultMethodInfo , + webViewGetHitTestResult , + + +-- ** webViewGetIconPixbuf + WebViewGetIconPixbufMethodInfo , + webViewGetIconPixbuf , + + +-- ** webViewGetIconUri + WebViewGetIconUriMethodInfo , + webViewGetIconUri , + + +-- ** webViewGetInspector + WebViewGetInspectorMethodInfo , + webViewGetInspector , + + +-- ** webViewGetLoadStatus + WebViewGetLoadStatusMethodInfo , + webViewGetLoadStatus , + + +-- ** webViewGetMainFrame + WebViewGetMainFrameMethodInfo , + webViewGetMainFrame , + + +-- ** webViewGetPasteTargetList + WebViewGetPasteTargetListMethodInfo , + webViewGetPasteTargetList , + + +-- ** webViewGetProgress + WebViewGetProgressMethodInfo , + webViewGetProgress , + + +-- ** webViewGetSettings + WebViewGetSettingsMethodInfo , + webViewGetSettings , + + +-- ** webViewGetSnapshot + WebViewGetSnapshotMethodInfo , + webViewGetSnapshot , + + +-- ** webViewGetTitle + WebViewGetTitleMethodInfo , + webViewGetTitle , + + +-- ** webViewGetTransparent + WebViewGetTransparentMethodInfo , + webViewGetTransparent , + + +-- ** webViewGetUri + WebViewGetUriMethodInfo , + webViewGetUri , + + +-- ** webViewGetViewMode + WebViewGetViewModeMethodInfo , + webViewGetViewMode , + + +-- ** webViewGetViewSourceMode + WebViewGetViewSourceModeMethodInfo , + webViewGetViewSourceMode , + + +-- ** webViewGetViewportAttributes + WebViewGetViewportAttributesMethodInfo , + webViewGetViewportAttributes , + + +-- ** webViewGetWindowFeatures + WebViewGetWindowFeaturesMethodInfo , + webViewGetWindowFeatures , + + +-- ** webViewGetZoomLevel + WebViewGetZoomLevelMethodInfo , + webViewGetZoomLevel , + + +-- ** webViewGoBack + WebViewGoBackMethodInfo , + webViewGoBack , + + +-- ** webViewGoBackOrForward + WebViewGoBackOrForwardMethodInfo , + webViewGoBackOrForward , + + +-- ** webViewGoForward + WebViewGoForwardMethodInfo , + webViewGoForward , + + +-- ** webViewGoToBackForwardItem + WebViewGoToBackForwardItemMethodInfo , + webViewGoToBackForwardItem , + + +-- ** webViewHasSelection + WebViewHasSelectionMethodInfo , + webViewHasSelection , + + +-- ** webViewLoadHtmlString + WebViewLoadHtmlStringMethodInfo , + webViewLoadHtmlString , + + +-- ** webViewLoadRequest + WebViewLoadRequestMethodInfo , + webViewLoadRequest , + + +-- ** webViewLoadString + WebViewLoadStringMethodInfo , + webViewLoadString , + + +-- ** webViewLoadUri + WebViewLoadUriMethodInfo , + webViewLoadUri , + + +-- ** webViewMarkTextMatches + WebViewMarkTextMatchesMethodInfo , + webViewMarkTextMatches , + + +-- ** webViewMoveCursor + WebViewMoveCursorMethodInfo , + webViewMoveCursor , + + +-- ** webViewNew + webViewNew , + + +-- ** webViewOpen + WebViewOpenMethodInfo , + webViewOpen , + + +-- ** webViewPasteClipboard + WebViewPasteClipboardMethodInfo , + webViewPasteClipboard , + + +-- ** webViewRedo + WebViewRedoMethodInfo , + webViewRedo , + + +-- ** webViewReload + WebViewReloadMethodInfo , + webViewReload , + + +-- ** webViewReloadBypassCache + WebViewReloadBypassCacheMethodInfo , + webViewReloadBypassCache , + + +-- ** webViewSearchText + WebViewSearchTextMethodInfo , + webViewSearchText , + + +-- ** webViewSelectAll + WebViewSelectAllMethodInfo , + webViewSelectAll , + + +-- ** webViewSetCustomEncoding + WebViewSetCustomEncodingMethodInfo , + webViewSetCustomEncoding , + + +-- ** webViewSetEditable + WebViewSetEditableMethodInfo , + webViewSetEditable , + + +-- ** webViewSetFullContentZoom + WebViewSetFullContentZoomMethodInfo , + webViewSetFullContentZoom , + + +-- ** webViewSetHighlightTextMatches + WebViewSetHighlightTextMatchesMethodInfo, + webViewSetHighlightTextMatches , + + +-- ** webViewSetMaintainsBackForwardList + WebViewSetMaintainsBackForwardListMethodInfo, + webViewSetMaintainsBackForwardList , + + +-- ** webViewSetSettings + WebViewSetSettingsMethodInfo , + webViewSetSettings , + + +-- ** webViewSetTransparent + WebViewSetTransparentMethodInfo , + webViewSetTransparent , + + +-- ** webViewSetViewMode + WebViewSetViewModeMethodInfo , + webViewSetViewMode , + + +-- ** webViewSetViewSourceMode + WebViewSetViewSourceModeMethodInfo , + webViewSetViewSourceMode , + + +-- ** webViewSetZoomLevel + WebViewSetZoomLevelMethodInfo , + webViewSetZoomLevel , + + +-- ** webViewStopLoading + WebViewStopLoadingMethodInfo , + webViewStopLoading , + + +-- ** webViewTryGetFaviconPixbuf + WebViewTryGetFaviconPixbufMethodInfo , + webViewTryGetFaviconPixbuf , + + +-- ** webViewUndo + WebViewUndoMethodInfo , + webViewUndo , + + +-- ** webViewUnmarkTextMatches + WebViewUnmarkTextMatchesMethodInfo , + webViewUnmarkTextMatches , + + +-- ** webViewZoomIn + WebViewZoomInMethodInfo , + webViewZoomIn , + + +-- ** webViewZoomOut + WebViewZoomOutMethodInfo , + webViewZoomOut , + + + + + -- * Properties +-- ** CopyTargetList + WebViewCopyTargetListPropertyInfo , + getWebViewCopyTargetList , + + +-- ** CustomEncoding + WebViewCustomEncodingPropertyInfo , + constructWebViewCustomEncoding , + getWebViewCustomEncoding , + setWebViewCustomEncoding , + + +-- ** Editable + WebViewEditablePropertyInfo , + constructWebViewEditable , + getWebViewEditable , + setWebViewEditable , + + +-- ** Encoding + WebViewEncodingPropertyInfo , + getWebViewEncoding , + + +-- ** FullContentZoom + WebViewFullContentZoomPropertyInfo , + constructWebViewFullContentZoom , + getWebViewFullContentZoom , + setWebViewFullContentZoom , + + +-- ** IconUri + WebViewIconUriPropertyInfo , + getWebViewIconUri , + + +-- ** ImContext + WebViewImContextPropertyInfo , + getWebViewImContext , + + +-- ** LoadStatus + WebViewLoadStatusPropertyInfo , + getWebViewLoadStatus , + + +-- ** PasteTargetList + WebViewPasteTargetListPropertyInfo , + getWebViewPasteTargetList , + + +-- ** Progress + WebViewProgressPropertyInfo , + getWebViewProgress , + + +-- ** SelfScrolling + WebViewSelfScrollingPropertyInfo , + constructWebViewSelfScrolling , + getWebViewSelfScrolling , + + +-- ** Settings + WebViewSettingsPropertyInfo , + constructWebViewSettings , + getWebViewSettings , + setWebViewSettings , + + +-- ** Title + WebViewTitlePropertyInfo , + getWebViewTitle , + + +-- ** Transparent + WebViewTransparentPropertyInfo , + constructWebViewTransparent , + getWebViewTransparent , + setWebViewTransparent , + + +-- ** Uri + WebViewUriPropertyInfo , + getWebViewUri , + + +-- ** ViewMode + WebViewViewModePropertyInfo , + constructWebViewViewMode , + getWebViewViewMode , + setWebViewViewMode , + + +-- ** ViewportAttributes + WebViewViewportAttributesPropertyInfo , + getWebViewViewportAttributes , + + +-- ** WebInspector + WebViewWebInspectorPropertyInfo , + getWebViewWebInspector , + + +-- ** WindowFeatures + WebViewWindowFeaturesPropertyInfo , + constructWebViewWindowFeatures , + getWebViewWindowFeatures , + setWebViewWindowFeatures , + + +-- ** ZoomLevel + WebViewZoomLevelPropertyInfo , + constructWebViewZoomLevel , + getWebViewZoomLevel , + setWebViewZoomLevel , + + + + + -- * Signals +-- ** CloseWebView + WebViewCloseWebViewCallback , + WebViewCloseWebViewCallbackC , + WebViewCloseWebViewSignalInfo , + afterWebViewCloseWebView , + mkWebViewCloseWebViewCallback , + noWebViewCloseWebViewCallback , + onWebViewCloseWebView , + webViewCloseWebViewCallbackWrapper , + webViewCloseWebViewClosure , + + +-- ** ConsoleMessage + WebViewConsoleMessageCallback , + WebViewConsoleMessageCallbackC , + WebViewConsoleMessageSignalInfo , + afterWebViewConsoleMessage , + mkWebViewConsoleMessageCallback , + noWebViewConsoleMessageCallback , + onWebViewConsoleMessage , + webViewConsoleMessageCallbackWrapper , + webViewConsoleMessageClosure , + + +-- ** ContextMenu + WebViewContextMenuCallback , + WebViewContextMenuCallbackC , + WebViewContextMenuSignalInfo , + afterWebViewContextMenu , + mkWebViewContextMenuCallback , + noWebViewContextMenuCallback , + onWebViewContextMenu , + webViewContextMenuCallbackWrapper , + webViewContextMenuClosure , + + +-- ** CopyClipboard + WebViewCopyClipboardCallback , + WebViewCopyClipboardCallbackC , + WebViewCopyClipboardSignalInfo , + afterWebViewCopyClipboard , + mkWebViewCopyClipboardCallback , + noWebViewCopyClipboardCallback , + onWebViewCopyClipboard , + webViewCopyClipboardCallbackWrapper , + webViewCopyClipboardClosure , + + +-- ** CreatePluginWidget + WebViewCreatePluginWidgetCallback , + WebViewCreatePluginWidgetCallbackC , + WebViewCreatePluginWidgetSignalInfo , + afterWebViewCreatePluginWidget , + mkWebViewCreatePluginWidgetCallback , + noWebViewCreatePluginWidgetCallback , + onWebViewCreatePluginWidget , + webViewCreatePluginWidgetCallbackWrapper, + webViewCreatePluginWidgetClosure , + + +-- ** CreateWebView + WebViewCreateWebViewCallback , + WebViewCreateWebViewCallbackC , + WebViewCreateWebViewSignalInfo , + afterWebViewCreateWebView , + mkWebViewCreateWebViewCallback , + noWebViewCreateWebViewCallback , + onWebViewCreateWebView , + webViewCreateWebViewCallbackWrapper , + webViewCreateWebViewClosure , + + +-- ** CutClipboard + WebViewCutClipboardCallback , + WebViewCutClipboardCallbackC , + WebViewCutClipboardSignalInfo , + afterWebViewCutClipboard , + mkWebViewCutClipboardCallback , + noWebViewCutClipboardCallback , + onWebViewCutClipboard , + webViewCutClipboardCallbackWrapper , + webViewCutClipboardClosure , + + +-- ** DatabaseQuotaExceeded + WebViewDatabaseQuotaExceededCallback , + WebViewDatabaseQuotaExceededCallbackC , + WebViewDatabaseQuotaExceededSignalInfo , + afterWebViewDatabaseQuotaExceeded , + mkWebViewDatabaseQuotaExceededCallback , + noWebViewDatabaseQuotaExceededCallback , + onWebViewDatabaseQuotaExceeded , + webViewDatabaseQuotaExceededCallbackWrapper, + webViewDatabaseQuotaExceededClosure , + + +-- ** DocumentLoadFinished + WebViewDocumentLoadFinishedCallback , + WebViewDocumentLoadFinishedCallbackC , + WebViewDocumentLoadFinishedSignalInfo , + afterWebViewDocumentLoadFinished , + mkWebViewDocumentLoadFinishedCallback , + noWebViewDocumentLoadFinishedCallback , + onWebViewDocumentLoadFinished , + webViewDocumentLoadFinishedCallbackWrapper, + webViewDocumentLoadFinishedClosure , + + +-- ** DownloadRequested + WebViewDownloadRequestedCallback , + WebViewDownloadRequestedCallbackC , + WebViewDownloadRequestedSignalInfo , + afterWebViewDownloadRequested , + mkWebViewDownloadRequestedCallback , + noWebViewDownloadRequestedCallback , + onWebViewDownloadRequested , + webViewDownloadRequestedCallbackWrapper , + webViewDownloadRequestedClosure , + + +-- ** EditingBegan + WebViewEditingBeganCallback , + WebViewEditingBeganCallbackC , + WebViewEditingBeganSignalInfo , + afterWebViewEditingBegan , + mkWebViewEditingBeganCallback , + noWebViewEditingBeganCallback , + onWebViewEditingBegan , + webViewEditingBeganCallbackWrapper , + webViewEditingBeganClosure , + + +-- ** EditingEnded + WebViewEditingEndedCallback , + WebViewEditingEndedCallbackC , + WebViewEditingEndedSignalInfo , + afterWebViewEditingEnded , + mkWebViewEditingEndedCallback , + noWebViewEditingEndedCallback , + onWebViewEditingEnded , + webViewEditingEndedCallbackWrapper , + webViewEditingEndedClosure , + + +-- ** EnteringFullscreen + WebViewEnteringFullscreenCallback , + WebViewEnteringFullscreenCallbackC , + WebViewEnteringFullscreenSignalInfo , + afterWebViewEnteringFullscreen , + mkWebViewEnteringFullscreenCallback , + noWebViewEnteringFullscreenCallback , + onWebViewEnteringFullscreen , + webViewEnteringFullscreenCallbackWrapper, + webViewEnteringFullscreenClosure , + + +-- ** FrameCreated + WebViewFrameCreatedCallback , + WebViewFrameCreatedCallbackC , + WebViewFrameCreatedSignalInfo , + afterWebViewFrameCreated , + mkWebViewFrameCreatedCallback , + noWebViewFrameCreatedCallback , + onWebViewFrameCreated , + webViewFrameCreatedCallbackWrapper , + webViewFrameCreatedClosure , + + +-- ** GeolocationPolicyDecisionCancelled + WebViewGeolocationPolicyDecisionCancelledCallback, + WebViewGeolocationPolicyDecisionCancelledCallbackC, + WebViewGeolocationPolicyDecisionCancelledSignalInfo, + afterWebViewGeolocationPolicyDecisionCancelled, + mkWebViewGeolocationPolicyDecisionCancelledCallback, + noWebViewGeolocationPolicyDecisionCancelledCallback, + onWebViewGeolocationPolicyDecisionCancelled, + webViewGeolocationPolicyDecisionCancelledCallbackWrapper, + webViewGeolocationPolicyDecisionCancelledClosure, + + +-- ** GeolocationPolicyDecisionRequested + WebViewGeolocationPolicyDecisionRequestedCallback, + WebViewGeolocationPolicyDecisionRequestedCallbackC, + WebViewGeolocationPolicyDecisionRequestedSignalInfo, + afterWebViewGeolocationPolicyDecisionRequested, + mkWebViewGeolocationPolicyDecisionRequestedCallback, + noWebViewGeolocationPolicyDecisionRequestedCallback, + onWebViewGeolocationPolicyDecisionRequested, + webViewGeolocationPolicyDecisionRequestedCallbackWrapper, + webViewGeolocationPolicyDecisionRequestedClosure, + + +-- ** HoveringOverLink + WebViewHoveringOverLinkCallback , + WebViewHoveringOverLinkCallbackC , + WebViewHoveringOverLinkSignalInfo , + afterWebViewHoveringOverLink , + mkWebViewHoveringOverLinkCallback , + noWebViewHoveringOverLinkCallback , + onWebViewHoveringOverLink , + webViewHoveringOverLinkCallbackWrapper , + webViewHoveringOverLinkClosure , + + +-- ** IconLoaded + WebViewIconLoadedCallback , + WebViewIconLoadedCallbackC , + WebViewIconLoadedSignalInfo , + afterWebViewIconLoaded , + mkWebViewIconLoadedCallback , + noWebViewIconLoadedCallback , + onWebViewIconLoaded , + webViewIconLoadedCallbackWrapper , + webViewIconLoadedClosure , + + +-- ** LeavingFullscreen + WebViewLeavingFullscreenCallback , + WebViewLeavingFullscreenCallbackC , + WebViewLeavingFullscreenSignalInfo , + afterWebViewLeavingFullscreen , + mkWebViewLeavingFullscreenCallback , + noWebViewLeavingFullscreenCallback , + onWebViewLeavingFullscreen , + webViewLeavingFullscreenCallbackWrapper , + webViewLeavingFullscreenClosure , + + +-- ** LoadCommitted + WebViewLoadCommittedCallback , + WebViewLoadCommittedCallbackC , + WebViewLoadCommittedSignalInfo , + afterWebViewLoadCommitted , + mkWebViewLoadCommittedCallback , + noWebViewLoadCommittedCallback , + onWebViewLoadCommitted , + webViewLoadCommittedCallbackWrapper , + webViewLoadCommittedClosure , + + +-- ** LoadError + WebViewLoadErrorCallback , + WebViewLoadErrorCallbackC , + WebViewLoadErrorSignalInfo , + afterWebViewLoadError , + mkWebViewLoadErrorCallback , + noWebViewLoadErrorCallback , + onWebViewLoadError , + webViewLoadErrorCallbackWrapper , + webViewLoadErrorClosure , + + +-- ** LoadFinished + WebViewLoadFinishedCallback , + WebViewLoadFinishedCallbackC , + WebViewLoadFinishedSignalInfo , + afterWebViewLoadFinished , + mkWebViewLoadFinishedCallback , + noWebViewLoadFinishedCallback , + onWebViewLoadFinished , + webViewLoadFinishedCallbackWrapper , + webViewLoadFinishedClosure , + + +-- ** LoadProgressChanged + WebViewLoadProgressChangedCallback , + WebViewLoadProgressChangedCallbackC , + WebViewLoadProgressChangedSignalInfo , + afterWebViewLoadProgressChanged , + mkWebViewLoadProgressChangedCallback , + noWebViewLoadProgressChangedCallback , + onWebViewLoadProgressChanged , + webViewLoadProgressChangedCallbackWrapper, + webViewLoadProgressChangedClosure , + + +-- ** LoadStarted + WebViewLoadStartedCallback , + WebViewLoadStartedCallbackC , + WebViewLoadStartedSignalInfo , + afterWebViewLoadStarted , + mkWebViewLoadStartedCallback , + noWebViewLoadStartedCallback , + onWebViewLoadStarted , + webViewLoadStartedCallbackWrapper , + webViewLoadStartedClosure , + + +-- ** MimeTypePolicyDecisionRequested + WebViewMimeTypePolicyDecisionRequestedCallback, + WebViewMimeTypePolicyDecisionRequestedCallbackC, + WebViewMimeTypePolicyDecisionRequestedSignalInfo, + afterWebViewMimeTypePolicyDecisionRequested, + mkWebViewMimeTypePolicyDecisionRequestedCallback, + noWebViewMimeTypePolicyDecisionRequestedCallback, + onWebViewMimeTypePolicyDecisionRequested, + webViewMimeTypePolicyDecisionRequestedCallbackWrapper, + webViewMimeTypePolicyDecisionRequestedClosure, + + +-- ** MoveCursor + WebViewMoveCursorCallback , + WebViewMoveCursorCallbackC , + WebViewMoveCursorSignalInfo , + afterWebViewMoveCursor , + mkWebViewMoveCursorCallback , + noWebViewMoveCursorCallback , + onWebViewMoveCursor , + webViewMoveCursorCallbackWrapper , + webViewMoveCursorClosure , + + +-- ** NavigationPolicyDecisionRequested + WebViewNavigationPolicyDecisionRequestedCallback, + WebViewNavigationPolicyDecisionRequestedCallbackC, + WebViewNavigationPolicyDecisionRequestedSignalInfo, + afterWebViewNavigationPolicyDecisionRequested, + mkWebViewNavigationPolicyDecisionRequestedCallback, + noWebViewNavigationPolicyDecisionRequestedCallback, + onWebViewNavigationPolicyDecisionRequested, + webViewNavigationPolicyDecisionRequestedCallbackWrapper, + webViewNavigationPolicyDecisionRequestedClosure, + + +-- ** NavigationRequested + WebViewNavigationRequestedCallback , + WebViewNavigationRequestedCallbackC , + WebViewNavigationRequestedSignalInfo , + afterWebViewNavigationRequested , + mkWebViewNavigationRequestedCallback , + noWebViewNavigationRequestedCallback , + onWebViewNavigationRequested , + webViewNavigationRequestedCallbackWrapper, + webViewNavigationRequestedClosure , + + +-- ** NewWindowPolicyDecisionRequested + WebViewNewWindowPolicyDecisionRequestedCallback, + WebViewNewWindowPolicyDecisionRequestedCallbackC, + WebViewNewWindowPolicyDecisionRequestedSignalInfo, + afterWebViewNewWindowPolicyDecisionRequested, + mkWebViewNewWindowPolicyDecisionRequestedCallback, + noWebViewNewWindowPolicyDecisionRequestedCallback, + onWebViewNewWindowPolicyDecisionRequested, + webViewNewWindowPolicyDecisionRequestedCallbackWrapper, + webViewNewWindowPolicyDecisionRequestedClosure, + + +-- ** OnloadEvent + WebViewOnloadEventCallback , + WebViewOnloadEventCallbackC , + WebViewOnloadEventSignalInfo , + afterWebViewOnloadEvent , + mkWebViewOnloadEventCallback , + noWebViewOnloadEventCallback , + onWebViewOnloadEvent , + webViewOnloadEventCallbackWrapper , + webViewOnloadEventClosure , + + +-- ** PasteClipboard + WebViewPasteClipboardCallback , + WebViewPasteClipboardCallbackC , + WebViewPasteClipboardSignalInfo , + afterWebViewPasteClipboard , + mkWebViewPasteClipboardCallback , + noWebViewPasteClipboardCallback , + onWebViewPasteClipboard , + webViewPasteClipboardCallbackWrapper , + webViewPasteClipboardClosure , + + +-- ** PopulatePopup + WebViewPopulatePopupCallback , + WebViewPopulatePopupCallbackC , + WebViewPopulatePopupSignalInfo , + afterWebViewPopulatePopup , + mkWebViewPopulatePopupCallback , + noWebViewPopulatePopupCallback , + onWebViewPopulatePopup , + webViewPopulatePopupCallbackWrapper , + webViewPopulatePopupClosure , + + +-- ** PrintRequested + WebViewPrintRequestedCallback , + WebViewPrintRequestedCallbackC , + WebViewPrintRequestedSignalInfo , + afterWebViewPrintRequested , + mkWebViewPrintRequestedCallback , + noWebViewPrintRequestedCallback , + onWebViewPrintRequested , + webViewPrintRequestedCallbackWrapper , + webViewPrintRequestedClosure , + + +-- ** Redo + WebViewRedoCallback , + WebViewRedoCallbackC , + WebViewRedoSignalInfo , + afterWebViewRedo , + mkWebViewRedoCallback , + noWebViewRedoCallback , + onWebViewRedo , + webViewRedoCallbackWrapper , + webViewRedoClosure , + + +-- ** ResourceContentLengthReceived + WebViewResourceContentLengthReceivedCallback, + WebViewResourceContentLengthReceivedCallbackC, + WebViewResourceContentLengthReceivedSignalInfo, + afterWebViewResourceContentLengthReceived, + mkWebViewResourceContentLengthReceivedCallback, + noWebViewResourceContentLengthReceivedCallback, + onWebViewResourceContentLengthReceived , + webViewResourceContentLengthReceivedCallbackWrapper, + webViewResourceContentLengthReceivedClosure, + + +-- ** ResourceLoadFailed + WebViewResourceLoadFailedCallback , + WebViewResourceLoadFailedCallbackC , + WebViewResourceLoadFailedSignalInfo , + afterWebViewResourceLoadFailed , + mkWebViewResourceLoadFailedCallback , + noWebViewResourceLoadFailedCallback , + onWebViewResourceLoadFailed , + webViewResourceLoadFailedCallbackWrapper, + webViewResourceLoadFailedClosure , + + +-- ** ResourceLoadFinished + WebViewResourceLoadFinishedCallback , + WebViewResourceLoadFinishedCallbackC , + WebViewResourceLoadFinishedSignalInfo , + afterWebViewResourceLoadFinished , + mkWebViewResourceLoadFinishedCallback , + noWebViewResourceLoadFinishedCallback , + onWebViewResourceLoadFinished , + webViewResourceLoadFinishedCallbackWrapper, + webViewResourceLoadFinishedClosure , + + +-- ** ResourceRequestStarting + WebViewResourceRequestStartingCallback , + WebViewResourceRequestStartingCallbackC , + WebViewResourceRequestStartingSignalInfo, + afterWebViewResourceRequestStarting , + mkWebViewResourceRequestStartingCallback, + noWebViewResourceRequestStartingCallback, + onWebViewResourceRequestStarting , + webViewResourceRequestStartingCallbackWrapper, + webViewResourceRequestStartingClosure , + + +-- ** ResourceResponseReceived + WebViewResourceResponseReceivedCallback , + WebViewResourceResponseReceivedCallbackC, + WebViewResourceResponseReceivedSignalInfo, + afterWebViewResourceResponseReceived , + mkWebViewResourceResponseReceivedCallback, + noWebViewResourceResponseReceivedCallback, + onWebViewResourceResponseReceived , + webViewResourceResponseReceivedCallbackWrapper, + webViewResourceResponseReceivedClosure , + + +-- ** RunFileChooser + WebViewRunFileChooserCallback , + WebViewRunFileChooserCallbackC , + WebViewRunFileChooserSignalInfo , + afterWebViewRunFileChooser , + mkWebViewRunFileChooserCallback , + noWebViewRunFileChooserCallback , + onWebViewRunFileChooser , + webViewRunFileChooserCallbackWrapper , + webViewRunFileChooserClosure , + + +-- ** ScriptAlert + WebViewScriptAlertCallback , + WebViewScriptAlertCallbackC , + WebViewScriptAlertSignalInfo , + afterWebViewScriptAlert , + mkWebViewScriptAlertCallback , + noWebViewScriptAlertCallback , + onWebViewScriptAlert , + webViewScriptAlertCallbackWrapper , + webViewScriptAlertClosure , + + +-- ** ScriptConfirm + WebViewScriptConfirmCallback , + WebViewScriptConfirmCallbackC , + WebViewScriptConfirmSignalInfo , + afterWebViewScriptConfirm , + mkWebViewScriptConfirmCallback , + noWebViewScriptConfirmCallback , + onWebViewScriptConfirm , + webViewScriptConfirmCallbackWrapper , + webViewScriptConfirmClosure , + + +-- ** ScriptPrompt + WebViewScriptPromptCallback , + WebViewScriptPromptCallbackC , + WebViewScriptPromptSignalInfo , + afterWebViewScriptPrompt , + mkWebViewScriptPromptCallback , + noWebViewScriptPromptCallback , + onWebViewScriptPrompt , + webViewScriptPromptCallbackWrapper , + webViewScriptPromptClosure , + + +-- ** SelectAll + WebViewSelectAllCallback , + WebViewSelectAllCallbackC , + WebViewSelectAllSignalInfo , + afterWebViewSelectAll , + mkWebViewSelectAllCallback , + noWebViewSelectAllCallback , + onWebViewSelectAll , + webViewSelectAllCallbackWrapper , + webViewSelectAllClosure , + + +-- ** SelectionChanged + WebViewSelectionChangedCallback , + WebViewSelectionChangedCallbackC , + WebViewSelectionChangedSignalInfo , + afterWebViewSelectionChanged , + mkWebViewSelectionChangedCallback , + noWebViewSelectionChangedCallback , + onWebViewSelectionChanged , + webViewSelectionChangedCallbackWrapper , + webViewSelectionChangedClosure , + + +-- ** ShouldApplyStyle + WebViewShouldApplyStyleCallback , + WebViewShouldApplyStyleCallbackC , + WebViewShouldApplyStyleSignalInfo , + afterWebViewShouldApplyStyle , + mkWebViewShouldApplyStyleCallback , + noWebViewShouldApplyStyleCallback , + onWebViewShouldApplyStyle , + webViewShouldApplyStyleCallbackWrapper , + webViewShouldApplyStyleClosure , + + +-- ** ShouldBeginEditing + WebViewShouldBeginEditingCallback , + WebViewShouldBeginEditingCallbackC , + WebViewShouldBeginEditingSignalInfo , + afterWebViewShouldBeginEditing , + mkWebViewShouldBeginEditingCallback , + noWebViewShouldBeginEditingCallback , + onWebViewShouldBeginEditing , + webViewShouldBeginEditingCallbackWrapper, + webViewShouldBeginEditingClosure , + + +-- ** ShouldChangeSelectedRange + WebViewShouldChangeSelectedRangeCallback, + WebViewShouldChangeSelectedRangeCallbackC, + WebViewShouldChangeSelectedRangeSignalInfo, + afterWebViewShouldChangeSelectedRange , + mkWebViewShouldChangeSelectedRangeCallback, + noWebViewShouldChangeSelectedRangeCallback, + onWebViewShouldChangeSelectedRange , + webViewShouldChangeSelectedRangeCallbackWrapper, + webViewShouldChangeSelectedRangeClosure , + + +-- ** ShouldDeleteRange + WebViewShouldDeleteRangeCallback , + WebViewShouldDeleteRangeCallbackC , + WebViewShouldDeleteRangeSignalInfo , + afterWebViewShouldDeleteRange , + mkWebViewShouldDeleteRangeCallback , + noWebViewShouldDeleteRangeCallback , + onWebViewShouldDeleteRange , + webViewShouldDeleteRangeCallbackWrapper , + webViewShouldDeleteRangeClosure , + + +-- ** ShouldEndEditing + WebViewShouldEndEditingCallback , + WebViewShouldEndEditingCallbackC , + WebViewShouldEndEditingSignalInfo , + afterWebViewShouldEndEditing , + mkWebViewShouldEndEditingCallback , + noWebViewShouldEndEditingCallback , + onWebViewShouldEndEditing , + webViewShouldEndEditingCallbackWrapper , + webViewShouldEndEditingClosure , + + +-- ** ShouldInsertNode + WebViewShouldInsertNodeCallback , + WebViewShouldInsertNodeCallbackC , + WebViewShouldInsertNodeSignalInfo , + afterWebViewShouldInsertNode , + mkWebViewShouldInsertNodeCallback , + noWebViewShouldInsertNodeCallback , + onWebViewShouldInsertNode , + webViewShouldInsertNodeCallbackWrapper , + webViewShouldInsertNodeClosure , + + +-- ** ShouldInsertText + WebViewShouldInsertTextCallback , + WebViewShouldInsertTextCallbackC , + WebViewShouldInsertTextSignalInfo , + afterWebViewShouldInsertText , + mkWebViewShouldInsertTextCallback , + noWebViewShouldInsertTextCallback , + onWebViewShouldInsertText , + webViewShouldInsertTextCallbackWrapper , + webViewShouldInsertTextClosure , + + +-- ** ShouldShowDeleteInterfaceForElement + WebViewShouldShowDeleteInterfaceForElementCallback, + WebViewShouldShowDeleteInterfaceForElementCallbackC, + WebViewShouldShowDeleteInterfaceForElementSignalInfo, + afterWebViewShouldShowDeleteInterfaceForElement, + mkWebViewShouldShowDeleteInterfaceForElementCallback, + noWebViewShouldShowDeleteInterfaceForElementCallback, + onWebViewShouldShowDeleteInterfaceForElement, + webViewShouldShowDeleteInterfaceForElementCallbackWrapper, + webViewShouldShowDeleteInterfaceForElementClosure, + + +-- ** StatusBarTextChanged + WebViewStatusBarTextChangedCallback , + WebViewStatusBarTextChangedCallbackC , + WebViewStatusBarTextChangedSignalInfo , + afterWebViewStatusBarTextChanged , + mkWebViewStatusBarTextChangedCallback , + noWebViewStatusBarTextChangedCallback , + onWebViewStatusBarTextChanged , + webViewStatusBarTextChangedCallbackWrapper, + webViewStatusBarTextChangedClosure , + + +-- ** TitleChanged + WebViewTitleChangedCallback , + WebViewTitleChangedCallbackC , + WebViewTitleChangedSignalInfo , + afterWebViewTitleChanged , + mkWebViewTitleChangedCallback , + noWebViewTitleChangedCallback , + onWebViewTitleChanged , + webViewTitleChangedCallbackWrapper , + webViewTitleChangedClosure , + + +-- ** Undo + WebViewUndoCallback , + WebViewUndoCallbackC , + WebViewUndoSignalInfo , + afterWebViewUndo , + mkWebViewUndoCallback , + noWebViewUndoCallback , + onWebViewUndo , + webViewUndoCallbackWrapper , + webViewUndoClosure , + + +-- ** UserChangedContents + WebViewUserChangedContentsCallback , + WebViewUserChangedContentsCallbackC , + WebViewUserChangedContentsSignalInfo , + afterWebViewUserChangedContents , + mkWebViewUserChangedContentsCallback , + noWebViewUserChangedContentsCallback , + onWebViewUserChangedContents , + webViewUserChangedContentsCallbackWrapper, + webViewUserChangedContentsClosure , + + +-- ** ViewportAttributesChanged + WebViewViewportAttributesChangedCallback, + WebViewViewportAttributesChangedCallbackC, + WebViewViewportAttributesChangedSignalInfo, + afterWebViewViewportAttributesChanged , + mkWebViewViewportAttributesChangedCallback, + noWebViewViewportAttributesChangedCallback, + onWebViewViewportAttributesChanged , + webViewViewportAttributesChangedCallbackWrapper, + webViewViewportAttributesChangedClosure , + + +-- ** ViewportAttributesRecomputeRequested + WebViewViewportAttributesRecomputeRequestedCallback, + WebViewViewportAttributesRecomputeRequestedCallbackC, + WebViewViewportAttributesRecomputeRequestedSignalInfo, + afterWebViewViewportAttributesRecomputeRequested, + mkWebViewViewportAttributesRecomputeRequestedCallback, + noWebViewViewportAttributesRecomputeRequestedCallback, + onWebViewViewportAttributesRecomputeRequested, + webViewViewportAttributesRecomputeRequestedCallbackWrapper, + webViewViewportAttributesRecomputeRequestedClosure, + + +-- ** WebViewReady + WebViewWebViewReadyCallback , + WebViewWebViewReadyCallbackC , + WebViewWebViewReadySignalInfo , + afterWebViewWebViewReady , + mkWebViewWebViewReadyCallback , + noWebViewWebViewReadyCallback , + onWebViewWebViewReady , + webViewWebViewReadyCallbackWrapper , + webViewWebViewReadyClosure , + + +-- ** WindowObjectCleared + WebViewWindowObjectClearedCallback , + WebViewWindowObjectClearedCallbackC , + WebViewWindowObjectClearedSignalInfo , + afterWebViewWindowObjectCleared , + mkWebViewWindowObjectClearedCallback , + noWebViewWindowObjectClearedCallback , + onWebViewWindowObjectCleared , + webViewWindowObjectClearedCallbackWrapper, + webViewWindowObjectClearedClosure , + + + + + ) where + +import Prelude () +import Data.GI.Base.ShortPrelude + +import qualified Data.Text as T +import qualified Data.ByteString.Char8 as B +import qualified Data.Map as Map + +import GI.WebKit.Types +import GI.WebKit.Callbacks +import qualified GI.Atk as Atk +import qualified GI.GObject as GObject +import qualified GI.Gdk as Gdk +import qualified GI.GdkPixbuf as GdkPixbuf +import qualified GI.Gtk as Gtk +import qualified GI.Cairo as Cairo + +newtype WebView = WebView (ForeignPtr WebView) +foreign import ccall "webkit_web_view_get_type" + c_webkit_web_view_get_type :: IO GType + +type instance ParentTypes WebView = WebViewParentTypes +type WebViewParentTypes = '[Gtk.Container, Gtk.Widget, GObject.Object, Atk.ImplementorIface, Gtk.Buildable, Gtk.Scrollable] + +instance GObject WebView where + gobjectIsInitiallyUnowned _ = True + gobjectType _ = c_webkit_web_view_get_type + + +class GObject o => WebViewK o +instance (GObject o, IsDescendantOf WebView o) => WebViewK o + +toWebView :: WebViewK o => o -> IO WebView +toWebView = unsafeCastTo WebView + +noWebView :: Maybe WebView +noWebView = Nothing + +type family ResolveWebViewMethod (t :: Symbol) (o :: *) :: * where + ResolveWebViewMethod "activate" o = Gtk.WidgetActivateMethodInfo + ResolveWebViewMethod "add" o = Gtk.ContainerAddMethodInfo + ResolveWebViewMethod "addAccelerator" o = Gtk.WidgetAddAcceleratorMethodInfo + ResolveWebViewMethod "addChild" o = Gtk.BuildableAddChildMethodInfo + ResolveWebViewMethod "addDeviceEvents" o = Gtk.WidgetAddDeviceEventsMethodInfo + ResolveWebViewMethod "addEvents" o = Gtk.WidgetAddEventsMethodInfo + ResolveWebViewMethod "addMnemonicLabel" o = Gtk.WidgetAddMnemonicLabelMethodInfo + ResolveWebViewMethod "addTickCallback" o = Gtk.WidgetAddTickCallbackMethodInfo + ResolveWebViewMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebViewMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebViewMethod "canActivateAccel" o = Gtk.WidgetCanActivateAccelMethodInfo + ResolveWebViewMethod "canCopyClipboard" o = WebViewCanCopyClipboardMethodInfo + ResolveWebViewMethod "canCutClipboard" o = WebViewCanCutClipboardMethodInfo + ResolveWebViewMethod "canGoBack" o = WebViewCanGoBackMethodInfo + ResolveWebViewMethod "canGoBackOrForward" o = WebViewCanGoBackOrForwardMethodInfo + ResolveWebViewMethod "canGoForward" o = WebViewCanGoForwardMethodInfo + ResolveWebViewMethod "canPasteClipboard" o = WebViewCanPasteClipboardMethodInfo + ResolveWebViewMethod "canRedo" o = WebViewCanRedoMethodInfo + ResolveWebViewMethod "canShowMimeType" o = WebViewCanShowMimeTypeMethodInfo + ResolveWebViewMethod "canUndo" o = WebViewCanUndoMethodInfo + ResolveWebViewMethod "checkResize" o = Gtk.ContainerCheckResizeMethodInfo + ResolveWebViewMethod "childFocus" o = Gtk.WidgetChildFocusMethodInfo + ResolveWebViewMethod "childGetProperty" o = Gtk.ContainerChildGetPropertyMethodInfo + ResolveWebViewMethod "childNotifyByPspec" o = Gtk.ContainerChildNotifyByPspecMethodInfo + ResolveWebViewMethod "childSetProperty" o = Gtk.ContainerChildSetPropertyMethodInfo + ResolveWebViewMethod "childType" o = Gtk.ContainerChildTypeMethodInfo + ResolveWebViewMethod "classPath" o = Gtk.WidgetClassPathMethodInfo + ResolveWebViewMethod "computeExpand" o = Gtk.WidgetComputeExpandMethodInfo + ResolveWebViewMethod "constructChild" o = Gtk.BuildableConstructChildMethodInfo + ResolveWebViewMethod "copyClipboard" o = WebViewCopyClipboardMethodInfo + ResolveWebViewMethod "createPangoContext" o = Gtk.WidgetCreatePangoContextMethodInfo + ResolveWebViewMethod "createPangoLayout" o = Gtk.WidgetCreatePangoLayoutMethodInfo + ResolveWebViewMethod "customFinished" o = Gtk.BuildableCustomFinishedMethodInfo + ResolveWebViewMethod "customTagEnd" o = Gtk.BuildableCustomTagEndMethodInfo + ResolveWebViewMethod "customTagStart" o = Gtk.BuildableCustomTagStartMethodInfo + ResolveWebViewMethod "cutClipboard" o = WebViewCutClipboardMethodInfo + ResolveWebViewMethod "deleteSelection" o = WebViewDeleteSelectionMethodInfo + ResolveWebViewMethod "destroy" o = Gtk.WidgetDestroyMethodInfo + ResolveWebViewMethod "destroyed" o = Gtk.WidgetDestroyedMethodInfo + ResolveWebViewMethod "deviceIsShadowed" o = Gtk.WidgetDeviceIsShadowedMethodInfo + ResolveWebViewMethod "dragBegin" o = Gtk.WidgetDragBeginMethodInfo + ResolveWebViewMethod "dragBeginWithCoordinates" o = Gtk.WidgetDragBeginWithCoordinatesMethodInfo + ResolveWebViewMethod "dragCheckThreshold" o = Gtk.WidgetDragCheckThresholdMethodInfo + ResolveWebViewMethod "dragDestAddImageTargets" o = Gtk.WidgetDragDestAddImageTargetsMethodInfo + ResolveWebViewMethod "dragDestAddTextTargets" o = Gtk.WidgetDragDestAddTextTargetsMethodInfo + ResolveWebViewMethod "dragDestAddUriTargets" o = Gtk.WidgetDragDestAddUriTargetsMethodInfo + ResolveWebViewMethod "dragDestFindTarget" o = Gtk.WidgetDragDestFindTargetMethodInfo + ResolveWebViewMethod "dragDestGetTargetList" o = Gtk.WidgetDragDestGetTargetListMethodInfo + ResolveWebViewMethod "dragDestGetTrackMotion" o = Gtk.WidgetDragDestGetTrackMotionMethodInfo + ResolveWebViewMethod "dragDestSet" o = Gtk.WidgetDragDestSetMethodInfo + ResolveWebViewMethod "dragDestSetProxy" o = Gtk.WidgetDragDestSetProxyMethodInfo + ResolveWebViewMethod "dragDestSetTargetList" o = Gtk.WidgetDragDestSetTargetListMethodInfo + ResolveWebViewMethod "dragDestSetTrackMotion" o = Gtk.WidgetDragDestSetTrackMotionMethodInfo + ResolveWebViewMethod "dragDestUnset" o = Gtk.WidgetDragDestUnsetMethodInfo + ResolveWebViewMethod "dragGetData" o = Gtk.WidgetDragGetDataMethodInfo + ResolveWebViewMethod "dragHighlight" o = Gtk.WidgetDragHighlightMethodInfo + ResolveWebViewMethod "dragSourceAddImageTargets" o = Gtk.WidgetDragSourceAddImageTargetsMethodInfo + ResolveWebViewMethod "dragSourceAddTextTargets" o = Gtk.WidgetDragSourceAddTextTargetsMethodInfo + ResolveWebViewMethod "dragSourceAddUriTargets" o = Gtk.WidgetDragSourceAddUriTargetsMethodInfo + ResolveWebViewMethod "dragSourceGetTargetList" o = Gtk.WidgetDragSourceGetTargetListMethodInfo + ResolveWebViewMethod "dragSourceSet" o = Gtk.WidgetDragSourceSetMethodInfo + ResolveWebViewMethod "dragSourceSetIconGicon" o = Gtk.WidgetDragSourceSetIconGiconMethodInfo + ResolveWebViewMethod "dragSourceSetIconName" o = Gtk.WidgetDragSourceSetIconNameMethodInfo + ResolveWebViewMethod "dragSourceSetIconPixbuf" o = Gtk.WidgetDragSourceSetIconPixbufMethodInfo + ResolveWebViewMethod "dragSourceSetIconStock" o = Gtk.WidgetDragSourceSetIconStockMethodInfo + ResolveWebViewMethod "dragSourceSetTargetList" o = Gtk.WidgetDragSourceSetTargetListMethodInfo + ResolveWebViewMethod "dragSourceUnset" o = Gtk.WidgetDragSourceUnsetMethodInfo + ResolveWebViewMethod "dragUnhighlight" o = Gtk.WidgetDragUnhighlightMethodInfo + ResolveWebViewMethod "draw" o = Gtk.WidgetDrawMethodInfo + ResolveWebViewMethod "ensureStyle" o = Gtk.WidgetEnsureStyleMethodInfo + ResolveWebViewMethod "errorBell" o = Gtk.WidgetErrorBellMethodInfo + ResolveWebViewMethod "event" o = Gtk.WidgetEventMethodInfo + ResolveWebViewMethod "executeScript" o = WebViewExecuteScriptMethodInfo + ResolveWebViewMethod "forall" o = Gtk.ContainerForallMethodInfo + ResolveWebViewMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebViewMethod "foreach" o = Gtk.ContainerForeachMethodInfo + ResolveWebViewMethod "freezeChildNotify" o = Gtk.WidgetFreezeChildNotifyMethodInfo + ResolveWebViewMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebViewMethod "goBack" o = WebViewGoBackMethodInfo + ResolveWebViewMethod "goBackOrForward" o = WebViewGoBackOrForwardMethodInfo + ResolveWebViewMethod "goForward" o = WebViewGoForwardMethodInfo + ResolveWebViewMethod "goToBackForwardItem" o = WebViewGoToBackForwardItemMethodInfo + ResolveWebViewMethod "grabAdd" o = Gtk.WidgetGrabAddMethodInfo + ResolveWebViewMethod "grabDefault" o = Gtk.WidgetGrabDefaultMethodInfo + ResolveWebViewMethod "grabFocus" o = Gtk.WidgetGrabFocusMethodInfo + ResolveWebViewMethod "grabRemove" o = Gtk.WidgetGrabRemoveMethodInfo + ResolveWebViewMethod "hasDefault" o = Gtk.WidgetHasDefaultMethodInfo + ResolveWebViewMethod "hasFocus" o = Gtk.WidgetHasFocusMethodInfo + ResolveWebViewMethod "hasGrab" o = Gtk.WidgetHasGrabMethodInfo + ResolveWebViewMethod "hasRcStyle" o = Gtk.WidgetHasRcStyleMethodInfo + ResolveWebViewMethod "hasScreen" o = Gtk.WidgetHasScreenMethodInfo + ResolveWebViewMethod "hasSelection" o = WebViewHasSelectionMethodInfo + ResolveWebViewMethod "hasVisibleFocus" o = Gtk.WidgetHasVisibleFocusMethodInfo + ResolveWebViewMethod "hide" o = Gtk.WidgetHideMethodInfo + ResolveWebViewMethod "hideOnDelete" o = Gtk.WidgetHideOnDeleteMethodInfo + ResolveWebViewMethod "inDestruction" o = Gtk.WidgetInDestructionMethodInfo + ResolveWebViewMethod "initTemplate" o = Gtk.WidgetInitTemplateMethodInfo + ResolveWebViewMethod "inputShapeCombineRegion" o = Gtk.WidgetInputShapeCombineRegionMethodInfo + ResolveWebViewMethod "insertActionGroup" o = Gtk.WidgetInsertActionGroupMethodInfo + ResolveWebViewMethod "intersect" o = Gtk.WidgetIntersectMethodInfo + ResolveWebViewMethod "isAncestor" o = Gtk.WidgetIsAncestorMethodInfo + ResolveWebViewMethod "isComposited" o = Gtk.WidgetIsCompositedMethodInfo + ResolveWebViewMethod "isDrawable" o = Gtk.WidgetIsDrawableMethodInfo + ResolveWebViewMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebViewMethod "isFocus" o = Gtk.WidgetIsFocusMethodInfo + ResolveWebViewMethod "isSensitive" o = Gtk.WidgetIsSensitiveMethodInfo + ResolveWebViewMethod "isToplevel" o = Gtk.WidgetIsToplevelMethodInfo + ResolveWebViewMethod "isVisible" o = Gtk.WidgetIsVisibleMethodInfo + ResolveWebViewMethod "keynavFailed" o = Gtk.WidgetKeynavFailedMethodInfo + ResolveWebViewMethod "listAccelClosures" o = Gtk.WidgetListAccelClosuresMethodInfo + ResolveWebViewMethod "listActionPrefixes" o = Gtk.WidgetListActionPrefixesMethodInfo + ResolveWebViewMethod "listMnemonicLabels" o = Gtk.WidgetListMnemonicLabelsMethodInfo + ResolveWebViewMethod "loadHtmlString" o = WebViewLoadHtmlStringMethodInfo + ResolveWebViewMethod "loadRequest" o = WebViewLoadRequestMethodInfo + ResolveWebViewMethod "loadString" o = WebViewLoadStringMethodInfo + ResolveWebViewMethod "loadUri" o = WebViewLoadUriMethodInfo + ResolveWebViewMethod "map" o = Gtk.WidgetMapMethodInfo + ResolveWebViewMethod "markTextMatches" o = WebViewMarkTextMatchesMethodInfo + ResolveWebViewMethod "mnemonicActivate" o = Gtk.WidgetMnemonicActivateMethodInfo + ResolveWebViewMethod "modifyBase" o = Gtk.WidgetModifyBaseMethodInfo + ResolveWebViewMethod "modifyBg" o = Gtk.WidgetModifyBgMethodInfo + ResolveWebViewMethod "modifyCursor" o = Gtk.WidgetModifyCursorMethodInfo + ResolveWebViewMethod "modifyFg" o = Gtk.WidgetModifyFgMethodInfo + ResolveWebViewMethod "modifyFont" o = Gtk.WidgetModifyFontMethodInfo + ResolveWebViewMethod "modifyStyle" o = Gtk.WidgetModifyStyleMethodInfo + ResolveWebViewMethod "modifyText" o = Gtk.WidgetModifyTextMethodInfo + ResolveWebViewMethod "moveCursor" o = WebViewMoveCursorMethodInfo + ResolveWebViewMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebViewMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebViewMethod "open" o = WebViewOpenMethodInfo + ResolveWebViewMethod "overrideBackgroundColor" o = Gtk.WidgetOverrideBackgroundColorMethodInfo + ResolveWebViewMethod "overrideColor" o = Gtk.WidgetOverrideColorMethodInfo + ResolveWebViewMethod "overrideCursor" o = Gtk.WidgetOverrideCursorMethodInfo + ResolveWebViewMethod "overrideFont" o = Gtk.WidgetOverrideFontMethodInfo + ResolveWebViewMethod "overrideSymbolicColor" o = Gtk.WidgetOverrideSymbolicColorMethodInfo + ResolveWebViewMethod "parserFinished" o = Gtk.BuildableParserFinishedMethodInfo + ResolveWebViewMethod "pasteClipboard" o = WebViewPasteClipboardMethodInfo + ResolveWebViewMethod "path" o = Gtk.WidgetPathMethodInfo + ResolveWebViewMethod "propagateDraw" o = Gtk.ContainerPropagateDrawMethodInfo + ResolveWebViewMethod "queueComputeExpand" o = Gtk.WidgetQueueComputeExpandMethodInfo + ResolveWebViewMethod "queueDraw" o = Gtk.WidgetQueueDrawMethodInfo + ResolveWebViewMethod "queueDrawArea" o = Gtk.WidgetQueueDrawAreaMethodInfo + ResolveWebViewMethod "queueDrawRegion" o = Gtk.WidgetQueueDrawRegionMethodInfo + ResolveWebViewMethod "queueResize" o = Gtk.WidgetQueueResizeMethodInfo + ResolveWebViewMethod "queueResizeNoRedraw" o = Gtk.WidgetQueueResizeNoRedrawMethodInfo + ResolveWebViewMethod "realize" o = Gtk.WidgetRealizeMethodInfo + ResolveWebViewMethod "redo" o = WebViewRedoMethodInfo + ResolveWebViewMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebViewMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebViewMethod "regionIntersect" o = Gtk.WidgetRegionIntersectMethodInfo + ResolveWebViewMethod "registerWindow" o = Gtk.WidgetRegisterWindowMethodInfo + ResolveWebViewMethod "reload" o = WebViewReloadMethodInfo + ResolveWebViewMethod "reloadBypassCache" o = WebViewReloadBypassCacheMethodInfo + ResolveWebViewMethod "remove" o = Gtk.ContainerRemoveMethodInfo + ResolveWebViewMethod "removeAccelerator" o = Gtk.WidgetRemoveAcceleratorMethodInfo + ResolveWebViewMethod "removeMnemonicLabel" o = Gtk.WidgetRemoveMnemonicLabelMethodInfo + ResolveWebViewMethod "removeTickCallback" o = Gtk.WidgetRemoveTickCallbackMethodInfo + ResolveWebViewMethod "renderIcon" o = Gtk.WidgetRenderIconMethodInfo + ResolveWebViewMethod "renderIconPixbuf" o = Gtk.WidgetRenderIconPixbufMethodInfo + ResolveWebViewMethod "reparent" o = Gtk.WidgetReparentMethodInfo + ResolveWebViewMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebViewMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebViewMethod "resetRcStyles" o = Gtk.WidgetResetRcStylesMethodInfo + ResolveWebViewMethod "resetStyle" o = Gtk.WidgetResetStyleMethodInfo + ResolveWebViewMethod "resizeChildren" o = Gtk.ContainerResizeChildrenMethodInfo + ResolveWebViewMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebViewMethod "searchText" o = WebViewSearchTextMethodInfo + ResolveWebViewMethod "selectAll" o = WebViewSelectAllMethodInfo + ResolveWebViewMethod "sendExpose" o = Gtk.WidgetSendExposeMethodInfo + ResolveWebViewMethod "sendFocusChange" o = Gtk.WidgetSendFocusChangeMethodInfo + ResolveWebViewMethod "shapeCombineRegion" o = Gtk.WidgetShapeCombineRegionMethodInfo + ResolveWebViewMethod "show" o = Gtk.WidgetShowMethodInfo + ResolveWebViewMethod "showAll" o = Gtk.WidgetShowAllMethodInfo + ResolveWebViewMethod "showNow" o = Gtk.WidgetShowNowMethodInfo + ResolveWebViewMethod "sizeAllocate" o = Gtk.WidgetSizeAllocateMethodInfo + ResolveWebViewMethod "sizeAllocateWithBaseline" o = Gtk.WidgetSizeAllocateWithBaselineMethodInfo + ResolveWebViewMethod "sizeRequest" o = Gtk.WidgetSizeRequestMethodInfo + ResolveWebViewMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebViewMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebViewMethod "stopLoading" o = WebViewStopLoadingMethodInfo + ResolveWebViewMethod "styleAttach" o = Gtk.WidgetStyleAttachMethodInfo + ResolveWebViewMethod "styleGetProperty" o = Gtk.WidgetStyleGetPropertyMethodInfo + ResolveWebViewMethod "thawChildNotify" o = Gtk.WidgetThawChildNotifyMethodInfo + ResolveWebViewMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebViewMethod "translateCoordinates" o = Gtk.WidgetTranslateCoordinatesMethodInfo + ResolveWebViewMethod "triggerTooltipQuery" o = Gtk.WidgetTriggerTooltipQueryMethodInfo + ResolveWebViewMethod "tryGetFaviconPixbuf" o = WebViewTryGetFaviconPixbufMethodInfo + ResolveWebViewMethod "undo" o = WebViewUndoMethodInfo + ResolveWebViewMethod "unmap" o = Gtk.WidgetUnmapMethodInfo + ResolveWebViewMethod "unmarkTextMatches" o = WebViewUnmarkTextMatchesMethodInfo + ResolveWebViewMethod "unparent" o = Gtk.WidgetUnparentMethodInfo + ResolveWebViewMethod "unrealize" o = Gtk.WidgetUnrealizeMethodInfo + ResolveWebViewMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebViewMethod "unregisterWindow" o = Gtk.WidgetUnregisterWindowMethodInfo + ResolveWebViewMethod "unsetFocusChain" o = Gtk.ContainerUnsetFocusChainMethodInfo + ResolveWebViewMethod "unsetStateFlags" o = Gtk.WidgetUnsetStateFlagsMethodInfo + ResolveWebViewMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebViewMethod "zoomIn" o = WebViewZoomInMethodInfo + ResolveWebViewMethod "zoomOut" o = WebViewZoomOutMethodInfo + ResolveWebViewMethod "getAccessible" o = Gtk.WidgetGetAccessibleMethodInfo + ResolveWebViewMethod "getActionGroup" o = Gtk.WidgetGetActionGroupMethodInfo + ResolveWebViewMethod "getAllocatedBaseline" o = Gtk.WidgetGetAllocatedBaselineMethodInfo + ResolveWebViewMethod "getAllocatedHeight" o = Gtk.WidgetGetAllocatedHeightMethodInfo + ResolveWebViewMethod "getAllocatedWidth" o = Gtk.WidgetGetAllocatedWidthMethodInfo + ResolveWebViewMethod "getAllocation" o = Gtk.WidgetGetAllocationMethodInfo + ResolveWebViewMethod "getAncestor" o = Gtk.WidgetGetAncestorMethodInfo + ResolveWebViewMethod "getAppPaintable" o = Gtk.WidgetGetAppPaintableMethodInfo + ResolveWebViewMethod "getBackForwardList" o = WebViewGetBackForwardListMethodInfo + ResolveWebViewMethod "getBorder" o = Gtk.ScrollableGetBorderMethodInfo + ResolveWebViewMethod "getBorderWidth" o = Gtk.ContainerGetBorderWidthMethodInfo + ResolveWebViewMethod "getCanDefault" o = Gtk.WidgetGetCanDefaultMethodInfo + ResolveWebViewMethod "getCanFocus" o = Gtk.WidgetGetCanFocusMethodInfo + ResolveWebViewMethod "getChildRequisition" o = Gtk.WidgetGetChildRequisitionMethodInfo + ResolveWebViewMethod "getChildVisible" o = Gtk.WidgetGetChildVisibleMethodInfo + ResolveWebViewMethod "getChildren" o = Gtk.ContainerGetChildrenMethodInfo + ResolveWebViewMethod "getClip" o = Gtk.WidgetGetClipMethodInfo + ResolveWebViewMethod "getClipboard" o = Gtk.WidgetGetClipboardMethodInfo + ResolveWebViewMethod "getCompositeName" o = Gtk.WidgetGetCompositeNameMethodInfo + ResolveWebViewMethod "getCopyTargetList" o = WebViewGetCopyTargetListMethodInfo + ResolveWebViewMethod "getCustomEncoding" o = WebViewGetCustomEncodingMethodInfo + ResolveWebViewMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebViewMethod "getDeviceEnabled" o = Gtk.WidgetGetDeviceEnabledMethodInfo + ResolveWebViewMethod "getDeviceEvents" o = Gtk.WidgetGetDeviceEventsMethodInfo + ResolveWebViewMethod "getDirection" o = Gtk.WidgetGetDirectionMethodInfo + ResolveWebViewMethod "getDisplay" o = Gtk.WidgetGetDisplayMethodInfo + ResolveWebViewMethod "getDomDocument" o = WebViewGetDomDocumentMethodInfo + ResolveWebViewMethod "getDoubleBuffered" o = Gtk.WidgetGetDoubleBufferedMethodInfo + ResolveWebViewMethod "getEditable" o = WebViewGetEditableMethodInfo + ResolveWebViewMethod "getEncoding" o = WebViewGetEncodingMethodInfo + ResolveWebViewMethod "getEvents" o = Gtk.WidgetGetEventsMethodInfo + ResolveWebViewMethod "getFocusChain" o = Gtk.ContainerGetFocusChainMethodInfo + ResolveWebViewMethod "getFocusChild" o = Gtk.ContainerGetFocusChildMethodInfo + ResolveWebViewMethod "getFocusHadjustment" o = Gtk.ContainerGetFocusHadjustmentMethodInfo + ResolveWebViewMethod "getFocusVadjustment" o = Gtk.ContainerGetFocusVadjustmentMethodInfo + ResolveWebViewMethod "getFocusedFrame" o = WebViewGetFocusedFrameMethodInfo + ResolveWebViewMethod "getFontMap" o = Gtk.WidgetGetFontMapMethodInfo + ResolveWebViewMethod "getFontOptions" o = Gtk.WidgetGetFontOptionsMethodInfo + ResolveWebViewMethod "getFrameClock" o = Gtk.WidgetGetFrameClockMethodInfo + ResolveWebViewMethod "getFullContentZoom" o = WebViewGetFullContentZoomMethodInfo + ResolveWebViewMethod "getHadjustment" o = Gtk.ScrollableGetHadjustmentMethodInfo + ResolveWebViewMethod "getHalign" o = Gtk.WidgetGetHalignMethodInfo + ResolveWebViewMethod "getHasTooltip" o = Gtk.WidgetGetHasTooltipMethodInfo + ResolveWebViewMethod "getHasWindow" o = Gtk.WidgetGetHasWindowMethodInfo + ResolveWebViewMethod "getHexpand" o = Gtk.WidgetGetHexpandMethodInfo + ResolveWebViewMethod "getHexpandSet" o = Gtk.WidgetGetHexpandSetMethodInfo + ResolveWebViewMethod "getHitTestResult" o = WebViewGetHitTestResultMethodInfo + ResolveWebViewMethod "getHscrollPolicy" o = Gtk.ScrollableGetHscrollPolicyMethodInfo + ResolveWebViewMethod "getIconPixbuf" o = WebViewGetIconPixbufMethodInfo + ResolveWebViewMethod "getIconUri" o = WebViewGetIconUriMethodInfo + ResolveWebViewMethod "getInspector" o = WebViewGetInspectorMethodInfo + ResolveWebViewMethod "getInternalChild" o = Gtk.BuildableGetInternalChildMethodInfo + ResolveWebViewMethod "getLoadStatus" o = WebViewGetLoadStatusMethodInfo + ResolveWebViewMethod "getMainFrame" o = WebViewGetMainFrameMethodInfo + ResolveWebViewMethod "getMapped" o = Gtk.WidgetGetMappedMethodInfo + ResolveWebViewMethod "getMarginBottom" o = Gtk.WidgetGetMarginBottomMethodInfo + ResolveWebViewMethod "getMarginEnd" o = Gtk.WidgetGetMarginEndMethodInfo + ResolveWebViewMethod "getMarginLeft" o = Gtk.WidgetGetMarginLeftMethodInfo + ResolveWebViewMethod "getMarginRight" o = Gtk.WidgetGetMarginRightMethodInfo + ResolveWebViewMethod "getMarginStart" o = Gtk.WidgetGetMarginStartMethodInfo + ResolveWebViewMethod "getMarginTop" o = Gtk.WidgetGetMarginTopMethodInfo + ResolveWebViewMethod "getModifierMask" o = Gtk.WidgetGetModifierMaskMethodInfo + ResolveWebViewMethod "getModifierStyle" o = Gtk.WidgetGetModifierStyleMethodInfo + ResolveWebViewMethod "getNoShowAll" o = Gtk.WidgetGetNoShowAllMethodInfo + ResolveWebViewMethod "getOpacity" o = Gtk.WidgetGetOpacityMethodInfo + ResolveWebViewMethod "getPangoContext" o = Gtk.WidgetGetPangoContextMethodInfo + ResolveWebViewMethod "getParent" o = Gtk.WidgetGetParentMethodInfo + ResolveWebViewMethod "getParentWindow" o = Gtk.WidgetGetParentWindowMethodInfo + ResolveWebViewMethod "getPasteTargetList" o = WebViewGetPasteTargetListMethodInfo + ResolveWebViewMethod "getPath" o = Gtk.WidgetGetPathMethodInfo + ResolveWebViewMethod "getPathForChild" o = Gtk.ContainerGetPathForChildMethodInfo + ResolveWebViewMethod "getPointer" o = Gtk.WidgetGetPointerMethodInfo + ResolveWebViewMethod "getPreferredHeight" o = Gtk.WidgetGetPreferredHeightMethodInfo + ResolveWebViewMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo + ResolveWebViewMethod "getPreferredHeightForWidth" o = Gtk.WidgetGetPreferredHeightForWidthMethodInfo + ResolveWebViewMethod "getPreferredSize" o = Gtk.WidgetGetPreferredSizeMethodInfo + ResolveWebViewMethod "getPreferredWidth" o = Gtk.WidgetGetPreferredWidthMethodInfo + ResolveWebViewMethod "getPreferredWidthForHeight" o = Gtk.WidgetGetPreferredWidthForHeightMethodInfo + ResolveWebViewMethod "getProgress" o = WebViewGetProgressMethodInfo + ResolveWebViewMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebViewMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebViewMethod "getRealized" o = Gtk.WidgetGetRealizedMethodInfo + ResolveWebViewMethod "getReceivesDefault" o = Gtk.WidgetGetReceivesDefaultMethodInfo + ResolveWebViewMethod "getRequestMode" o = Gtk.WidgetGetRequestModeMethodInfo + ResolveWebViewMethod "getRequisition" o = Gtk.WidgetGetRequisitionMethodInfo + ResolveWebViewMethod "getResizeMode" o = Gtk.ContainerGetResizeModeMethodInfo + ResolveWebViewMethod "getRootWindow" o = Gtk.WidgetGetRootWindowMethodInfo + ResolveWebViewMethod "getScaleFactor" o = Gtk.WidgetGetScaleFactorMethodInfo + ResolveWebViewMethod "getScreen" o = Gtk.WidgetGetScreenMethodInfo + ResolveWebViewMethod "getSensitive" o = Gtk.WidgetGetSensitiveMethodInfo + ResolveWebViewMethod "getSizeRequest" o = Gtk.WidgetGetSizeRequestMethodInfo + ResolveWebViewMethod "getSnapshot" o = WebViewGetSnapshotMethodInfo + ResolveWebViewMethod "getState" o = Gtk.WidgetGetStateMethodInfo + ResolveWebViewMethod "getStateFlags" o = Gtk.WidgetGetStateFlagsMethodInfo + ResolveWebViewMethod "getStyle" o = Gtk.WidgetGetStyleMethodInfo + ResolveWebViewMethod "getStyleContext" o = Gtk.WidgetGetStyleContextMethodInfo + ResolveWebViewMethod "getSupportMultidevice" o = Gtk.WidgetGetSupportMultideviceMethodInfo + ResolveWebViewMethod "getTemplateChild" o = Gtk.WidgetGetTemplateChildMethodInfo + ResolveWebViewMethod "getTitle" o = WebViewGetTitleMethodInfo + ResolveWebViewMethod "getTooltipMarkup" o = Gtk.WidgetGetTooltipMarkupMethodInfo + ResolveWebViewMethod "getTooltipText" o = Gtk.WidgetGetTooltipTextMethodInfo + ResolveWebViewMethod "getTooltipWindow" o = Gtk.WidgetGetTooltipWindowMethodInfo + ResolveWebViewMethod "getToplevel" o = Gtk.WidgetGetToplevelMethodInfo + ResolveWebViewMethod "getTransparent" o = WebViewGetTransparentMethodInfo + ResolveWebViewMethod "getUri" o = WebViewGetUriMethodInfo + ResolveWebViewMethod "getVadjustment" o = Gtk.ScrollableGetVadjustmentMethodInfo + ResolveWebViewMethod "getValign" o = Gtk.WidgetGetValignMethodInfo + ResolveWebViewMethod "getValignWithBaseline" o = Gtk.WidgetGetValignWithBaselineMethodInfo + ResolveWebViewMethod "getVexpand" o = Gtk.WidgetGetVexpandMethodInfo + ResolveWebViewMethod "getVexpandSet" o = Gtk.WidgetGetVexpandSetMethodInfo + ResolveWebViewMethod "getViewMode" o = WebViewGetViewModeMethodInfo + ResolveWebViewMethod "getViewSourceMode" o = WebViewGetViewSourceModeMethodInfo + ResolveWebViewMethod "getViewportAttributes" o = WebViewGetViewportAttributesMethodInfo + ResolveWebViewMethod "getVisible" o = Gtk.WidgetGetVisibleMethodInfo + ResolveWebViewMethod "getVisual" o = Gtk.WidgetGetVisualMethodInfo + ResolveWebViewMethod "getVscrollPolicy" o = Gtk.ScrollableGetVscrollPolicyMethodInfo + ResolveWebViewMethod "getWindow" o = Gtk.WidgetGetWindowMethodInfo + ResolveWebViewMethod "getWindowFeatures" o = WebViewGetWindowFeaturesMethodInfo + ResolveWebViewMethod "getZoomLevel" o = WebViewGetZoomLevelMethodInfo + ResolveWebViewMethod "setAccelPath" o = Gtk.WidgetSetAccelPathMethodInfo + ResolveWebViewMethod "setAllocation" o = Gtk.WidgetSetAllocationMethodInfo + ResolveWebViewMethod "setAppPaintable" o = Gtk.WidgetSetAppPaintableMethodInfo + ResolveWebViewMethod "setBorderWidth" o = Gtk.ContainerSetBorderWidthMethodInfo + ResolveWebViewMethod "setBuildableProperty" o = Gtk.BuildableSetBuildablePropertyMethodInfo + ResolveWebViewMethod "setCanDefault" o = Gtk.WidgetSetCanDefaultMethodInfo + ResolveWebViewMethod "setCanFocus" o = Gtk.WidgetSetCanFocusMethodInfo + ResolveWebViewMethod "setChildVisible" o = Gtk.WidgetSetChildVisibleMethodInfo + ResolveWebViewMethod "setClip" o = Gtk.WidgetSetClipMethodInfo + ResolveWebViewMethod "setCompositeName" o = Gtk.WidgetSetCompositeNameMethodInfo + ResolveWebViewMethod "setCustomEncoding" o = WebViewSetCustomEncodingMethodInfo + ResolveWebViewMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebViewMethod "setDeviceEnabled" o = Gtk.WidgetSetDeviceEnabledMethodInfo + ResolveWebViewMethod "setDeviceEvents" o = Gtk.WidgetSetDeviceEventsMethodInfo + ResolveWebViewMethod "setDirection" o = Gtk.WidgetSetDirectionMethodInfo + ResolveWebViewMethod "setDoubleBuffered" o = Gtk.WidgetSetDoubleBufferedMethodInfo + ResolveWebViewMethod "setEditable" o = WebViewSetEditableMethodInfo + ResolveWebViewMethod "setEvents" o = Gtk.WidgetSetEventsMethodInfo + ResolveWebViewMethod "setFocusChain" o = Gtk.ContainerSetFocusChainMethodInfo + ResolveWebViewMethod "setFocusChild" o = Gtk.ContainerSetFocusChildMethodInfo + ResolveWebViewMethod "setFocusHadjustment" o = Gtk.ContainerSetFocusHadjustmentMethodInfo + ResolveWebViewMethod "setFocusVadjustment" o = Gtk.ContainerSetFocusVadjustmentMethodInfo + ResolveWebViewMethod "setFontMap" o = Gtk.WidgetSetFontMapMethodInfo + ResolveWebViewMethod "setFontOptions" o = Gtk.WidgetSetFontOptionsMethodInfo + ResolveWebViewMethod "setFullContentZoom" o = WebViewSetFullContentZoomMethodInfo + ResolveWebViewMethod "setHadjustment" o = Gtk.ScrollableSetHadjustmentMethodInfo + ResolveWebViewMethod "setHalign" o = Gtk.WidgetSetHalignMethodInfo + ResolveWebViewMethod "setHasTooltip" o = Gtk.WidgetSetHasTooltipMethodInfo + ResolveWebViewMethod "setHasWindow" o = Gtk.WidgetSetHasWindowMethodInfo + ResolveWebViewMethod "setHexpand" o = Gtk.WidgetSetHexpandMethodInfo + ResolveWebViewMethod "setHexpandSet" o = Gtk.WidgetSetHexpandSetMethodInfo + ResolveWebViewMethod "setHighlightTextMatches" o = WebViewSetHighlightTextMatchesMethodInfo + ResolveWebViewMethod "setHscrollPolicy" o = Gtk.ScrollableSetHscrollPolicyMethodInfo + ResolveWebViewMethod "setMaintainsBackForwardList" o = WebViewSetMaintainsBackForwardListMethodInfo + ResolveWebViewMethod "setMapped" o = Gtk.WidgetSetMappedMethodInfo + ResolveWebViewMethod "setMarginBottom" o = Gtk.WidgetSetMarginBottomMethodInfo + ResolveWebViewMethod "setMarginEnd" o = Gtk.WidgetSetMarginEndMethodInfo + ResolveWebViewMethod "setMarginLeft" o = Gtk.WidgetSetMarginLeftMethodInfo + ResolveWebViewMethod "setMarginRight" o = Gtk.WidgetSetMarginRightMethodInfo + ResolveWebViewMethod "setMarginStart" o = Gtk.WidgetSetMarginStartMethodInfo + ResolveWebViewMethod "setMarginTop" o = Gtk.WidgetSetMarginTopMethodInfo + ResolveWebViewMethod "setNoShowAll" o = Gtk.WidgetSetNoShowAllMethodInfo + ResolveWebViewMethod "setOpacity" o = Gtk.WidgetSetOpacityMethodInfo + ResolveWebViewMethod "setParent" o = Gtk.WidgetSetParentMethodInfo + ResolveWebViewMethod "setParentWindow" o = Gtk.WidgetSetParentWindowMethodInfo + ResolveWebViewMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebViewMethod "setRealized" o = Gtk.WidgetSetRealizedMethodInfo + ResolveWebViewMethod "setReallocateRedraws" o = Gtk.ContainerSetReallocateRedrawsMethodInfo + ResolveWebViewMethod "setReceivesDefault" o = Gtk.WidgetSetReceivesDefaultMethodInfo + ResolveWebViewMethod "setRedrawOnAllocate" o = Gtk.WidgetSetRedrawOnAllocateMethodInfo + ResolveWebViewMethod "setResizeMode" o = Gtk.ContainerSetResizeModeMethodInfo + ResolveWebViewMethod "setSensitive" o = Gtk.WidgetSetSensitiveMethodInfo + ResolveWebViewMethod "setSettings" o = WebViewSetSettingsMethodInfo + ResolveWebViewMethod "setSizeRequest" o = Gtk.WidgetSetSizeRequestMethodInfo + ResolveWebViewMethod "setState" o = Gtk.WidgetSetStateMethodInfo + ResolveWebViewMethod "setStateFlags" o = Gtk.WidgetSetStateFlagsMethodInfo + ResolveWebViewMethod "setStyle" o = Gtk.WidgetSetStyleMethodInfo + ResolveWebViewMethod "setSupportMultidevice" o = Gtk.WidgetSetSupportMultideviceMethodInfo + ResolveWebViewMethod "setTooltipMarkup" o = Gtk.WidgetSetTooltipMarkupMethodInfo + ResolveWebViewMethod "setTooltipText" o = Gtk.WidgetSetTooltipTextMethodInfo + ResolveWebViewMethod "setTooltipWindow" o = Gtk.WidgetSetTooltipWindowMethodInfo + ResolveWebViewMethod "setTransparent" o = WebViewSetTransparentMethodInfo + ResolveWebViewMethod "setVadjustment" o = Gtk.ScrollableSetVadjustmentMethodInfo + ResolveWebViewMethod "setValign" o = Gtk.WidgetSetValignMethodInfo + ResolveWebViewMethod "setVexpand" o = Gtk.WidgetSetVexpandMethodInfo + ResolveWebViewMethod "setVexpandSet" o = Gtk.WidgetSetVexpandSetMethodInfo + ResolveWebViewMethod "setViewMode" o = WebViewSetViewModeMethodInfo + ResolveWebViewMethod "setViewSourceMode" o = WebViewSetViewSourceModeMethodInfo + ResolveWebViewMethod "setVisible" o = Gtk.WidgetSetVisibleMethodInfo + ResolveWebViewMethod "setVisual" o = Gtk.WidgetSetVisualMethodInfo + ResolveWebViewMethod "setVscrollPolicy" o = Gtk.ScrollableSetVscrollPolicyMethodInfo + ResolveWebViewMethod "setWindow" o = Gtk.WidgetSetWindowMethodInfo + ResolveWebViewMethod "setZoomLevel" o = WebViewSetZoomLevelMethodInfo + ResolveWebViewMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebViewMethod t WebView, MethodInfo info WebView p) => IsLabelProxy t (WebView -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebViewMethod t WebView, MethodInfo info WebView p) => IsLabel t (WebView -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + +-- signal WebView::close-web-view +type WebViewCloseWebViewCallback = + IO Bool + +noWebViewCloseWebViewCallback :: Maybe WebViewCloseWebViewCallback +noWebViewCloseWebViewCallback = Nothing + +type WebViewCloseWebViewCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewCloseWebViewCallback :: WebViewCloseWebViewCallbackC -> IO (FunPtr WebViewCloseWebViewCallbackC) + +webViewCloseWebViewClosure :: WebViewCloseWebViewCallback -> IO Closure +webViewCloseWebViewClosure cb = newCClosure =<< mkWebViewCloseWebViewCallback wrapped + where wrapped = webViewCloseWebViewCallbackWrapper cb + +webViewCloseWebViewCallbackWrapper :: + WebViewCloseWebViewCallback -> + Ptr () -> + Ptr () -> + IO CInt +webViewCloseWebViewCallbackWrapper _cb _ _ = do + result <- _cb + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewCloseWebView :: (GObject a, MonadIO m) => a -> WebViewCloseWebViewCallback -> m SignalHandlerId +onWebViewCloseWebView obj cb = liftIO $ connectWebViewCloseWebView obj cb SignalConnectBefore +afterWebViewCloseWebView :: (GObject a, MonadIO m) => a -> WebViewCloseWebViewCallback -> m SignalHandlerId +afterWebViewCloseWebView obj cb = connectWebViewCloseWebView obj cb SignalConnectAfter + +connectWebViewCloseWebView :: (GObject a, MonadIO m) => + a -> WebViewCloseWebViewCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewCloseWebView obj cb after = liftIO $ do + cb' <- mkWebViewCloseWebViewCallback (webViewCloseWebViewCallbackWrapper cb) + connectSignalFunPtr obj "close-web-view" cb' after + +-- signal WebView::console-message +type WebViewConsoleMessageCallback = + T.Text -> + Int32 -> + T.Text -> + IO Bool + +noWebViewConsoleMessageCallback :: Maybe WebViewConsoleMessageCallback +noWebViewConsoleMessageCallback = Nothing + +type WebViewConsoleMessageCallbackC = + Ptr () -> -- object + CString -> + Int32 -> + CString -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewConsoleMessageCallback :: WebViewConsoleMessageCallbackC -> IO (FunPtr WebViewConsoleMessageCallbackC) + +webViewConsoleMessageClosure :: WebViewConsoleMessageCallback -> IO Closure +webViewConsoleMessageClosure cb = newCClosure =<< mkWebViewConsoleMessageCallback wrapped + where wrapped = webViewConsoleMessageCallbackWrapper cb + +webViewConsoleMessageCallbackWrapper :: + WebViewConsoleMessageCallback -> + Ptr () -> + CString -> + Int32 -> + CString -> + Ptr () -> + IO CInt +webViewConsoleMessageCallbackWrapper _cb _ message line sourceId _ = do + message' <- cstringToText message + sourceId' <- cstringToText sourceId + result <- _cb message' line sourceId' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewConsoleMessage :: (GObject a, MonadIO m) => a -> WebViewConsoleMessageCallback -> m SignalHandlerId +onWebViewConsoleMessage obj cb = liftIO $ connectWebViewConsoleMessage obj cb SignalConnectBefore +afterWebViewConsoleMessage :: (GObject a, MonadIO m) => a -> WebViewConsoleMessageCallback -> m SignalHandlerId +afterWebViewConsoleMessage obj cb = connectWebViewConsoleMessage obj cb SignalConnectAfter + +connectWebViewConsoleMessage :: (GObject a, MonadIO m) => + a -> WebViewConsoleMessageCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewConsoleMessage obj cb after = liftIO $ do + cb' <- mkWebViewConsoleMessageCallback (webViewConsoleMessageCallbackWrapper cb) + connectSignalFunPtr obj "console-message" cb' after + +-- signal WebView::context-menu +type WebViewContextMenuCallback = + Gtk.Widget -> + HitTestResult -> + Bool -> + IO Bool + +noWebViewContextMenuCallback :: Maybe WebViewContextMenuCallback +noWebViewContextMenuCallback = Nothing + +type WebViewContextMenuCallbackC = + Ptr () -> -- object + Ptr Gtk.Widget -> + Ptr HitTestResult -> + CInt -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewContextMenuCallback :: WebViewContextMenuCallbackC -> IO (FunPtr WebViewContextMenuCallbackC) + +webViewContextMenuClosure :: WebViewContextMenuCallback -> IO Closure +webViewContextMenuClosure cb = newCClosure =<< mkWebViewContextMenuCallback wrapped + where wrapped = webViewContextMenuCallbackWrapper cb + +webViewContextMenuCallbackWrapper :: + WebViewContextMenuCallback -> + Ptr () -> + Ptr Gtk.Widget -> + Ptr HitTestResult -> + CInt -> + Ptr () -> + IO CInt +webViewContextMenuCallbackWrapper _cb _ defaultMenu hitTestResult triggeredWithKeyboard _ = do + defaultMenu' <- (newObject Gtk.Widget) defaultMenu + hitTestResult' <- (newObject HitTestResult) hitTestResult + let triggeredWithKeyboard' = (/= 0) triggeredWithKeyboard + result <- _cb defaultMenu' hitTestResult' triggeredWithKeyboard' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewContextMenu :: (GObject a, MonadIO m) => a -> WebViewContextMenuCallback -> m SignalHandlerId +onWebViewContextMenu obj cb = liftIO $ connectWebViewContextMenu obj cb SignalConnectBefore +afterWebViewContextMenu :: (GObject a, MonadIO m) => a -> WebViewContextMenuCallback -> m SignalHandlerId +afterWebViewContextMenu obj cb = connectWebViewContextMenu obj cb SignalConnectAfter + +connectWebViewContextMenu :: (GObject a, MonadIO m) => + a -> WebViewContextMenuCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewContextMenu obj cb after = liftIO $ do + cb' <- mkWebViewContextMenuCallback (webViewContextMenuCallbackWrapper cb) + connectSignalFunPtr obj "context-menu" cb' after + +-- signal WebView::copy-clipboard +type WebViewCopyClipboardCallback = + IO () + +noWebViewCopyClipboardCallback :: Maybe WebViewCopyClipboardCallback +noWebViewCopyClipboardCallback = Nothing + +type WebViewCopyClipboardCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewCopyClipboardCallback :: WebViewCopyClipboardCallbackC -> IO (FunPtr WebViewCopyClipboardCallbackC) + +webViewCopyClipboardClosure :: WebViewCopyClipboardCallback -> IO Closure +webViewCopyClipboardClosure cb = newCClosure =<< mkWebViewCopyClipboardCallback wrapped + where wrapped = webViewCopyClipboardCallbackWrapper cb + +webViewCopyClipboardCallbackWrapper :: + WebViewCopyClipboardCallback -> + Ptr () -> + Ptr () -> + IO () +webViewCopyClipboardCallbackWrapper _cb _ _ = do + _cb + +onWebViewCopyClipboard :: (GObject a, MonadIO m) => a -> WebViewCopyClipboardCallback -> m SignalHandlerId +onWebViewCopyClipboard obj cb = liftIO $ connectWebViewCopyClipboard obj cb SignalConnectBefore +afterWebViewCopyClipboard :: (GObject a, MonadIO m) => a -> WebViewCopyClipboardCallback -> m SignalHandlerId +afterWebViewCopyClipboard obj cb = connectWebViewCopyClipboard obj cb SignalConnectAfter + +connectWebViewCopyClipboard :: (GObject a, MonadIO m) => + a -> WebViewCopyClipboardCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewCopyClipboard obj cb after = liftIO $ do + cb' <- mkWebViewCopyClipboardCallback (webViewCopyClipboardCallbackWrapper cb) + connectSignalFunPtr obj "copy-clipboard" cb' after + +-- signal WebView::create-plugin-widget +type WebViewCreatePluginWidgetCallback = + T.Text -> + T.Text -> + Map.Map (Ptr ()) (Ptr ()) -> + IO Gtk.Widget + +noWebViewCreatePluginWidgetCallback :: Maybe WebViewCreatePluginWidgetCallback +noWebViewCreatePluginWidgetCallback = Nothing + +type WebViewCreatePluginWidgetCallbackC = + Ptr () -> -- object + CString -> + CString -> + Ptr (GHashTable (Ptr ()) (Ptr ())) -> + Ptr () -> -- user_data + IO (Ptr Gtk.Widget) + +foreign import ccall "wrapper" + mkWebViewCreatePluginWidgetCallback :: WebViewCreatePluginWidgetCallbackC -> IO (FunPtr WebViewCreatePluginWidgetCallbackC) + +webViewCreatePluginWidgetClosure :: WebViewCreatePluginWidgetCallback -> IO Closure +webViewCreatePluginWidgetClosure cb = newCClosure =<< mkWebViewCreatePluginWidgetCallback wrapped + where wrapped = webViewCreatePluginWidgetCallbackWrapper cb + +webViewCreatePluginWidgetCallbackWrapper :: + WebViewCreatePluginWidgetCallback -> + Ptr () -> + CString -> + CString -> + Ptr (GHashTable (Ptr ()) (Ptr ())) -> + Ptr () -> + IO (Ptr Gtk.Widget) +webViewCreatePluginWidgetCallbackWrapper _cb _ mimeType uri param _ = do + mimeType' <- cstringToText mimeType + uri' <- cstringToText uri + param' <- unpackGHashTable param + let param'' = mapFirst ptrUnpackPtr param' + let param''' = mapSecond ptrUnpackPtr param'' + let param'''' = Map.fromList param''' + result <- _cb mimeType' uri' param'''' + result' <- refObject result + return result' + +onWebViewCreatePluginWidget :: (GObject a, MonadIO m) => a -> WebViewCreatePluginWidgetCallback -> m SignalHandlerId +onWebViewCreatePluginWidget obj cb = liftIO $ connectWebViewCreatePluginWidget obj cb SignalConnectBefore +afterWebViewCreatePluginWidget :: (GObject a, MonadIO m) => a -> WebViewCreatePluginWidgetCallback -> m SignalHandlerId +afterWebViewCreatePluginWidget obj cb = connectWebViewCreatePluginWidget obj cb SignalConnectAfter + +connectWebViewCreatePluginWidget :: (GObject a, MonadIO m) => + a -> WebViewCreatePluginWidgetCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewCreatePluginWidget obj cb after = liftIO $ do + cb' <- mkWebViewCreatePluginWidgetCallback (webViewCreatePluginWidgetCallbackWrapper cb) + connectSignalFunPtr obj "create-plugin-widget" cb' after + +-- signal WebView::create-web-view +type WebViewCreateWebViewCallback = + WebFrame -> + IO WebView + +noWebViewCreateWebViewCallback :: Maybe WebViewCreateWebViewCallback +noWebViewCreateWebViewCallback = Nothing + +type WebViewCreateWebViewCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr () -> -- user_data + IO (Ptr WebView) + +foreign import ccall "wrapper" + mkWebViewCreateWebViewCallback :: WebViewCreateWebViewCallbackC -> IO (FunPtr WebViewCreateWebViewCallbackC) + +webViewCreateWebViewClosure :: WebViewCreateWebViewCallback -> IO Closure +webViewCreateWebViewClosure cb = newCClosure =<< mkWebViewCreateWebViewCallback wrapped + where wrapped = webViewCreateWebViewCallbackWrapper cb + +webViewCreateWebViewCallbackWrapper :: + WebViewCreateWebViewCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr () -> + IO (Ptr WebView) +webViewCreateWebViewCallbackWrapper _cb _ frame _ = do + frame' <- (newObject WebFrame) frame + result <- _cb frame' + result' <- refObject result + return result' + +onWebViewCreateWebView :: (GObject a, MonadIO m) => a -> WebViewCreateWebViewCallback -> m SignalHandlerId +onWebViewCreateWebView obj cb = liftIO $ connectWebViewCreateWebView obj cb SignalConnectBefore +afterWebViewCreateWebView :: (GObject a, MonadIO m) => a -> WebViewCreateWebViewCallback -> m SignalHandlerId +afterWebViewCreateWebView obj cb = connectWebViewCreateWebView obj cb SignalConnectAfter + +connectWebViewCreateWebView :: (GObject a, MonadIO m) => + a -> WebViewCreateWebViewCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewCreateWebView obj cb after = liftIO $ do + cb' <- mkWebViewCreateWebViewCallback (webViewCreateWebViewCallbackWrapper cb) + connectSignalFunPtr obj "create-web-view" cb' after + +-- signal WebView::cut-clipboard +type WebViewCutClipboardCallback = + IO () + +noWebViewCutClipboardCallback :: Maybe WebViewCutClipboardCallback +noWebViewCutClipboardCallback = Nothing + +type WebViewCutClipboardCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewCutClipboardCallback :: WebViewCutClipboardCallbackC -> IO (FunPtr WebViewCutClipboardCallbackC) + +webViewCutClipboardClosure :: WebViewCutClipboardCallback -> IO Closure +webViewCutClipboardClosure cb = newCClosure =<< mkWebViewCutClipboardCallback wrapped + where wrapped = webViewCutClipboardCallbackWrapper cb + +webViewCutClipboardCallbackWrapper :: + WebViewCutClipboardCallback -> + Ptr () -> + Ptr () -> + IO () +webViewCutClipboardCallbackWrapper _cb _ _ = do + _cb + +onWebViewCutClipboard :: (GObject a, MonadIO m) => a -> WebViewCutClipboardCallback -> m SignalHandlerId +onWebViewCutClipboard obj cb = liftIO $ connectWebViewCutClipboard obj cb SignalConnectBefore +afterWebViewCutClipboard :: (GObject a, MonadIO m) => a -> WebViewCutClipboardCallback -> m SignalHandlerId +afterWebViewCutClipboard obj cb = connectWebViewCutClipboard obj cb SignalConnectAfter + +connectWebViewCutClipboard :: (GObject a, MonadIO m) => + a -> WebViewCutClipboardCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewCutClipboard obj cb after = liftIO $ do + cb' <- mkWebViewCutClipboardCallback (webViewCutClipboardCallbackWrapper cb) + connectSignalFunPtr obj "cut-clipboard" cb' after + +-- signal WebView::database-quota-exceeded +type WebViewDatabaseQuotaExceededCallback = + GObject.Object -> + GObject.Object -> + IO () + +noWebViewDatabaseQuotaExceededCallback :: Maybe WebViewDatabaseQuotaExceededCallback +noWebViewDatabaseQuotaExceededCallback = Nothing + +type WebViewDatabaseQuotaExceededCallbackC = + Ptr () -> -- object + Ptr GObject.Object -> + Ptr GObject.Object -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewDatabaseQuotaExceededCallback :: WebViewDatabaseQuotaExceededCallbackC -> IO (FunPtr WebViewDatabaseQuotaExceededCallbackC) + +webViewDatabaseQuotaExceededClosure :: WebViewDatabaseQuotaExceededCallback -> IO Closure +webViewDatabaseQuotaExceededClosure cb = newCClosure =<< mkWebViewDatabaseQuotaExceededCallback wrapped + where wrapped = webViewDatabaseQuotaExceededCallbackWrapper cb + +webViewDatabaseQuotaExceededCallbackWrapper :: + WebViewDatabaseQuotaExceededCallback -> + Ptr () -> + Ptr GObject.Object -> + Ptr GObject.Object -> + Ptr () -> + IO () +webViewDatabaseQuotaExceededCallbackWrapper _cb _ frame database _ = do + frame' <- (newObject GObject.Object) frame + database' <- (newObject GObject.Object) database + _cb frame' database' + +onWebViewDatabaseQuotaExceeded :: (GObject a, MonadIO m) => a -> WebViewDatabaseQuotaExceededCallback -> m SignalHandlerId +onWebViewDatabaseQuotaExceeded obj cb = liftIO $ connectWebViewDatabaseQuotaExceeded obj cb SignalConnectBefore +afterWebViewDatabaseQuotaExceeded :: (GObject a, MonadIO m) => a -> WebViewDatabaseQuotaExceededCallback -> m SignalHandlerId +afterWebViewDatabaseQuotaExceeded obj cb = connectWebViewDatabaseQuotaExceeded obj cb SignalConnectAfter + +connectWebViewDatabaseQuotaExceeded :: (GObject a, MonadIO m) => + a -> WebViewDatabaseQuotaExceededCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewDatabaseQuotaExceeded obj cb after = liftIO $ do + cb' <- mkWebViewDatabaseQuotaExceededCallback (webViewDatabaseQuotaExceededCallbackWrapper cb) + connectSignalFunPtr obj "database-quota-exceeded" cb' after + +-- signal WebView::document-load-finished +type WebViewDocumentLoadFinishedCallback = + WebFrame -> + IO () + +noWebViewDocumentLoadFinishedCallback :: Maybe WebViewDocumentLoadFinishedCallback +noWebViewDocumentLoadFinishedCallback = Nothing + +type WebViewDocumentLoadFinishedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewDocumentLoadFinishedCallback :: WebViewDocumentLoadFinishedCallbackC -> IO (FunPtr WebViewDocumentLoadFinishedCallbackC) + +webViewDocumentLoadFinishedClosure :: WebViewDocumentLoadFinishedCallback -> IO Closure +webViewDocumentLoadFinishedClosure cb = newCClosure =<< mkWebViewDocumentLoadFinishedCallback wrapped + where wrapped = webViewDocumentLoadFinishedCallbackWrapper cb + +webViewDocumentLoadFinishedCallbackWrapper :: + WebViewDocumentLoadFinishedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr () -> + IO () +webViewDocumentLoadFinishedCallbackWrapper _cb _ webFrame _ = do + webFrame' <- (newObject WebFrame) webFrame + _cb webFrame' + +onWebViewDocumentLoadFinished :: (GObject a, MonadIO m) => a -> WebViewDocumentLoadFinishedCallback -> m SignalHandlerId +onWebViewDocumentLoadFinished obj cb = liftIO $ connectWebViewDocumentLoadFinished obj cb SignalConnectBefore +afterWebViewDocumentLoadFinished :: (GObject a, MonadIO m) => a -> WebViewDocumentLoadFinishedCallback -> m SignalHandlerId +afterWebViewDocumentLoadFinished obj cb = connectWebViewDocumentLoadFinished obj cb SignalConnectAfter + +connectWebViewDocumentLoadFinished :: (GObject a, MonadIO m) => + a -> WebViewDocumentLoadFinishedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewDocumentLoadFinished obj cb after = liftIO $ do + cb' <- mkWebViewDocumentLoadFinishedCallback (webViewDocumentLoadFinishedCallbackWrapper cb) + connectSignalFunPtr obj "document-load-finished" cb' after + +-- signal WebView::download-requested +type WebViewDownloadRequestedCallback = + Download -> + IO Bool + +noWebViewDownloadRequestedCallback :: Maybe WebViewDownloadRequestedCallback +noWebViewDownloadRequestedCallback = Nothing + +type WebViewDownloadRequestedCallbackC = + Ptr () -> -- object + Ptr Download -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewDownloadRequestedCallback :: WebViewDownloadRequestedCallbackC -> IO (FunPtr WebViewDownloadRequestedCallbackC) + +webViewDownloadRequestedClosure :: WebViewDownloadRequestedCallback -> IO Closure +webViewDownloadRequestedClosure cb = newCClosure =<< mkWebViewDownloadRequestedCallback wrapped + where wrapped = webViewDownloadRequestedCallbackWrapper cb + +webViewDownloadRequestedCallbackWrapper :: + WebViewDownloadRequestedCallback -> + Ptr () -> + Ptr Download -> + Ptr () -> + IO CInt +webViewDownloadRequestedCallbackWrapper _cb _ download _ = do + download' <- (newObject Download) download + result <- _cb download' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewDownloadRequested :: (GObject a, MonadIO m) => a -> WebViewDownloadRequestedCallback -> m SignalHandlerId +onWebViewDownloadRequested obj cb = liftIO $ connectWebViewDownloadRequested obj cb SignalConnectBefore +afterWebViewDownloadRequested :: (GObject a, MonadIO m) => a -> WebViewDownloadRequestedCallback -> m SignalHandlerId +afterWebViewDownloadRequested obj cb = connectWebViewDownloadRequested obj cb SignalConnectAfter + +connectWebViewDownloadRequested :: (GObject a, MonadIO m) => + a -> WebViewDownloadRequestedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewDownloadRequested obj cb after = liftIO $ do + cb' <- mkWebViewDownloadRequestedCallback (webViewDownloadRequestedCallbackWrapper cb) + connectSignalFunPtr obj "download-requested" cb' after + +-- signal WebView::editing-began +type WebViewEditingBeganCallback = + IO () + +noWebViewEditingBeganCallback :: Maybe WebViewEditingBeganCallback +noWebViewEditingBeganCallback = Nothing + +type WebViewEditingBeganCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewEditingBeganCallback :: WebViewEditingBeganCallbackC -> IO (FunPtr WebViewEditingBeganCallbackC) + +webViewEditingBeganClosure :: WebViewEditingBeganCallback -> IO Closure +webViewEditingBeganClosure cb = newCClosure =<< mkWebViewEditingBeganCallback wrapped + where wrapped = webViewEditingBeganCallbackWrapper cb + +webViewEditingBeganCallbackWrapper :: + WebViewEditingBeganCallback -> + Ptr () -> + Ptr () -> + IO () +webViewEditingBeganCallbackWrapper _cb _ _ = do + _cb + +onWebViewEditingBegan :: (GObject a, MonadIO m) => a -> WebViewEditingBeganCallback -> m SignalHandlerId +onWebViewEditingBegan obj cb = liftIO $ connectWebViewEditingBegan obj cb SignalConnectBefore +afterWebViewEditingBegan :: (GObject a, MonadIO m) => a -> WebViewEditingBeganCallback -> m SignalHandlerId +afterWebViewEditingBegan obj cb = connectWebViewEditingBegan obj cb SignalConnectAfter + +connectWebViewEditingBegan :: (GObject a, MonadIO m) => + a -> WebViewEditingBeganCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewEditingBegan obj cb after = liftIO $ do + cb' <- mkWebViewEditingBeganCallback (webViewEditingBeganCallbackWrapper cb) + connectSignalFunPtr obj "editing-began" cb' after + +-- signal WebView::editing-ended +type WebViewEditingEndedCallback = + IO () + +noWebViewEditingEndedCallback :: Maybe WebViewEditingEndedCallback +noWebViewEditingEndedCallback = Nothing + +type WebViewEditingEndedCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewEditingEndedCallback :: WebViewEditingEndedCallbackC -> IO (FunPtr WebViewEditingEndedCallbackC) + +webViewEditingEndedClosure :: WebViewEditingEndedCallback -> IO Closure +webViewEditingEndedClosure cb = newCClosure =<< mkWebViewEditingEndedCallback wrapped + where wrapped = webViewEditingEndedCallbackWrapper cb + +webViewEditingEndedCallbackWrapper :: + WebViewEditingEndedCallback -> + Ptr () -> + Ptr () -> + IO () +webViewEditingEndedCallbackWrapper _cb _ _ = do + _cb + +onWebViewEditingEnded :: (GObject a, MonadIO m) => a -> WebViewEditingEndedCallback -> m SignalHandlerId +onWebViewEditingEnded obj cb = liftIO $ connectWebViewEditingEnded obj cb SignalConnectBefore +afterWebViewEditingEnded :: (GObject a, MonadIO m) => a -> WebViewEditingEndedCallback -> m SignalHandlerId +afterWebViewEditingEnded obj cb = connectWebViewEditingEnded obj cb SignalConnectAfter + +connectWebViewEditingEnded :: (GObject a, MonadIO m) => + a -> WebViewEditingEndedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewEditingEnded obj cb after = liftIO $ do + cb' <- mkWebViewEditingEndedCallback (webViewEditingEndedCallbackWrapper cb) + connectSignalFunPtr obj "editing-ended" cb' after + +-- signal WebView::entering-fullscreen +type WebViewEnteringFullscreenCallback = + DOMHTMLElement -> + IO Bool + +noWebViewEnteringFullscreenCallback :: Maybe WebViewEnteringFullscreenCallback +noWebViewEnteringFullscreenCallback = Nothing + +type WebViewEnteringFullscreenCallbackC = + Ptr () -> -- object + Ptr DOMHTMLElement -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewEnteringFullscreenCallback :: WebViewEnteringFullscreenCallbackC -> IO (FunPtr WebViewEnteringFullscreenCallbackC) + +webViewEnteringFullscreenClosure :: WebViewEnteringFullscreenCallback -> IO Closure +webViewEnteringFullscreenClosure cb = newCClosure =<< mkWebViewEnteringFullscreenCallback wrapped + where wrapped = webViewEnteringFullscreenCallbackWrapper cb + +webViewEnteringFullscreenCallbackWrapper :: + WebViewEnteringFullscreenCallback -> + Ptr () -> + Ptr DOMHTMLElement -> + Ptr () -> + IO CInt +webViewEnteringFullscreenCallbackWrapper _cb _ element _ = do + element' <- (newObject DOMHTMLElement) element + result <- _cb element' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewEnteringFullscreen :: (GObject a, MonadIO m) => a -> WebViewEnteringFullscreenCallback -> m SignalHandlerId +onWebViewEnteringFullscreen obj cb = liftIO $ connectWebViewEnteringFullscreen obj cb SignalConnectBefore +afterWebViewEnteringFullscreen :: (GObject a, MonadIO m) => a -> WebViewEnteringFullscreenCallback -> m SignalHandlerId +afterWebViewEnteringFullscreen obj cb = connectWebViewEnteringFullscreen obj cb SignalConnectAfter + +connectWebViewEnteringFullscreen :: (GObject a, MonadIO m) => + a -> WebViewEnteringFullscreenCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewEnteringFullscreen obj cb after = liftIO $ do + cb' <- mkWebViewEnteringFullscreenCallback (webViewEnteringFullscreenCallbackWrapper cb) + connectSignalFunPtr obj "entering-fullscreen" cb' after + +-- signal WebView::frame-created +type WebViewFrameCreatedCallback = + WebFrame -> + IO () + +noWebViewFrameCreatedCallback :: Maybe WebViewFrameCreatedCallback +noWebViewFrameCreatedCallback = Nothing + +type WebViewFrameCreatedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewFrameCreatedCallback :: WebViewFrameCreatedCallbackC -> IO (FunPtr WebViewFrameCreatedCallbackC) + +webViewFrameCreatedClosure :: WebViewFrameCreatedCallback -> IO Closure +webViewFrameCreatedClosure cb = newCClosure =<< mkWebViewFrameCreatedCallback wrapped + where wrapped = webViewFrameCreatedCallbackWrapper cb + +webViewFrameCreatedCallbackWrapper :: + WebViewFrameCreatedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr () -> + IO () +webViewFrameCreatedCallbackWrapper _cb _ webFrame _ = do + webFrame' <- (newObject WebFrame) webFrame + _cb webFrame' + +onWebViewFrameCreated :: (GObject a, MonadIO m) => a -> WebViewFrameCreatedCallback -> m SignalHandlerId +onWebViewFrameCreated obj cb = liftIO $ connectWebViewFrameCreated obj cb SignalConnectBefore +afterWebViewFrameCreated :: (GObject a, MonadIO m) => a -> WebViewFrameCreatedCallback -> m SignalHandlerId +afterWebViewFrameCreated obj cb = connectWebViewFrameCreated obj cb SignalConnectAfter + +connectWebViewFrameCreated :: (GObject a, MonadIO m) => + a -> WebViewFrameCreatedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewFrameCreated obj cb after = liftIO $ do + cb' <- mkWebViewFrameCreatedCallback (webViewFrameCreatedCallbackWrapper cb) + connectSignalFunPtr obj "frame-created" cb' after + +-- signal WebView::geolocation-policy-decision-cancelled +type WebViewGeolocationPolicyDecisionCancelledCallback = + WebFrame -> + IO () + +noWebViewGeolocationPolicyDecisionCancelledCallback :: Maybe WebViewGeolocationPolicyDecisionCancelledCallback +noWebViewGeolocationPolicyDecisionCancelledCallback = Nothing + +type WebViewGeolocationPolicyDecisionCancelledCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewGeolocationPolicyDecisionCancelledCallback :: WebViewGeolocationPolicyDecisionCancelledCallbackC -> IO (FunPtr WebViewGeolocationPolicyDecisionCancelledCallbackC) + +webViewGeolocationPolicyDecisionCancelledClosure :: WebViewGeolocationPolicyDecisionCancelledCallback -> IO Closure +webViewGeolocationPolicyDecisionCancelledClosure cb = newCClosure =<< mkWebViewGeolocationPolicyDecisionCancelledCallback wrapped + where wrapped = webViewGeolocationPolicyDecisionCancelledCallbackWrapper cb + +webViewGeolocationPolicyDecisionCancelledCallbackWrapper :: + WebViewGeolocationPolicyDecisionCancelledCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr () -> + IO () +webViewGeolocationPolicyDecisionCancelledCallbackWrapper _cb _ frame _ = do + frame' <- (newObject WebFrame) frame + _cb frame' + +onWebViewGeolocationPolicyDecisionCancelled :: (GObject a, MonadIO m) => a -> WebViewGeolocationPolicyDecisionCancelledCallback -> m SignalHandlerId +onWebViewGeolocationPolicyDecisionCancelled obj cb = liftIO $ connectWebViewGeolocationPolicyDecisionCancelled obj cb SignalConnectBefore +afterWebViewGeolocationPolicyDecisionCancelled :: (GObject a, MonadIO m) => a -> WebViewGeolocationPolicyDecisionCancelledCallback -> m SignalHandlerId +afterWebViewGeolocationPolicyDecisionCancelled obj cb = connectWebViewGeolocationPolicyDecisionCancelled obj cb SignalConnectAfter + +connectWebViewGeolocationPolicyDecisionCancelled :: (GObject a, MonadIO m) => + a -> WebViewGeolocationPolicyDecisionCancelledCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewGeolocationPolicyDecisionCancelled obj cb after = liftIO $ do + cb' <- mkWebViewGeolocationPolicyDecisionCancelledCallback (webViewGeolocationPolicyDecisionCancelledCallbackWrapper cb) + connectSignalFunPtr obj "geolocation-policy-decision-cancelled" cb' after + +-- signal WebView::geolocation-policy-decision-requested +type WebViewGeolocationPolicyDecisionRequestedCallback = + WebFrame -> + GeolocationPolicyDecision -> + IO Bool + +noWebViewGeolocationPolicyDecisionRequestedCallback :: Maybe WebViewGeolocationPolicyDecisionRequestedCallback +noWebViewGeolocationPolicyDecisionRequestedCallback = Nothing + +type WebViewGeolocationPolicyDecisionRequestedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr GeolocationPolicyDecision -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewGeolocationPolicyDecisionRequestedCallback :: WebViewGeolocationPolicyDecisionRequestedCallbackC -> IO (FunPtr WebViewGeolocationPolicyDecisionRequestedCallbackC) + +webViewGeolocationPolicyDecisionRequestedClosure :: WebViewGeolocationPolicyDecisionRequestedCallback -> IO Closure +webViewGeolocationPolicyDecisionRequestedClosure cb = newCClosure =<< mkWebViewGeolocationPolicyDecisionRequestedCallback wrapped + where wrapped = webViewGeolocationPolicyDecisionRequestedCallbackWrapper cb + +webViewGeolocationPolicyDecisionRequestedCallbackWrapper :: + WebViewGeolocationPolicyDecisionRequestedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr GeolocationPolicyDecision -> + Ptr () -> + IO CInt +webViewGeolocationPolicyDecisionRequestedCallbackWrapper _cb _ frame policyDecision _ = do + frame' <- (newObject WebFrame) frame + policyDecision' <- (newObject GeolocationPolicyDecision) policyDecision + result <- _cb frame' policyDecision' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewGeolocationPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewGeolocationPolicyDecisionRequestedCallback -> m SignalHandlerId +onWebViewGeolocationPolicyDecisionRequested obj cb = liftIO $ connectWebViewGeolocationPolicyDecisionRequested obj cb SignalConnectBefore +afterWebViewGeolocationPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewGeolocationPolicyDecisionRequestedCallback -> m SignalHandlerId +afterWebViewGeolocationPolicyDecisionRequested obj cb = connectWebViewGeolocationPolicyDecisionRequested obj cb SignalConnectAfter + +connectWebViewGeolocationPolicyDecisionRequested :: (GObject a, MonadIO m) => + a -> WebViewGeolocationPolicyDecisionRequestedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewGeolocationPolicyDecisionRequested obj cb after = liftIO $ do + cb' <- mkWebViewGeolocationPolicyDecisionRequestedCallback (webViewGeolocationPolicyDecisionRequestedCallbackWrapper cb) + connectSignalFunPtr obj "geolocation-policy-decision-requested" cb' after + +-- signal WebView::hovering-over-link +type WebViewHoveringOverLinkCallback = + T.Text -> + T.Text -> + IO () + +noWebViewHoveringOverLinkCallback :: Maybe WebViewHoveringOverLinkCallback +noWebViewHoveringOverLinkCallback = Nothing + +type WebViewHoveringOverLinkCallbackC = + Ptr () -> -- object + CString -> + CString -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewHoveringOverLinkCallback :: WebViewHoveringOverLinkCallbackC -> IO (FunPtr WebViewHoveringOverLinkCallbackC) + +webViewHoveringOverLinkClosure :: WebViewHoveringOverLinkCallback -> IO Closure +webViewHoveringOverLinkClosure cb = newCClosure =<< mkWebViewHoveringOverLinkCallback wrapped + where wrapped = webViewHoveringOverLinkCallbackWrapper cb + +webViewHoveringOverLinkCallbackWrapper :: + WebViewHoveringOverLinkCallback -> + Ptr () -> + CString -> + CString -> + Ptr () -> + IO () +webViewHoveringOverLinkCallbackWrapper _cb _ title uri _ = do + title' <- cstringToText title + uri' <- cstringToText uri + _cb title' uri' + +onWebViewHoveringOverLink :: (GObject a, MonadIO m) => a -> WebViewHoveringOverLinkCallback -> m SignalHandlerId +onWebViewHoveringOverLink obj cb = liftIO $ connectWebViewHoveringOverLink obj cb SignalConnectBefore +afterWebViewHoveringOverLink :: (GObject a, MonadIO m) => a -> WebViewHoveringOverLinkCallback -> m SignalHandlerId +afterWebViewHoveringOverLink obj cb = connectWebViewHoveringOverLink obj cb SignalConnectAfter + +connectWebViewHoveringOverLink :: (GObject a, MonadIO m) => + a -> WebViewHoveringOverLinkCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewHoveringOverLink obj cb after = liftIO $ do + cb' <- mkWebViewHoveringOverLinkCallback (webViewHoveringOverLinkCallbackWrapper cb) + connectSignalFunPtr obj "hovering-over-link" cb' after + +-- signal WebView::icon-loaded +type WebViewIconLoadedCallback = + T.Text -> + IO () + +noWebViewIconLoadedCallback :: Maybe WebViewIconLoadedCallback +noWebViewIconLoadedCallback = Nothing + +type WebViewIconLoadedCallbackC = + Ptr () -> -- object + CString -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewIconLoadedCallback :: WebViewIconLoadedCallbackC -> IO (FunPtr WebViewIconLoadedCallbackC) + +webViewIconLoadedClosure :: WebViewIconLoadedCallback -> IO Closure +webViewIconLoadedClosure cb = newCClosure =<< mkWebViewIconLoadedCallback wrapped + where wrapped = webViewIconLoadedCallbackWrapper cb + +webViewIconLoadedCallbackWrapper :: + WebViewIconLoadedCallback -> + Ptr () -> + CString -> + Ptr () -> + IO () +webViewIconLoadedCallbackWrapper _cb _ iconUri _ = do + iconUri' <- cstringToText iconUri + _cb iconUri' + +onWebViewIconLoaded :: (GObject a, MonadIO m) => a -> WebViewIconLoadedCallback -> m SignalHandlerId +onWebViewIconLoaded obj cb = liftIO $ connectWebViewIconLoaded obj cb SignalConnectBefore +afterWebViewIconLoaded :: (GObject a, MonadIO m) => a -> WebViewIconLoadedCallback -> m SignalHandlerId +afterWebViewIconLoaded obj cb = connectWebViewIconLoaded obj cb SignalConnectAfter + +connectWebViewIconLoaded :: (GObject a, MonadIO m) => + a -> WebViewIconLoadedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewIconLoaded obj cb after = liftIO $ do + cb' <- mkWebViewIconLoadedCallback (webViewIconLoadedCallbackWrapper cb) + connectSignalFunPtr obj "icon-loaded" cb' after + +-- signal WebView::leaving-fullscreen +type WebViewLeavingFullscreenCallback = + DOMHTMLElement -> + IO Bool + +noWebViewLeavingFullscreenCallback :: Maybe WebViewLeavingFullscreenCallback +noWebViewLeavingFullscreenCallback = Nothing + +type WebViewLeavingFullscreenCallbackC = + Ptr () -> -- object + Ptr DOMHTMLElement -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewLeavingFullscreenCallback :: WebViewLeavingFullscreenCallbackC -> IO (FunPtr WebViewLeavingFullscreenCallbackC) + +webViewLeavingFullscreenClosure :: WebViewLeavingFullscreenCallback -> IO Closure +webViewLeavingFullscreenClosure cb = newCClosure =<< mkWebViewLeavingFullscreenCallback wrapped + where wrapped = webViewLeavingFullscreenCallbackWrapper cb + +webViewLeavingFullscreenCallbackWrapper :: + WebViewLeavingFullscreenCallback -> + Ptr () -> + Ptr DOMHTMLElement -> + Ptr () -> + IO CInt +webViewLeavingFullscreenCallbackWrapper _cb _ element _ = do + element' <- (newObject DOMHTMLElement) element + result <- _cb element' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewLeavingFullscreen :: (GObject a, MonadIO m) => a -> WebViewLeavingFullscreenCallback -> m SignalHandlerId +onWebViewLeavingFullscreen obj cb = liftIO $ connectWebViewLeavingFullscreen obj cb SignalConnectBefore +afterWebViewLeavingFullscreen :: (GObject a, MonadIO m) => a -> WebViewLeavingFullscreenCallback -> m SignalHandlerId +afterWebViewLeavingFullscreen obj cb = connectWebViewLeavingFullscreen obj cb SignalConnectAfter + +connectWebViewLeavingFullscreen :: (GObject a, MonadIO m) => + a -> WebViewLeavingFullscreenCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewLeavingFullscreen obj cb after = liftIO $ do + cb' <- mkWebViewLeavingFullscreenCallback (webViewLeavingFullscreenCallbackWrapper cb) + connectSignalFunPtr obj "leaving-fullscreen" cb' after + +-- signal WebView::load-committed +type WebViewLoadCommittedCallback = + WebFrame -> + IO () + +noWebViewLoadCommittedCallback :: Maybe WebViewLoadCommittedCallback +noWebViewLoadCommittedCallback = Nothing + +type WebViewLoadCommittedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewLoadCommittedCallback :: WebViewLoadCommittedCallbackC -> IO (FunPtr WebViewLoadCommittedCallbackC) + +webViewLoadCommittedClosure :: WebViewLoadCommittedCallback -> IO Closure +webViewLoadCommittedClosure cb = newCClosure =<< mkWebViewLoadCommittedCallback wrapped + where wrapped = webViewLoadCommittedCallbackWrapper cb + +webViewLoadCommittedCallbackWrapper :: + WebViewLoadCommittedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr () -> + IO () +webViewLoadCommittedCallbackWrapper _cb _ frame _ = do + frame' <- (newObject WebFrame) frame + _cb frame' + +onWebViewLoadCommitted :: (GObject a, MonadIO m) => a -> WebViewLoadCommittedCallback -> m SignalHandlerId +onWebViewLoadCommitted obj cb = liftIO $ connectWebViewLoadCommitted obj cb SignalConnectBefore +afterWebViewLoadCommitted :: (GObject a, MonadIO m) => a -> WebViewLoadCommittedCallback -> m SignalHandlerId +afterWebViewLoadCommitted obj cb = connectWebViewLoadCommitted obj cb SignalConnectAfter + +connectWebViewLoadCommitted :: (GObject a, MonadIO m) => + a -> WebViewLoadCommittedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewLoadCommitted obj cb after = liftIO $ do + cb' <- mkWebViewLoadCommittedCallback (webViewLoadCommittedCallbackWrapper cb) + connectSignalFunPtr obj "load-committed" cb' after + +-- signal WebView::load-error +type WebViewLoadErrorCallback = + WebFrame -> + T.Text -> + GError -> + IO Bool + +noWebViewLoadErrorCallback :: Maybe WebViewLoadErrorCallback +noWebViewLoadErrorCallback = Nothing + +type WebViewLoadErrorCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + CString -> + Ptr GError -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewLoadErrorCallback :: WebViewLoadErrorCallbackC -> IO (FunPtr WebViewLoadErrorCallbackC) + +webViewLoadErrorClosure :: WebViewLoadErrorCallback -> IO Closure +webViewLoadErrorClosure cb = newCClosure =<< mkWebViewLoadErrorCallback wrapped + where wrapped = webViewLoadErrorCallbackWrapper cb + +webViewLoadErrorCallbackWrapper :: + WebViewLoadErrorCallback -> + Ptr () -> + Ptr WebFrame -> + CString -> + Ptr GError -> + Ptr () -> + IO CInt +webViewLoadErrorCallbackWrapper _cb _ webFrame uri webError _ = do + webFrame' <- (newObject WebFrame) webFrame + uri' <- cstringToText uri + webError' <- (newBoxed GError) webError + result <- _cb webFrame' uri' webError' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewLoadError :: (GObject a, MonadIO m) => a -> WebViewLoadErrorCallback -> m SignalHandlerId +onWebViewLoadError obj cb = liftIO $ connectWebViewLoadError obj cb SignalConnectBefore +afterWebViewLoadError :: (GObject a, MonadIO m) => a -> WebViewLoadErrorCallback -> m SignalHandlerId +afterWebViewLoadError obj cb = connectWebViewLoadError obj cb SignalConnectAfter + +connectWebViewLoadError :: (GObject a, MonadIO m) => + a -> WebViewLoadErrorCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewLoadError obj cb after = liftIO $ do + cb' <- mkWebViewLoadErrorCallback (webViewLoadErrorCallbackWrapper cb) + connectSignalFunPtr obj "load-error" cb' after + +-- signal WebView::load-finished +type WebViewLoadFinishedCallback = + WebFrame -> + IO () + +noWebViewLoadFinishedCallback :: Maybe WebViewLoadFinishedCallback +noWebViewLoadFinishedCallback = Nothing + +type WebViewLoadFinishedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewLoadFinishedCallback :: WebViewLoadFinishedCallbackC -> IO (FunPtr WebViewLoadFinishedCallbackC) + +webViewLoadFinishedClosure :: WebViewLoadFinishedCallback -> IO Closure +webViewLoadFinishedClosure cb = newCClosure =<< mkWebViewLoadFinishedCallback wrapped + where wrapped = webViewLoadFinishedCallbackWrapper cb + +webViewLoadFinishedCallbackWrapper :: + WebViewLoadFinishedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr () -> + IO () +webViewLoadFinishedCallbackWrapper _cb _ frame _ = do + frame' <- (newObject WebFrame) frame + _cb frame' + +onWebViewLoadFinished :: (GObject a, MonadIO m) => a -> WebViewLoadFinishedCallback -> m SignalHandlerId +onWebViewLoadFinished obj cb = liftIO $ connectWebViewLoadFinished obj cb SignalConnectBefore +afterWebViewLoadFinished :: (GObject a, MonadIO m) => a -> WebViewLoadFinishedCallback -> m SignalHandlerId +afterWebViewLoadFinished obj cb = connectWebViewLoadFinished obj cb SignalConnectAfter + +connectWebViewLoadFinished :: (GObject a, MonadIO m) => + a -> WebViewLoadFinishedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewLoadFinished obj cb after = liftIO $ do + cb' <- mkWebViewLoadFinishedCallback (webViewLoadFinishedCallbackWrapper cb) + connectSignalFunPtr obj "load-finished" cb' after + +-- signal WebView::load-progress-changed +type WebViewLoadProgressChangedCallback = + Int32 -> + IO () + +noWebViewLoadProgressChangedCallback :: Maybe WebViewLoadProgressChangedCallback +noWebViewLoadProgressChangedCallback = Nothing + +type WebViewLoadProgressChangedCallbackC = + Ptr () -> -- object + Int32 -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewLoadProgressChangedCallback :: WebViewLoadProgressChangedCallbackC -> IO (FunPtr WebViewLoadProgressChangedCallbackC) + +webViewLoadProgressChangedClosure :: WebViewLoadProgressChangedCallback -> IO Closure +webViewLoadProgressChangedClosure cb = newCClosure =<< mkWebViewLoadProgressChangedCallback wrapped + where wrapped = webViewLoadProgressChangedCallbackWrapper cb + +webViewLoadProgressChangedCallbackWrapper :: + WebViewLoadProgressChangedCallback -> + Ptr () -> + Int32 -> + Ptr () -> + IO () +webViewLoadProgressChangedCallbackWrapper _cb _ progress _ = do + _cb progress + +onWebViewLoadProgressChanged :: (GObject a, MonadIO m) => a -> WebViewLoadProgressChangedCallback -> m SignalHandlerId +onWebViewLoadProgressChanged obj cb = liftIO $ connectWebViewLoadProgressChanged obj cb SignalConnectBefore +afterWebViewLoadProgressChanged :: (GObject a, MonadIO m) => a -> WebViewLoadProgressChangedCallback -> m SignalHandlerId +afterWebViewLoadProgressChanged obj cb = connectWebViewLoadProgressChanged obj cb SignalConnectAfter + +connectWebViewLoadProgressChanged :: (GObject a, MonadIO m) => + a -> WebViewLoadProgressChangedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewLoadProgressChanged obj cb after = liftIO $ do + cb' <- mkWebViewLoadProgressChangedCallback (webViewLoadProgressChangedCallbackWrapper cb) + connectSignalFunPtr obj "load-progress-changed" cb' after + +-- signal WebView::load-started +type WebViewLoadStartedCallback = + WebFrame -> + IO () + +noWebViewLoadStartedCallback :: Maybe WebViewLoadStartedCallback +noWebViewLoadStartedCallback = Nothing + +type WebViewLoadStartedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewLoadStartedCallback :: WebViewLoadStartedCallbackC -> IO (FunPtr WebViewLoadStartedCallbackC) + +webViewLoadStartedClosure :: WebViewLoadStartedCallback -> IO Closure +webViewLoadStartedClosure cb = newCClosure =<< mkWebViewLoadStartedCallback wrapped + where wrapped = webViewLoadStartedCallbackWrapper cb + +webViewLoadStartedCallbackWrapper :: + WebViewLoadStartedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr () -> + IO () +webViewLoadStartedCallbackWrapper _cb _ frame _ = do + frame' <- (newObject WebFrame) frame + _cb frame' + +onWebViewLoadStarted :: (GObject a, MonadIO m) => a -> WebViewLoadStartedCallback -> m SignalHandlerId +onWebViewLoadStarted obj cb = liftIO $ connectWebViewLoadStarted obj cb SignalConnectBefore +afterWebViewLoadStarted :: (GObject a, MonadIO m) => a -> WebViewLoadStartedCallback -> m SignalHandlerId +afterWebViewLoadStarted obj cb = connectWebViewLoadStarted obj cb SignalConnectAfter + +connectWebViewLoadStarted :: (GObject a, MonadIO m) => + a -> WebViewLoadStartedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewLoadStarted obj cb after = liftIO $ do + cb' <- mkWebViewLoadStartedCallback (webViewLoadStartedCallbackWrapper cb) + connectSignalFunPtr obj "load-started" cb' after + +-- signal WebView::mime-type-policy-decision-requested +type WebViewMimeTypePolicyDecisionRequestedCallback = + WebFrame -> + NetworkRequest -> + T.Text -> + WebPolicyDecision -> + IO Bool + +noWebViewMimeTypePolicyDecisionRequestedCallback :: Maybe WebViewMimeTypePolicyDecisionRequestedCallback +noWebViewMimeTypePolicyDecisionRequestedCallback = Nothing + +type WebViewMimeTypePolicyDecisionRequestedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr NetworkRequest -> + CString -> + Ptr WebPolicyDecision -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewMimeTypePolicyDecisionRequestedCallback :: WebViewMimeTypePolicyDecisionRequestedCallbackC -> IO (FunPtr WebViewMimeTypePolicyDecisionRequestedCallbackC) + +webViewMimeTypePolicyDecisionRequestedClosure :: WebViewMimeTypePolicyDecisionRequestedCallback -> IO Closure +webViewMimeTypePolicyDecisionRequestedClosure cb = newCClosure =<< mkWebViewMimeTypePolicyDecisionRequestedCallback wrapped + where wrapped = webViewMimeTypePolicyDecisionRequestedCallbackWrapper cb + +webViewMimeTypePolicyDecisionRequestedCallbackWrapper :: + WebViewMimeTypePolicyDecisionRequestedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr NetworkRequest -> + CString -> + Ptr WebPolicyDecision -> + Ptr () -> + IO CInt +webViewMimeTypePolicyDecisionRequestedCallbackWrapper _cb _ frame request mimetype policyDecision _ = do + frame' <- (newObject WebFrame) frame + request' <- (newObject NetworkRequest) request + mimetype' <- cstringToText mimetype + policyDecision' <- (newObject WebPolicyDecision) policyDecision + result <- _cb frame' request' mimetype' policyDecision' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewMimeTypePolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewMimeTypePolicyDecisionRequestedCallback -> m SignalHandlerId +onWebViewMimeTypePolicyDecisionRequested obj cb = liftIO $ connectWebViewMimeTypePolicyDecisionRequested obj cb SignalConnectBefore +afterWebViewMimeTypePolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewMimeTypePolicyDecisionRequestedCallback -> m SignalHandlerId +afterWebViewMimeTypePolicyDecisionRequested obj cb = connectWebViewMimeTypePolicyDecisionRequested obj cb SignalConnectAfter + +connectWebViewMimeTypePolicyDecisionRequested :: (GObject a, MonadIO m) => + a -> WebViewMimeTypePolicyDecisionRequestedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewMimeTypePolicyDecisionRequested obj cb after = liftIO $ do + cb' <- mkWebViewMimeTypePolicyDecisionRequestedCallback (webViewMimeTypePolicyDecisionRequestedCallbackWrapper cb) + connectSignalFunPtr obj "mime-type-policy-decision-requested" cb' after + +-- signal WebView::move-cursor +type WebViewMoveCursorCallback = + Gtk.MovementStep -> + Int32 -> + IO Bool + +noWebViewMoveCursorCallback :: Maybe WebViewMoveCursorCallback +noWebViewMoveCursorCallback = Nothing + +type WebViewMoveCursorCallbackC = + Ptr () -> -- object + CUInt -> + Int32 -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewMoveCursorCallback :: WebViewMoveCursorCallbackC -> IO (FunPtr WebViewMoveCursorCallbackC) + +webViewMoveCursorClosure :: WebViewMoveCursorCallback -> IO Closure +webViewMoveCursorClosure cb = newCClosure =<< mkWebViewMoveCursorCallback wrapped + where wrapped = webViewMoveCursorCallbackWrapper cb + +webViewMoveCursorCallbackWrapper :: + WebViewMoveCursorCallback -> + Ptr () -> + CUInt -> + Int32 -> + Ptr () -> + IO CInt +webViewMoveCursorCallbackWrapper _cb _ step count _ = do + let step' = (toEnum . fromIntegral) step + result <- _cb step' count + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewMoveCursor :: (GObject a, MonadIO m) => a -> WebViewMoveCursorCallback -> m SignalHandlerId +onWebViewMoveCursor obj cb = liftIO $ connectWebViewMoveCursor obj cb SignalConnectBefore +afterWebViewMoveCursor :: (GObject a, MonadIO m) => a -> WebViewMoveCursorCallback -> m SignalHandlerId +afterWebViewMoveCursor obj cb = connectWebViewMoveCursor obj cb SignalConnectAfter + +connectWebViewMoveCursor :: (GObject a, MonadIO m) => + a -> WebViewMoveCursorCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewMoveCursor obj cb after = liftIO $ do + cb' <- mkWebViewMoveCursorCallback (webViewMoveCursorCallbackWrapper cb) + connectSignalFunPtr obj "move-cursor" cb' after + +-- signal WebView::navigation-policy-decision-requested +type WebViewNavigationPolicyDecisionRequestedCallback = + WebFrame -> + NetworkRequest -> + WebNavigationAction -> + WebPolicyDecision -> + IO Bool + +noWebViewNavigationPolicyDecisionRequestedCallback :: Maybe WebViewNavigationPolicyDecisionRequestedCallback +noWebViewNavigationPolicyDecisionRequestedCallback = Nothing + +type WebViewNavigationPolicyDecisionRequestedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr NetworkRequest -> + Ptr WebNavigationAction -> + Ptr WebPolicyDecision -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewNavigationPolicyDecisionRequestedCallback :: WebViewNavigationPolicyDecisionRequestedCallbackC -> IO (FunPtr WebViewNavigationPolicyDecisionRequestedCallbackC) + +webViewNavigationPolicyDecisionRequestedClosure :: WebViewNavigationPolicyDecisionRequestedCallback -> IO Closure +webViewNavigationPolicyDecisionRequestedClosure cb = newCClosure =<< mkWebViewNavigationPolicyDecisionRequestedCallback wrapped + where wrapped = webViewNavigationPolicyDecisionRequestedCallbackWrapper cb + +webViewNavigationPolicyDecisionRequestedCallbackWrapper :: + WebViewNavigationPolicyDecisionRequestedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr NetworkRequest -> + Ptr WebNavigationAction -> + Ptr WebPolicyDecision -> + Ptr () -> + IO CInt +webViewNavigationPolicyDecisionRequestedCallbackWrapper _cb _ frame request navigationAction policyDecision _ = do + frame' <- (newObject WebFrame) frame + request' <- (newObject NetworkRequest) request + navigationAction' <- (newObject WebNavigationAction) navigationAction + policyDecision' <- (newObject WebPolicyDecision) policyDecision + result <- _cb frame' request' navigationAction' policyDecision' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewNavigationPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewNavigationPolicyDecisionRequestedCallback -> m SignalHandlerId +onWebViewNavigationPolicyDecisionRequested obj cb = liftIO $ connectWebViewNavigationPolicyDecisionRequested obj cb SignalConnectBefore +afterWebViewNavigationPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewNavigationPolicyDecisionRequestedCallback -> m SignalHandlerId +afterWebViewNavigationPolicyDecisionRequested obj cb = connectWebViewNavigationPolicyDecisionRequested obj cb SignalConnectAfter + +connectWebViewNavigationPolicyDecisionRequested :: (GObject a, MonadIO m) => + a -> WebViewNavigationPolicyDecisionRequestedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewNavigationPolicyDecisionRequested obj cb after = liftIO $ do + cb' <- mkWebViewNavigationPolicyDecisionRequestedCallback (webViewNavigationPolicyDecisionRequestedCallbackWrapper cb) + connectSignalFunPtr obj "navigation-policy-decision-requested" cb' after + +-- signal WebView::navigation-requested +type WebViewNavigationRequestedCallback = + WebFrame -> + NetworkRequest -> + IO NavigationResponse + +noWebViewNavigationRequestedCallback :: Maybe WebViewNavigationRequestedCallback +noWebViewNavigationRequestedCallback = Nothing + +type WebViewNavigationRequestedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr NetworkRequest -> + Ptr () -> -- user_data + IO CUInt + +foreign import ccall "wrapper" + mkWebViewNavigationRequestedCallback :: WebViewNavigationRequestedCallbackC -> IO (FunPtr WebViewNavigationRequestedCallbackC) + +webViewNavigationRequestedClosure :: WebViewNavigationRequestedCallback -> IO Closure +webViewNavigationRequestedClosure cb = newCClosure =<< mkWebViewNavigationRequestedCallback wrapped + where wrapped = webViewNavigationRequestedCallbackWrapper cb + +webViewNavigationRequestedCallbackWrapper :: + WebViewNavigationRequestedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr NetworkRequest -> + Ptr () -> + IO CUInt +webViewNavigationRequestedCallbackWrapper _cb _ frame request _ = do + frame' <- (newObject WebFrame) frame + request' <- (newObject NetworkRequest) request + result <- _cb frame' request' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewNavigationRequested :: (GObject a, MonadIO m) => a -> WebViewNavigationRequestedCallback -> m SignalHandlerId +onWebViewNavigationRequested obj cb = liftIO $ connectWebViewNavigationRequested obj cb SignalConnectBefore +afterWebViewNavigationRequested :: (GObject a, MonadIO m) => a -> WebViewNavigationRequestedCallback -> m SignalHandlerId +afterWebViewNavigationRequested obj cb = connectWebViewNavigationRequested obj cb SignalConnectAfter + +connectWebViewNavigationRequested :: (GObject a, MonadIO m) => + a -> WebViewNavigationRequestedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewNavigationRequested obj cb after = liftIO $ do + cb' <- mkWebViewNavigationRequestedCallback (webViewNavigationRequestedCallbackWrapper cb) + connectSignalFunPtr obj "navigation-requested" cb' after + +-- signal WebView::new-window-policy-decision-requested +type WebViewNewWindowPolicyDecisionRequestedCallback = + WebFrame -> + NetworkRequest -> + WebNavigationAction -> + WebPolicyDecision -> + IO Bool + +noWebViewNewWindowPolicyDecisionRequestedCallback :: Maybe WebViewNewWindowPolicyDecisionRequestedCallback +noWebViewNewWindowPolicyDecisionRequestedCallback = Nothing + +type WebViewNewWindowPolicyDecisionRequestedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr NetworkRequest -> + Ptr WebNavigationAction -> + Ptr WebPolicyDecision -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewNewWindowPolicyDecisionRequestedCallback :: WebViewNewWindowPolicyDecisionRequestedCallbackC -> IO (FunPtr WebViewNewWindowPolicyDecisionRequestedCallbackC) + +webViewNewWindowPolicyDecisionRequestedClosure :: WebViewNewWindowPolicyDecisionRequestedCallback -> IO Closure +webViewNewWindowPolicyDecisionRequestedClosure cb = newCClosure =<< mkWebViewNewWindowPolicyDecisionRequestedCallback wrapped + where wrapped = webViewNewWindowPolicyDecisionRequestedCallbackWrapper cb + +webViewNewWindowPolicyDecisionRequestedCallbackWrapper :: + WebViewNewWindowPolicyDecisionRequestedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr NetworkRequest -> + Ptr WebNavigationAction -> + Ptr WebPolicyDecision -> + Ptr () -> + IO CInt +webViewNewWindowPolicyDecisionRequestedCallbackWrapper _cb _ frame request navigationAction policyDecision _ = do + frame' <- (newObject WebFrame) frame + request' <- (newObject NetworkRequest) request + navigationAction' <- (newObject WebNavigationAction) navigationAction + policyDecision' <- (newObject WebPolicyDecision) policyDecision + result <- _cb frame' request' navigationAction' policyDecision' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewNewWindowPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewNewWindowPolicyDecisionRequestedCallback -> m SignalHandlerId +onWebViewNewWindowPolicyDecisionRequested obj cb = liftIO $ connectWebViewNewWindowPolicyDecisionRequested obj cb SignalConnectBefore +afterWebViewNewWindowPolicyDecisionRequested :: (GObject a, MonadIO m) => a -> WebViewNewWindowPolicyDecisionRequestedCallback -> m SignalHandlerId +afterWebViewNewWindowPolicyDecisionRequested obj cb = connectWebViewNewWindowPolicyDecisionRequested obj cb SignalConnectAfter + +connectWebViewNewWindowPolicyDecisionRequested :: (GObject a, MonadIO m) => + a -> WebViewNewWindowPolicyDecisionRequestedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewNewWindowPolicyDecisionRequested obj cb after = liftIO $ do + cb' <- mkWebViewNewWindowPolicyDecisionRequestedCallback (webViewNewWindowPolicyDecisionRequestedCallbackWrapper cb) + connectSignalFunPtr obj "new-window-policy-decision-requested" cb' after + +-- signal WebView::onload-event +type WebViewOnloadEventCallback = + WebFrame -> + IO () + +noWebViewOnloadEventCallback :: Maybe WebViewOnloadEventCallback +noWebViewOnloadEventCallback = Nothing + +type WebViewOnloadEventCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewOnloadEventCallback :: WebViewOnloadEventCallbackC -> IO (FunPtr WebViewOnloadEventCallbackC) + +webViewOnloadEventClosure :: WebViewOnloadEventCallback -> IO Closure +webViewOnloadEventClosure cb = newCClosure =<< mkWebViewOnloadEventCallback wrapped + where wrapped = webViewOnloadEventCallbackWrapper cb + +webViewOnloadEventCallbackWrapper :: + WebViewOnloadEventCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr () -> + IO () +webViewOnloadEventCallbackWrapper _cb _ frame _ = do + frame' <- (newObject WebFrame) frame + _cb frame' + +onWebViewOnloadEvent :: (GObject a, MonadIO m) => a -> WebViewOnloadEventCallback -> m SignalHandlerId +onWebViewOnloadEvent obj cb = liftIO $ connectWebViewOnloadEvent obj cb SignalConnectBefore +afterWebViewOnloadEvent :: (GObject a, MonadIO m) => a -> WebViewOnloadEventCallback -> m SignalHandlerId +afterWebViewOnloadEvent obj cb = connectWebViewOnloadEvent obj cb SignalConnectAfter + +connectWebViewOnloadEvent :: (GObject a, MonadIO m) => + a -> WebViewOnloadEventCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewOnloadEvent obj cb after = liftIO $ do + cb' <- mkWebViewOnloadEventCallback (webViewOnloadEventCallbackWrapper cb) + connectSignalFunPtr obj "onload-event" cb' after + +-- signal WebView::paste-clipboard +type WebViewPasteClipboardCallback = + IO () + +noWebViewPasteClipboardCallback :: Maybe WebViewPasteClipboardCallback +noWebViewPasteClipboardCallback = Nothing + +type WebViewPasteClipboardCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewPasteClipboardCallback :: WebViewPasteClipboardCallbackC -> IO (FunPtr WebViewPasteClipboardCallbackC) + +webViewPasteClipboardClosure :: WebViewPasteClipboardCallback -> IO Closure +webViewPasteClipboardClosure cb = newCClosure =<< mkWebViewPasteClipboardCallback wrapped + where wrapped = webViewPasteClipboardCallbackWrapper cb + +webViewPasteClipboardCallbackWrapper :: + WebViewPasteClipboardCallback -> + Ptr () -> + Ptr () -> + IO () +webViewPasteClipboardCallbackWrapper _cb _ _ = do + _cb + +onWebViewPasteClipboard :: (GObject a, MonadIO m) => a -> WebViewPasteClipboardCallback -> m SignalHandlerId +onWebViewPasteClipboard obj cb = liftIO $ connectWebViewPasteClipboard obj cb SignalConnectBefore +afterWebViewPasteClipboard :: (GObject a, MonadIO m) => a -> WebViewPasteClipboardCallback -> m SignalHandlerId +afterWebViewPasteClipboard obj cb = connectWebViewPasteClipboard obj cb SignalConnectAfter + +connectWebViewPasteClipboard :: (GObject a, MonadIO m) => + a -> WebViewPasteClipboardCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewPasteClipboard obj cb after = liftIO $ do + cb' <- mkWebViewPasteClipboardCallback (webViewPasteClipboardCallbackWrapper cb) + connectSignalFunPtr obj "paste-clipboard" cb' after + +-- signal WebView::populate-popup +type WebViewPopulatePopupCallback = + Gtk.Menu -> + IO () + +noWebViewPopulatePopupCallback :: Maybe WebViewPopulatePopupCallback +noWebViewPopulatePopupCallback = Nothing + +type WebViewPopulatePopupCallbackC = + Ptr () -> -- object + Ptr Gtk.Menu -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewPopulatePopupCallback :: WebViewPopulatePopupCallbackC -> IO (FunPtr WebViewPopulatePopupCallbackC) + +webViewPopulatePopupClosure :: WebViewPopulatePopupCallback -> IO Closure +webViewPopulatePopupClosure cb = newCClosure =<< mkWebViewPopulatePopupCallback wrapped + where wrapped = webViewPopulatePopupCallbackWrapper cb + +webViewPopulatePopupCallbackWrapper :: + WebViewPopulatePopupCallback -> + Ptr () -> + Ptr Gtk.Menu -> + Ptr () -> + IO () +webViewPopulatePopupCallbackWrapper _cb _ menu _ = do + menu' <- (newObject Gtk.Menu) menu + _cb menu' + +onWebViewPopulatePopup :: (GObject a, MonadIO m) => a -> WebViewPopulatePopupCallback -> m SignalHandlerId +onWebViewPopulatePopup obj cb = liftIO $ connectWebViewPopulatePopup obj cb SignalConnectBefore +afterWebViewPopulatePopup :: (GObject a, MonadIO m) => a -> WebViewPopulatePopupCallback -> m SignalHandlerId +afterWebViewPopulatePopup obj cb = connectWebViewPopulatePopup obj cb SignalConnectAfter + +connectWebViewPopulatePopup :: (GObject a, MonadIO m) => + a -> WebViewPopulatePopupCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewPopulatePopup obj cb after = liftIO $ do + cb' <- mkWebViewPopulatePopupCallback (webViewPopulatePopupCallbackWrapper cb) + connectSignalFunPtr obj "populate-popup" cb' after + +-- signal WebView::print-requested +type WebViewPrintRequestedCallback = + WebFrame -> + IO Bool + +noWebViewPrintRequestedCallback :: Maybe WebViewPrintRequestedCallback +noWebViewPrintRequestedCallback = Nothing + +type WebViewPrintRequestedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewPrintRequestedCallback :: WebViewPrintRequestedCallbackC -> IO (FunPtr WebViewPrintRequestedCallbackC) + +webViewPrintRequestedClosure :: WebViewPrintRequestedCallback -> IO Closure +webViewPrintRequestedClosure cb = newCClosure =<< mkWebViewPrintRequestedCallback wrapped + where wrapped = webViewPrintRequestedCallbackWrapper cb + +webViewPrintRequestedCallbackWrapper :: + WebViewPrintRequestedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr () -> + IO CInt +webViewPrintRequestedCallbackWrapper _cb _ webFrame _ = do + webFrame' <- (newObject WebFrame) webFrame + result <- _cb webFrame' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewPrintRequested :: (GObject a, MonadIO m) => a -> WebViewPrintRequestedCallback -> m SignalHandlerId +onWebViewPrintRequested obj cb = liftIO $ connectWebViewPrintRequested obj cb SignalConnectBefore +afterWebViewPrintRequested :: (GObject a, MonadIO m) => a -> WebViewPrintRequestedCallback -> m SignalHandlerId +afterWebViewPrintRequested obj cb = connectWebViewPrintRequested obj cb SignalConnectAfter + +connectWebViewPrintRequested :: (GObject a, MonadIO m) => + a -> WebViewPrintRequestedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewPrintRequested obj cb after = liftIO $ do + cb' <- mkWebViewPrintRequestedCallback (webViewPrintRequestedCallbackWrapper cb) + connectSignalFunPtr obj "print-requested" cb' after + +-- signal WebView::redo +type WebViewRedoCallback = + IO () + +noWebViewRedoCallback :: Maybe WebViewRedoCallback +noWebViewRedoCallback = Nothing + +type WebViewRedoCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewRedoCallback :: WebViewRedoCallbackC -> IO (FunPtr WebViewRedoCallbackC) + +webViewRedoClosure :: WebViewRedoCallback -> IO Closure +webViewRedoClosure cb = newCClosure =<< mkWebViewRedoCallback wrapped + where wrapped = webViewRedoCallbackWrapper cb + +webViewRedoCallbackWrapper :: + WebViewRedoCallback -> + Ptr () -> + Ptr () -> + IO () +webViewRedoCallbackWrapper _cb _ _ = do + _cb + +onWebViewRedo :: (GObject a, MonadIO m) => a -> WebViewRedoCallback -> m SignalHandlerId +onWebViewRedo obj cb = liftIO $ connectWebViewRedo obj cb SignalConnectBefore +afterWebViewRedo :: (GObject a, MonadIO m) => a -> WebViewRedoCallback -> m SignalHandlerId +afterWebViewRedo obj cb = connectWebViewRedo obj cb SignalConnectAfter + +connectWebViewRedo :: (GObject a, MonadIO m) => + a -> WebViewRedoCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewRedo obj cb after = liftIO $ do + cb' <- mkWebViewRedoCallback (webViewRedoCallbackWrapper cb) + connectSignalFunPtr obj "redo" cb' after + +-- signal WebView::resource-content-length-received +type WebViewResourceContentLengthReceivedCallback = + WebFrame -> + WebResource -> + Int32 -> + IO () + +noWebViewResourceContentLengthReceivedCallback :: Maybe WebViewResourceContentLengthReceivedCallback +noWebViewResourceContentLengthReceivedCallback = Nothing + +type WebViewResourceContentLengthReceivedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr WebResource -> + Int32 -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewResourceContentLengthReceivedCallback :: WebViewResourceContentLengthReceivedCallbackC -> IO (FunPtr WebViewResourceContentLengthReceivedCallbackC) + +webViewResourceContentLengthReceivedClosure :: WebViewResourceContentLengthReceivedCallback -> IO Closure +webViewResourceContentLengthReceivedClosure cb = newCClosure =<< mkWebViewResourceContentLengthReceivedCallback wrapped + where wrapped = webViewResourceContentLengthReceivedCallbackWrapper cb + +webViewResourceContentLengthReceivedCallbackWrapper :: + WebViewResourceContentLengthReceivedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr WebResource -> + Int32 -> + Ptr () -> + IO () +webViewResourceContentLengthReceivedCallbackWrapper _cb _ webFrame webResource lengthReceived _ = do + webFrame' <- (newObject WebFrame) webFrame + webResource' <- (newObject WebResource) webResource + _cb webFrame' webResource' lengthReceived + +onWebViewResourceContentLengthReceived :: (GObject a, MonadIO m) => a -> WebViewResourceContentLengthReceivedCallback -> m SignalHandlerId +onWebViewResourceContentLengthReceived obj cb = liftIO $ connectWebViewResourceContentLengthReceived obj cb SignalConnectBefore +afterWebViewResourceContentLengthReceived :: (GObject a, MonadIO m) => a -> WebViewResourceContentLengthReceivedCallback -> m SignalHandlerId +afterWebViewResourceContentLengthReceived obj cb = connectWebViewResourceContentLengthReceived obj cb SignalConnectAfter + +connectWebViewResourceContentLengthReceived :: (GObject a, MonadIO m) => + a -> WebViewResourceContentLengthReceivedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewResourceContentLengthReceived obj cb after = liftIO $ do + cb' <- mkWebViewResourceContentLengthReceivedCallback (webViewResourceContentLengthReceivedCallbackWrapper cb) + connectSignalFunPtr obj "resource-content-length-received" cb' after + +-- signal WebView::resource-load-failed +type WebViewResourceLoadFailedCallback = + WebFrame -> + WebResource -> + GError -> + IO () + +noWebViewResourceLoadFailedCallback :: Maybe WebViewResourceLoadFailedCallback +noWebViewResourceLoadFailedCallback = Nothing + +type WebViewResourceLoadFailedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr WebResource -> + Ptr GError -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewResourceLoadFailedCallback :: WebViewResourceLoadFailedCallbackC -> IO (FunPtr WebViewResourceLoadFailedCallbackC) + +webViewResourceLoadFailedClosure :: WebViewResourceLoadFailedCallback -> IO Closure +webViewResourceLoadFailedClosure cb = newCClosure =<< mkWebViewResourceLoadFailedCallback wrapped + where wrapped = webViewResourceLoadFailedCallbackWrapper cb + +webViewResourceLoadFailedCallbackWrapper :: + WebViewResourceLoadFailedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr WebResource -> + Ptr GError -> + Ptr () -> + IO () +webViewResourceLoadFailedCallbackWrapper _cb _ webFrame webResource error_ _ = do + webFrame' <- (newObject WebFrame) webFrame + webResource' <- (newObject WebResource) webResource + error_' <- (newBoxed GError) error_ + _cb webFrame' webResource' error_' + +onWebViewResourceLoadFailed :: (GObject a, MonadIO m) => a -> WebViewResourceLoadFailedCallback -> m SignalHandlerId +onWebViewResourceLoadFailed obj cb = liftIO $ connectWebViewResourceLoadFailed obj cb SignalConnectBefore +afterWebViewResourceLoadFailed :: (GObject a, MonadIO m) => a -> WebViewResourceLoadFailedCallback -> m SignalHandlerId +afterWebViewResourceLoadFailed obj cb = connectWebViewResourceLoadFailed obj cb SignalConnectAfter + +connectWebViewResourceLoadFailed :: (GObject a, MonadIO m) => + a -> WebViewResourceLoadFailedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewResourceLoadFailed obj cb after = liftIO $ do + cb' <- mkWebViewResourceLoadFailedCallback (webViewResourceLoadFailedCallbackWrapper cb) + connectSignalFunPtr obj "resource-load-failed" cb' after + +-- signal WebView::resource-load-finished +type WebViewResourceLoadFinishedCallback = + WebFrame -> + WebResource -> + IO () + +noWebViewResourceLoadFinishedCallback :: Maybe WebViewResourceLoadFinishedCallback +noWebViewResourceLoadFinishedCallback = Nothing + +type WebViewResourceLoadFinishedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr WebResource -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewResourceLoadFinishedCallback :: WebViewResourceLoadFinishedCallbackC -> IO (FunPtr WebViewResourceLoadFinishedCallbackC) + +webViewResourceLoadFinishedClosure :: WebViewResourceLoadFinishedCallback -> IO Closure +webViewResourceLoadFinishedClosure cb = newCClosure =<< mkWebViewResourceLoadFinishedCallback wrapped + where wrapped = webViewResourceLoadFinishedCallbackWrapper cb + +webViewResourceLoadFinishedCallbackWrapper :: + WebViewResourceLoadFinishedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr WebResource -> + Ptr () -> + IO () +webViewResourceLoadFinishedCallbackWrapper _cb _ webFrame webResource _ = do + webFrame' <- (newObject WebFrame) webFrame + webResource' <- (newObject WebResource) webResource + _cb webFrame' webResource' + +onWebViewResourceLoadFinished :: (GObject a, MonadIO m) => a -> WebViewResourceLoadFinishedCallback -> m SignalHandlerId +onWebViewResourceLoadFinished obj cb = liftIO $ connectWebViewResourceLoadFinished obj cb SignalConnectBefore +afterWebViewResourceLoadFinished :: (GObject a, MonadIO m) => a -> WebViewResourceLoadFinishedCallback -> m SignalHandlerId +afterWebViewResourceLoadFinished obj cb = connectWebViewResourceLoadFinished obj cb SignalConnectAfter + +connectWebViewResourceLoadFinished :: (GObject a, MonadIO m) => + a -> WebViewResourceLoadFinishedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewResourceLoadFinished obj cb after = liftIO $ do + cb' <- mkWebViewResourceLoadFinishedCallback (webViewResourceLoadFinishedCallbackWrapper cb) + connectSignalFunPtr obj "resource-load-finished" cb' after + +-- signal WebView::resource-request-starting +type WebViewResourceRequestStartingCallback = + WebFrame -> + WebResource -> + NetworkRequest -> + NetworkResponse -> + IO () + +noWebViewResourceRequestStartingCallback :: Maybe WebViewResourceRequestStartingCallback +noWebViewResourceRequestStartingCallback = Nothing + +type WebViewResourceRequestStartingCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr WebResource -> + Ptr NetworkRequest -> + Ptr NetworkResponse -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewResourceRequestStartingCallback :: WebViewResourceRequestStartingCallbackC -> IO (FunPtr WebViewResourceRequestStartingCallbackC) + +webViewResourceRequestStartingClosure :: WebViewResourceRequestStartingCallback -> IO Closure +webViewResourceRequestStartingClosure cb = newCClosure =<< mkWebViewResourceRequestStartingCallback wrapped + where wrapped = webViewResourceRequestStartingCallbackWrapper cb + +webViewResourceRequestStartingCallbackWrapper :: + WebViewResourceRequestStartingCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr WebResource -> + Ptr NetworkRequest -> + Ptr NetworkResponse -> + Ptr () -> + IO () +webViewResourceRequestStartingCallbackWrapper _cb _ webFrame webResource request response _ = do + webFrame' <- (newObject WebFrame) webFrame + webResource' <- (newObject WebResource) webResource + request' <- (newObject NetworkRequest) request + response' <- (newObject NetworkResponse) response + _cb webFrame' webResource' request' response' + +onWebViewResourceRequestStarting :: (GObject a, MonadIO m) => a -> WebViewResourceRequestStartingCallback -> m SignalHandlerId +onWebViewResourceRequestStarting obj cb = liftIO $ connectWebViewResourceRequestStarting obj cb SignalConnectBefore +afterWebViewResourceRequestStarting :: (GObject a, MonadIO m) => a -> WebViewResourceRequestStartingCallback -> m SignalHandlerId +afterWebViewResourceRequestStarting obj cb = connectWebViewResourceRequestStarting obj cb SignalConnectAfter + +connectWebViewResourceRequestStarting :: (GObject a, MonadIO m) => + a -> WebViewResourceRequestStartingCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewResourceRequestStarting obj cb after = liftIO $ do + cb' <- mkWebViewResourceRequestStartingCallback (webViewResourceRequestStartingCallbackWrapper cb) + connectSignalFunPtr obj "resource-request-starting" cb' after + +-- signal WebView::resource-response-received +type WebViewResourceResponseReceivedCallback = + WebFrame -> + WebResource -> + NetworkResponse -> + IO () + +noWebViewResourceResponseReceivedCallback :: Maybe WebViewResourceResponseReceivedCallback +noWebViewResourceResponseReceivedCallback = Nothing + +type WebViewResourceResponseReceivedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr WebResource -> + Ptr NetworkResponse -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewResourceResponseReceivedCallback :: WebViewResourceResponseReceivedCallbackC -> IO (FunPtr WebViewResourceResponseReceivedCallbackC) + +webViewResourceResponseReceivedClosure :: WebViewResourceResponseReceivedCallback -> IO Closure +webViewResourceResponseReceivedClosure cb = newCClosure =<< mkWebViewResourceResponseReceivedCallback wrapped + where wrapped = webViewResourceResponseReceivedCallbackWrapper cb + +webViewResourceResponseReceivedCallbackWrapper :: + WebViewResourceResponseReceivedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr WebResource -> + Ptr NetworkResponse -> + Ptr () -> + IO () +webViewResourceResponseReceivedCallbackWrapper _cb _ webFrame webResource response _ = do + webFrame' <- (newObject WebFrame) webFrame + webResource' <- (newObject WebResource) webResource + response' <- (newObject NetworkResponse) response + _cb webFrame' webResource' response' + +onWebViewResourceResponseReceived :: (GObject a, MonadIO m) => a -> WebViewResourceResponseReceivedCallback -> m SignalHandlerId +onWebViewResourceResponseReceived obj cb = liftIO $ connectWebViewResourceResponseReceived obj cb SignalConnectBefore +afterWebViewResourceResponseReceived :: (GObject a, MonadIO m) => a -> WebViewResourceResponseReceivedCallback -> m SignalHandlerId +afterWebViewResourceResponseReceived obj cb = connectWebViewResourceResponseReceived obj cb SignalConnectAfter + +connectWebViewResourceResponseReceived :: (GObject a, MonadIO m) => + a -> WebViewResourceResponseReceivedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewResourceResponseReceived obj cb after = liftIO $ do + cb' <- mkWebViewResourceResponseReceivedCallback (webViewResourceResponseReceivedCallbackWrapper cb) + connectSignalFunPtr obj "resource-response-received" cb' after + +-- signal WebView::run-file-chooser +type WebViewRunFileChooserCallback = + FileChooserRequest -> + IO Bool + +noWebViewRunFileChooserCallback :: Maybe WebViewRunFileChooserCallback +noWebViewRunFileChooserCallback = Nothing + +type WebViewRunFileChooserCallbackC = + Ptr () -> -- object + Ptr FileChooserRequest -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewRunFileChooserCallback :: WebViewRunFileChooserCallbackC -> IO (FunPtr WebViewRunFileChooserCallbackC) + +webViewRunFileChooserClosure :: WebViewRunFileChooserCallback -> IO Closure +webViewRunFileChooserClosure cb = newCClosure =<< mkWebViewRunFileChooserCallback wrapped + where wrapped = webViewRunFileChooserCallbackWrapper cb + +webViewRunFileChooserCallbackWrapper :: + WebViewRunFileChooserCallback -> + Ptr () -> + Ptr FileChooserRequest -> + Ptr () -> + IO CInt +webViewRunFileChooserCallbackWrapper _cb _ request _ = do + request' <- (newObject FileChooserRequest) request + result <- _cb request' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewRunFileChooser :: (GObject a, MonadIO m) => a -> WebViewRunFileChooserCallback -> m SignalHandlerId +onWebViewRunFileChooser obj cb = liftIO $ connectWebViewRunFileChooser obj cb SignalConnectBefore +afterWebViewRunFileChooser :: (GObject a, MonadIO m) => a -> WebViewRunFileChooserCallback -> m SignalHandlerId +afterWebViewRunFileChooser obj cb = connectWebViewRunFileChooser obj cb SignalConnectAfter + +connectWebViewRunFileChooser :: (GObject a, MonadIO m) => + a -> WebViewRunFileChooserCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewRunFileChooser obj cb after = liftIO $ do + cb' <- mkWebViewRunFileChooserCallback (webViewRunFileChooserCallbackWrapper cb) + connectSignalFunPtr obj "run-file-chooser" cb' after + +-- signal WebView::script-alert +type WebViewScriptAlertCallback = + WebFrame -> + T.Text -> + IO Bool + +noWebViewScriptAlertCallback :: Maybe WebViewScriptAlertCallback +noWebViewScriptAlertCallback = Nothing + +type WebViewScriptAlertCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + CString -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewScriptAlertCallback :: WebViewScriptAlertCallbackC -> IO (FunPtr WebViewScriptAlertCallbackC) + +webViewScriptAlertClosure :: WebViewScriptAlertCallback -> IO Closure +webViewScriptAlertClosure cb = newCClosure =<< mkWebViewScriptAlertCallback wrapped + where wrapped = webViewScriptAlertCallbackWrapper cb + +webViewScriptAlertCallbackWrapper :: + WebViewScriptAlertCallback -> + Ptr () -> + Ptr WebFrame -> + CString -> + Ptr () -> + IO CInt +webViewScriptAlertCallbackWrapper _cb _ frame message _ = do + frame' <- (newObject WebFrame) frame + message' <- cstringToText message + result <- _cb frame' message' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewScriptAlert :: (GObject a, MonadIO m) => a -> WebViewScriptAlertCallback -> m SignalHandlerId +onWebViewScriptAlert obj cb = liftIO $ connectWebViewScriptAlert obj cb SignalConnectBefore +afterWebViewScriptAlert :: (GObject a, MonadIO m) => a -> WebViewScriptAlertCallback -> m SignalHandlerId +afterWebViewScriptAlert obj cb = connectWebViewScriptAlert obj cb SignalConnectAfter + +connectWebViewScriptAlert :: (GObject a, MonadIO m) => + a -> WebViewScriptAlertCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewScriptAlert obj cb after = liftIO $ do + cb' <- mkWebViewScriptAlertCallback (webViewScriptAlertCallbackWrapper cb) + connectSignalFunPtr obj "script-alert" cb' after + +-- signal WebView::script-confirm +type WebViewScriptConfirmCallback = + WebFrame -> + T.Text -> + Ptr () -> + IO Bool + +noWebViewScriptConfirmCallback :: Maybe WebViewScriptConfirmCallback +noWebViewScriptConfirmCallback = Nothing + +type WebViewScriptConfirmCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + CString -> + Ptr () -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewScriptConfirmCallback :: WebViewScriptConfirmCallbackC -> IO (FunPtr WebViewScriptConfirmCallbackC) + +webViewScriptConfirmClosure :: WebViewScriptConfirmCallback -> IO Closure +webViewScriptConfirmClosure cb = newCClosure =<< mkWebViewScriptConfirmCallback wrapped + where wrapped = webViewScriptConfirmCallbackWrapper cb + +webViewScriptConfirmCallbackWrapper :: + WebViewScriptConfirmCallback -> + Ptr () -> + Ptr WebFrame -> + CString -> + Ptr () -> + Ptr () -> + IO CInt +webViewScriptConfirmCallbackWrapper _cb _ frame message confirmed _ = do + frame' <- (newObject WebFrame) frame + message' <- cstringToText message + result <- _cb frame' message' confirmed + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewScriptConfirm :: (GObject a, MonadIO m) => a -> WebViewScriptConfirmCallback -> m SignalHandlerId +onWebViewScriptConfirm obj cb = liftIO $ connectWebViewScriptConfirm obj cb SignalConnectBefore +afterWebViewScriptConfirm :: (GObject a, MonadIO m) => a -> WebViewScriptConfirmCallback -> m SignalHandlerId +afterWebViewScriptConfirm obj cb = connectWebViewScriptConfirm obj cb SignalConnectAfter + +connectWebViewScriptConfirm :: (GObject a, MonadIO m) => + a -> WebViewScriptConfirmCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewScriptConfirm obj cb after = liftIO $ do + cb' <- mkWebViewScriptConfirmCallback (webViewScriptConfirmCallbackWrapper cb) + connectSignalFunPtr obj "script-confirm" cb' after + +-- signal WebView::script-prompt +type WebViewScriptPromptCallback = + WebFrame -> + T.Text -> + T.Text -> + Ptr () -> + IO Bool + +noWebViewScriptPromptCallback :: Maybe WebViewScriptPromptCallback +noWebViewScriptPromptCallback = Nothing + +type WebViewScriptPromptCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + CString -> + CString -> + Ptr () -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewScriptPromptCallback :: WebViewScriptPromptCallbackC -> IO (FunPtr WebViewScriptPromptCallbackC) + +webViewScriptPromptClosure :: WebViewScriptPromptCallback -> IO Closure +webViewScriptPromptClosure cb = newCClosure =<< mkWebViewScriptPromptCallback wrapped + where wrapped = webViewScriptPromptCallbackWrapper cb + +webViewScriptPromptCallbackWrapper :: + WebViewScriptPromptCallback -> + Ptr () -> + Ptr WebFrame -> + CString -> + CString -> + Ptr () -> + Ptr () -> + IO CInt +webViewScriptPromptCallbackWrapper _cb _ frame message default_ text _ = do + frame' <- (newObject WebFrame) frame + message' <- cstringToText message + default_' <- cstringToText default_ + result <- _cb frame' message' default_' text + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewScriptPrompt :: (GObject a, MonadIO m) => a -> WebViewScriptPromptCallback -> m SignalHandlerId +onWebViewScriptPrompt obj cb = liftIO $ connectWebViewScriptPrompt obj cb SignalConnectBefore +afterWebViewScriptPrompt :: (GObject a, MonadIO m) => a -> WebViewScriptPromptCallback -> m SignalHandlerId +afterWebViewScriptPrompt obj cb = connectWebViewScriptPrompt obj cb SignalConnectAfter + +connectWebViewScriptPrompt :: (GObject a, MonadIO m) => + a -> WebViewScriptPromptCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewScriptPrompt obj cb after = liftIO $ do + cb' <- mkWebViewScriptPromptCallback (webViewScriptPromptCallbackWrapper cb) + connectSignalFunPtr obj "script-prompt" cb' after + +-- signal WebView::select-all +type WebViewSelectAllCallback = + IO () + +noWebViewSelectAllCallback :: Maybe WebViewSelectAllCallback +noWebViewSelectAllCallback = Nothing + +type WebViewSelectAllCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewSelectAllCallback :: WebViewSelectAllCallbackC -> IO (FunPtr WebViewSelectAllCallbackC) + +webViewSelectAllClosure :: WebViewSelectAllCallback -> IO Closure +webViewSelectAllClosure cb = newCClosure =<< mkWebViewSelectAllCallback wrapped + where wrapped = webViewSelectAllCallbackWrapper cb + +webViewSelectAllCallbackWrapper :: + WebViewSelectAllCallback -> + Ptr () -> + Ptr () -> + IO () +webViewSelectAllCallbackWrapper _cb _ _ = do + _cb + +onWebViewSelectAll :: (GObject a, MonadIO m) => a -> WebViewSelectAllCallback -> m SignalHandlerId +onWebViewSelectAll obj cb = liftIO $ connectWebViewSelectAll obj cb SignalConnectBefore +afterWebViewSelectAll :: (GObject a, MonadIO m) => a -> WebViewSelectAllCallback -> m SignalHandlerId +afterWebViewSelectAll obj cb = connectWebViewSelectAll obj cb SignalConnectAfter + +connectWebViewSelectAll :: (GObject a, MonadIO m) => + a -> WebViewSelectAllCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewSelectAll obj cb after = liftIO $ do + cb' <- mkWebViewSelectAllCallback (webViewSelectAllCallbackWrapper cb) + connectSignalFunPtr obj "select-all" cb' after + +-- signal WebView::selection-changed +type WebViewSelectionChangedCallback = + IO () + +noWebViewSelectionChangedCallback :: Maybe WebViewSelectionChangedCallback +noWebViewSelectionChangedCallback = Nothing + +type WebViewSelectionChangedCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewSelectionChangedCallback :: WebViewSelectionChangedCallbackC -> IO (FunPtr WebViewSelectionChangedCallbackC) + +webViewSelectionChangedClosure :: WebViewSelectionChangedCallback -> IO Closure +webViewSelectionChangedClosure cb = newCClosure =<< mkWebViewSelectionChangedCallback wrapped + where wrapped = webViewSelectionChangedCallbackWrapper cb + +webViewSelectionChangedCallbackWrapper :: + WebViewSelectionChangedCallback -> + Ptr () -> + Ptr () -> + IO () +webViewSelectionChangedCallbackWrapper _cb _ _ = do + _cb + +onWebViewSelectionChanged :: (GObject a, MonadIO m) => a -> WebViewSelectionChangedCallback -> m SignalHandlerId +onWebViewSelectionChanged obj cb = liftIO $ connectWebViewSelectionChanged obj cb SignalConnectBefore +afterWebViewSelectionChanged :: (GObject a, MonadIO m) => a -> WebViewSelectionChangedCallback -> m SignalHandlerId +afterWebViewSelectionChanged obj cb = connectWebViewSelectionChanged obj cb SignalConnectAfter + +connectWebViewSelectionChanged :: (GObject a, MonadIO m) => + a -> WebViewSelectionChangedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewSelectionChanged obj cb after = liftIO $ do + cb' <- mkWebViewSelectionChangedCallback (webViewSelectionChangedCallbackWrapper cb) + connectSignalFunPtr obj "selection-changed" cb' after + +-- signal WebView::should-apply-style +type WebViewShouldApplyStyleCallback = + DOMCSSStyleDeclaration -> + DOMRange -> + IO Bool + +noWebViewShouldApplyStyleCallback :: Maybe WebViewShouldApplyStyleCallback +noWebViewShouldApplyStyleCallback = Nothing + +type WebViewShouldApplyStyleCallbackC = + Ptr () -> -- object + Ptr DOMCSSStyleDeclaration -> + Ptr DOMRange -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewShouldApplyStyleCallback :: WebViewShouldApplyStyleCallbackC -> IO (FunPtr WebViewShouldApplyStyleCallbackC) + +webViewShouldApplyStyleClosure :: WebViewShouldApplyStyleCallback -> IO Closure +webViewShouldApplyStyleClosure cb = newCClosure =<< mkWebViewShouldApplyStyleCallback wrapped + where wrapped = webViewShouldApplyStyleCallbackWrapper cb + +webViewShouldApplyStyleCallbackWrapper :: + WebViewShouldApplyStyleCallback -> + Ptr () -> + Ptr DOMCSSStyleDeclaration -> + Ptr DOMRange -> + Ptr () -> + IO CInt +webViewShouldApplyStyleCallbackWrapper _cb _ set range _ = do + set' <- (newObject DOMCSSStyleDeclaration) set + range' <- (newObject DOMRange) range + result <- _cb set' range' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewShouldApplyStyle :: (GObject a, MonadIO m) => a -> WebViewShouldApplyStyleCallback -> m SignalHandlerId +onWebViewShouldApplyStyle obj cb = liftIO $ connectWebViewShouldApplyStyle obj cb SignalConnectBefore +afterWebViewShouldApplyStyle :: (GObject a, MonadIO m) => a -> WebViewShouldApplyStyleCallback -> m SignalHandlerId +afterWebViewShouldApplyStyle obj cb = connectWebViewShouldApplyStyle obj cb SignalConnectAfter + +connectWebViewShouldApplyStyle :: (GObject a, MonadIO m) => + a -> WebViewShouldApplyStyleCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewShouldApplyStyle obj cb after = liftIO $ do + cb' <- mkWebViewShouldApplyStyleCallback (webViewShouldApplyStyleCallbackWrapper cb) + connectSignalFunPtr obj "should-apply-style" cb' after + +-- signal WebView::should-begin-editing +type WebViewShouldBeginEditingCallback = + DOMRange -> + IO Bool + +noWebViewShouldBeginEditingCallback :: Maybe WebViewShouldBeginEditingCallback +noWebViewShouldBeginEditingCallback = Nothing + +type WebViewShouldBeginEditingCallbackC = + Ptr () -> -- object + Ptr DOMRange -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewShouldBeginEditingCallback :: WebViewShouldBeginEditingCallbackC -> IO (FunPtr WebViewShouldBeginEditingCallbackC) + +webViewShouldBeginEditingClosure :: WebViewShouldBeginEditingCallback -> IO Closure +webViewShouldBeginEditingClosure cb = newCClosure =<< mkWebViewShouldBeginEditingCallback wrapped + where wrapped = webViewShouldBeginEditingCallbackWrapper cb + +webViewShouldBeginEditingCallbackWrapper :: + WebViewShouldBeginEditingCallback -> + Ptr () -> + Ptr DOMRange -> + Ptr () -> + IO CInt +webViewShouldBeginEditingCallbackWrapper _cb _ range _ = do + range' <- (newObject DOMRange) range + result <- _cb range' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewShouldBeginEditing :: (GObject a, MonadIO m) => a -> WebViewShouldBeginEditingCallback -> m SignalHandlerId +onWebViewShouldBeginEditing obj cb = liftIO $ connectWebViewShouldBeginEditing obj cb SignalConnectBefore +afterWebViewShouldBeginEditing :: (GObject a, MonadIO m) => a -> WebViewShouldBeginEditingCallback -> m SignalHandlerId +afterWebViewShouldBeginEditing obj cb = connectWebViewShouldBeginEditing obj cb SignalConnectAfter + +connectWebViewShouldBeginEditing :: (GObject a, MonadIO m) => + a -> WebViewShouldBeginEditingCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewShouldBeginEditing obj cb after = liftIO $ do + cb' <- mkWebViewShouldBeginEditingCallback (webViewShouldBeginEditingCallbackWrapper cb) + connectSignalFunPtr obj "should-begin-editing" cb' after + +-- signal WebView::should-change-selected-range +type WebViewShouldChangeSelectedRangeCallback = + DOMRange -> + DOMRange -> + SelectionAffinity -> + Bool -> + IO Bool + +noWebViewShouldChangeSelectedRangeCallback :: Maybe WebViewShouldChangeSelectedRangeCallback +noWebViewShouldChangeSelectedRangeCallback = Nothing + +type WebViewShouldChangeSelectedRangeCallbackC = + Ptr () -> -- object + Ptr DOMRange -> + Ptr DOMRange -> + CUInt -> + CInt -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewShouldChangeSelectedRangeCallback :: WebViewShouldChangeSelectedRangeCallbackC -> IO (FunPtr WebViewShouldChangeSelectedRangeCallbackC) + +webViewShouldChangeSelectedRangeClosure :: WebViewShouldChangeSelectedRangeCallback -> IO Closure +webViewShouldChangeSelectedRangeClosure cb = newCClosure =<< mkWebViewShouldChangeSelectedRangeCallback wrapped + where wrapped = webViewShouldChangeSelectedRangeCallbackWrapper cb + +webViewShouldChangeSelectedRangeCallbackWrapper :: + WebViewShouldChangeSelectedRangeCallback -> + Ptr () -> + Ptr DOMRange -> + Ptr DOMRange -> + CUInt -> + CInt -> + Ptr () -> + IO CInt +webViewShouldChangeSelectedRangeCallbackWrapper _cb _ fromRange toRange affinity stillSelecting _ = do + fromRange' <- (newObject DOMRange) fromRange + toRange' <- (newObject DOMRange) toRange + let affinity' = (toEnum . fromIntegral) affinity + let stillSelecting' = (/= 0) stillSelecting + result <- _cb fromRange' toRange' affinity' stillSelecting' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewShouldChangeSelectedRange :: (GObject a, MonadIO m) => a -> WebViewShouldChangeSelectedRangeCallback -> m SignalHandlerId +onWebViewShouldChangeSelectedRange obj cb = liftIO $ connectWebViewShouldChangeSelectedRange obj cb SignalConnectBefore +afterWebViewShouldChangeSelectedRange :: (GObject a, MonadIO m) => a -> WebViewShouldChangeSelectedRangeCallback -> m SignalHandlerId +afterWebViewShouldChangeSelectedRange obj cb = connectWebViewShouldChangeSelectedRange obj cb SignalConnectAfter + +connectWebViewShouldChangeSelectedRange :: (GObject a, MonadIO m) => + a -> WebViewShouldChangeSelectedRangeCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewShouldChangeSelectedRange obj cb after = liftIO $ do + cb' <- mkWebViewShouldChangeSelectedRangeCallback (webViewShouldChangeSelectedRangeCallbackWrapper cb) + connectSignalFunPtr obj "should-change-selected-range" cb' after + +-- signal WebView::should-delete-range +type WebViewShouldDeleteRangeCallback = + DOMRange -> + IO Bool + +noWebViewShouldDeleteRangeCallback :: Maybe WebViewShouldDeleteRangeCallback +noWebViewShouldDeleteRangeCallback = Nothing + +type WebViewShouldDeleteRangeCallbackC = + Ptr () -> -- object + Ptr DOMRange -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewShouldDeleteRangeCallback :: WebViewShouldDeleteRangeCallbackC -> IO (FunPtr WebViewShouldDeleteRangeCallbackC) + +webViewShouldDeleteRangeClosure :: WebViewShouldDeleteRangeCallback -> IO Closure +webViewShouldDeleteRangeClosure cb = newCClosure =<< mkWebViewShouldDeleteRangeCallback wrapped + where wrapped = webViewShouldDeleteRangeCallbackWrapper cb + +webViewShouldDeleteRangeCallbackWrapper :: + WebViewShouldDeleteRangeCallback -> + Ptr () -> + Ptr DOMRange -> + Ptr () -> + IO CInt +webViewShouldDeleteRangeCallbackWrapper _cb _ range _ = do + range' <- (newObject DOMRange) range + result <- _cb range' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewShouldDeleteRange :: (GObject a, MonadIO m) => a -> WebViewShouldDeleteRangeCallback -> m SignalHandlerId +onWebViewShouldDeleteRange obj cb = liftIO $ connectWebViewShouldDeleteRange obj cb SignalConnectBefore +afterWebViewShouldDeleteRange :: (GObject a, MonadIO m) => a -> WebViewShouldDeleteRangeCallback -> m SignalHandlerId +afterWebViewShouldDeleteRange obj cb = connectWebViewShouldDeleteRange obj cb SignalConnectAfter + +connectWebViewShouldDeleteRange :: (GObject a, MonadIO m) => + a -> WebViewShouldDeleteRangeCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewShouldDeleteRange obj cb after = liftIO $ do + cb' <- mkWebViewShouldDeleteRangeCallback (webViewShouldDeleteRangeCallbackWrapper cb) + connectSignalFunPtr obj "should-delete-range" cb' after + +-- signal WebView::should-end-editing +type WebViewShouldEndEditingCallback = + DOMRange -> + IO Bool + +noWebViewShouldEndEditingCallback :: Maybe WebViewShouldEndEditingCallback +noWebViewShouldEndEditingCallback = Nothing + +type WebViewShouldEndEditingCallbackC = + Ptr () -> -- object + Ptr DOMRange -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewShouldEndEditingCallback :: WebViewShouldEndEditingCallbackC -> IO (FunPtr WebViewShouldEndEditingCallbackC) + +webViewShouldEndEditingClosure :: WebViewShouldEndEditingCallback -> IO Closure +webViewShouldEndEditingClosure cb = newCClosure =<< mkWebViewShouldEndEditingCallback wrapped + where wrapped = webViewShouldEndEditingCallbackWrapper cb + +webViewShouldEndEditingCallbackWrapper :: + WebViewShouldEndEditingCallback -> + Ptr () -> + Ptr DOMRange -> + Ptr () -> + IO CInt +webViewShouldEndEditingCallbackWrapper _cb _ range _ = do + range' <- (newObject DOMRange) range + result <- _cb range' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewShouldEndEditing :: (GObject a, MonadIO m) => a -> WebViewShouldEndEditingCallback -> m SignalHandlerId +onWebViewShouldEndEditing obj cb = liftIO $ connectWebViewShouldEndEditing obj cb SignalConnectBefore +afterWebViewShouldEndEditing :: (GObject a, MonadIO m) => a -> WebViewShouldEndEditingCallback -> m SignalHandlerId +afterWebViewShouldEndEditing obj cb = connectWebViewShouldEndEditing obj cb SignalConnectAfter + +connectWebViewShouldEndEditing :: (GObject a, MonadIO m) => + a -> WebViewShouldEndEditingCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewShouldEndEditing obj cb after = liftIO $ do + cb' <- mkWebViewShouldEndEditingCallback (webViewShouldEndEditingCallbackWrapper cb) + connectSignalFunPtr obj "should-end-editing" cb' after + +-- signal WebView::should-insert-node +type WebViewShouldInsertNodeCallback = + DOMNode -> + DOMRange -> + InsertAction -> + IO Bool + +noWebViewShouldInsertNodeCallback :: Maybe WebViewShouldInsertNodeCallback +noWebViewShouldInsertNodeCallback = Nothing + +type WebViewShouldInsertNodeCallbackC = + Ptr () -> -- object + Ptr DOMNode -> + Ptr DOMRange -> + CUInt -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewShouldInsertNodeCallback :: WebViewShouldInsertNodeCallbackC -> IO (FunPtr WebViewShouldInsertNodeCallbackC) + +webViewShouldInsertNodeClosure :: WebViewShouldInsertNodeCallback -> IO Closure +webViewShouldInsertNodeClosure cb = newCClosure =<< mkWebViewShouldInsertNodeCallback wrapped + where wrapped = webViewShouldInsertNodeCallbackWrapper cb + +webViewShouldInsertNodeCallbackWrapper :: + WebViewShouldInsertNodeCallback -> + Ptr () -> + Ptr DOMNode -> + Ptr DOMRange -> + CUInt -> + Ptr () -> + IO CInt +webViewShouldInsertNodeCallbackWrapper _cb _ node range action _ = do + node' <- (newObject DOMNode) node + range' <- (newObject DOMRange) range + let action' = (toEnum . fromIntegral) action + result <- _cb node' range' action' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewShouldInsertNode :: (GObject a, MonadIO m) => a -> WebViewShouldInsertNodeCallback -> m SignalHandlerId +onWebViewShouldInsertNode obj cb = liftIO $ connectWebViewShouldInsertNode obj cb SignalConnectBefore +afterWebViewShouldInsertNode :: (GObject a, MonadIO m) => a -> WebViewShouldInsertNodeCallback -> m SignalHandlerId +afterWebViewShouldInsertNode obj cb = connectWebViewShouldInsertNode obj cb SignalConnectAfter + +connectWebViewShouldInsertNode :: (GObject a, MonadIO m) => + a -> WebViewShouldInsertNodeCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewShouldInsertNode obj cb after = liftIO $ do + cb' <- mkWebViewShouldInsertNodeCallback (webViewShouldInsertNodeCallbackWrapper cb) + connectSignalFunPtr obj "should-insert-node" cb' after + +-- signal WebView::should-insert-text +type WebViewShouldInsertTextCallback = + T.Text -> + DOMRange -> + InsertAction -> + IO Bool + +noWebViewShouldInsertTextCallback :: Maybe WebViewShouldInsertTextCallback +noWebViewShouldInsertTextCallback = Nothing + +type WebViewShouldInsertTextCallbackC = + Ptr () -> -- object + CString -> + Ptr DOMRange -> + CUInt -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewShouldInsertTextCallback :: WebViewShouldInsertTextCallbackC -> IO (FunPtr WebViewShouldInsertTextCallbackC) + +webViewShouldInsertTextClosure :: WebViewShouldInsertTextCallback -> IO Closure +webViewShouldInsertTextClosure cb = newCClosure =<< mkWebViewShouldInsertTextCallback wrapped + where wrapped = webViewShouldInsertTextCallbackWrapper cb + +webViewShouldInsertTextCallbackWrapper :: + WebViewShouldInsertTextCallback -> + Ptr () -> + CString -> + Ptr DOMRange -> + CUInt -> + Ptr () -> + IO CInt +webViewShouldInsertTextCallbackWrapper _cb _ string range action _ = do + string' <- cstringToText string + range' <- (newObject DOMRange) range + let action' = (toEnum . fromIntegral) action + result <- _cb string' range' action' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewShouldInsertText :: (GObject a, MonadIO m) => a -> WebViewShouldInsertTextCallback -> m SignalHandlerId +onWebViewShouldInsertText obj cb = liftIO $ connectWebViewShouldInsertText obj cb SignalConnectBefore +afterWebViewShouldInsertText :: (GObject a, MonadIO m) => a -> WebViewShouldInsertTextCallback -> m SignalHandlerId +afterWebViewShouldInsertText obj cb = connectWebViewShouldInsertText obj cb SignalConnectAfter + +connectWebViewShouldInsertText :: (GObject a, MonadIO m) => + a -> WebViewShouldInsertTextCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewShouldInsertText obj cb after = liftIO $ do + cb' <- mkWebViewShouldInsertTextCallback (webViewShouldInsertTextCallbackWrapper cb) + connectSignalFunPtr obj "should-insert-text" cb' after + +-- signal WebView::should-show-delete-interface-for-element +type WebViewShouldShowDeleteInterfaceForElementCallback = + DOMHTMLElement -> + IO Bool + +noWebViewShouldShowDeleteInterfaceForElementCallback :: Maybe WebViewShouldShowDeleteInterfaceForElementCallback +noWebViewShouldShowDeleteInterfaceForElementCallback = Nothing + +type WebViewShouldShowDeleteInterfaceForElementCallbackC = + Ptr () -> -- object + Ptr DOMHTMLElement -> + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewShouldShowDeleteInterfaceForElementCallback :: WebViewShouldShowDeleteInterfaceForElementCallbackC -> IO (FunPtr WebViewShouldShowDeleteInterfaceForElementCallbackC) + +webViewShouldShowDeleteInterfaceForElementClosure :: WebViewShouldShowDeleteInterfaceForElementCallback -> IO Closure +webViewShouldShowDeleteInterfaceForElementClosure cb = newCClosure =<< mkWebViewShouldShowDeleteInterfaceForElementCallback wrapped + where wrapped = webViewShouldShowDeleteInterfaceForElementCallbackWrapper cb + +webViewShouldShowDeleteInterfaceForElementCallbackWrapper :: + WebViewShouldShowDeleteInterfaceForElementCallback -> + Ptr () -> + Ptr DOMHTMLElement -> + Ptr () -> + IO CInt +webViewShouldShowDeleteInterfaceForElementCallbackWrapper _cb _ element _ = do + element' <- (newObject DOMHTMLElement) element + result <- _cb element' + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewShouldShowDeleteInterfaceForElement :: (GObject a, MonadIO m) => a -> WebViewShouldShowDeleteInterfaceForElementCallback -> m SignalHandlerId +onWebViewShouldShowDeleteInterfaceForElement obj cb = liftIO $ connectWebViewShouldShowDeleteInterfaceForElement obj cb SignalConnectBefore +afterWebViewShouldShowDeleteInterfaceForElement :: (GObject a, MonadIO m) => a -> WebViewShouldShowDeleteInterfaceForElementCallback -> m SignalHandlerId +afterWebViewShouldShowDeleteInterfaceForElement obj cb = connectWebViewShouldShowDeleteInterfaceForElement obj cb SignalConnectAfter + +connectWebViewShouldShowDeleteInterfaceForElement :: (GObject a, MonadIO m) => + a -> WebViewShouldShowDeleteInterfaceForElementCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewShouldShowDeleteInterfaceForElement obj cb after = liftIO $ do + cb' <- mkWebViewShouldShowDeleteInterfaceForElementCallback (webViewShouldShowDeleteInterfaceForElementCallbackWrapper cb) + connectSignalFunPtr obj "should-show-delete-interface-for-element" cb' after + +-- signal WebView::status-bar-text-changed +type WebViewStatusBarTextChangedCallback = + T.Text -> + IO () + +noWebViewStatusBarTextChangedCallback :: Maybe WebViewStatusBarTextChangedCallback +noWebViewStatusBarTextChangedCallback = Nothing + +type WebViewStatusBarTextChangedCallbackC = + Ptr () -> -- object + CString -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewStatusBarTextChangedCallback :: WebViewStatusBarTextChangedCallbackC -> IO (FunPtr WebViewStatusBarTextChangedCallbackC) + +webViewStatusBarTextChangedClosure :: WebViewStatusBarTextChangedCallback -> IO Closure +webViewStatusBarTextChangedClosure cb = newCClosure =<< mkWebViewStatusBarTextChangedCallback wrapped + where wrapped = webViewStatusBarTextChangedCallbackWrapper cb + +webViewStatusBarTextChangedCallbackWrapper :: + WebViewStatusBarTextChangedCallback -> + Ptr () -> + CString -> + Ptr () -> + IO () +webViewStatusBarTextChangedCallbackWrapper _cb _ object _ = do + object' <- cstringToText object + _cb object' + +onWebViewStatusBarTextChanged :: (GObject a, MonadIO m) => a -> WebViewStatusBarTextChangedCallback -> m SignalHandlerId +onWebViewStatusBarTextChanged obj cb = liftIO $ connectWebViewStatusBarTextChanged obj cb SignalConnectBefore +afterWebViewStatusBarTextChanged :: (GObject a, MonadIO m) => a -> WebViewStatusBarTextChangedCallback -> m SignalHandlerId +afterWebViewStatusBarTextChanged obj cb = connectWebViewStatusBarTextChanged obj cb SignalConnectAfter + +connectWebViewStatusBarTextChanged :: (GObject a, MonadIO m) => + a -> WebViewStatusBarTextChangedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewStatusBarTextChanged obj cb after = liftIO $ do + cb' <- mkWebViewStatusBarTextChangedCallback (webViewStatusBarTextChangedCallbackWrapper cb) + connectSignalFunPtr obj "status-bar-text-changed" cb' after + +-- signal WebView::title-changed +type WebViewTitleChangedCallback = + WebFrame -> + T.Text -> + IO () + +noWebViewTitleChangedCallback :: Maybe WebViewTitleChangedCallback +noWebViewTitleChangedCallback = Nothing + +type WebViewTitleChangedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + CString -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewTitleChangedCallback :: WebViewTitleChangedCallbackC -> IO (FunPtr WebViewTitleChangedCallbackC) + +webViewTitleChangedClosure :: WebViewTitleChangedCallback -> IO Closure +webViewTitleChangedClosure cb = newCClosure =<< mkWebViewTitleChangedCallback wrapped + where wrapped = webViewTitleChangedCallbackWrapper cb + +webViewTitleChangedCallbackWrapper :: + WebViewTitleChangedCallback -> + Ptr () -> + Ptr WebFrame -> + CString -> + Ptr () -> + IO () +webViewTitleChangedCallbackWrapper _cb _ frame title _ = do + frame' <- (newObject WebFrame) frame + title' <- cstringToText title + _cb frame' title' + +onWebViewTitleChanged :: (GObject a, MonadIO m) => a -> WebViewTitleChangedCallback -> m SignalHandlerId +onWebViewTitleChanged obj cb = liftIO $ connectWebViewTitleChanged obj cb SignalConnectBefore +afterWebViewTitleChanged :: (GObject a, MonadIO m) => a -> WebViewTitleChangedCallback -> m SignalHandlerId +afterWebViewTitleChanged obj cb = connectWebViewTitleChanged obj cb SignalConnectAfter + +connectWebViewTitleChanged :: (GObject a, MonadIO m) => + a -> WebViewTitleChangedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewTitleChanged obj cb after = liftIO $ do + cb' <- mkWebViewTitleChangedCallback (webViewTitleChangedCallbackWrapper cb) + connectSignalFunPtr obj "title-changed" cb' after + +-- signal WebView::undo +type WebViewUndoCallback = + IO () + +noWebViewUndoCallback :: Maybe WebViewUndoCallback +noWebViewUndoCallback = Nothing + +type WebViewUndoCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewUndoCallback :: WebViewUndoCallbackC -> IO (FunPtr WebViewUndoCallbackC) + +webViewUndoClosure :: WebViewUndoCallback -> IO Closure +webViewUndoClosure cb = newCClosure =<< mkWebViewUndoCallback wrapped + where wrapped = webViewUndoCallbackWrapper cb + +webViewUndoCallbackWrapper :: + WebViewUndoCallback -> + Ptr () -> + Ptr () -> + IO () +webViewUndoCallbackWrapper _cb _ _ = do + _cb + +onWebViewUndo :: (GObject a, MonadIO m) => a -> WebViewUndoCallback -> m SignalHandlerId +onWebViewUndo obj cb = liftIO $ connectWebViewUndo obj cb SignalConnectBefore +afterWebViewUndo :: (GObject a, MonadIO m) => a -> WebViewUndoCallback -> m SignalHandlerId +afterWebViewUndo obj cb = connectWebViewUndo obj cb SignalConnectAfter + +connectWebViewUndo :: (GObject a, MonadIO m) => + a -> WebViewUndoCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewUndo obj cb after = liftIO $ do + cb' <- mkWebViewUndoCallback (webViewUndoCallbackWrapper cb) + connectSignalFunPtr obj "undo" cb' after + +-- signal WebView::user-changed-contents +type WebViewUserChangedContentsCallback = + IO () + +noWebViewUserChangedContentsCallback :: Maybe WebViewUserChangedContentsCallback +noWebViewUserChangedContentsCallback = Nothing + +type WebViewUserChangedContentsCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewUserChangedContentsCallback :: WebViewUserChangedContentsCallbackC -> IO (FunPtr WebViewUserChangedContentsCallbackC) + +webViewUserChangedContentsClosure :: WebViewUserChangedContentsCallback -> IO Closure +webViewUserChangedContentsClosure cb = newCClosure =<< mkWebViewUserChangedContentsCallback wrapped + where wrapped = webViewUserChangedContentsCallbackWrapper cb + +webViewUserChangedContentsCallbackWrapper :: + WebViewUserChangedContentsCallback -> + Ptr () -> + Ptr () -> + IO () +webViewUserChangedContentsCallbackWrapper _cb _ _ = do + _cb + +onWebViewUserChangedContents :: (GObject a, MonadIO m) => a -> WebViewUserChangedContentsCallback -> m SignalHandlerId +onWebViewUserChangedContents obj cb = liftIO $ connectWebViewUserChangedContents obj cb SignalConnectBefore +afterWebViewUserChangedContents :: (GObject a, MonadIO m) => a -> WebViewUserChangedContentsCallback -> m SignalHandlerId +afterWebViewUserChangedContents obj cb = connectWebViewUserChangedContents obj cb SignalConnectAfter + +connectWebViewUserChangedContents :: (GObject a, MonadIO m) => + a -> WebViewUserChangedContentsCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewUserChangedContents obj cb after = liftIO $ do + cb' <- mkWebViewUserChangedContentsCallback (webViewUserChangedContentsCallbackWrapper cb) + connectSignalFunPtr obj "user-changed-contents" cb' after + +-- signal WebView::viewport-attributes-changed +type WebViewViewportAttributesChangedCallback = + ViewportAttributes -> + IO () + +noWebViewViewportAttributesChangedCallback :: Maybe WebViewViewportAttributesChangedCallback +noWebViewViewportAttributesChangedCallback = Nothing + +type WebViewViewportAttributesChangedCallbackC = + Ptr () -> -- object + Ptr ViewportAttributes -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewViewportAttributesChangedCallback :: WebViewViewportAttributesChangedCallbackC -> IO (FunPtr WebViewViewportAttributesChangedCallbackC) + +webViewViewportAttributesChangedClosure :: WebViewViewportAttributesChangedCallback -> IO Closure +webViewViewportAttributesChangedClosure cb = newCClosure =<< mkWebViewViewportAttributesChangedCallback wrapped + where wrapped = webViewViewportAttributesChangedCallbackWrapper cb + +webViewViewportAttributesChangedCallbackWrapper :: + WebViewViewportAttributesChangedCallback -> + Ptr () -> + Ptr ViewportAttributes -> + Ptr () -> + IO () +webViewViewportAttributesChangedCallbackWrapper _cb _ object _ = do + object' <- (newObject ViewportAttributes) object + _cb object' + +onWebViewViewportAttributesChanged :: (GObject a, MonadIO m) => a -> WebViewViewportAttributesChangedCallback -> m SignalHandlerId +onWebViewViewportAttributesChanged obj cb = liftIO $ connectWebViewViewportAttributesChanged obj cb SignalConnectBefore +afterWebViewViewportAttributesChanged :: (GObject a, MonadIO m) => a -> WebViewViewportAttributesChangedCallback -> m SignalHandlerId +afterWebViewViewportAttributesChanged obj cb = connectWebViewViewportAttributesChanged obj cb SignalConnectAfter + +connectWebViewViewportAttributesChanged :: (GObject a, MonadIO m) => + a -> WebViewViewportAttributesChangedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewViewportAttributesChanged obj cb after = liftIO $ do + cb' <- mkWebViewViewportAttributesChangedCallback (webViewViewportAttributesChangedCallbackWrapper cb) + connectSignalFunPtr obj "viewport-attributes-changed" cb' after + +-- signal WebView::viewport-attributes-recompute-requested +type WebViewViewportAttributesRecomputeRequestedCallback = + ViewportAttributes -> + IO () + +noWebViewViewportAttributesRecomputeRequestedCallback :: Maybe WebViewViewportAttributesRecomputeRequestedCallback +noWebViewViewportAttributesRecomputeRequestedCallback = Nothing + +type WebViewViewportAttributesRecomputeRequestedCallbackC = + Ptr () -> -- object + Ptr ViewportAttributes -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewViewportAttributesRecomputeRequestedCallback :: WebViewViewportAttributesRecomputeRequestedCallbackC -> IO (FunPtr WebViewViewportAttributesRecomputeRequestedCallbackC) + +webViewViewportAttributesRecomputeRequestedClosure :: WebViewViewportAttributesRecomputeRequestedCallback -> IO Closure +webViewViewportAttributesRecomputeRequestedClosure cb = newCClosure =<< mkWebViewViewportAttributesRecomputeRequestedCallback wrapped + where wrapped = webViewViewportAttributesRecomputeRequestedCallbackWrapper cb + +webViewViewportAttributesRecomputeRequestedCallbackWrapper :: + WebViewViewportAttributesRecomputeRequestedCallback -> + Ptr () -> + Ptr ViewportAttributes -> + Ptr () -> + IO () +webViewViewportAttributesRecomputeRequestedCallbackWrapper _cb _ object _ = do + object' <- (newObject ViewportAttributes) object + _cb object' + +onWebViewViewportAttributesRecomputeRequested :: (GObject a, MonadIO m) => a -> WebViewViewportAttributesRecomputeRequestedCallback -> m SignalHandlerId +onWebViewViewportAttributesRecomputeRequested obj cb = liftIO $ connectWebViewViewportAttributesRecomputeRequested obj cb SignalConnectBefore +afterWebViewViewportAttributesRecomputeRequested :: (GObject a, MonadIO m) => a -> WebViewViewportAttributesRecomputeRequestedCallback -> m SignalHandlerId +afterWebViewViewportAttributesRecomputeRequested obj cb = connectWebViewViewportAttributesRecomputeRequested obj cb SignalConnectAfter + +connectWebViewViewportAttributesRecomputeRequested :: (GObject a, MonadIO m) => + a -> WebViewViewportAttributesRecomputeRequestedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewViewportAttributesRecomputeRequested obj cb after = liftIO $ do + cb' <- mkWebViewViewportAttributesRecomputeRequestedCallback (webViewViewportAttributesRecomputeRequestedCallbackWrapper cb) + connectSignalFunPtr obj "viewport-attributes-recompute-requested" cb' after + +-- signal WebView::web-view-ready +type WebViewWebViewReadyCallback = + IO Bool + +noWebViewWebViewReadyCallback :: Maybe WebViewWebViewReadyCallback +noWebViewWebViewReadyCallback = Nothing + +type WebViewWebViewReadyCallbackC = + Ptr () -> -- object + Ptr () -> -- user_data + IO CInt + +foreign import ccall "wrapper" + mkWebViewWebViewReadyCallback :: WebViewWebViewReadyCallbackC -> IO (FunPtr WebViewWebViewReadyCallbackC) + +webViewWebViewReadyClosure :: WebViewWebViewReadyCallback -> IO Closure +webViewWebViewReadyClosure cb = newCClosure =<< mkWebViewWebViewReadyCallback wrapped + where wrapped = webViewWebViewReadyCallbackWrapper cb + +webViewWebViewReadyCallbackWrapper :: + WebViewWebViewReadyCallback -> + Ptr () -> + Ptr () -> + IO CInt +webViewWebViewReadyCallbackWrapper _cb _ _ = do + result <- _cb + let result' = (fromIntegral . fromEnum) result + return result' + +onWebViewWebViewReady :: (GObject a, MonadIO m) => a -> WebViewWebViewReadyCallback -> m SignalHandlerId +onWebViewWebViewReady obj cb = liftIO $ connectWebViewWebViewReady obj cb SignalConnectBefore +afterWebViewWebViewReady :: (GObject a, MonadIO m) => a -> WebViewWebViewReadyCallback -> m SignalHandlerId +afterWebViewWebViewReady obj cb = connectWebViewWebViewReady obj cb SignalConnectAfter + +connectWebViewWebViewReady :: (GObject a, MonadIO m) => + a -> WebViewWebViewReadyCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewWebViewReady obj cb after = liftIO $ do + cb' <- mkWebViewWebViewReadyCallback (webViewWebViewReadyCallbackWrapper cb) + connectSignalFunPtr obj "web-view-ready" cb' after + +-- signal WebView::window-object-cleared +type WebViewWindowObjectClearedCallback = + WebFrame -> + Ptr () -> + Ptr () -> + IO () + +noWebViewWindowObjectClearedCallback :: Maybe WebViewWindowObjectClearedCallback +noWebViewWindowObjectClearedCallback = Nothing + +type WebViewWindowObjectClearedCallbackC = + Ptr () -> -- object + Ptr WebFrame -> + Ptr () -> + Ptr () -> + Ptr () -> -- user_data + IO () + +foreign import ccall "wrapper" + mkWebViewWindowObjectClearedCallback :: WebViewWindowObjectClearedCallbackC -> IO (FunPtr WebViewWindowObjectClearedCallbackC) + +webViewWindowObjectClearedClosure :: WebViewWindowObjectClearedCallback -> IO Closure +webViewWindowObjectClearedClosure cb = newCClosure =<< mkWebViewWindowObjectClearedCallback wrapped + where wrapped = webViewWindowObjectClearedCallbackWrapper cb + +webViewWindowObjectClearedCallbackWrapper :: + WebViewWindowObjectClearedCallback -> + Ptr () -> + Ptr WebFrame -> + Ptr () -> + Ptr () -> + Ptr () -> + IO () +webViewWindowObjectClearedCallbackWrapper _cb _ frame context windowObject _ = do + frame' <- (newObject WebFrame) frame + _cb frame' context windowObject + +onWebViewWindowObjectCleared :: (GObject a, MonadIO m) => a -> WebViewWindowObjectClearedCallback -> m SignalHandlerId +onWebViewWindowObjectCleared obj cb = liftIO $ connectWebViewWindowObjectCleared obj cb SignalConnectBefore +afterWebViewWindowObjectCleared :: (GObject a, MonadIO m) => a -> WebViewWindowObjectClearedCallback -> m SignalHandlerId +afterWebViewWindowObjectCleared obj cb = connectWebViewWindowObjectCleared obj cb SignalConnectAfter + +connectWebViewWindowObjectCleared :: (GObject a, MonadIO m) => + a -> WebViewWindowObjectClearedCallback -> SignalConnectMode -> m SignalHandlerId +connectWebViewWindowObjectCleared obj cb after = liftIO $ do + cb' <- mkWebViewWindowObjectClearedCallback (webViewWindowObjectClearedCallbackWrapper cb) + connectSignalFunPtr obj "window-object-cleared" cb' after + +-- VVV Prop "copy-target-list" + -- Type: TInterface "Gtk" "TargetList" + -- Flags: [PropertyReadable] + +getWebViewCopyTargetList :: (MonadIO m, WebViewK o) => o -> m Gtk.TargetList +getWebViewCopyTargetList obj = liftIO $ getObjectPropertyBoxed obj "copy-target-list" Gtk.TargetList + +data WebViewCopyTargetListPropertyInfo +instance AttrInfo WebViewCopyTargetListPropertyInfo where + type AttrAllowedOps WebViewCopyTargetListPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint WebViewCopyTargetListPropertyInfo = (~) () + type AttrBaseTypeConstraint WebViewCopyTargetListPropertyInfo = WebViewK + type AttrGetType WebViewCopyTargetListPropertyInfo = Gtk.TargetList + type AttrLabel WebViewCopyTargetListPropertyInfo = "copy-target-list" + attrGet _ = getWebViewCopyTargetList + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "custom-encoding" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable,PropertyWritable] + +getWebViewCustomEncoding :: (MonadIO m, WebViewK o) => o -> m T.Text +getWebViewCustomEncoding obj = liftIO $ getObjectPropertyString obj "custom-encoding" + +setWebViewCustomEncoding :: (MonadIO m, WebViewK o) => o -> T.Text -> m () +setWebViewCustomEncoding obj val = liftIO $ setObjectPropertyString obj "custom-encoding" val + +constructWebViewCustomEncoding :: T.Text -> IO ([Char], GValue) +constructWebViewCustomEncoding val = constructObjectPropertyString "custom-encoding" val + +data WebViewCustomEncodingPropertyInfo +instance AttrInfo WebViewCustomEncodingPropertyInfo where + type AttrAllowedOps WebViewCustomEncodingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint WebViewCustomEncodingPropertyInfo = (~) T.Text + type AttrBaseTypeConstraint WebViewCustomEncodingPropertyInfo = WebViewK + type AttrGetType WebViewCustomEncodingPropertyInfo = T.Text + type AttrLabel WebViewCustomEncodingPropertyInfo = "custom-encoding" + attrGet _ = getWebViewCustomEncoding + attrSet _ = setWebViewCustomEncoding + attrConstruct _ = constructWebViewCustomEncoding + +-- VVV Prop "editable" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getWebViewEditable :: (MonadIO m, WebViewK o) => o -> m Bool +getWebViewEditable obj = liftIO $ getObjectPropertyBool obj "editable" + +setWebViewEditable :: (MonadIO m, WebViewK o) => o -> Bool -> m () +setWebViewEditable obj val = liftIO $ setObjectPropertyBool obj "editable" val + +constructWebViewEditable :: Bool -> IO ([Char], GValue) +constructWebViewEditable val = constructObjectPropertyBool "editable" val + +data WebViewEditablePropertyInfo +instance AttrInfo WebViewEditablePropertyInfo where + type AttrAllowedOps WebViewEditablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint WebViewEditablePropertyInfo = (~) Bool + type AttrBaseTypeConstraint WebViewEditablePropertyInfo = WebViewK + type AttrGetType WebViewEditablePropertyInfo = Bool + type AttrLabel WebViewEditablePropertyInfo = "editable" + attrGet _ = getWebViewEditable + attrSet _ = setWebViewEditable + attrConstruct _ = constructWebViewEditable + +-- VVV Prop "encoding" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getWebViewEncoding :: (MonadIO m, WebViewK o) => o -> m T.Text +getWebViewEncoding obj = liftIO $ getObjectPropertyString obj "encoding" + +data WebViewEncodingPropertyInfo +instance AttrInfo WebViewEncodingPropertyInfo where + type AttrAllowedOps WebViewEncodingPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint WebViewEncodingPropertyInfo = (~) () + type AttrBaseTypeConstraint WebViewEncodingPropertyInfo = WebViewK + type AttrGetType WebViewEncodingPropertyInfo = T.Text + type AttrLabel WebViewEncodingPropertyInfo = "encoding" + attrGet _ = getWebViewEncoding + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "full-content-zoom" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getWebViewFullContentZoom :: (MonadIO m, WebViewK o) => o -> m Bool +getWebViewFullContentZoom obj = liftIO $ getObjectPropertyBool obj "full-content-zoom" + +setWebViewFullContentZoom :: (MonadIO m, WebViewK o) => o -> Bool -> m () +setWebViewFullContentZoom obj val = liftIO $ setObjectPropertyBool obj "full-content-zoom" val + +constructWebViewFullContentZoom :: Bool -> IO ([Char], GValue) +constructWebViewFullContentZoom val = constructObjectPropertyBool "full-content-zoom" val + +data WebViewFullContentZoomPropertyInfo +instance AttrInfo WebViewFullContentZoomPropertyInfo where + type AttrAllowedOps WebViewFullContentZoomPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint WebViewFullContentZoomPropertyInfo = (~) Bool + type AttrBaseTypeConstraint WebViewFullContentZoomPropertyInfo = WebViewK + type AttrGetType WebViewFullContentZoomPropertyInfo = Bool + type AttrLabel WebViewFullContentZoomPropertyInfo = "full-content-zoom" + attrGet _ = getWebViewFullContentZoom + attrSet _ = setWebViewFullContentZoom + attrConstruct _ = constructWebViewFullContentZoom + +-- VVV Prop "icon-uri" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getWebViewIconUri :: (MonadIO m, WebViewK o) => o -> m T.Text +getWebViewIconUri obj = liftIO $ getObjectPropertyString obj "icon-uri" + +data WebViewIconUriPropertyInfo +instance AttrInfo WebViewIconUriPropertyInfo where + type AttrAllowedOps WebViewIconUriPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint WebViewIconUriPropertyInfo = (~) () + type AttrBaseTypeConstraint WebViewIconUriPropertyInfo = WebViewK + type AttrGetType WebViewIconUriPropertyInfo = T.Text + type AttrLabel WebViewIconUriPropertyInfo = "icon-uri" + attrGet _ = getWebViewIconUri + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "im-context" + -- Type: TInterface "Gtk" "IMContext" + -- Flags: [PropertyReadable] + +getWebViewImContext :: (MonadIO m, WebViewK o) => o -> m Gtk.IMContext +getWebViewImContext obj = liftIO $ getObjectPropertyObject obj "im-context" Gtk.IMContext + +data WebViewImContextPropertyInfo +instance AttrInfo WebViewImContextPropertyInfo where + type AttrAllowedOps WebViewImContextPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint WebViewImContextPropertyInfo = (~) () + type AttrBaseTypeConstraint WebViewImContextPropertyInfo = WebViewK + type AttrGetType WebViewImContextPropertyInfo = Gtk.IMContext + type AttrLabel WebViewImContextPropertyInfo = "im-context" + attrGet _ = getWebViewImContext + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "load-status" + -- Type: TInterface "WebKit" "LoadStatus" + -- Flags: [PropertyReadable] + +getWebViewLoadStatus :: (MonadIO m, WebViewK o) => o -> m LoadStatus +getWebViewLoadStatus obj = liftIO $ getObjectPropertyEnum obj "load-status" + +data WebViewLoadStatusPropertyInfo +instance AttrInfo WebViewLoadStatusPropertyInfo where + type AttrAllowedOps WebViewLoadStatusPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint WebViewLoadStatusPropertyInfo = (~) () + type AttrBaseTypeConstraint WebViewLoadStatusPropertyInfo = WebViewK + type AttrGetType WebViewLoadStatusPropertyInfo = LoadStatus + type AttrLabel WebViewLoadStatusPropertyInfo = "load-status" + attrGet _ = getWebViewLoadStatus + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "paste-target-list" + -- Type: TInterface "Gtk" "TargetList" + -- Flags: [PropertyReadable] + +getWebViewPasteTargetList :: (MonadIO m, WebViewK o) => o -> m Gtk.TargetList +getWebViewPasteTargetList obj = liftIO $ getObjectPropertyBoxed obj "paste-target-list" Gtk.TargetList + +data WebViewPasteTargetListPropertyInfo +instance AttrInfo WebViewPasteTargetListPropertyInfo where + type AttrAllowedOps WebViewPasteTargetListPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint WebViewPasteTargetListPropertyInfo = (~) () + type AttrBaseTypeConstraint WebViewPasteTargetListPropertyInfo = WebViewK + type AttrGetType WebViewPasteTargetListPropertyInfo = Gtk.TargetList + type AttrLabel WebViewPasteTargetListPropertyInfo = "paste-target-list" + attrGet _ = getWebViewPasteTargetList + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "progress" + -- Type: TBasicType TDouble + -- Flags: [PropertyReadable] + +getWebViewProgress :: (MonadIO m, WebViewK o) => o -> m Double +getWebViewProgress obj = liftIO $ getObjectPropertyDouble obj "progress" + +data WebViewProgressPropertyInfo +instance AttrInfo WebViewProgressPropertyInfo where + type AttrAllowedOps WebViewProgressPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint WebViewProgressPropertyInfo = (~) () + type AttrBaseTypeConstraint WebViewProgressPropertyInfo = WebViewK + type AttrGetType WebViewProgressPropertyInfo = Double + type AttrLabel WebViewProgressPropertyInfo = "progress" + attrGet _ = getWebViewProgress + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "self-scrolling" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly] + +getWebViewSelfScrolling :: (MonadIO m, WebViewK o) => o -> m Bool +getWebViewSelfScrolling obj = liftIO $ getObjectPropertyBool obj "self-scrolling" + +constructWebViewSelfScrolling :: Bool -> IO ([Char], GValue) +constructWebViewSelfScrolling val = constructObjectPropertyBool "self-scrolling" val + +data WebViewSelfScrollingPropertyInfo +instance AttrInfo WebViewSelfScrollingPropertyInfo where + type AttrAllowedOps WebViewSelfScrollingPropertyInfo = '[ 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint WebViewSelfScrollingPropertyInfo = (~) Bool + type AttrBaseTypeConstraint WebViewSelfScrollingPropertyInfo = WebViewK + type AttrGetType WebViewSelfScrollingPropertyInfo = Bool + type AttrLabel WebViewSelfScrollingPropertyInfo = "self-scrolling" + attrGet _ = getWebViewSelfScrolling + attrSet _ = undefined + attrConstruct _ = constructWebViewSelfScrolling + +-- VVV Prop "settings" + -- Type: TInterface "WebKit" "WebSettings" + -- Flags: [PropertyReadable,PropertyWritable] + +getWebViewSettings :: (MonadIO m, WebViewK o) => o -> m WebSettings +getWebViewSettings obj = liftIO $ getObjectPropertyObject obj "settings" WebSettings + +setWebViewSettings :: (MonadIO m, WebViewK o, WebSettingsK a) => o -> a -> m () +setWebViewSettings obj val = liftIO $ setObjectPropertyObject obj "settings" val + +constructWebViewSettings :: (WebSettingsK a) => a -> IO ([Char], GValue) +constructWebViewSettings val = constructObjectPropertyObject "settings" val + +data WebViewSettingsPropertyInfo +instance AttrInfo WebViewSettingsPropertyInfo where + type AttrAllowedOps WebViewSettingsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint WebViewSettingsPropertyInfo = WebSettingsK + type AttrBaseTypeConstraint WebViewSettingsPropertyInfo = WebViewK + type AttrGetType WebViewSettingsPropertyInfo = WebSettings + type AttrLabel WebViewSettingsPropertyInfo = "settings" + attrGet _ = getWebViewSettings + attrSet _ = setWebViewSettings + attrConstruct _ = constructWebViewSettings + +-- VVV Prop "title" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getWebViewTitle :: (MonadIO m, WebViewK o) => o -> m T.Text +getWebViewTitle obj = liftIO $ getObjectPropertyString obj "title" + +data WebViewTitlePropertyInfo +instance AttrInfo WebViewTitlePropertyInfo where + type AttrAllowedOps WebViewTitlePropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint WebViewTitlePropertyInfo = (~) () + type AttrBaseTypeConstraint WebViewTitlePropertyInfo = WebViewK + type AttrGetType WebViewTitlePropertyInfo = T.Text + type AttrLabel WebViewTitlePropertyInfo = "title" + attrGet _ = getWebViewTitle + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "transparent" + -- Type: TBasicType TBoolean + -- Flags: [PropertyReadable,PropertyWritable] + +getWebViewTransparent :: (MonadIO m, WebViewK o) => o -> m Bool +getWebViewTransparent obj = liftIO $ getObjectPropertyBool obj "transparent" + +setWebViewTransparent :: (MonadIO m, WebViewK o) => o -> Bool -> m () +setWebViewTransparent obj val = liftIO $ setObjectPropertyBool obj "transparent" val + +constructWebViewTransparent :: Bool -> IO ([Char], GValue) +constructWebViewTransparent val = constructObjectPropertyBool "transparent" val + +data WebViewTransparentPropertyInfo +instance AttrInfo WebViewTransparentPropertyInfo where + type AttrAllowedOps WebViewTransparentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint WebViewTransparentPropertyInfo = (~) Bool + type AttrBaseTypeConstraint WebViewTransparentPropertyInfo = WebViewK + type AttrGetType WebViewTransparentPropertyInfo = Bool + type AttrLabel WebViewTransparentPropertyInfo = "transparent" + attrGet _ = getWebViewTransparent + attrSet _ = setWebViewTransparent + attrConstruct _ = constructWebViewTransparent + +-- VVV Prop "uri" + -- Type: TBasicType TUTF8 + -- Flags: [PropertyReadable] + +getWebViewUri :: (MonadIO m, WebViewK o) => o -> m T.Text +getWebViewUri obj = liftIO $ getObjectPropertyString obj "uri" + +data WebViewUriPropertyInfo +instance AttrInfo WebViewUriPropertyInfo where + type AttrAllowedOps WebViewUriPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint WebViewUriPropertyInfo = (~) () + type AttrBaseTypeConstraint WebViewUriPropertyInfo = WebViewK + type AttrGetType WebViewUriPropertyInfo = T.Text + type AttrLabel WebViewUriPropertyInfo = "uri" + attrGet _ = getWebViewUri + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "view-mode" + -- Type: TInterface "WebKit" "WebViewViewMode" + -- Flags: [PropertyReadable,PropertyWritable] + +getWebViewViewMode :: (MonadIO m, WebViewK o) => o -> m WebViewViewMode +getWebViewViewMode obj = liftIO $ getObjectPropertyEnum obj "view-mode" + +setWebViewViewMode :: (MonadIO m, WebViewK o) => o -> WebViewViewMode -> m () +setWebViewViewMode obj val = liftIO $ setObjectPropertyEnum obj "view-mode" val + +constructWebViewViewMode :: WebViewViewMode -> IO ([Char], GValue) +constructWebViewViewMode val = constructObjectPropertyEnum "view-mode" val + +data WebViewViewModePropertyInfo +instance AttrInfo WebViewViewModePropertyInfo where + type AttrAllowedOps WebViewViewModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint WebViewViewModePropertyInfo = (~) WebViewViewMode + type AttrBaseTypeConstraint WebViewViewModePropertyInfo = WebViewK + type AttrGetType WebViewViewModePropertyInfo = WebViewViewMode + type AttrLabel WebViewViewModePropertyInfo = "view-mode" + attrGet _ = getWebViewViewMode + attrSet _ = setWebViewViewMode + attrConstruct _ = constructWebViewViewMode + +-- VVV Prop "viewport-attributes" + -- Type: TInterface "WebKit" "ViewportAttributes" + -- Flags: [PropertyReadable] + +getWebViewViewportAttributes :: (MonadIO m, WebViewK o) => o -> m ViewportAttributes +getWebViewViewportAttributes obj = liftIO $ getObjectPropertyObject obj "viewport-attributes" ViewportAttributes + +data WebViewViewportAttributesPropertyInfo +instance AttrInfo WebViewViewportAttributesPropertyInfo where + type AttrAllowedOps WebViewViewportAttributesPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint WebViewViewportAttributesPropertyInfo = (~) () + type AttrBaseTypeConstraint WebViewViewportAttributesPropertyInfo = WebViewK + type AttrGetType WebViewViewportAttributesPropertyInfo = ViewportAttributes + type AttrLabel WebViewViewportAttributesPropertyInfo = "viewport-attributes" + attrGet _ = getWebViewViewportAttributes + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "web-inspector" + -- Type: TInterface "WebKit" "WebInspector" + -- Flags: [PropertyReadable] + +getWebViewWebInspector :: (MonadIO m, WebViewK o) => o -> m WebInspector +getWebViewWebInspector obj = liftIO $ getObjectPropertyObject obj "web-inspector" WebInspector + +data WebViewWebInspectorPropertyInfo +instance AttrInfo WebViewWebInspectorPropertyInfo where + type AttrAllowedOps WebViewWebInspectorPropertyInfo = '[ 'AttrGet] + type AttrSetTypeConstraint WebViewWebInspectorPropertyInfo = (~) () + type AttrBaseTypeConstraint WebViewWebInspectorPropertyInfo = WebViewK + type AttrGetType WebViewWebInspectorPropertyInfo = WebInspector + type AttrLabel WebViewWebInspectorPropertyInfo = "web-inspector" + attrGet _ = getWebViewWebInspector + attrSet _ = undefined + attrConstruct _ = undefined + +-- VVV Prop "window-features" + -- Type: TInterface "WebKit" "WebWindowFeatures" + -- Flags: [PropertyReadable,PropertyWritable] + +getWebViewWindowFeatures :: (MonadIO m, WebViewK o) => o -> m WebWindowFeatures +getWebViewWindowFeatures obj = liftIO $ getObjectPropertyObject obj "window-features" WebWindowFeatures + +setWebViewWindowFeatures :: (MonadIO m, WebViewK o, WebWindowFeaturesK a) => o -> a -> m () +setWebViewWindowFeatures obj val = liftIO $ setObjectPropertyObject obj "window-features" val + +constructWebViewWindowFeatures :: (WebWindowFeaturesK a) => a -> IO ([Char], GValue) +constructWebViewWindowFeatures val = constructObjectPropertyObject "window-features" val + +data WebViewWindowFeaturesPropertyInfo +instance AttrInfo WebViewWindowFeaturesPropertyInfo where + type AttrAllowedOps WebViewWindowFeaturesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint WebViewWindowFeaturesPropertyInfo = WebWindowFeaturesK + type AttrBaseTypeConstraint WebViewWindowFeaturesPropertyInfo = WebViewK + type AttrGetType WebViewWindowFeaturesPropertyInfo = WebWindowFeatures + type AttrLabel WebViewWindowFeaturesPropertyInfo = "window-features" + attrGet _ = getWebViewWindowFeatures + attrSet _ = setWebViewWindowFeatures + attrConstruct _ = constructWebViewWindowFeatures + +-- VVV Prop "zoom-level" + -- Type: TBasicType TFloat + -- Flags: [PropertyReadable,PropertyWritable] + +getWebViewZoomLevel :: (MonadIO m, WebViewK o) => o -> m Float +getWebViewZoomLevel obj = liftIO $ getObjectPropertyFloat obj "zoom-level" + +setWebViewZoomLevel :: (MonadIO m, WebViewK o) => o -> Float -> m () +setWebViewZoomLevel obj val = liftIO $ setObjectPropertyFloat obj "zoom-level" val + +constructWebViewZoomLevel :: Float -> IO ([Char], GValue) +constructWebViewZoomLevel val = constructObjectPropertyFloat "zoom-level" val + +data WebViewZoomLevelPropertyInfo +instance AttrInfo WebViewZoomLevelPropertyInfo where + type AttrAllowedOps WebViewZoomLevelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet] + type AttrSetTypeConstraint WebViewZoomLevelPropertyInfo = (~) Float + type AttrBaseTypeConstraint WebViewZoomLevelPropertyInfo = WebViewK + type AttrGetType WebViewZoomLevelPropertyInfo = Float + type AttrLabel WebViewZoomLevelPropertyInfo = "zoom-level" + attrGet _ = getWebViewZoomLevel + attrSet _ = setWebViewZoomLevel + attrConstruct _ = constructWebViewZoomLevel + +type instance AttributeList WebView = WebViewAttributeList +type WebViewAttributeList = ('[ '("appPaintable", Gtk.WidgetAppPaintablePropertyInfo), '("borderWidth", Gtk.ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.WidgetCanFocusPropertyInfo), '("child", Gtk.ContainerChildPropertyInfo), '("compositeChild", Gtk.WidgetCompositeChildPropertyInfo), '("copyTargetList", WebViewCopyTargetListPropertyInfo), '("customEncoding", WebViewCustomEncodingPropertyInfo), '("doubleBuffered", Gtk.WidgetDoubleBufferedPropertyInfo), '("editable", WebViewEditablePropertyInfo), '("encoding", WebViewEncodingPropertyInfo), '("events", Gtk.WidgetEventsPropertyInfo), '("expand", Gtk.WidgetExpandPropertyInfo), '("fullContentZoom", WebViewFullContentZoomPropertyInfo), '("hadjustment", Gtk.ScrollableHadjustmentPropertyInfo), '("halign", Gtk.WidgetHalignPropertyInfo), '("hasDefault", Gtk.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.WidgetHexpandSetPropertyInfo), '("hscrollPolicy", Gtk.ScrollableHscrollPolicyPropertyInfo), '("iconUri", WebViewIconUriPropertyInfo), '("imContext", WebViewImContextPropertyInfo), '("isFocus", Gtk.WidgetIsFocusPropertyInfo), '("loadStatus", WebViewLoadStatusPropertyInfo), '("margin", Gtk.WidgetMarginPropertyInfo), '("marginBottom", Gtk.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.WidgetMarginTopPropertyInfo), '("name", Gtk.WidgetNamePropertyInfo), '("noShowAll", Gtk.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.WidgetOpacityPropertyInfo), '("parent", Gtk.WidgetParentPropertyInfo), '("pasteTargetList", WebViewPasteTargetListPropertyInfo), '("progress", WebViewProgressPropertyInfo), '("receivesDefault", Gtk.WidgetReceivesDefaultPropertyInfo), '("resizeMode", Gtk.ContainerResizeModePropertyInfo), '("scaleFactor", Gtk.WidgetScaleFactorPropertyInfo), '("selfScrolling", WebViewSelfScrollingPropertyInfo), '("sensitive", Gtk.WidgetSensitivePropertyInfo), '("settings", WebViewSettingsPropertyInfo), '("style", Gtk.WidgetStylePropertyInfo), '("title", WebViewTitlePropertyInfo), '("tooltipMarkup", Gtk.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.WidgetTooltipTextPropertyInfo), '("transparent", WebViewTransparentPropertyInfo), '("uri", WebViewUriPropertyInfo), '("vadjustment", Gtk.ScrollableVadjustmentPropertyInfo), '("valign", Gtk.WidgetValignPropertyInfo), '("vexpand", Gtk.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.WidgetVexpandSetPropertyInfo), '("viewMode", WebViewViewModePropertyInfo), '("viewportAttributes", WebViewViewportAttributesPropertyInfo), '("visible", Gtk.WidgetVisiblePropertyInfo), '("vscrollPolicy", Gtk.ScrollableVscrollPolicyPropertyInfo), '("webInspector", WebViewWebInspectorPropertyInfo), '("widthRequest", Gtk.WidgetWidthRequestPropertyInfo), '("window", Gtk.WidgetWindowPropertyInfo), '("windowFeatures", WebViewWindowFeaturesPropertyInfo), '("zoomLevel", WebViewZoomLevelPropertyInfo)] :: [(Symbol, *)]) + +data WebViewCloseWebViewSignalInfo +instance SignalInfo WebViewCloseWebViewSignalInfo where + type HaskellCallbackType WebViewCloseWebViewSignalInfo = WebViewCloseWebViewCallback + connectSignal _ = connectWebViewCloseWebView + +data WebViewConsoleMessageSignalInfo +instance SignalInfo WebViewConsoleMessageSignalInfo where + type HaskellCallbackType WebViewConsoleMessageSignalInfo = WebViewConsoleMessageCallback + connectSignal _ = connectWebViewConsoleMessage + +data WebViewContextMenuSignalInfo +instance SignalInfo WebViewContextMenuSignalInfo where + type HaskellCallbackType WebViewContextMenuSignalInfo = WebViewContextMenuCallback + connectSignal _ = connectWebViewContextMenu + +data WebViewCopyClipboardSignalInfo +instance SignalInfo WebViewCopyClipboardSignalInfo where + type HaskellCallbackType WebViewCopyClipboardSignalInfo = WebViewCopyClipboardCallback + connectSignal _ = connectWebViewCopyClipboard + +data WebViewCreatePluginWidgetSignalInfo +instance SignalInfo WebViewCreatePluginWidgetSignalInfo where + type HaskellCallbackType WebViewCreatePluginWidgetSignalInfo = WebViewCreatePluginWidgetCallback + connectSignal _ = connectWebViewCreatePluginWidget + +data WebViewCreateWebViewSignalInfo +instance SignalInfo WebViewCreateWebViewSignalInfo where + type HaskellCallbackType WebViewCreateWebViewSignalInfo = WebViewCreateWebViewCallback + connectSignal _ = connectWebViewCreateWebView + +data WebViewCutClipboardSignalInfo +instance SignalInfo WebViewCutClipboardSignalInfo where + type HaskellCallbackType WebViewCutClipboardSignalInfo = WebViewCutClipboardCallback + connectSignal _ = connectWebViewCutClipboard + +data WebViewDatabaseQuotaExceededSignalInfo +instance SignalInfo WebViewDatabaseQuotaExceededSignalInfo where + type HaskellCallbackType WebViewDatabaseQuotaExceededSignalInfo = WebViewDatabaseQuotaExceededCallback + connectSignal _ = connectWebViewDatabaseQuotaExceeded + +data WebViewDocumentLoadFinishedSignalInfo +instance SignalInfo WebViewDocumentLoadFinishedSignalInfo where + type HaskellCallbackType WebViewDocumentLoadFinishedSignalInfo = WebViewDocumentLoadFinishedCallback + connectSignal _ = connectWebViewDocumentLoadFinished + +data WebViewDownloadRequestedSignalInfo +instance SignalInfo WebViewDownloadRequestedSignalInfo where + type HaskellCallbackType WebViewDownloadRequestedSignalInfo = WebViewDownloadRequestedCallback + connectSignal _ = connectWebViewDownloadRequested + +data WebViewEditingBeganSignalInfo +instance SignalInfo WebViewEditingBeganSignalInfo where + type HaskellCallbackType WebViewEditingBeganSignalInfo = WebViewEditingBeganCallback + connectSignal _ = connectWebViewEditingBegan + +data WebViewEditingEndedSignalInfo +instance SignalInfo WebViewEditingEndedSignalInfo where + type HaskellCallbackType WebViewEditingEndedSignalInfo = WebViewEditingEndedCallback + connectSignal _ = connectWebViewEditingEnded + +data WebViewEnteringFullscreenSignalInfo +instance SignalInfo WebViewEnteringFullscreenSignalInfo where + type HaskellCallbackType WebViewEnteringFullscreenSignalInfo = WebViewEnteringFullscreenCallback + connectSignal _ = connectWebViewEnteringFullscreen + +data WebViewFrameCreatedSignalInfo +instance SignalInfo WebViewFrameCreatedSignalInfo where + type HaskellCallbackType WebViewFrameCreatedSignalInfo = WebViewFrameCreatedCallback + connectSignal _ = connectWebViewFrameCreated + +data WebViewGeolocationPolicyDecisionCancelledSignalInfo +instance SignalInfo WebViewGeolocationPolicyDecisionCancelledSignalInfo where + type HaskellCallbackType WebViewGeolocationPolicyDecisionCancelledSignalInfo = WebViewGeolocationPolicyDecisionCancelledCallback + connectSignal _ = connectWebViewGeolocationPolicyDecisionCancelled + +data WebViewGeolocationPolicyDecisionRequestedSignalInfo +instance SignalInfo WebViewGeolocationPolicyDecisionRequestedSignalInfo where + type HaskellCallbackType WebViewGeolocationPolicyDecisionRequestedSignalInfo = WebViewGeolocationPolicyDecisionRequestedCallback + connectSignal _ = connectWebViewGeolocationPolicyDecisionRequested + +data WebViewHoveringOverLinkSignalInfo +instance SignalInfo WebViewHoveringOverLinkSignalInfo where + type HaskellCallbackType WebViewHoveringOverLinkSignalInfo = WebViewHoveringOverLinkCallback + connectSignal _ = connectWebViewHoveringOverLink + +data WebViewIconLoadedSignalInfo +instance SignalInfo WebViewIconLoadedSignalInfo where + type HaskellCallbackType WebViewIconLoadedSignalInfo = WebViewIconLoadedCallback + connectSignal _ = connectWebViewIconLoaded + +data WebViewLeavingFullscreenSignalInfo +instance SignalInfo WebViewLeavingFullscreenSignalInfo where + type HaskellCallbackType WebViewLeavingFullscreenSignalInfo = WebViewLeavingFullscreenCallback + connectSignal _ = connectWebViewLeavingFullscreen + +data WebViewLoadCommittedSignalInfo +instance SignalInfo WebViewLoadCommittedSignalInfo where + type HaskellCallbackType WebViewLoadCommittedSignalInfo = WebViewLoadCommittedCallback + connectSignal _ = connectWebViewLoadCommitted + +data WebViewLoadErrorSignalInfo +instance SignalInfo WebViewLoadErrorSignalInfo where + type HaskellCallbackType WebViewLoadErrorSignalInfo = WebViewLoadErrorCallback + connectSignal _ = connectWebViewLoadError + +data WebViewLoadFinishedSignalInfo +instance SignalInfo WebViewLoadFinishedSignalInfo where + type HaskellCallbackType WebViewLoadFinishedSignalInfo = WebViewLoadFinishedCallback + connectSignal _ = connectWebViewLoadFinished + +data WebViewLoadProgressChangedSignalInfo +instance SignalInfo WebViewLoadProgressChangedSignalInfo where + type HaskellCallbackType WebViewLoadProgressChangedSignalInfo = WebViewLoadProgressChangedCallback + connectSignal _ = connectWebViewLoadProgressChanged + +data WebViewLoadStartedSignalInfo +instance SignalInfo WebViewLoadStartedSignalInfo where + type HaskellCallbackType WebViewLoadStartedSignalInfo = WebViewLoadStartedCallback + connectSignal _ = connectWebViewLoadStarted + +data WebViewMimeTypePolicyDecisionRequestedSignalInfo +instance SignalInfo WebViewMimeTypePolicyDecisionRequestedSignalInfo where + type HaskellCallbackType WebViewMimeTypePolicyDecisionRequestedSignalInfo = WebViewMimeTypePolicyDecisionRequestedCallback + connectSignal _ = connectWebViewMimeTypePolicyDecisionRequested + +data WebViewMoveCursorSignalInfo +instance SignalInfo WebViewMoveCursorSignalInfo where + type HaskellCallbackType WebViewMoveCursorSignalInfo = WebViewMoveCursorCallback + connectSignal _ = connectWebViewMoveCursor + +data WebViewNavigationPolicyDecisionRequestedSignalInfo +instance SignalInfo WebViewNavigationPolicyDecisionRequestedSignalInfo where + type HaskellCallbackType WebViewNavigationPolicyDecisionRequestedSignalInfo = WebViewNavigationPolicyDecisionRequestedCallback + connectSignal _ = connectWebViewNavigationPolicyDecisionRequested + +data WebViewNavigationRequestedSignalInfo +instance SignalInfo WebViewNavigationRequestedSignalInfo where + type HaskellCallbackType WebViewNavigationRequestedSignalInfo = WebViewNavigationRequestedCallback + connectSignal _ = connectWebViewNavigationRequested + +data WebViewNewWindowPolicyDecisionRequestedSignalInfo +instance SignalInfo WebViewNewWindowPolicyDecisionRequestedSignalInfo where + type HaskellCallbackType WebViewNewWindowPolicyDecisionRequestedSignalInfo = WebViewNewWindowPolicyDecisionRequestedCallback + connectSignal _ = connectWebViewNewWindowPolicyDecisionRequested + +data WebViewOnloadEventSignalInfo +instance SignalInfo WebViewOnloadEventSignalInfo where + type HaskellCallbackType WebViewOnloadEventSignalInfo = WebViewOnloadEventCallback + connectSignal _ = connectWebViewOnloadEvent + +data WebViewPasteClipboardSignalInfo +instance SignalInfo WebViewPasteClipboardSignalInfo where + type HaskellCallbackType WebViewPasteClipboardSignalInfo = WebViewPasteClipboardCallback + connectSignal _ = connectWebViewPasteClipboard + +data WebViewPopulatePopupSignalInfo +instance SignalInfo WebViewPopulatePopupSignalInfo where + type HaskellCallbackType WebViewPopulatePopupSignalInfo = WebViewPopulatePopupCallback + connectSignal _ = connectWebViewPopulatePopup + +data WebViewPrintRequestedSignalInfo +instance SignalInfo WebViewPrintRequestedSignalInfo where + type HaskellCallbackType WebViewPrintRequestedSignalInfo = WebViewPrintRequestedCallback + connectSignal _ = connectWebViewPrintRequested + +data WebViewRedoSignalInfo +instance SignalInfo WebViewRedoSignalInfo where + type HaskellCallbackType WebViewRedoSignalInfo = WebViewRedoCallback + connectSignal _ = connectWebViewRedo + +data WebViewResourceContentLengthReceivedSignalInfo +instance SignalInfo WebViewResourceContentLengthReceivedSignalInfo where + type HaskellCallbackType WebViewResourceContentLengthReceivedSignalInfo = WebViewResourceContentLengthReceivedCallback + connectSignal _ = connectWebViewResourceContentLengthReceived + +data WebViewResourceLoadFailedSignalInfo +instance SignalInfo WebViewResourceLoadFailedSignalInfo where + type HaskellCallbackType WebViewResourceLoadFailedSignalInfo = WebViewResourceLoadFailedCallback + connectSignal _ = connectWebViewResourceLoadFailed + +data WebViewResourceLoadFinishedSignalInfo +instance SignalInfo WebViewResourceLoadFinishedSignalInfo where + type HaskellCallbackType WebViewResourceLoadFinishedSignalInfo = WebViewResourceLoadFinishedCallback + connectSignal _ = connectWebViewResourceLoadFinished + +data WebViewResourceRequestStartingSignalInfo +instance SignalInfo WebViewResourceRequestStartingSignalInfo where + type HaskellCallbackType WebViewResourceRequestStartingSignalInfo = WebViewResourceRequestStartingCallback + connectSignal _ = connectWebViewResourceRequestStarting + +data WebViewResourceResponseReceivedSignalInfo +instance SignalInfo WebViewResourceResponseReceivedSignalInfo where + type HaskellCallbackType WebViewResourceResponseReceivedSignalInfo = WebViewResourceResponseReceivedCallback + connectSignal _ = connectWebViewResourceResponseReceived + +data WebViewRunFileChooserSignalInfo +instance SignalInfo WebViewRunFileChooserSignalInfo where + type HaskellCallbackType WebViewRunFileChooserSignalInfo = WebViewRunFileChooserCallback + connectSignal _ = connectWebViewRunFileChooser + +data WebViewScriptAlertSignalInfo +instance SignalInfo WebViewScriptAlertSignalInfo where + type HaskellCallbackType WebViewScriptAlertSignalInfo = WebViewScriptAlertCallback + connectSignal _ = connectWebViewScriptAlert + +data WebViewScriptConfirmSignalInfo +instance SignalInfo WebViewScriptConfirmSignalInfo where + type HaskellCallbackType WebViewScriptConfirmSignalInfo = WebViewScriptConfirmCallback + connectSignal _ = connectWebViewScriptConfirm + +data WebViewScriptPromptSignalInfo +instance SignalInfo WebViewScriptPromptSignalInfo where + type HaskellCallbackType WebViewScriptPromptSignalInfo = WebViewScriptPromptCallback + connectSignal _ = connectWebViewScriptPrompt + +data WebViewSelectAllSignalInfo +instance SignalInfo WebViewSelectAllSignalInfo where + type HaskellCallbackType WebViewSelectAllSignalInfo = WebViewSelectAllCallback + connectSignal _ = connectWebViewSelectAll + +data WebViewSelectionChangedSignalInfo +instance SignalInfo WebViewSelectionChangedSignalInfo where + type HaskellCallbackType WebViewSelectionChangedSignalInfo = WebViewSelectionChangedCallback + connectSignal _ = connectWebViewSelectionChanged + +data WebViewShouldApplyStyleSignalInfo +instance SignalInfo WebViewShouldApplyStyleSignalInfo where + type HaskellCallbackType WebViewShouldApplyStyleSignalInfo = WebViewShouldApplyStyleCallback + connectSignal _ = connectWebViewShouldApplyStyle + +data WebViewShouldBeginEditingSignalInfo +instance SignalInfo WebViewShouldBeginEditingSignalInfo where + type HaskellCallbackType WebViewShouldBeginEditingSignalInfo = WebViewShouldBeginEditingCallback + connectSignal _ = connectWebViewShouldBeginEditing + +data WebViewShouldChangeSelectedRangeSignalInfo +instance SignalInfo WebViewShouldChangeSelectedRangeSignalInfo where + type HaskellCallbackType WebViewShouldChangeSelectedRangeSignalInfo = WebViewShouldChangeSelectedRangeCallback + connectSignal _ = connectWebViewShouldChangeSelectedRange + +data WebViewShouldDeleteRangeSignalInfo +instance SignalInfo WebViewShouldDeleteRangeSignalInfo where + type HaskellCallbackType WebViewShouldDeleteRangeSignalInfo = WebViewShouldDeleteRangeCallback + connectSignal _ = connectWebViewShouldDeleteRange + +data WebViewShouldEndEditingSignalInfo +instance SignalInfo WebViewShouldEndEditingSignalInfo where + type HaskellCallbackType WebViewShouldEndEditingSignalInfo = WebViewShouldEndEditingCallback + connectSignal _ = connectWebViewShouldEndEditing + +data WebViewShouldInsertNodeSignalInfo +instance SignalInfo WebViewShouldInsertNodeSignalInfo where + type HaskellCallbackType WebViewShouldInsertNodeSignalInfo = WebViewShouldInsertNodeCallback + connectSignal _ = connectWebViewShouldInsertNode + +data WebViewShouldInsertTextSignalInfo +instance SignalInfo WebViewShouldInsertTextSignalInfo where + type HaskellCallbackType WebViewShouldInsertTextSignalInfo = WebViewShouldInsertTextCallback + connectSignal _ = connectWebViewShouldInsertText + +data WebViewShouldShowDeleteInterfaceForElementSignalInfo +instance SignalInfo WebViewShouldShowDeleteInterfaceForElementSignalInfo where + type HaskellCallbackType WebViewShouldShowDeleteInterfaceForElementSignalInfo = WebViewShouldShowDeleteInterfaceForElementCallback + connectSignal _ = connectWebViewShouldShowDeleteInterfaceForElement + +data WebViewStatusBarTextChangedSignalInfo +instance SignalInfo WebViewStatusBarTextChangedSignalInfo where + type HaskellCallbackType WebViewStatusBarTextChangedSignalInfo = WebViewStatusBarTextChangedCallback + connectSignal _ = connectWebViewStatusBarTextChanged + +data WebViewTitleChangedSignalInfo +instance SignalInfo WebViewTitleChangedSignalInfo where + type HaskellCallbackType WebViewTitleChangedSignalInfo = WebViewTitleChangedCallback + connectSignal _ = connectWebViewTitleChanged + +data WebViewUndoSignalInfo +instance SignalInfo WebViewUndoSignalInfo where + type HaskellCallbackType WebViewUndoSignalInfo = WebViewUndoCallback + connectSignal _ = connectWebViewUndo + +data WebViewUserChangedContentsSignalInfo +instance SignalInfo WebViewUserChangedContentsSignalInfo where + type HaskellCallbackType WebViewUserChangedContentsSignalInfo = WebViewUserChangedContentsCallback + connectSignal _ = connectWebViewUserChangedContents + +data WebViewViewportAttributesChangedSignalInfo +instance SignalInfo WebViewViewportAttributesChangedSignalInfo where + type HaskellCallbackType WebViewViewportAttributesChangedSignalInfo = WebViewViewportAttributesChangedCallback + connectSignal _ = connectWebViewViewportAttributesChanged + +data WebViewViewportAttributesRecomputeRequestedSignalInfo +instance SignalInfo WebViewViewportAttributesRecomputeRequestedSignalInfo where + type HaskellCallbackType WebViewViewportAttributesRecomputeRequestedSignalInfo = WebViewViewportAttributesRecomputeRequestedCallback + connectSignal _ = connectWebViewViewportAttributesRecomputeRequested + +data WebViewWebViewReadySignalInfo +instance SignalInfo WebViewWebViewReadySignalInfo where + type HaskellCallbackType WebViewWebViewReadySignalInfo = WebViewWebViewReadyCallback + connectSignal _ = connectWebViewWebViewReady + +data WebViewWindowObjectClearedSignalInfo +instance SignalInfo WebViewWindowObjectClearedSignalInfo where + type HaskellCallbackType WebViewWindowObjectClearedSignalInfo = WebViewWindowObjectClearedCallback + connectSignal _ = connectWebViewWindowObjectCleared + +type instance SignalList WebView = WebViewSignalList +type WebViewSignalList = ('[ '("accelClosuresChanged", Gtk.WidgetAccelClosuresChangedSignalInfo), '("add", Gtk.ContainerAddSignalInfo), '("buttonPressEvent", Gtk.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.WidgetCanActivateAccelSignalInfo), '("checkResize", Gtk.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.WidgetChildNotifySignalInfo), '("closeWebView", WebViewCloseWebViewSignalInfo), '("compositedChanged", Gtk.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.WidgetConfigureEventSignalInfo), '("consoleMessage", WebViewConsoleMessageSignalInfo), '("contextMenu", WebViewContextMenuSignalInfo), '("copyClipboard", WebViewCopyClipboardSignalInfo), '("createPluginWidget", WebViewCreatePluginWidgetSignalInfo), '("createWebView", WebViewCreateWebViewSignalInfo), '("cutClipboard", WebViewCutClipboardSignalInfo), '("damageEvent", Gtk.WidgetDamageEventSignalInfo), '("databaseQuotaExceeded", WebViewDatabaseQuotaExceededSignalInfo), '("deleteEvent", Gtk.WidgetDeleteEventSignalInfo), '("destroy", Gtk.WidgetDestroySignalInfo), '("destroyEvent", Gtk.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.WidgetDirectionChangedSignalInfo), '("documentLoadFinished", WebViewDocumentLoadFinishedSignalInfo), '("downloadRequested", WebViewDownloadRequestedSignalInfo), '("dragBegin", Gtk.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.WidgetDragDropSignalInfo), '("dragEnd", Gtk.WidgetDragEndSignalInfo), '("dragFailed", Gtk.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.WidgetDragMotionSignalInfo), '("draw", Gtk.WidgetDrawSignalInfo), '("editingBegan", WebViewEditingBeganSignalInfo), '("editingEnded", WebViewEditingEndedSignalInfo), '("enterNotifyEvent", Gtk.WidgetEnterNotifyEventSignalInfo), '("enteringFullscreen", WebViewEnteringFullscreenSignalInfo), '("event", Gtk.WidgetEventSignalInfo), '("eventAfter", Gtk.WidgetEventAfterSignalInfo), '("focus", Gtk.WidgetFocusSignalInfo), '("focusInEvent", Gtk.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.WidgetFocusOutEventSignalInfo), '("frameCreated", WebViewFrameCreatedSignalInfo), '("geolocationPolicyDecisionCancelled", WebViewGeolocationPolicyDecisionCancelledSignalInfo), '("geolocationPolicyDecisionRequested", WebViewGeolocationPolicyDecisionRequestedSignalInfo), '("grabBrokenEvent", Gtk.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.WidgetGrabNotifySignalInfo), '("hide", Gtk.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.WidgetHierarchyChangedSignalInfo), '("hoveringOverLink", WebViewHoveringOverLinkSignalInfo), '("iconLoaded", WebViewIconLoadedSignalInfo), '("keyPressEvent", Gtk.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.WidgetLeaveNotifyEventSignalInfo), '("leavingFullscreen", WebViewLeavingFullscreenSignalInfo), '("loadCommitted", WebViewLoadCommittedSignalInfo), '("loadError", WebViewLoadErrorSignalInfo), '("loadFinished", WebViewLoadFinishedSignalInfo), '("loadProgressChanged", WebViewLoadProgressChangedSignalInfo), '("loadStarted", WebViewLoadStartedSignalInfo), '("map", Gtk.WidgetMapSignalInfo), '("mapEvent", Gtk.WidgetMapEventSignalInfo), '("mimeTypePolicyDecisionRequested", WebViewMimeTypePolicyDecisionRequestedSignalInfo), '("mnemonicActivate", Gtk.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.WidgetMotionNotifyEventSignalInfo), '("moveCursor", WebViewMoveCursorSignalInfo), '("moveFocus", Gtk.WidgetMoveFocusSignalInfo), '("navigationPolicyDecisionRequested", WebViewNavigationPolicyDecisionRequestedSignalInfo), '("navigationRequested", WebViewNavigationRequestedSignalInfo), '("newWindowPolicyDecisionRequested", WebViewNewWindowPolicyDecisionRequestedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("onloadEvent", WebViewOnloadEventSignalInfo), '("parentSet", Gtk.WidgetParentSetSignalInfo), '("pasteClipboard", WebViewPasteClipboardSignalInfo), '("populatePopup", WebViewPopulatePopupSignalInfo), '("popupMenu", Gtk.WidgetPopupMenuSignalInfo), '("printRequested", WebViewPrintRequestedSignalInfo), '("propertyNotifyEvent", Gtk.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.WidgetQueryTooltipSignalInfo), '("realize", Gtk.WidgetRealizeSignalInfo), '("redo", WebViewRedoSignalInfo), '("remove", Gtk.ContainerRemoveSignalInfo), '("resourceContentLengthReceived", WebViewResourceContentLengthReceivedSignalInfo), '("resourceLoadFailed", WebViewResourceLoadFailedSignalInfo), '("resourceLoadFinished", WebViewResourceLoadFinishedSignalInfo), '("resourceRequestStarting", WebViewResourceRequestStartingSignalInfo), '("resourceResponseReceived", WebViewResourceResponseReceivedSignalInfo), '("runFileChooser", WebViewRunFileChooserSignalInfo), '("screenChanged", Gtk.WidgetScreenChangedSignalInfo), '("scriptAlert", WebViewScriptAlertSignalInfo), '("scriptConfirm", WebViewScriptConfirmSignalInfo), '("scriptPrompt", WebViewScriptPromptSignalInfo), '("scrollEvent", Gtk.WidgetScrollEventSignalInfo), '("selectAll", WebViewSelectAllSignalInfo), '("selectionChanged", WebViewSelectionChangedSignalInfo), '("selectionClearEvent", Gtk.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.WidgetSelectionRequestEventSignalInfo), '("setFocusChild", Gtk.ContainerSetFocusChildSignalInfo), '("shouldApplyStyle", WebViewShouldApplyStyleSignalInfo), '("shouldBeginEditing", WebViewShouldBeginEditingSignalInfo), '("shouldChangeSelectedRange", WebViewShouldChangeSelectedRangeSignalInfo), '("shouldDeleteRange", WebViewShouldDeleteRangeSignalInfo), '("shouldEndEditing", WebViewShouldEndEditingSignalInfo), '("shouldInsertNode", WebViewShouldInsertNodeSignalInfo), '("shouldInsertText", WebViewShouldInsertTextSignalInfo), '("shouldShowDeleteInterfaceForElement", WebViewShouldShowDeleteInterfaceForElementSignalInfo), '("show", Gtk.WidgetShowSignalInfo), '("showHelp", Gtk.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.WidgetStateFlagsChangedSignalInfo), '("statusBarTextChanged", WebViewStatusBarTextChangedSignalInfo), '("styleSet", Gtk.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.WidgetStyleUpdatedSignalInfo), '("titleChanged", WebViewTitleChangedSignalInfo), '("touchEvent", Gtk.WidgetTouchEventSignalInfo), '("undo", WebViewUndoSignalInfo), '("unmap", Gtk.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.WidgetUnrealizeSignalInfo), '("userChangedContents", WebViewUserChangedContentsSignalInfo), '("viewportAttributesChanged", WebViewViewportAttributesChangedSignalInfo), '("viewportAttributesRecomputeRequested", WebViewViewportAttributesRecomputeRequestedSignalInfo), '("visibilityNotifyEvent", Gtk.WidgetVisibilityNotifyEventSignalInfo), '("webViewReady", WebViewWebViewReadySignalInfo), '("windowObjectCleared", WebViewWindowObjectClearedSignalInfo), '("windowStateEvent", Gtk.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)]) + +-- method WebView::new +-- method type : Constructor +-- Args : [] +-- Lengths : [] +-- returnType : TInterface "WebKit" "WebView" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_new" webkit_web_view_new :: + IO (Ptr WebView) + + +webViewNew :: + (MonadIO m) => + m WebView -- result +webViewNew = liftIO $ do + result <- webkit_web_view_new + checkUnexpectedReturnNULL "webkit_web_view_new" result + result' <- (newObject WebView) result + return result' + +-- method WebView::can_copy_clipboard +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_can_copy_clipboard" webkit_web_view_can_copy_clipboard :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewCanCopyClipboard :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewCanCopyClipboard _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_can_copy_clipboard _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewCanCopyClipboardMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewCanCopyClipboardMethodInfo a signature where + overloadedMethod _ = webViewCanCopyClipboard + +-- method WebView::can_cut_clipboard +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_can_cut_clipboard" webkit_web_view_can_cut_clipboard :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewCanCutClipboard :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewCanCutClipboard _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_can_cut_clipboard _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewCanCutClipboardMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewCanCutClipboardMethodInfo a signature where + overloadedMethod _ = webViewCanCutClipboard + +-- method WebView::can_go_back +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_can_go_back" webkit_web_view_can_go_back :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewCanGoBack :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewCanGoBack _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_can_go_back _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewCanGoBackMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewCanGoBackMethodInfo a signature where + overloadedMethod _ = webViewCanGoBack + +-- method WebView::can_go_back_or_forward +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "steps", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_can_go_back_or_forward" webkit_web_view_can_go_back_or_forward :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + Int32 -> -- steps : TBasicType TInt32 + IO CInt + + +webViewCanGoBackOrForward :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Int32 -- steps + -> m Bool -- result +webViewCanGoBackOrForward _obj steps = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_can_go_back_or_forward _obj' steps + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewCanGoBackOrForwardMethodInfo +instance (signature ~ (Int32 -> m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewCanGoBackOrForwardMethodInfo a signature where + overloadedMethod _ = webViewCanGoBackOrForward + +-- method WebView::can_go_forward +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_can_go_forward" webkit_web_view_can_go_forward :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewCanGoForward :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewCanGoForward _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_can_go_forward _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewCanGoForwardMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewCanGoForwardMethodInfo a signature where + overloadedMethod _ = webViewCanGoForward + +-- method WebView::can_paste_clipboard +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_can_paste_clipboard" webkit_web_view_can_paste_clipboard :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewCanPasteClipboard :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewCanPasteClipboard _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_can_paste_clipboard _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewCanPasteClipboardMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewCanPasteClipboardMethodInfo a signature where + overloadedMethod _ = webViewCanPasteClipboard + +-- method WebView::can_redo +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_can_redo" webkit_web_view_can_redo :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewCanRedo :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewCanRedo _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_can_redo _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewCanRedoMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewCanRedoMethodInfo a signature where + overloadedMethod _ = webViewCanRedo + +-- method WebView::can_show_mime_type +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_can_show_mime_type" webkit_web_view_can_show_mime_type :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CString -> -- mime_type : TBasicType TUTF8 + IO CInt + + +webViewCanShowMimeType :: + (MonadIO m, WebViewK a) => + a -- _obj + -> T.Text -- mimeType + -> m Bool -- result +webViewCanShowMimeType _obj mimeType = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + mimeType' <- textToCString mimeType + result <- webkit_web_view_can_show_mime_type _obj' mimeType' + let result' = (/= 0) result + touchManagedPtr _obj + freeMem mimeType' + return result' + +data WebViewCanShowMimeTypeMethodInfo +instance (signature ~ (T.Text -> m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewCanShowMimeTypeMethodInfo a signature where + overloadedMethod _ = webViewCanShowMimeType + +-- method WebView::can_undo +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_can_undo" webkit_web_view_can_undo :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewCanUndo :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewCanUndo _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_can_undo _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewCanUndoMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewCanUndoMethodInfo a signature where + overloadedMethod _ = webViewCanUndo + +-- method WebView::copy_clipboard +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_copy_clipboard" webkit_web_view_copy_clipboard :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewCopyClipboard :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewCopyClipboard _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_copy_clipboard _obj' + touchManagedPtr _obj + return () + +data WebViewCopyClipboardMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewCopyClipboardMethodInfo a signature where + overloadedMethod _ = webViewCopyClipboard + +-- method WebView::cut_clipboard +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_cut_clipboard" webkit_web_view_cut_clipboard :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewCutClipboard :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewCutClipboard _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_cut_clipboard _obj' + touchManagedPtr _obj + return () + +data WebViewCutClipboardMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewCutClipboardMethodInfo a signature where + overloadedMethod _ = webViewCutClipboard + +-- method WebView::delete_selection +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_delete_selection" webkit_web_view_delete_selection :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewDeleteSelection :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewDeleteSelection _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_delete_selection _obj' + touchManagedPtr _obj + return () + +data WebViewDeleteSelectionMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewDeleteSelectionMethodInfo a signature where + overloadedMethod _ = webViewDeleteSelection + +-- method WebView::execute_script +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "script", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_execute_script" webkit_web_view_execute_script :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CString -> -- script : TBasicType TUTF8 + IO () + + +webViewExecuteScript :: + (MonadIO m, WebViewK a) => + a -- _obj + -> T.Text -- script + -> m () -- result +webViewExecuteScript _obj script = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + script' <- textToCString script + webkit_web_view_execute_script _obj' script' + touchManagedPtr _obj + freeMem script' + return () + +data WebViewExecuteScriptMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewExecuteScriptMethodInfo a signature where + overloadedMethod _ = webViewExecuteScript + +-- method WebView::get_back_forward_list +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "WebBackForwardList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_back_forward_list" webkit_web_view_get_back_forward_list :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr WebBackForwardList) + + +webViewGetBackForwardList :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m WebBackForwardList -- result +webViewGetBackForwardList _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_back_forward_list _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_back_forward_list" result + result' <- (newObject WebBackForwardList) result + touchManagedPtr _obj + return result' + +data WebViewGetBackForwardListMethodInfo +instance (signature ~ (m WebBackForwardList), MonadIO m, WebViewK a) => MethodInfo WebViewGetBackForwardListMethodInfo a signature where + overloadedMethod _ = webViewGetBackForwardList + +-- method WebView::get_copy_target_list +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "Gtk" "TargetList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_copy_target_list" webkit_web_view_get_copy_target_list :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr Gtk.TargetList) + + +webViewGetCopyTargetList :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Gtk.TargetList -- result +webViewGetCopyTargetList _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_copy_target_list _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_copy_target_list" result + result' <- (wrapBoxed Gtk.TargetList) result + touchManagedPtr _obj + return result' + +data WebViewGetCopyTargetListMethodInfo +instance (signature ~ (m Gtk.TargetList), MonadIO m, WebViewK a) => MethodInfo WebViewGetCopyTargetListMethodInfo a signature where + overloadedMethod _ = webViewGetCopyTargetList + +-- method WebView::get_custom_encoding +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_custom_encoding" webkit_web_view_get_custom_encoding :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CString + + +webViewGetCustomEncoding :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m T.Text -- result +webViewGetCustomEncoding _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_custom_encoding _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_custom_encoding" result + result' <- cstringToText result + touchManagedPtr _obj + return result' + +data WebViewGetCustomEncodingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebViewK a) => MethodInfo WebViewGetCustomEncodingMethodInfo a signature where + overloadedMethod _ = webViewGetCustomEncoding + +-- method WebView::get_dom_document +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "DOMDocument" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_dom_document" webkit_web_view_get_dom_document :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr DOMDocument) + + +webViewGetDomDocument :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m DOMDocument -- result +webViewGetDomDocument _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_dom_document _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_dom_document" result + result' <- (newObject DOMDocument) result + touchManagedPtr _obj + return result' + +data WebViewGetDomDocumentMethodInfo +instance (signature ~ (m DOMDocument), MonadIO m, WebViewK a) => MethodInfo WebViewGetDomDocumentMethodInfo a signature where + overloadedMethod _ = webViewGetDomDocument + +-- method WebView::get_editable +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_editable" webkit_web_view_get_editable :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewGetEditable :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewGetEditable _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_editable _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewGetEditableMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewGetEditableMethodInfo a signature where + overloadedMethod _ = webViewGetEditable + +-- method WebView::get_encoding +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_encoding" webkit_web_view_get_encoding :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CString + + +webViewGetEncoding :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m T.Text -- result +webViewGetEncoding _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_encoding _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_encoding" result + result' <- cstringToText result + touchManagedPtr _obj + return result' + +data WebViewGetEncodingMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebViewK a) => MethodInfo WebViewGetEncodingMethodInfo a signature where + overloadedMethod _ = webViewGetEncoding + +-- method WebView::get_focused_frame +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "WebFrame" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_focused_frame" webkit_web_view_get_focused_frame :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr WebFrame) + + +webViewGetFocusedFrame :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m WebFrame -- result +webViewGetFocusedFrame _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_focused_frame _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_focused_frame" result + result' <- (newObject WebFrame) result + touchManagedPtr _obj + return result' + +data WebViewGetFocusedFrameMethodInfo +instance (signature ~ (m WebFrame), MonadIO m, WebViewK a) => MethodInfo WebViewGetFocusedFrameMethodInfo a signature where + overloadedMethod _ = webViewGetFocusedFrame + +-- method WebView::get_full_content_zoom +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_full_content_zoom" webkit_web_view_get_full_content_zoom :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewGetFullContentZoom :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewGetFullContentZoom _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_full_content_zoom _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewGetFullContentZoomMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewGetFullContentZoomMethodInfo a signature where + overloadedMethod _ = webViewGetFullContentZoom + +-- method WebView::get_hit_test_result +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "event", argType = TInterface "Gdk" "EventButton", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "HitTestResult" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_hit_test_result" webkit_web_view_get_hit_test_result :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + Ptr Gdk.EventButton -> -- event : TInterface "Gdk" "EventButton" + IO (Ptr HitTestResult) + + +webViewGetHitTestResult :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Gdk.EventButton -- event + -> m HitTestResult -- result +webViewGetHitTestResult _obj event = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let event' = unsafeManagedPtrGetPtr event + result <- webkit_web_view_get_hit_test_result _obj' event' + checkUnexpectedReturnNULL "webkit_web_view_get_hit_test_result" result + result' <- (wrapObject HitTestResult) result + touchManagedPtr _obj + touchManagedPtr event + return result' + +data WebViewGetHitTestResultMethodInfo +instance (signature ~ (Gdk.EventButton -> m HitTestResult), MonadIO m, WebViewK a) => MethodInfo WebViewGetHitTestResultMethodInfo a signature where + overloadedMethod _ = webViewGetHitTestResult + +-- method WebView::get_icon_pixbuf +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "GdkPixbuf" "Pixbuf" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_icon_pixbuf" webkit_web_view_get_icon_pixbuf :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr GdkPixbuf.Pixbuf) + +{-# DEPRECATED webViewGetIconPixbuf ["(Since version 1.8)","Use webkit_web_view_try_get_favicon_pixbuf() instead."]#-} +webViewGetIconPixbuf :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m GdkPixbuf.Pixbuf -- result +webViewGetIconPixbuf _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_icon_pixbuf _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_icon_pixbuf" result + result' <- (wrapObject GdkPixbuf.Pixbuf) result + touchManagedPtr _obj + return result' + +data WebViewGetIconPixbufMethodInfo +instance (signature ~ (m GdkPixbuf.Pixbuf), MonadIO m, WebViewK a) => MethodInfo WebViewGetIconPixbufMethodInfo a signature where + overloadedMethod _ = webViewGetIconPixbuf + +-- method WebView::get_icon_uri +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_icon_uri" webkit_web_view_get_icon_uri :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CString + + +webViewGetIconUri :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m T.Text -- result +webViewGetIconUri _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_icon_uri _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_icon_uri" result + result' <- cstringToText result + touchManagedPtr _obj + return result' + +data WebViewGetIconUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebViewK a) => MethodInfo WebViewGetIconUriMethodInfo a signature where + overloadedMethod _ = webViewGetIconUri + +-- method WebView::get_inspector +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "WebInspector" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_inspector" webkit_web_view_get_inspector :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr WebInspector) + + +webViewGetInspector :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m WebInspector -- result +webViewGetInspector _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_inspector _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_inspector" result + result' <- (newObject WebInspector) result + touchManagedPtr _obj + return result' + +data WebViewGetInspectorMethodInfo +instance (signature ~ (m WebInspector), MonadIO m, WebViewK a) => MethodInfo WebViewGetInspectorMethodInfo a signature where + overloadedMethod _ = webViewGetInspector + +-- method WebView::get_load_status +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "LoadStatus" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_load_status" webkit_web_view_get_load_status :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CUInt + + +webViewGetLoadStatus :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m LoadStatus -- result +webViewGetLoadStatus _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_load_status _obj' + let result' = (toEnum . fromIntegral) result + touchManagedPtr _obj + return result' + +data WebViewGetLoadStatusMethodInfo +instance (signature ~ (m LoadStatus), MonadIO m, WebViewK a) => MethodInfo WebViewGetLoadStatusMethodInfo a signature where + overloadedMethod _ = webViewGetLoadStatus + +-- method WebView::get_main_frame +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "WebFrame" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_main_frame" webkit_web_view_get_main_frame :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr WebFrame) + + +webViewGetMainFrame :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m WebFrame -- result +webViewGetMainFrame _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_main_frame _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_main_frame" result + result' <- (newObject WebFrame) result + touchManagedPtr _obj + return result' + +data WebViewGetMainFrameMethodInfo +instance (signature ~ (m WebFrame), MonadIO m, WebViewK a) => MethodInfo WebViewGetMainFrameMethodInfo a signature where + overloadedMethod _ = webViewGetMainFrame + +-- method WebView::get_paste_target_list +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "Gtk" "TargetList" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_paste_target_list" webkit_web_view_get_paste_target_list :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr Gtk.TargetList) + + +webViewGetPasteTargetList :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Gtk.TargetList -- result +webViewGetPasteTargetList _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_paste_target_list _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_paste_target_list" result + result' <- (wrapBoxed Gtk.TargetList) result + touchManagedPtr _obj + return result' + +data WebViewGetPasteTargetListMethodInfo +instance (signature ~ (m Gtk.TargetList), MonadIO m, WebViewK a) => MethodInfo WebViewGetPasteTargetListMethodInfo a signature where + overloadedMethod _ = webViewGetPasteTargetList + +-- method WebView::get_progress +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TDouble +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_progress" webkit_web_view_get_progress :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CDouble + + +webViewGetProgress :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Double -- result +webViewGetProgress _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_progress _obj' + let result' = realToFrac result + touchManagedPtr _obj + return result' + +data WebViewGetProgressMethodInfo +instance (signature ~ (m Double), MonadIO m, WebViewK a) => MethodInfo WebViewGetProgressMethodInfo a signature where + overloadedMethod _ = webViewGetProgress + +-- method WebView::get_settings +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "WebSettings" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_settings" webkit_web_view_get_settings :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr WebSettings) + + +webViewGetSettings :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m WebSettings -- result +webViewGetSettings _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_settings _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_settings" result + result' <- (newObject WebSettings) result + touchManagedPtr _obj + return result' + +data WebViewGetSettingsMethodInfo +instance (signature ~ (m WebSettings), MonadIO m, WebViewK a) => MethodInfo WebViewGetSettingsMethodInfo a signature where + overloadedMethod _ = webViewGetSettings + +-- method WebView::get_snapshot +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "cairo" "Surface" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_snapshot" webkit_web_view_get_snapshot :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr Cairo.Surface) + + +webViewGetSnapshot :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Cairo.Surface -- result +webViewGetSnapshot _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_snapshot _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_snapshot" result + result' <- (wrapBoxed Cairo.Surface) result + touchManagedPtr _obj + return result' + +data WebViewGetSnapshotMethodInfo +instance (signature ~ (m Cairo.Surface), MonadIO m, WebViewK a) => MethodInfo WebViewGetSnapshotMethodInfo a signature where + overloadedMethod _ = webViewGetSnapshot + +-- method WebView::get_title +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_title" webkit_web_view_get_title :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CString + + +webViewGetTitle :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m T.Text -- result +webViewGetTitle _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_title _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_title" result + result' <- cstringToText result + touchManagedPtr _obj + return result' + +data WebViewGetTitleMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebViewK a) => MethodInfo WebViewGetTitleMethodInfo a signature where + overloadedMethod _ = webViewGetTitle + +-- method WebView::get_transparent +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_transparent" webkit_web_view_get_transparent :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewGetTransparent :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewGetTransparent _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_transparent _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewGetTransparentMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewGetTransparentMethodInfo a signature where + overloadedMethod _ = webViewGetTransparent + +-- method WebView::get_uri +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUTF8 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_uri" webkit_web_view_get_uri :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CString + + +webViewGetUri :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m T.Text -- result +webViewGetUri _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_uri _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_uri" result + result' <- cstringToText result + touchManagedPtr _obj + return result' + +data WebViewGetUriMethodInfo +instance (signature ~ (m T.Text), MonadIO m, WebViewK a) => MethodInfo WebViewGetUriMethodInfo a signature where + overloadedMethod _ = webViewGetUri + +-- method WebView::get_view_mode +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "WebViewViewMode" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_view_mode" webkit_web_view_get_view_mode :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CUInt + + +webViewGetViewMode :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m WebViewViewMode -- result +webViewGetViewMode _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_view_mode _obj' + let result' = (toEnum . fromIntegral) result + touchManagedPtr _obj + return result' + +data WebViewGetViewModeMethodInfo +instance (signature ~ (m WebViewViewMode), MonadIO m, WebViewK a) => MethodInfo WebViewGetViewModeMethodInfo a signature where + overloadedMethod _ = webViewGetViewMode + +-- method WebView::get_view_source_mode +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_view_source_mode" webkit_web_view_get_view_source_mode :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewGetViewSourceMode :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewGetViewSourceMode _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_view_source_mode _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewGetViewSourceModeMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewGetViewSourceModeMethodInfo a signature where + overloadedMethod _ = webViewGetViewSourceMode + +-- method WebView::get_viewport_attributes +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "ViewportAttributes" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_viewport_attributes" webkit_web_view_get_viewport_attributes :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr ViewportAttributes) + + +webViewGetViewportAttributes :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m ViewportAttributes -- result +webViewGetViewportAttributes _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_viewport_attributes _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_viewport_attributes" result + result' <- (newObject ViewportAttributes) result + touchManagedPtr _obj + return result' + +data WebViewGetViewportAttributesMethodInfo +instance (signature ~ (m ViewportAttributes), MonadIO m, WebViewK a) => MethodInfo WebViewGetViewportAttributesMethodInfo a signature where + overloadedMethod _ = webViewGetViewportAttributes + +-- method WebView::get_window_features +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "WebKit" "WebWindowFeatures" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_window_features" webkit_web_view_get_window_features :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO (Ptr WebWindowFeatures) + + +webViewGetWindowFeatures :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m WebWindowFeatures -- result +webViewGetWindowFeatures _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_window_features _obj' + checkUnexpectedReturnNULL "webkit_web_view_get_window_features" result + result' <- (newObject WebWindowFeatures) result + touchManagedPtr _obj + return result' + +data WebViewGetWindowFeaturesMethodInfo +instance (signature ~ (m WebWindowFeatures), MonadIO m, WebViewK a) => MethodInfo WebViewGetWindowFeaturesMethodInfo a signature where + overloadedMethod _ = webViewGetWindowFeatures + +-- method WebView::get_zoom_level +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TFloat +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_get_zoom_level" webkit_web_view_get_zoom_level :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CFloat + + +webViewGetZoomLevel :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Float -- result +webViewGetZoomLevel _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_get_zoom_level _obj' + let result' = realToFrac result + touchManagedPtr _obj + return result' + +data WebViewGetZoomLevelMethodInfo +instance (signature ~ (m Float), MonadIO m, WebViewK a) => MethodInfo WebViewGetZoomLevelMethodInfo a signature where + overloadedMethod _ = webViewGetZoomLevel + +-- method WebView::go_back +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_go_back" webkit_web_view_go_back :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewGoBack :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewGoBack _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_go_back _obj' + touchManagedPtr _obj + return () + +data WebViewGoBackMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewGoBackMethodInfo a signature where + overloadedMethod _ = webViewGoBack + +-- method WebView::go_back_or_forward +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "steps", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_go_back_or_forward" webkit_web_view_go_back_or_forward :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + Int32 -> -- steps : TBasicType TInt32 + IO () + + +webViewGoBackOrForward :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Int32 -- steps + -> m () -- result +webViewGoBackOrForward _obj steps = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_go_back_or_forward _obj' steps + touchManagedPtr _obj + return () + +data WebViewGoBackOrForwardMethodInfo +instance (signature ~ (Int32 -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewGoBackOrForwardMethodInfo a signature where + overloadedMethod _ = webViewGoBackOrForward + +-- method WebView::go_forward +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_go_forward" webkit_web_view_go_forward :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewGoForward :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewGoForward _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_go_forward _obj' + touchManagedPtr _obj + return () + +data WebViewGoForwardMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewGoForwardMethodInfo a signature where + overloadedMethod _ = webViewGoForward + +-- method WebView::go_to_back_forward_item +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "item", argType = TInterface "WebKit" "WebHistoryItem", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_go_to_back_forward_item" webkit_web_view_go_to_back_forward_item :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + Ptr WebHistoryItem -> -- item : TInterface "WebKit" "WebHistoryItem" + IO CInt + + +webViewGoToBackForwardItem :: + (MonadIO m, WebViewK a, WebHistoryItemK b) => + a -- _obj + -> b -- item + -> m Bool -- result +webViewGoToBackForwardItem _obj item = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let item' = unsafeManagedPtrCastPtr item + result <- webkit_web_view_go_to_back_forward_item _obj' item' + let result' = (/= 0) result + touchManagedPtr _obj + touchManagedPtr item + return result' + +data WebViewGoToBackForwardItemMethodInfo +instance (signature ~ (b -> m Bool), MonadIO m, WebViewK a, WebHistoryItemK b) => MethodInfo WebViewGoToBackForwardItemMethodInfo a signature where + overloadedMethod _ = webViewGoToBackForwardItem + +-- method WebView::has_selection +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_has_selection" webkit_web_view_has_selection :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO CInt + + +webViewHasSelection :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m Bool -- result +webViewHasSelection _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_has_selection _obj' + let result' = (/= 0) result + touchManagedPtr _obj + return result' + +data WebViewHasSelectionMethodInfo +instance (signature ~ (m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewHasSelectionMethodInfo a signature where + overloadedMethod _ = webViewHasSelection + +-- method WebView::load_html_string +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "base_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_load_html_string" webkit_web_view_load_html_string :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CString -> -- content : TBasicType TUTF8 + CString -> -- base_uri : TBasicType TUTF8 + IO () + +{-# DEPRECATED webViewLoadHtmlString ["(Since version 1.1.1)","Use webkit_web_view_load_string() instead."]#-} +webViewLoadHtmlString :: + (MonadIO m, WebViewK a) => + a -- _obj + -> T.Text -- content + -> T.Text -- baseUri + -> m () -- result +webViewLoadHtmlString _obj content baseUri = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + content' <- textToCString content + baseUri' <- textToCString baseUri + webkit_web_view_load_html_string _obj' content' baseUri' + touchManagedPtr _obj + freeMem content' + freeMem baseUri' + return () + +data WebViewLoadHtmlStringMethodInfo +instance (signature ~ (T.Text -> T.Text -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewLoadHtmlStringMethodInfo a signature where + overloadedMethod _ = webViewLoadHtmlString + +-- method WebView::load_request +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "request", argType = TInterface "WebKit" "NetworkRequest", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_load_request" webkit_web_view_load_request :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + Ptr NetworkRequest -> -- request : TInterface "WebKit" "NetworkRequest" + IO () + + +webViewLoadRequest :: + (MonadIO m, WebViewK a, NetworkRequestK b) => + a -- _obj + -> b -- request + -> m () -- result +webViewLoadRequest _obj request = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let request' = unsafeManagedPtrCastPtr request + webkit_web_view_load_request _obj' request' + touchManagedPtr _obj + touchManagedPtr request + return () + +data WebViewLoadRequestMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, WebViewK a, NetworkRequestK b) => MethodInfo WebViewLoadRequestMethodInfo a signature where + overloadedMethod _ = webViewLoadRequest + +-- method WebView::load_string +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "content", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "mime_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "base_uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_load_string" webkit_web_view_load_string :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CString -> -- content : TBasicType TUTF8 + CString -> -- mime_type : TBasicType TUTF8 + CString -> -- encoding : TBasicType TUTF8 + CString -> -- base_uri : TBasicType TUTF8 + IO () + + +webViewLoadString :: + (MonadIO m, WebViewK a) => + a -- _obj + -> T.Text -- content + -> T.Text -- mimeType + -> T.Text -- encoding + -> T.Text -- baseUri + -> m () -- result +webViewLoadString _obj content mimeType encoding baseUri = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + content' <- textToCString content + mimeType' <- textToCString mimeType + encoding' <- textToCString encoding + baseUri' <- textToCString baseUri + webkit_web_view_load_string _obj' content' mimeType' encoding' baseUri' + touchManagedPtr _obj + freeMem content' + freeMem mimeType' + freeMem encoding' + freeMem baseUri' + return () + +data WebViewLoadStringMethodInfo +instance (signature ~ (T.Text -> T.Text -> T.Text -> T.Text -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewLoadStringMethodInfo a signature where + overloadedMethod _ = webViewLoadString + +-- method WebView::load_uri +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_load_uri" webkit_web_view_load_uri :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CString -> -- uri : TBasicType TUTF8 + IO () + + +webViewLoadUri :: + (MonadIO m, WebViewK a) => + a -- _obj + -> T.Text -- uri + -> m () -- result +webViewLoadUri _obj uri = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + uri' <- textToCString uri + webkit_web_view_load_uri _obj' uri' + touchManagedPtr _obj + freeMem uri' + return () + +data WebViewLoadUriMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewLoadUriMethodInfo a signature where + overloadedMethod _ = webViewLoadUri + +-- method WebView::mark_text_matches +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "string", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "case_sensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "limit", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TUInt32 +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_mark_text_matches" webkit_web_view_mark_text_matches :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CString -> -- string : TBasicType TUTF8 + CInt -> -- case_sensitive : TBasicType TBoolean + Word32 -> -- limit : TBasicType TUInt32 + IO Word32 + + +webViewMarkTextMatches :: + (MonadIO m, WebViewK a) => + a -- _obj + -> T.Text -- string + -> Bool -- caseSensitive + -> Word32 -- limit + -> m Word32 -- result +webViewMarkTextMatches _obj string caseSensitive limit = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + string' <- textToCString string + let caseSensitive' = (fromIntegral . fromEnum) caseSensitive + result <- webkit_web_view_mark_text_matches _obj' string' caseSensitive' limit + touchManagedPtr _obj + freeMem string' + return result + +data WebViewMarkTextMatchesMethodInfo +instance (signature ~ (T.Text -> Bool -> Word32 -> m Word32), MonadIO m, WebViewK a) => MethodInfo WebViewMarkTextMatchesMethodInfo a signature where + overloadedMethod _ = webViewMarkTextMatches + +-- method WebView::move_cursor +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "step", argType = TInterface "Gtk" "MovementStep", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "count", argType = TBasicType TInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_move_cursor" webkit_web_view_move_cursor :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CUInt -> -- step : TInterface "Gtk" "MovementStep" + Int32 -> -- count : TBasicType TInt32 + IO () + + +webViewMoveCursor :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Gtk.MovementStep -- step + -> Int32 -- count + -> m () -- result +webViewMoveCursor _obj step count = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let step' = (fromIntegral . fromEnum) step + webkit_web_view_move_cursor _obj' step' count + touchManagedPtr _obj + return () + +data WebViewMoveCursorMethodInfo +instance (signature ~ (Gtk.MovementStep -> Int32 -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewMoveCursorMethodInfo a signature where + overloadedMethod _ = webViewMoveCursor + +-- method WebView::open +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "uri", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_open" webkit_web_view_open :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CString -> -- uri : TBasicType TUTF8 + IO () + +{-# DEPRECATED webViewOpen ["(Since version 1.1.1)","Use webkit_web_view_load_uri() instead."]#-} +webViewOpen :: + (MonadIO m, WebViewK a) => + a -- _obj + -> T.Text -- uri + -> m () -- result +webViewOpen _obj uri = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + uri' <- textToCString uri + webkit_web_view_open _obj' uri' + touchManagedPtr _obj + freeMem uri' + return () + +data WebViewOpenMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewOpenMethodInfo a signature where + overloadedMethod _ = webViewOpen + +-- method WebView::paste_clipboard +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_paste_clipboard" webkit_web_view_paste_clipboard :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewPasteClipboard :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewPasteClipboard _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_paste_clipboard _obj' + touchManagedPtr _obj + return () + +data WebViewPasteClipboardMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewPasteClipboardMethodInfo a signature where + overloadedMethod _ = webViewPasteClipboard + +-- method WebView::redo +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_redo" webkit_web_view_redo :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewRedo :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewRedo _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_redo _obj' + touchManagedPtr _obj + return () + +data WebViewRedoMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewRedoMethodInfo a signature where + overloadedMethod _ = webViewRedo + +-- method WebView::reload +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_reload" webkit_web_view_reload :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewReload :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewReload _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_reload _obj' + touchManagedPtr _obj + return () + +data WebViewReloadMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewReloadMethodInfo a signature where + overloadedMethod _ = webViewReload + +-- method WebView::reload_bypass_cache +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_reload_bypass_cache" webkit_web_view_reload_bypass_cache :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewReloadBypassCache :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewReloadBypassCache _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_reload_bypass_cache _obj' + touchManagedPtr _obj + return () + +data WebViewReloadBypassCacheMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewReloadBypassCacheMethodInfo a signature where + overloadedMethod _ = webViewReloadBypassCache + +-- method WebView::search_text +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "case_sensitive", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "forward", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "wrap", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TBoolean +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_search_text" webkit_web_view_search_text :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CString -> -- text : TBasicType TUTF8 + CInt -> -- case_sensitive : TBasicType TBoolean + CInt -> -- forward : TBasicType TBoolean + CInt -> -- wrap : TBasicType TBoolean + IO CInt + + +webViewSearchText :: + (MonadIO m, WebViewK a) => + a -- _obj + -> T.Text -- text + -> Bool -- caseSensitive + -> Bool -- forward + -> Bool -- wrap + -> m Bool -- result +webViewSearchText _obj text caseSensitive forward wrap = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + text' <- textToCString text + let caseSensitive' = (fromIntegral . fromEnum) caseSensitive + let forward' = (fromIntegral . fromEnum) forward + let wrap' = (fromIntegral . fromEnum) wrap + result <- webkit_web_view_search_text _obj' text' caseSensitive' forward' wrap' + let result' = (/= 0) result + touchManagedPtr _obj + freeMem text' + return result' + +data WebViewSearchTextMethodInfo +instance (signature ~ (T.Text -> Bool -> Bool -> Bool -> m Bool), MonadIO m, WebViewK a) => MethodInfo WebViewSearchTextMethodInfo a signature where + overloadedMethod _ = webViewSearchText + +-- method WebView::select_all +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_select_all" webkit_web_view_select_all :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewSelectAll :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewSelectAll _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_select_all _obj' + touchManagedPtr _obj + return () + +data WebViewSelectAllMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewSelectAllMethodInfo a signature where + overloadedMethod _ = webViewSelectAll + +-- method WebView::set_custom_encoding +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "encoding", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_set_custom_encoding" webkit_web_view_set_custom_encoding :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CString -> -- encoding : TBasicType TUTF8 + IO () + + +webViewSetCustomEncoding :: + (MonadIO m, WebViewK a) => + a -- _obj + -> T.Text -- encoding + -> m () -- result +webViewSetCustomEncoding _obj encoding = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + encoding' <- textToCString encoding + webkit_web_view_set_custom_encoding _obj' encoding' + touchManagedPtr _obj + freeMem encoding' + return () + +data WebViewSetCustomEncodingMethodInfo +instance (signature ~ (T.Text -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewSetCustomEncodingMethodInfo a signature where + overloadedMethod _ = webViewSetCustomEncoding + +-- method WebView::set_editable +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flag", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_set_editable" webkit_web_view_set_editable :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CInt -> -- flag : TBasicType TBoolean + IO () + + +webViewSetEditable :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Bool -- flag + -> m () -- result +webViewSetEditable _obj flag = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let flag' = (fromIntegral . fromEnum) flag + webkit_web_view_set_editable _obj' flag' + touchManagedPtr _obj + return () + +data WebViewSetEditableMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewSetEditableMethodInfo a signature where + overloadedMethod _ = webViewSetEditable + +-- method WebView::set_full_content_zoom +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "full_content_zoom", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_set_full_content_zoom" webkit_web_view_set_full_content_zoom :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CInt -> -- full_content_zoom : TBasicType TBoolean + IO () + + +webViewSetFullContentZoom :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Bool -- fullContentZoom + -> m () -- result +webViewSetFullContentZoom _obj fullContentZoom = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let fullContentZoom' = (fromIntegral . fromEnum) fullContentZoom + webkit_web_view_set_full_content_zoom _obj' fullContentZoom' + touchManagedPtr _obj + return () + +data WebViewSetFullContentZoomMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewSetFullContentZoomMethodInfo a signature where + overloadedMethod _ = webViewSetFullContentZoom + +-- method WebView::set_highlight_text_matches +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "highlight", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_set_highlight_text_matches" webkit_web_view_set_highlight_text_matches :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CInt -> -- highlight : TBasicType TBoolean + IO () + + +webViewSetHighlightTextMatches :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Bool -- highlight + -> m () -- result +webViewSetHighlightTextMatches _obj highlight = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let highlight' = (fromIntegral . fromEnum) highlight + webkit_web_view_set_highlight_text_matches _obj' highlight' + touchManagedPtr _obj + return () + +data WebViewSetHighlightTextMatchesMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewSetHighlightTextMatchesMethodInfo a signature where + overloadedMethod _ = webViewSetHighlightTextMatches + +-- method WebView::set_maintains_back_forward_list +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flag", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_set_maintains_back_forward_list" webkit_web_view_set_maintains_back_forward_list :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CInt -> -- flag : TBasicType TBoolean + IO () + + +webViewSetMaintainsBackForwardList :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Bool -- flag + -> m () -- result +webViewSetMaintainsBackForwardList _obj flag = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let flag' = (fromIntegral . fromEnum) flag + webkit_web_view_set_maintains_back_forward_list _obj' flag' + touchManagedPtr _obj + return () + +data WebViewSetMaintainsBackForwardListMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewSetMaintainsBackForwardListMethodInfo a signature where + overloadedMethod _ = webViewSetMaintainsBackForwardList + +-- method WebView::set_settings +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "settings", argType = TInterface "WebKit" "WebSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_set_settings" webkit_web_view_set_settings :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + Ptr WebSettings -> -- settings : TInterface "WebKit" "WebSettings" + IO () + + +webViewSetSettings :: + (MonadIO m, WebViewK a, WebSettingsK b) => + a -- _obj + -> b -- settings + -> m () -- result +webViewSetSettings _obj settings = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let settings' = unsafeManagedPtrCastPtr settings + webkit_web_view_set_settings _obj' settings' + touchManagedPtr _obj + touchManagedPtr settings + return () + +data WebViewSetSettingsMethodInfo +instance (signature ~ (b -> m ()), MonadIO m, WebViewK a, WebSettingsK b) => MethodInfo WebViewSetSettingsMethodInfo a signature where + overloadedMethod _ = webViewSetSettings + +-- method WebView::set_transparent +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flag", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_set_transparent" webkit_web_view_set_transparent :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CInt -> -- flag : TBasicType TBoolean + IO () + + +webViewSetTransparent :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Bool -- flag + -> m () -- result +webViewSetTransparent _obj flag = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let flag' = (fromIntegral . fromEnum) flag + webkit_web_view_set_transparent _obj' flag' + touchManagedPtr _obj + return () + +data WebViewSetTransparentMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewSetTransparentMethodInfo a signature where + overloadedMethod _ = webViewSetTransparent + +-- method WebView::set_view_mode +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "mode", argType = TInterface "WebKit" "WebViewViewMode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_set_view_mode" webkit_web_view_set_view_mode :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CUInt -> -- mode : TInterface "WebKit" "WebViewViewMode" + IO () + + +webViewSetViewMode :: + (MonadIO m, WebViewK a) => + a -- _obj + -> WebViewViewMode -- mode + -> m () -- result +webViewSetViewMode _obj mode = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let mode' = (fromIntegral . fromEnum) mode + webkit_web_view_set_view_mode _obj' mode' + touchManagedPtr _obj + return () + +data WebViewSetViewModeMethodInfo +instance (signature ~ (WebViewViewMode -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewSetViewModeMethodInfo a signature where + overloadedMethod _ = webViewSetViewMode + +-- method WebView::set_view_source_mode +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "view_source_mode", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_set_view_source_mode" webkit_web_view_set_view_source_mode :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CInt -> -- view_source_mode : TBasicType TBoolean + IO () + + +webViewSetViewSourceMode :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Bool -- viewSourceMode + -> m () -- result +webViewSetViewSourceMode _obj viewSourceMode = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let viewSourceMode' = (fromIntegral . fromEnum) viewSourceMode + webkit_web_view_set_view_source_mode _obj' viewSourceMode' + touchManagedPtr _obj + return () + +data WebViewSetViewSourceModeMethodInfo +instance (signature ~ (Bool -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewSetViewSourceModeMethodInfo a signature where + overloadedMethod _ = webViewSetViewSourceMode + +-- method WebView::set_zoom_level +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "zoom_level", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_set_zoom_level" webkit_web_view_set_zoom_level :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + CFloat -> -- zoom_level : TBasicType TFloat + IO () + + +webViewSetZoomLevel :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Float -- zoomLevel + -> m () -- result +webViewSetZoomLevel _obj zoomLevel = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + let zoomLevel' = realToFrac zoomLevel + webkit_web_view_set_zoom_level _obj' zoomLevel' + touchManagedPtr _obj + return () + +data WebViewSetZoomLevelMethodInfo +instance (signature ~ (Float -> m ()), MonadIO m, WebViewK a) => MethodInfo WebViewSetZoomLevelMethodInfo a signature where + overloadedMethod _ = webViewSetZoomLevel + +-- method WebView::stop_loading +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_stop_loading" webkit_web_view_stop_loading :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewStopLoading :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewStopLoading _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_stop_loading _obj' + touchManagedPtr _obj + return () + +data WebViewStopLoadingMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewStopLoadingMethodInfo a signature where + overloadedMethod _ = webViewStopLoading + +-- method WebView::try_get_favicon_pixbuf +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "width", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "height", argType = TBasicType TUInt32, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TInterface "GdkPixbuf" "Pixbuf" +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_try_get_favicon_pixbuf" webkit_web_view_try_get_favicon_pixbuf :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + Word32 -> -- width : TBasicType TUInt32 + Word32 -> -- height : TBasicType TUInt32 + IO (Ptr GdkPixbuf.Pixbuf) + + +webViewTryGetFaviconPixbuf :: + (MonadIO m, WebViewK a) => + a -- _obj + -> Word32 -- width + -> Word32 -- height + -> m GdkPixbuf.Pixbuf -- result +webViewTryGetFaviconPixbuf _obj width height = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + result <- webkit_web_view_try_get_favicon_pixbuf _obj' width height + checkUnexpectedReturnNULL "webkit_web_view_try_get_favicon_pixbuf" result + result' <- (wrapObject GdkPixbuf.Pixbuf) result + touchManagedPtr _obj + return result' + +data WebViewTryGetFaviconPixbufMethodInfo +instance (signature ~ (Word32 -> Word32 -> m GdkPixbuf.Pixbuf), MonadIO m, WebViewK a) => MethodInfo WebViewTryGetFaviconPixbufMethodInfo a signature where + overloadedMethod _ = webViewTryGetFaviconPixbuf + +-- method WebView::undo +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_undo" webkit_web_view_undo :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewUndo :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewUndo _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_undo _obj' + touchManagedPtr _obj + return () + +data WebViewUndoMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewUndoMethodInfo a signature where + overloadedMethod _ = webViewUndo + +-- method WebView::unmark_text_matches +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_unmark_text_matches" webkit_web_view_unmark_text_matches :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewUnmarkTextMatches :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewUnmarkTextMatches _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_unmark_text_matches _obj' + touchManagedPtr _obj + return () + +data WebViewUnmarkTextMatchesMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewUnmarkTextMatchesMethodInfo a signature where + overloadedMethod _ = webViewUnmarkTextMatches + +-- method WebView::zoom_in +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_zoom_in" webkit_web_view_zoom_in :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewZoomIn :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewZoomIn _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_zoom_in _obj' + touchManagedPtr _obj + return () + +data WebViewZoomInMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewZoomInMethodInfo a signature where + overloadedMethod _ = webViewZoomIn + +-- method WebView::zoom_out +-- method type : OrdinaryMethod +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] +-- Lengths : [] +-- returnType : TBasicType TVoid +-- throws : False +-- Skip return : False + +foreign import ccall "webkit_web_view_zoom_out" webkit_web_view_zoom_out :: + Ptr WebView -> -- _obj : TInterface "WebKit" "WebView" + IO () + + +webViewZoomOut :: + (MonadIO m, WebViewK a) => + a -- _obj + -> m () -- result +webViewZoomOut _obj = liftIO $ do + let _obj' = unsafeManagedPtrCastPtr _obj + webkit_web_view_zoom_out _obj' + touchManagedPtr _obj + return () + +data WebViewZoomOutMethodInfo +instance (signature ~ (m ()), MonadIO m, WebViewK a) => MethodInfo WebViewZoomOutMethodInfo a signature where + overloadedMethod _ = webViewZoomOut diff --git a/GI/WebKit/Objects/WebView.hs-boot b/GI/WebKit/Objects/WebView.hs-boot --- a/GI/WebKit/Objects/WebView.hs-boot +++ b/GI/WebKit/Objects/WebView.hs-boot @@ -92,3 +92,76 @@ data WebViewViewportAttributesRecomputeRequestedSignalInfo data WebViewWebViewReadySignalInfo data WebViewWindowObjectClearedSignalInfo +data WebViewCanCopyClipboardMethodInfo +data WebViewCanCutClipboardMethodInfo +data WebViewCanGoBackMethodInfo +data WebViewCanGoBackOrForwardMethodInfo +data WebViewCanGoForwardMethodInfo +data WebViewCanPasteClipboardMethodInfo +data WebViewCanRedoMethodInfo +data WebViewCanShowMimeTypeMethodInfo +data WebViewCanUndoMethodInfo +data WebViewCopyClipboardMethodInfo +data WebViewCutClipboardMethodInfo +data WebViewDeleteSelectionMethodInfo +data WebViewExecuteScriptMethodInfo +data WebViewGetBackForwardListMethodInfo +data WebViewGetCopyTargetListMethodInfo +data WebViewGetCustomEncodingMethodInfo +data WebViewGetDomDocumentMethodInfo +data WebViewGetEditableMethodInfo +data WebViewGetEncodingMethodInfo +data WebViewGetFocusedFrameMethodInfo +data WebViewGetFullContentZoomMethodInfo +data WebViewGetHitTestResultMethodInfo +data WebViewGetIconPixbufMethodInfo +data WebViewGetIconUriMethodInfo +data WebViewGetInspectorMethodInfo +data WebViewGetLoadStatusMethodInfo +data WebViewGetMainFrameMethodInfo +data WebViewGetPasteTargetListMethodInfo +data WebViewGetProgressMethodInfo +data WebViewGetSettingsMethodInfo +data WebViewGetSnapshotMethodInfo +data WebViewGetTitleMethodInfo +data WebViewGetTransparentMethodInfo +data WebViewGetUriMethodInfo +data WebViewGetViewModeMethodInfo +data WebViewGetViewSourceModeMethodInfo +data WebViewGetViewportAttributesMethodInfo +data WebViewGetWindowFeaturesMethodInfo +data WebViewGetZoomLevelMethodInfo +data WebViewGoBackMethodInfo +data WebViewGoBackOrForwardMethodInfo +data WebViewGoForwardMethodInfo +data WebViewGoToBackForwardItemMethodInfo +data WebViewHasSelectionMethodInfo +data WebViewLoadHtmlStringMethodInfo +data WebViewLoadRequestMethodInfo +data WebViewLoadStringMethodInfo +data WebViewLoadUriMethodInfo +data WebViewMarkTextMatchesMethodInfo +data WebViewMoveCursorMethodInfo +data WebViewOpenMethodInfo +data WebViewPasteClipboardMethodInfo +data WebViewRedoMethodInfo +data WebViewReloadMethodInfo +data WebViewReloadBypassCacheMethodInfo +data WebViewSearchTextMethodInfo +data WebViewSelectAllMethodInfo +data WebViewSetCustomEncodingMethodInfo +data WebViewSetEditableMethodInfo +data WebViewSetFullContentZoomMethodInfo +data WebViewSetHighlightTextMatchesMethodInfo +data WebViewSetMaintainsBackForwardListMethodInfo +data WebViewSetSettingsMethodInfo +data WebViewSetTransparentMethodInfo +data WebViewSetViewModeMethodInfo +data WebViewSetViewSourceModeMethodInfo +data WebViewSetZoomLevelMethodInfo +data WebViewStopLoadingMethodInfo +data WebViewTryGetFaviconPixbufMethodInfo +data WebViewUndoMethodInfo +data WebViewUnmarkTextMatchesMethodInfo +data WebViewZoomInMethodInfo +data WebViewZoomOutMethodInfo diff --git a/GI/WebKit/Objects/WebWindowFeatures.hs b/GI/WebKit/Objects/WebWindowFeatures.hs --- a/GI/WebKit/Objects/WebWindowFeatures.hs +++ b/GI/WebKit/Objects/WebWindowFeatures.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -17,6 +18,7 @@ -- * Methods -- ** webWindowFeaturesEqual + WebWindowFeaturesEqualMethodInfo , webWindowFeaturesEqual , @@ -133,6 +135,40 @@ noWebWindowFeatures :: Maybe WebWindowFeatures noWebWindowFeatures = Nothing +type family ResolveWebWindowFeaturesMethod (t :: Symbol) (o :: *) :: * where + ResolveWebWindowFeaturesMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo + ResolveWebWindowFeaturesMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo + ResolveWebWindowFeaturesMethod "equal" o = WebWindowFeaturesEqualMethodInfo + ResolveWebWindowFeaturesMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo + ResolveWebWindowFeaturesMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo + ResolveWebWindowFeaturesMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo + ResolveWebWindowFeaturesMethod "notify" o = GObject.ObjectNotifyMethodInfo + ResolveWebWindowFeaturesMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo + ResolveWebWindowFeaturesMethod "ref" o = GObject.ObjectRefMethodInfo + ResolveWebWindowFeaturesMethod "refSink" o = GObject.ObjectRefSinkMethodInfo + ResolveWebWindowFeaturesMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo + ResolveWebWindowFeaturesMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo + ResolveWebWindowFeaturesMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo + ResolveWebWindowFeaturesMethod "stealData" o = GObject.ObjectStealDataMethodInfo + ResolveWebWindowFeaturesMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo + ResolveWebWindowFeaturesMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo + ResolveWebWindowFeaturesMethod "unref" o = GObject.ObjectUnrefMethodInfo + ResolveWebWindowFeaturesMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo + ResolveWebWindowFeaturesMethod "getData" o = GObject.ObjectGetDataMethodInfo + ResolveWebWindowFeaturesMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo + ResolveWebWindowFeaturesMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo + ResolveWebWindowFeaturesMethod "setData" o = GObject.ObjectSetDataMethodInfo + ResolveWebWindowFeaturesMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo + ResolveWebWindowFeaturesMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebWindowFeaturesMethod t WebWindowFeatures, MethodInfo info WebWindowFeatures p) => IsLabelProxy t (WebWindowFeatures -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebWindowFeaturesMethod t WebWindowFeatures, MethodInfo info WebWindowFeatures p) => IsLabel t (WebWindowFeatures -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif + -- VVV Prop "fullscreen" -- Type: TBasicType TBoolean -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct] @@ -152,7 +188,7 @@ type AttrSetTypeConstraint WebWindowFeaturesFullscreenPropertyInfo = (~) Bool type AttrBaseTypeConstraint WebWindowFeaturesFullscreenPropertyInfo = WebWindowFeaturesK type AttrGetType WebWindowFeaturesFullscreenPropertyInfo = Bool - type AttrLabel WebWindowFeaturesFullscreenPropertyInfo = "WebWindowFeatures::fullscreen" + type AttrLabel WebWindowFeaturesFullscreenPropertyInfo = "fullscreen" attrGet _ = getWebWindowFeaturesFullscreen attrSet _ = setWebWindowFeaturesFullscreen attrConstruct _ = constructWebWindowFeaturesFullscreen @@ -176,7 +212,7 @@ type AttrSetTypeConstraint WebWindowFeaturesHeightPropertyInfo = (~) Int32 type AttrBaseTypeConstraint WebWindowFeaturesHeightPropertyInfo = WebWindowFeaturesK type AttrGetType WebWindowFeaturesHeightPropertyInfo = Int32 - type AttrLabel WebWindowFeaturesHeightPropertyInfo = "WebWindowFeatures::height" + type AttrLabel WebWindowFeaturesHeightPropertyInfo = "height" attrGet _ = getWebWindowFeaturesHeight attrSet _ = setWebWindowFeaturesHeight attrConstruct _ = constructWebWindowFeaturesHeight @@ -200,7 +236,7 @@ type AttrSetTypeConstraint WebWindowFeaturesLocationbarVisiblePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebWindowFeaturesLocationbarVisiblePropertyInfo = WebWindowFeaturesK type AttrGetType WebWindowFeaturesLocationbarVisiblePropertyInfo = Bool - type AttrLabel WebWindowFeaturesLocationbarVisiblePropertyInfo = "WebWindowFeatures::locationbar-visible" + type AttrLabel WebWindowFeaturesLocationbarVisiblePropertyInfo = "locationbar-visible" attrGet _ = getWebWindowFeaturesLocationbarVisible attrSet _ = setWebWindowFeaturesLocationbarVisible attrConstruct _ = constructWebWindowFeaturesLocationbarVisible @@ -224,7 +260,7 @@ type AttrSetTypeConstraint WebWindowFeaturesMenubarVisiblePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebWindowFeaturesMenubarVisiblePropertyInfo = WebWindowFeaturesK type AttrGetType WebWindowFeaturesMenubarVisiblePropertyInfo = Bool - type AttrLabel WebWindowFeaturesMenubarVisiblePropertyInfo = "WebWindowFeatures::menubar-visible" + type AttrLabel WebWindowFeaturesMenubarVisiblePropertyInfo = "menubar-visible" attrGet _ = getWebWindowFeaturesMenubarVisible attrSet _ = setWebWindowFeaturesMenubarVisible attrConstruct _ = constructWebWindowFeaturesMenubarVisible @@ -248,7 +284,7 @@ type AttrSetTypeConstraint WebWindowFeaturesScrollbarVisiblePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebWindowFeaturesScrollbarVisiblePropertyInfo = WebWindowFeaturesK type AttrGetType WebWindowFeaturesScrollbarVisiblePropertyInfo = Bool - type AttrLabel WebWindowFeaturesScrollbarVisiblePropertyInfo = "WebWindowFeatures::scrollbar-visible" + type AttrLabel WebWindowFeaturesScrollbarVisiblePropertyInfo = "scrollbar-visible" attrGet _ = getWebWindowFeaturesScrollbarVisible attrSet _ = setWebWindowFeaturesScrollbarVisible attrConstruct _ = constructWebWindowFeaturesScrollbarVisible @@ -272,7 +308,7 @@ type AttrSetTypeConstraint WebWindowFeaturesStatusbarVisiblePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebWindowFeaturesStatusbarVisiblePropertyInfo = WebWindowFeaturesK type AttrGetType WebWindowFeaturesStatusbarVisiblePropertyInfo = Bool - type AttrLabel WebWindowFeaturesStatusbarVisiblePropertyInfo = "WebWindowFeatures::statusbar-visible" + type AttrLabel WebWindowFeaturesStatusbarVisiblePropertyInfo = "statusbar-visible" attrGet _ = getWebWindowFeaturesStatusbarVisible attrSet _ = setWebWindowFeaturesStatusbarVisible attrConstruct _ = constructWebWindowFeaturesStatusbarVisible @@ -296,7 +332,7 @@ type AttrSetTypeConstraint WebWindowFeaturesToolbarVisiblePropertyInfo = (~) Bool type AttrBaseTypeConstraint WebWindowFeaturesToolbarVisiblePropertyInfo = WebWindowFeaturesK type AttrGetType WebWindowFeaturesToolbarVisiblePropertyInfo = Bool - type AttrLabel WebWindowFeaturesToolbarVisiblePropertyInfo = "WebWindowFeatures::toolbar-visible" + type AttrLabel WebWindowFeaturesToolbarVisiblePropertyInfo = "toolbar-visible" attrGet _ = getWebWindowFeaturesToolbarVisible attrSet _ = setWebWindowFeaturesToolbarVisible attrConstruct _ = constructWebWindowFeaturesToolbarVisible @@ -320,7 +356,7 @@ type AttrSetTypeConstraint WebWindowFeaturesWidthPropertyInfo = (~) Int32 type AttrBaseTypeConstraint WebWindowFeaturesWidthPropertyInfo = WebWindowFeaturesK type AttrGetType WebWindowFeaturesWidthPropertyInfo = Int32 - type AttrLabel WebWindowFeaturesWidthPropertyInfo = "WebWindowFeatures::width" + type AttrLabel WebWindowFeaturesWidthPropertyInfo = "width" attrGet _ = getWebWindowFeaturesWidth attrSet _ = setWebWindowFeaturesWidth attrConstruct _ = constructWebWindowFeaturesWidth @@ -344,7 +380,7 @@ type AttrSetTypeConstraint WebWindowFeaturesXPropertyInfo = (~) Int32 type AttrBaseTypeConstraint WebWindowFeaturesXPropertyInfo = WebWindowFeaturesK type AttrGetType WebWindowFeaturesXPropertyInfo = Int32 - type AttrLabel WebWindowFeaturesXPropertyInfo = "WebWindowFeatures::x" + type AttrLabel WebWindowFeaturesXPropertyInfo = "x" attrGet _ = getWebWindowFeaturesX attrSet _ = setWebWindowFeaturesX attrConstruct _ = constructWebWindowFeaturesX @@ -368,22 +404,21 @@ type AttrSetTypeConstraint WebWindowFeaturesYPropertyInfo = (~) Int32 type AttrBaseTypeConstraint WebWindowFeaturesYPropertyInfo = WebWindowFeaturesK type AttrGetType WebWindowFeaturesYPropertyInfo = Int32 - type AttrLabel WebWindowFeaturesYPropertyInfo = "WebWindowFeatures::y" + type AttrLabel WebWindowFeaturesYPropertyInfo = "y" attrGet _ = getWebWindowFeaturesY attrSet _ = setWebWindowFeaturesY attrConstruct _ = constructWebWindowFeaturesY type instance AttributeList WebWindowFeatures = WebWindowFeaturesAttributeList -type WebWindowFeaturesAttributeList = ('[ '("fullscreen", WebWindowFeaturesFullscreenPropertyInfo), '("height", WebWindowFeaturesHeightPropertyInfo), '("locationbar-visible", WebWindowFeaturesLocationbarVisiblePropertyInfo), '("menubar-visible", WebWindowFeaturesMenubarVisiblePropertyInfo), '("scrollbar-visible", WebWindowFeaturesScrollbarVisiblePropertyInfo), '("statusbar-visible", WebWindowFeaturesStatusbarVisiblePropertyInfo), '("toolbar-visible", WebWindowFeaturesToolbarVisiblePropertyInfo), '("width", WebWindowFeaturesWidthPropertyInfo), '("x", WebWindowFeaturesXPropertyInfo), '("y", WebWindowFeaturesYPropertyInfo)] :: [(Symbol, *)]) +type WebWindowFeaturesAttributeList = ('[ '("fullscreen", WebWindowFeaturesFullscreenPropertyInfo), '("height", WebWindowFeaturesHeightPropertyInfo), '("locationbarVisible", WebWindowFeaturesLocationbarVisiblePropertyInfo), '("menubarVisible", WebWindowFeaturesMenubarVisiblePropertyInfo), '("scrollbarVisible", WebWindowFeaturesScrollbarVisiblePropertyInfo), '("statusbarVisible", WebWindowFeaturesStatusbarVisiblePropertyInfo), '("toolbarVisible", WebWindowFeaturesToolbarVisiblePropertyInfo), '("width", WebWindowFeaturesWidthPropertyInfo), '("x", WebWindowFeaturesXPropertyInfo), '("y", WebWindowFeaturesYPropertyInfo)] :: [(Symbol, *)]) type instance SignalList WebWindowFeatures = WebWindowFeaturesSignalList -type WebWindowFeaturesSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("notify::[property]", GObjectNotifySignalInfo)] :: [(Symbol, *)]) +type WebWindowFeaturesSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)]) -- method WebWindowFeatures::new -- method type : Constructor -- Args : [] -- Lengths : [] --- hInArgs : [] -- returnType : TInterface "WebKit" "WebWindowFeatures" -- throws : False -- Skip return : False @@ -394,7 +429,7 @@ webWindowFeaturesNew :: (MonadIO m) => - m WebWindowFeatures + m WebWindowFeatures -- result webWindowFeaturesNew = liftIO $ do result <- webkit_web_window_features_new checkUnexpectedReturnNULL "webkit_web_window_features_new" result @@ -403,9 +438,8 @@ -- method WebWindowFeatures::equal -- method type : OrdinaryMethod --- Args : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebWindowFeatures", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "features2", argType = TInterface "WebKit" "WebWindowFeatures", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] +-- Args : [Arg {argCName = "_obj", argType = TInterface "WebKit" "WebWindowFeatures", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "features2", argType = TInterface "WebKit" "WebWindowFeatures", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}] -- Lengths : [] --- hInArgs : [Arg {argName = "_obj", argType = TInterface "WebKit" "WebWindowFeatures", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing},Arg {argName = "features2", argType = TInterface "WebKit" "WebWindowFeatures", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, transfer = TransferNothing}] -- returnType : TBasicType TBoolean -- throws : False -- Skip return : False @@ -418,9 +452,9 @@ webWindowFeaturesEqual :: (MonadIO m, WebWindowFeaturesK a, WebWindowFeaturesK b) => - a -> -- _obj - b -> -- features2 - m Bool + a -- _obj + -> b -- features2 + -> m Bool -- result webWindowFeaturesEqual _obj features2 = liftIO $ do let _obj' = unsafeManagedPtrCastPtr _obj let features2' = unsafeManagedPtrCastPtr features2 @@ -429,5 +463,9 @@ touchManagedPtr _obj touchManagedPtr features2 return result' + +data WebWindowFeaturesEqualMethodInfo +instance (signature ~ (b -> m Bool), MonadIO m, WebWindowFeaturesK a, WebWindowFeaturesK b) => MethodInfo WebWindowFeaturesEqualMethodInfo a signature where + overloadedMethod _ = webWindowFeaturesEqual diff --git a/GI/WebKit/Objects/WebWindowFeatures.hs-boot b/GI/WebKit/Objects/WebWindowFeatures.hs-boot --- a/GI/WebKit/Objects/WebWindowFeatures.hs-boot +++ b/GI/WebKit/Objects/WebWindowFeatures.hs-boot @@ -21,3 +21,4 @@ data WebWindowFeaturesWidthPropertyInfo data WebWindowFeaturesXPropertyInfo data WebWindowFeaturesYPropertyInfo +data WebWindowFeaturesEqualMethodInfo diff --git a/GI/WebKit/Structs.hs b/GI/WebKit/Structs.hs --- a/GI/WebKit/Structs.hs +++ b/GI/WebKit/Structs.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 diff --git a/GI/WebKit/Structs/DOMEventTargetClass.hs b/GI/WebKit/Structs/DOMEventTargetClass.hs --- a/GI/WebKit/Structs/DOMEventTargetClass.hs +++ b/GI/WebKit/Structs/DOMEventTargetClass.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -28,5 +29,16 @@ newtype DOMEventTargetClass = DOMEventTargetClass (ForeignPtr DOMEventTargetClass) noDOMEventTargetClass :: Maybe DOMEventTargetClass noDOMEventTargetClass = Nothing + +type family ResolveDOMEventTargetClassMethod (t :: Symbol) (o :: *) :: * where + ResolveDOMEventTargetClassMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveDOMEventTargetClassMethod t DOMEventTargetClass, MethodInfo info DOMEventTargetClass p) => IsLabelProxy t (DOMEventTargetClass -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveDOMEventTargetClassMethod t DOMEventTargetClass, MethodInfo info DOMEventTargetClass p) => IsLabel t (DOMEventTargetClass -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif diff --git a/GI/WebKit/Structs/WebPluginMIMEType.hs b/GI/WebKit/Structs/WebPluginMIMEType.hs --- a/GI/WebKit/Structs/WebPluginMIMEType.hs +++ b/GI/WebKit/Structs/WebPluginMIMEType.hs @@ -1,4 +1,5 @@ + {- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 @@ -15,6 +16,7 @@ -- * Exported types WebPluginMIMEType(..) , + newZeroWebPluginMIMEType , noWebPluginMIMEType , @@ -46,6 +48,10 @@ import GI.WebKit.Callbacks newtype WebPluginMIMEType = WebPluginMIMEType (ForeignPtr WebPluginMIMEType) +-- | Construct a `WebPluginMIMEType` struct initialized to zero. +newZeroWebPluginMIMEType :: MonadIO m => m WebPluginMIMEType +newZeroWebPluginMIMEType = liftIO $ callocBytes 24 >>= wrapPtr WebPluginMIMEType + noWebPluginMIMEType :: Maybe WebPluginMIMEType noWebPluginMIMEType = Nothing @@ -66,5 +72,16 @@ val <- peek (ptr `plusPtr` 16) :: IO CString val' <- cstringToText val return val' + +type family ResolveWebPluginMIMETypeMethod (t :: Symbol) (o :: *) :: * where + ResolveWebPluginMIMETypeMethod l o = MethodResolutionFailed l o + +instance (info ~ ResolveWebPluginMIMETypeMethod t WebPluginMIMEType, MethodInfo info WebPluginMIMEType p) => IsLabelProxy t (WebPluginMIMEType -> p) where + fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info) + +#if MIN_VERSION_base(4,9,0) +instance (info ~ ResolveWebPluginMIMETypeMethod t WebPluginMIMEType, MethodInfo info WebPluginMIMEType p) => IsLabel t (WebPluginMIMEType -> p) where + fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info) +#endif diff --git a/gi-webkit.cabal b/gi-webkit.cabal --- a/gi-webkit.cabal +++ b/gi-webkit.cabal @@ -1,6 +1,6 @@ -- Autogenerated, do not edit. name: gi-webkit -version: 0.2.4.12 +version: 0.2.4.13 synopsis: WebKit bindings description: Bindings for WebKit, autogenerated by haskell-gi. homepage: https://github.com/haskell-gi/haskell-gi @@ -14,8 +14,8 @@ library default-language: Haskell2010 - default-extensions: OverloadedStrings, NegativeLiterals, ConstraintKinds, TypeFamilies, MultiParamTypeClasses, KindSignatures, FlexibleInstances, UndecidableInstances, DataKinds, FlexibleContexts - other-extensions: PatternSynonyms ScopedTypeVariables, ViewPatterns + default-extensions: ScopedTypeVariables, CPP, OverloadedStrings, NegativeLiterals, ConstraintKinds, TypeFamilies, MultiParamTypeClasses, KindSignatures, FlexibleInstances, UndecidableInstances, DataKinds, FlexibleContexts + other-extensions: PatternSynonyms ViewPatterns ghc-options: -fno-warn-unused-imports -fno-warn-warnings-deprecations exposed-modules: GI.WebKit.Types GI.WebKit @@ -219,17 +219,17 @@ GI.WebKit.Structs.WebPluginMIMEType pkgconfig-depends: webkitgtk-3.0 >= 2.4 build-depends: base >= 4.7 && <5, - haskell-gi-base >= 0.12 && < 1, - gi-atk >= 0.2.16.12 && < 0.2.17, - gi-glib >= 0.2.44.12 && < 0.2.45, - gi-gobject >= 0.2.44.12 && < 0.2.45, - gi-gdk >= 0.3.16.12 && < 0.3.17, - gi-gdkpixbuf >= 0.2.31.12 && < 0.2.32, - gi-gio >= 0.2.44.12 && < 0.2.45, - gi-gtk >= 0.3.16.12 && < 0.3.17, - gi-javascriptcore >= 0.2.4.12 && < 0.2.5, - gi-soup >= 0.2.50.12 && < 0.2.51, - gi-cairo >= 0.1.14.12 && < 0.1.15, + haskell-gi-base >= 0.13 && < 1, + gi-atk >= 0.2.18.13 && < 0.2.19, + gi-glib >= 0.2.46.13 && < 0.2.47, + gi-gobject >= 0.2.46.13 && < 0.2.47, + gi-gdk >= 0.3.18.13 && < 0.3.19, + gi-gdkpixbuf >= 0.2.32.13 && < 0.2.33, + gi-gio >= 0.2.46.13 && < 0.2.47, + gi-gtk >= 0.3.18.13 && < 0.3.19, + gi-javascriptcore >= 0.2.4.13 && < 0.2.5, + gi-soup >= 0.2.52.13 && < 0.2.53, + gi-cairo >= 0.1.14.13 && < 0.1.15, bytestring >= 0.10, containers >= 0.5, text >= 1.0,