{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.GdkX11.Objects.X11AppLaunchContext
(
X11AppLaunchContext(..) ,
IsX11AppLaunchContext ,
toX11AppLaunchContext ,
#if defined(ENABLE_OVERLOADING)
ResolveX11AppLaunchContextMethod ,
#endif
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GHC.Records as R
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Objects.AppLaunchContext as Gdk.AppLaunchContext
import qualified GI.Gio.Objects.AppLaunchContext as Gio.AppLaunchContext
newtype X11AppLaunchContext = X11AppLaunchContext (SP.ManagedPtr X11AppLaunchContext)
deriving (X11AppLaunchContext -> X11AppLaunchContext -> Bool
(X11AppLaunchContext -> X11AppLaunchContext -> Bool)
-> (X11AppLaunchContext -> X11AppLaunchContext -> Bool)
-> Eq X11AppLaunchContext
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: X11AppLaunchContext -> X11AppLaunchContext -> Bool
$c/= :: X11AppLaunchContext -> X11AppLaunchContext -> Bool
== :: X11AppLaunchContext -> X11AppLaunchContext -> Bool
$c== :: X11AppLaunchContext -> X11AppLaunchContext -> Bool
Eq)
instance SP.ManagedPtrNewtype X11AppLaunchContext where
toManagedPtr :: X11AppLaunchContext -> ManagedPtr X11AppLaunchContext
toManagedPtr (X11AppLaunchContext ManagedPtr X11AppLaunchContext
p) = ManagedPtr X11AppLaunchContext
p
foreign import ccall "gdk_x11_app_launch_context_get_type"
c_gdk_x11_app_launch_context_get_type :: IO B.Types.GType
instance B.Types.TypedObject X11AppLaunchContext where
glibType :: IO GType
glibType = IO GType
c_gdk_x11_app_launch_context_get_type
instance B.Types.GObject X11AppLaunchContext
class (SP.GObject o, O.IsDescendantOf X11AppLaunchContext o) => IsX11AppLaunchContext o
instance (SP.GObject o, O.IsDescendantOf X11AppLaunchContext o) => IsX11AppLaunchContext o
instance O.HasParentTypes X11AppLaunchContext
type instance O.ParentTypes X11AppLaunchContext = '[Gdk.AppLaunchContext.AppLaunchContext, Gio.AppLaunchContext.AppLaunchContext, GObject.Object.Object]
toX11AppLaunchContext :: (MIO.MonadIO m, IsX11AppLaunchContext o) => o -> m X11AppLaunchContext
toX11AppLaunchContext :: forall (m :: * -> *) o.
(MonadIO m, IsX11AppLaunchContext o) =>
o -> m X11AppLaunchContext
toX11AppLaunchContext = IO X11AppLaunchContext -> m X11AppLaunchContext
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO X11AppLaunchContext -> m X11AppLaunchContext)
-> (o -> IO X11AppLaunchContext) -> o -> m X11AppLaunchContext
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr X11AppLaunchContext -> X11AppLaunchContext)
-> o -> IO X11AppLaunchContext
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr X11AppLaunchContext -> X11AppLaunchContext
X11AppLaunchContext
instance B.GValue.IsGValue (Maybe X11AppLaunchContext) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_gdk_x11_app_launch_context_get_type
gvalueSet_ :: Ptr GValue -> Maybe X11AppLaunchContext -> IO ()
gvalueSet_ Ptr GValue
gv Maybe X11AppLaunchContext
P.Nothing = Ptr GValue -> Ptr X11AppLaunchContext -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr X11AppLaunchContext
forall a. Ptr a
FP.nullPtr :: FP.Ptr X11AppLaunchContext)
gvalueSet_ Ptr GValue
gv (P.Just X11AppLaunchContext
obj) = X11AppLaunchContext -> (Ptr X11AppLaunchContext -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr X11AppLaunchContext
obj (Ptr GValue -> Ptr X11AppLaunchContext -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe X11AppLaunchContext)
gvalueGet_ Ptr GValue
gv = do
Ptr X11AppLaunchContext
ptr <- Ptr GValue -> IO (Ptr X11AppLaunchContext)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr X11AppLaunchContext)
if Ptr X11AppLaunchContext
ptr Ptr X11AppLaunchContext -> Ptr X11AppLaunchContext -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr X11AppLaunchContext
forall a. Ptr a
FP.nullPtr
then X11AppLaunchContext -> Maybe X11AppLaunchContext
forall a. a -> Maybe a
P.Just (X11AppLaunchContext -> Maybe X11AppLaunchContext)
-> IO X11AppLaunchContext -> IO (Maybe X11AppLaunchContext)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr X11AppLaunchContext -> X11AppLaunchContext)
-> Ptr X11AppLaunchContext -> IO X11AppLaunchContext
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr X11AppLaunchContext -> X11AppLaunchContext
X11AppLaunchContext Ptr X11AppLaunchContext
ptr
else Maybe X11AppLaunchContext -> IO (Maybe X11AppLaunchContext)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe X11AppLaunchContext
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveX11AppLaunchContextMethod (t :: Symbol) (o :: *) :: * where
ResolveX11AppLaunchContextMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveX11AppLaunchContextMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveX11AppLaunchContextMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveX11AppLaunchContextMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveX11AppLaunchContextMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveX11AppLaunchContextMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveX11AppLaunchContextMethod "launchFailed" o = Gio.AppLaunchContext.AppLaunchContextLaunchFailedMethodInfo
ResolveX11AppLaunchContextMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveX11AppLaunchContextMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveX11AppLaunchContextMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveX11AppLaunchContextMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveX11AppLaunchContextMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveX11AppLaunchContextMethod "setenv" o = Gio.AppLaunchContext.AppLaunchContextSetenvMethodInfo
ResolveX11AppLaunchContextMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveX11AppLaunchContextMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveX11AppLaunchContextMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveX11AppLaunchContextMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveX11AppLaunchContextMethod "unsetenv" o = Gio.AppLaunchContext.AppLaunchContextUnsetenvMethodInfo
ResolveX11AppLaunchContextMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveX11AppLaunchContextMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveX11AppLaunchContextMethod "getDisplay" o = Gdk.AppLaunchContext.AppLaunchContextGetDisplayMethodInfo
ResolveX11AppLaunchContextMethod "getEnvironment" o = Gio.AppLaunchContext.AppLaunchContextGetEnvironmentMethodInfo
ResolveX11AppLaunchContextMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveX11AppLaunchContextMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveX11AppLaunchContextMethod "getStartupNotifyId" o = Gio.AppLaunchContext.AppLaunchContextGetStartupNotifyIdMethodInfo
ResolveX11AppLaunchContextMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveX11AppLaunchContextMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveX11AppLaunchContextMethod "setDesktop" o = Gdk.AppLaunchContext.AppLaunchContextSetDesktopMethodInfo
ResolveX11AppLaunchContextMethod "setIcon" o = Gdk.AppLaunchContext.AppLaunchContextSetIconMethodInfo
ResolveX11AppLaunchContextMethod "setIconName" o = Gdk.AppLaunchContext.AppLaunchContextSetIconNameMethodInfo
ResolveX11AppLaunchContextMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveX11AppLaunchContextMethod "setTimestamp" o = Gdk.AppLaunchContext.AppLaunchContextSetTimestampMethodInfo
ResolveX11AppLaunchContextMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveX11AppLaunchContextMethod t X11AppLaunchContext, O.OverloadedMethod info X11AppLaunchContext p) => OL.IsLabel t (X11AppLaunchContext -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#if MIN_VERSION_base(4,13,0)
instance (info ~ ResolveX11AppLaunchContextMethod t X11AppLaunchContext, O.OverloadedMethod info X11AppLaunchContext p, R.HasField t X11AppLaunchContext p) => R.HasField t X11AppLaunchContext p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveX11AppLaunchContextMethod t X11AppLaunchContext, O.OverloadedMethodInfo info X11AppLaunchContext) => OL.IsLabel t (O.MethodProxy info X11AppLaunchContext) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList X11AppLaunchContext
type instance O.AttributeList X11AppLaunchContext = X11AppLaunchContextAttributeList
type X11AppLaunchContextAttributeList = ('[ '("display", Gdk.AppLaunchContext.AppLaunchContextDisplayPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList X11AppLaunchContext = X11AppLaunchContextSignalList
type X11AppLaunchContextSignalList = ('[ '("launchFailed", Gio.AppLaunchContext.AppLaunchContextLaunchFailedSignalInfo), '("launched", Gio.AppLaunchContext.AppLaunchContextLaunchedSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
#endif