gio 0.13.10.0 → 0.13.11.0
raw patch · 13 files changed
+31/−1206 lines, 13 filesdep ~bytestringdep ~containersPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: bytestring, containers
API changes (from Hackage documentation)
Files
- System/GIO/Async/Cancellable.chs +1/−1
- System/GIO/File/AppInfo.chs +2/−2
- System/GIO/File/ContentType.chs +1/−1
- System/GIO/File/File.chs +2/−2
- System/GIO/File/FileAttribute.hsc +2/−2
- System/GIO/File/FileInfo.chs +1/−1
- System/GIO/Signals.chs +0/−150
- System/GIO/Types.chs +0/−1028
- System/GIO/Volumes/Drive.chs +8/−8
- System/GIO/Volumes/Mount.chs +1/−1
- System/GIO/Volumes/Volume.chs +2/−2
- gio.cabal +9/−6
- hierarchy.list +2/−2
System/GIO/Async/Cancellable.chs view
@@ -99,7 +99,7 @@ {# call cancellable_pop_current #} (fromMaybe (Cancellable nullForeignPtr) cancellable) --- | Pushes cancellable onto the cancellable stack. The current cancllable can then be recieved using+-- | Pushes cancellable onto the cancellable stack. The current cancllable can then be received using -- 'cancellableGetCurrent' . -- -- This is useful when implementing cancellable operations in code that does not allow you to pass down
System/GIO/File/AppInfo.chs view
@@ -216,7 +216,7 @@ -- @launchContext@ to get information about the details of the launcher (like what screen it is on). -- Throws a 'GError' if an error occurs ----- To lauch the application without arguments pass a emtpy files list.+-- To launch the application without arguments pass a empty files list. -- -- Note that even if the launch is successful the application launched can fail to start if it runs -- into problems during startup. There is no way to detect this.@@ -257,7 +257,7 @@ -- @launchContext@ to get information about the details of the launcher (like what screen it is on). -- Throws a 'GError' if an error occurs. ----- To lauch the application without arguments pass a empty uris list.+-- To launch the application without arguments pass a empty uris list. -- -- Note that even if the launch is successful the application launched can fail to start if it runs -- into problems during startup. There is no way to detect this.
System/GIO/File/ContentType.chs view
@@ -31,7 +31,7 @@ -- * Details -- -- | A content type is a platform specific string that defines the type of a file. On unix it is a mime--- type, on win32 it is an extension string like ".doc", ".txt" or a percieved string like+-- type, on win32 it is an extension string like ".doc", ".txt" or a perceived string like -- "audio". Such strings can be looked up in the registry at HkeyClassesRoot. -- * Methods
System/GIO/File/File.chs view
@@ -408,7 +408,7 @@ withUTFString displayName $ \cDisplayName -> propagateGError ({# call file_get_child_for_display_name #} (toFile file) cDisplayName) --- | Checks whether file has the prefix specified by prefix. In other word, if the names of inital+-- | Checks whether file has the prefix specified by prefix. In other word, if the names of initial -- elements of files pathname match prefix. Only full pathname elements are matched, so a path like -- /foo is not considered a prefix of /foobar, only of / foo/bar. --@@ -1882,7 +1882,7 @@ -- | Finishes a stop operation. See 'fileStopMountable' for details. ----- Finish an asynchronous stop operation that was stoped with 'fileStopMountable'.+-- Finish an asynchronous stop operation that was stopped with 'fileStopMountable'. -- -- Throws a 'GError' if an error occurs. fileStopMountableFinish :: FileClass file
System/GIO/File/FileAttribute.hsc view
@@ -39,14 +39,14 @@ -- -- Keys are strings that contain a key namespace and a key name, separated by a colon, -- e.g. "namespace:keyname". Namespaces are included to sort key-value pairs by namespaces for--- relevance. Keys can be retrived using wildcards, e.g. \"standard::*\" will return all of the keys in+-- relevance. Keys can be retrieved using wildcards, e.g. \"standard::*\" will return all of the keys in -- the "standard" namespace. -- -- Values are stored within the list in 'FileAttributeValue' structures. Values can store different -- types, listed in the enum 'FileAttributeType'. Upon creation of a 'FileAttributeValue', the type will -- be set to 'FileAttributeTypeInvalid'. ----- The list of possible attributes for a filesystem (pointed to by a 'File') is availible as a+-- The list of possible attributes for a filesystem (pointed to by a 'File') is available as a -- 'FileAttributeInfoList'. This list is queryable by key names as indicated earlier. -- -- Classes that implement 'FileIface' will create a 'FileAttributeInfoList' and install default keys and
System/GIO/File/FileInfo.chs view
@@ -213,7 +213,7 @@ withUTFString attribute $ \ attributePtr -> {#call g_file_info_remove_attribute#} (toFileInfo info) attributePtr --- | Gets the value of a attribute, formated as a string. This escapes things as needed to make the+-- | Gets the value of a attribute, formatted as a string. This escapes things as needed to make the -- string valid utf8. fileInfoGetAttributeAsString :: (FileInfoClass info, GlibString string) => info -> string -- ^ @attribute@ a file attribute key.
− System/GIO/Signals.chs
@@ -1,150 +0,0 @@-{-# OPTIONS_HADDOCK hide #-}-{-# OPTIONS_GHC -fno-warn-unused-imports #-}--- -*-haskell-*---- -------------------- automatically generated file - do not edit --------------- Callback installers for the GIMP Toolkit (GTK) Binding for Haskell------ Author : Axel Simon------ Created: 1 July 2000------ Copyright (C) 2000-2005 Axel Simon------ This library is free software; you can redistribute it and/or--- modify it under the terms of the GNU Lesser General Public--- License as published by the Free Software Foundation; either--- version 2.1 of the License, or (at your option) any later version.------ This library is distributed in the hope that it will be useful,--- but WITHOUT ANY WARRANTY; without even the implied warranty of--- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU--- Lesser General Public License for more details.------ #hide---- These functions are used to connect signals to widgets. They are auto---- matically created through HookGenerator.hs which takes a list of possible--- function signatures that are included in the GTK sources (gtkmarshal.list).------ The object system in the second version of GTK is based on GObject from--- GLIB. This base class is rather primitive in that it only implements--- ref and unref methods (and others that are not interesting to us). If--- the marshall list mentions OBJECT it refers to an instance of this--- GObject which is automatically wrapped with a ref and unref call.--- Structures which are not derived from GObject have to be passed as--- BOXED which gives the signal connect function a possibility to do the--- conversion into a proper ForeignPtr type. In special cases the signal--- connect function use a PTR type which will then be mangled in the--- user function directly. The latter is needed if a signal delivers a--- pointer to a string and its length in a separate integer.----module System.GIO.Signals (- module System.Glib.Signals,-- connect_NONE__NONE,- connect_GLIBSTRING_GLIBSTRING_GLIBSTRING_ENUM__NONE,- connect_OBJECT_OBJECT_ENUM__NONE,- connect_ENUM__NONE,- connect_OBJECT__NONE,- connect_MOBJECT_MOBJECT_ENUM__NONE,- - ) where--import Control.Monad (liftM)--import System.Glib.FFI-import System.Glib.UTFString (peekUTFString,maybePeekUTFString,newUTFString)-import qualified System.Glib.UTFString as Glib-import System.Glib.GError (failOnGError)-{#import System.Glib.Signals#}-{#import System.Glib.GObject#}---{#context lib="gtk" prefix="gtk" #}----- Here are the generators that turn a Haskell function into--- a C function pointer. The fist Argument is always the widget,--- the last one is the user g_pointer. Both are ignored.---connect_NONE__NONE :: - GObjectClass obj => SignalName ->- ConnectAfter -> obj ->- (IO ()) ->- IO (ConnectId obj)-connect_NONE__NONE signal after obj user =- connectGeneric signal after obj action- where action :: Ptr GObject -> IO ()- action _ =- failOnGError $- user--connect_GLIBSTRING_GLIBSTRING_GLIBSTRING_ENUM__NONE :: - (Glib.GlibString a', Glib.GlibString b', Glib.GlibString c', Enum d, GObjectClass obj) => SignalName ->- ConnectAfter -> obj ->- (a' -> b' -> c' -> d -> IO ()) ->- IO (ConnectId obj)-connect_GLIBSTRING_GLIBSTRING_GLIBSTRING_ENUM__NONE signal after obj user =- connectGeneric signal after obj action- where action :: Ptr GObject -> CString -> CString -> CString -> Int -> IO ()- action _ str1 str2 str3 enum4 =- failOnGError $- peekUTFString str3 >>= \str3' ->- peekUTFString str2 >>= \str2' ->- peekUTFString str1 >>= \str1' ->- user str1' str2' str3' (toEnum enum4)--connect_OBJECT_OBJECT_ENUM__NONE :: - (GObjectClass a', GObjectClass b', Enum c, GObjectClass obj) => SignalName ->- ConnectAfter -> obj ->- (a' -> b' -> c -> IO ()) ->- IO (ConnectId obj)-connect_OBJECT_OBJECT_ENUM__NONE signal after obj user =- connectGeneric signal after obj action- where action :: Ptr GObject -> Ptr GObject -> Ptr GObject -> Int -> IO ()- action _ obj1 obj2 enum3 =- failOnGError $- makeNewGObject (GObject, objectUnref) (return obj2) >>= \obj2' ->- makeNewGObject (GObject, objectUnref) (return obj1) >>= \obj1' ->- user (unsafeCastGObject obj1') (unsafeCastGObject obj2') (toEnum enum3)--connect_ENUM__NONE :: - (Enum a, GObjectClass obj) => SignalName ->- ConnectAfter -> obj ->- (a -> IO ()) ->- IO (ConnectId obj)-connect_ENUM__NONE signal after obj user =- connectGeneric signal after obj action- where action :: Ptr GObject -> Int -> IO ()- action _ enum1 =- failOnGError $- user (toEnum enum1)--connect_OBJECT__NONE :: - (GObjectClass a', GObjectClass obj) => SignalName ->- ConnectAfter -> obj ->- (a' -> IO ()) ->- IO (ConnectId obj)-connect_OBJECT__NONE signal after obj user =- connectGeneric signal after obj action- where action :: Ptr GObject -> Ptr GObject -> IO ()- action _ obj1 =- failOnGError $- makeNewGObject (GObject, objectUnref) (return obj1) >>= \obj1' ->- user (unsafeCastGObject obj1')--connect_MOBJECT_MOBJECT_ENUM__NONE :: - (GObjectClass a', GObjectClass b', Enum c, GObjectClass obj) => SignalName ->- ConnectAfter -> obj ->- (Maybe a' -> Maybe b' -> c -> IO ()) ->- IO (ConnectId obj)-connect_MOBJECT_MOBJECT_ENUM__NONE signal after obj user =- connectGeneric signal after obj action- where action :: Ptr GObject -> Ptr GObject -> Ptr GObject -> Int -> IO ()- action _ obj1 obj2 enum3 =- failOnGError $- maybeNull (makeNewGObject (GObject, objectUnref)) (return obj2) >>= \obj2' ->- maybeNull (makeNewGObject (GObject, objectUnref)) (return obj1) >>= \obj1' ->- user (liftM unsafeCastGObject obj1') (liftM unsafeCastGObject obj2') (toEnum enum3)-
− System/GIO/Types.chs
@@ -1,1028 +0,0 @@-{-# LANGUAGE CPP #-}-{-# OPTIONS_HADDOCK hide #-}-{-# OPTIONS_GHC -fno-warn-unused-imports #-}--- -*-haskell-*---- -------------------- automatically generated file - do not edit ------------- Object hierarchy for the GIMP Toolkit (GTK) Binding for Haskell------ Author : Axel Simon------ Copyright (C) 2001-2005 Axel Simon------ This library is free software; you can redistribute it and/or--- modify it under the terms of the GNU Lesser General Public--- License as published by the Free Software Foundation; either--- version 2.1 of the License, or (at your option) any later version.------ This library is distributed in the hope that it will be useful,--- but WITHOUT ANY WARRANTY; without even the implied warranty of--- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU--- Lesser General Public License for more details.------ #hide---- |--- Maintainer : gtk2hs-users@lists.sourceforge.net--- Stability : provisional--- Portability : portable (depends on GHC)------ This file reflects the Gtk+ object hierarchy in terms of Haskell classes.------ Note: the mk... functions were originally meant to simply be an alias--- for the constructor. However, in order to communicate the destructor--- of an object to objectNew, the mk... functions are now a tuple containing--- Haskell constructor and the destructor function pointer. This hack avoids--- changing all modules that simply pass mk... to objectNew.----module System.GIO.Types (-- OutputStream(OutputStream), OutputStreamClass,- toOutputStream, - mkOutputStream, unOutputStream,- castToOutputStream, gTypeOutputStream,- FilterOutputStream(FilterOutputStream), FilterOutputStreamClass,- toFilterOutputStream, - mkFilterOutputStream, unFilterOutputStream,- castToFilterOutputStream, gTypeFilterOutputStream,- DataOutputStream(DataOutputStream), DataOutputStreamClass,- toDataOutputStream, - mkDataOutputStream, unDataOutputStream,- castToDataOutputStream, gTypeDataOutputStream,- BufferedOutputStream(BufferedOutputStream), BufferedOutputStreamClass,- toBufferedOutputStream, - mkBufferedOutputStream, unBufferedOutputStream,- castToBufferedOutputStream, gTypeBufferedOutputStream,- FileOutputStream(FileOutputStream), FileOutputStreamClass,- toFileOutputStream, - mkFileOutputStream, unFileOutputStream,- castToFileOutputStream, gTypeFileOutputStream,- MemoryOutputStream(MemoryOutputStream), MemoryOutputStreamClass,- toMemoryOutputStream, - mkMemoryOutputStream, unMemoryOutputStream,- castToMemoryOutputStream, gTypeMemoryOutputStream,- InputStream(InputStream), InputStreamClass,- toInputStream, - mkInputStream, unInputStream,- castToInputStream, gTypeInputStream,- MemoryInputStream(MemoryInputStream), MemoryInputStreamClass,- toMemoryInputStream, - mkMemoryInputStream, unMemoryInputStream,- castToMemoryInputStream, gTypeMemoryInputStream,- FilterInputStream(FilterInputStream), FilterInputStreamClass,- toFilterInputStream, - mkFilterInputStream, unFilterInputStream,- castToFilterInputStream, gTypeFilterInputStream,- BufferedInputStream(BufferedInputStream), BufferedInputStreamClass,- toBufferedInputStream, - mkBufferedInputStream, unBufferedInputStream,- castToBufferedInputStream, gTypeBufferedInputStream,- DataInputStream(DataInputStream), DataInputStreamClass,- toDataInputStream, - mkDataInputStream, unDataInputStream,- castToDataInputStream, gTypeDataInputStream,- FileInputStream(FileInputStream), FileInputStreamClass,- toFileInputStream, - mkFileInputStream, unFileInputStream,- castToFileInputStream, gTypeFileInputStream,- FileMonitor(FileMonitor), FileMonitorClass,- toFileMonitor, - mkFileMonitor, unFileMonitor,- castToFileMonitor, gTypeFileMonitor,- Vfs(Vfs), VfsClass,- toVfs, - mkVfs, unVfs,- castToVfs, gTypeVfs,- MountOperation(MountOperation), MountOperationClass,- toMountOperation, - mkMountOperation, unMountOperation,- castToMountOperation, gTypeMountOperation,- ThemedIcon(ThemedIcon), ThemedIconClass,- toThemedIcon, - mkThemedIcon, unThemedIcon,- castToThemedIcon, gTypeThemedIcon,- Emblem(Emblem), EmblemClass,- toEmblem, - mkEmblem, unEmblem,- castToEmblem, gTypeEmblem,- EmblemedIcon(EmblemedIcon), EmblemedIconClass,- toEmblemedIcon, - mkEmblemedIcon, unEmblemedIcon,- castToEmblemedIcon, gTypeEmblemedIcon,- FileEnumerator(FileEnumerator), FileEnumeratorClass,- toFileEnumerator, - mkFileEnumerator, unFileEnumerator,- castToFileEnumerator, gTypeFileEnumerator,- FilenameCompleter(FilenameCompleter), FilenameCompleterClass,- toFilenameCompleter, - mkFilenameCompleter, unFilenameCompleter,- castToFilenameCompleter, gTypeFilenameCompleter,- FileIcon(FileIcon), FileIconClass,- toFileIcon, - mkFileIcon, unFileIcon,- castToFileIcon, gTypeFileIcon,- VolumeMonitor(VolumeMonitor), VolumeMonitorClass,- toVolumeMonitor, - mkVolumeMonitor, unVolumeMonitor,- castToVolumeMonitor, gTypeVolumeMonitor,- Cancellable(Cancellable), CancellableClass,- toCancellable, - mkCancellable, unCancellable,- castToCancellable, gTypeCancellable,- SimpleAsyncResult(SimpleAsyncResult), SimpleAsyncResultClass,- toSimpleAsyncResult, - mkSimpleAsyncResult, unSimpleAsyncResult,- castToSimpleAsyncResult, gTypeSimpleAsyncResult,- FileInfo(FileInfo), FileInfoClass,- toFileInfo, - mkFileInfo, unFileInfo,- castToFileInfo, gTypeFileInfo,- AppLaunchContext(AppLaunchContext), AppLaunchContextClass,- toAppLaunchContext, - mkAppLaunchContext, unAppLaunchContext,- castToAppLaunchContext, gTypeAppLaunchContext,- Icon(Icon), IconClass,- toIcon, - mkIcon, unIcon,- castToIcon, gTypeIcon,- Seekable(Seekable), SeekableClass,- toSeekable, - mkSeekable, unSeekable,- castToSeekable, gTypeSeekable,- AppInfo(AppInfo), AppInfoClass,- toAppInfo, - mkAppInfo, unAppInfo,- castToAppInfo, gTypeAppInfo,- Volume(Volume), VolumeClass,- toVolume, - mkVolume, unVolume,- castToVolume, gTypeVolume,- AsyncResult(AsyncResult), AsyncResultClass,- toAsyncResult, - mkAsyncResult, unAsyncResult,- castToAsyncResult, gTypeAsyncResult,- LoadableIcon(LoadableIcon), LoadableIconClass,- toLoadableIcon, - mkLoadableIcon, unLoadableIcon,- castToLoadableIcon, gTypeLoadableIcon,- Drive(Drive), DriveClass,- toDrive, - mkDrive, unDrive,- castToDrive, gTypeDrive,- File(File), FileClass,- toFile, - mkFile, unFile,- castToFile, gTypeFile,- Mount(Mount), MountClass,- toMount, - mkMount, unMount,- castToMount, gTypeMount- ) where--import Foreign.ForeignPtr (ForeignPtr, castForeignPtr)--- TODO work around cpphs https://ghc.haskell.org/trac/ghc/ticket/13553-#if __GLASGOW_HASKELL__ >= 707 || __GLASGOW_HASKELL__ == 0-import Foreign.ForeignPtr.Unsafe (unsafeForeignPtrToPtr)-#else-import Foreign.ForeignPtr (unsafeForeignPtrToPtr)-#endif--import Foreign.C.Types (CULong(..), CUInt(..), CULLong(..))-import System.Glib.GType (GType, typeInstanceIsA)-import System.Glib.GObject--{# context lib="gio" prefix="g" #}---- The usage of foreignPtrToPtr should be safe as the evaluation will only be--- forced if the object is used afterwards----castTo :: (GObjectClass obj, GObjectClass obj') => GType -> String- -> (obj -> obj')-castTo gtype objTypeName obj =- case toGObject obj of- gobj@(GObject objFPtr)- | typeInstanceIsA ((unsafeForeignPtrToPtr.castForeignPtr) objFPtr) gtype- -> unsafeCastGObject gobj- | otherwise -> error $ "Cannot cast object to " ++ objTypeName----- *************************************************************** OutputStream--{#pointer *GOutputStream as OutputStream foreign newtype #} deriving (Eq,Ord)--mkOutputStream = (OutputStream, objectUnref)-unOutputStream (OutputStream o) = o--class GObjectClass o => OutputStreamClass o-toOutputStream :: OutputStreamClass o => o -> OutputStream-toOutputStream = unsafeCastGObject . toGObject--instance OutputStreamClass OutputStream-instance GObjectClass OutputStream where- toGObject = GObject . castForeignPtr . unOutputStream- unsafeCastGObject = OutputStream . castForeignPtr . unGObject--castToOutputStream :: GObjectClass obj => obj -> OutputStream-castToOutputStream = castTo gTypeOutputStream "OutputStream"--gTypeOutputStream :: GType-gTypeOutputStream =- {# call fun unsafe g_output_stream_get_type #}---- ********************************************************* FilterOutputStream--{#pointer *GFilterOutputStream as FilterOutputStream foreign newtype #} deriving (Eq,Ord)--mkFilterOutputStream = (FilterOutputStream, objectUnref)-unFilterOutputStream (FilterOutputStream o) = o--class OutputStreamClass o => FilterOutputStreamClass o-toFilterOutputStream :: FilterOutputStreamClass o => o -> FilterOutputStream-toFilterOutputStream = unsafeCastGObject . toGObject--instance FilterOutputStreamClass FilterOutputStream-instance OutputStreamClass FilterOutputStream-instance GObjectClass FilterOutputStream where- toGObject = GObject . castForeignPtr . unFilterOutputStream- unsafeCastGObject = FilterOutputStream . castForeignPtr . unGObject--castToFilterOutputStream :: GObjectClass obj => obj -> FilterOutputStream-castToFilterOutputStream = castTo gTypeFilterOutputStream "FilterOutputStream"--gTypeFilterOutputStream :: GType-gTypeFilterOutputStream =- {# call fun unsafe g_filter_output_stream_get_type #}---- *********************************************************** DataOutputStream--{#pointer *GDataOutputStream as DataOutputStream foreign newtype #} deriving (Eq,Ord)--mkDataOutputStream = (DataOutputStream, objectUnref)-unDataOutputStream (DataOutputStream o) = o--class FilterOutputStreamClass o => DataOutputStreamClass o-toDataOutputStream :: DataOutputStreamClass o => o -> DataOutputStream-toDataOutputStream = unsafeCastGObject . toGObject--instance DataOutputStreamClass DataOutputStream-instance FilterOutputStreamClass DataOutputStream-instance OutputStreamClass DataOutputStream-instance GObjectClass DataOutputStream where- toGObject = GObject . castForeignPtr . unDataOutputStream- unsafeCastGObject = DataOutputStream . castForeignPtr . unGObject--castToDataOutputStream :: GObjectClass obj => obj -> DataOutputStream-castToDataOutputStream = castTo gTypeDataOutputStream "DataOutputStream"--gTypeDataOutputStream :: GType-gTypeDataOutputStream =- {# call fun unsafe g_data_output_stream_get_type #}---- ******************************************************* BufferedOutputStream--{#pointer *GBufferedOutputStream as BufferedOutputStream foreign newtype #} deriving (Eq,Ord)--mkBufferedOutputStream = (BufferedOutputStream, objectUnref)-unBufferedOutputStream (BufferedOutputStream o) = o--class FilterOutputStreamClass o => BufferedOutputStreamClass o-toBufferedOutputStream :: BufferedOutputStreamClass o => o -> BufferedOutputStream-toBufferedOutputStream = unsafeCastGObject . toGObject--instance BufferedOutputStreamClass BufferedOutputStream-instance FilterOutputStreamClass BufferedOutputStream-instance OutputStreamClass BufferedOutputStream-instance GObjectClass BufferedOutputStream where- toGObject = GObject . castForeignPtr . unBufferedOutputStream- unsafeCastGObject = BufferedOutputStream . castForeignPtr . unGObject--castToBufferedOutputStream :: GObjectClass obj => obj -> BufferedOutputStream-castToBufferedOutputStream = castTo gTypeBufferedOutputStream "BufferedOutputStream"--gTypeBufferedOutputStream :: GType-gTypeBufferedOutputStream =- {# call fun unsafe g_buffered_output_stream_get_type #}---- *********************************************************** FileOutputStream--{#pointer *GFileOutputStream as FileOutputStream foreign newtype #} deriving (Eq,Ord)--mkFileOutputStream = (FileOutputStream, objectUnref)-unFileOutputStream (FileOutputStream o) = o--class OutputStreamClass o => FileOutputStreamClass o-toFileOutputStream :: FileOutputStreamClass o => o -> FileOutputStream-toFileOutputStream = unsafeCastGObject . toGObject--instance FileOutputStreamClass FileOutputStream-instance OutputStreamClass FileOutputStream-instance GObjectClass FileOutputStream where- toGObject = GObject . castForeignPtr . unFileOutputStream- unsafeCastGObject = FileOutputStream . castForeignPtr . unGObject--castToFileOutputStream :: GObjectClass obj => obj -> FileOutputStream-castToFileOutputStream = castTo gTypeFileOutputStream "FileOutputStream"--gTypeFileOutputStream :: GType-gTypeFileOutputStream =- {# call fun unsafe g_file_output_stream_get_type #}---- ********************************************************* MemoryOutputStream--{#pointer *GMemoryOutputStream as MemoryOutputStream foreign newtype #} deriving (Eq,Ord)--mkMemoryOutputStream = (MemoryOutputStream, objectUnref)-unMemoryOutputStream (MemoryOutputStream o) = o--class OutputStreamClass o => MemoryOutputStreamClass o-toMemoryOutputStream :: MemoryOutputStreamClass o => o -> MemoryOutputStream-toMemoryOutputStream = unsafeCastGObject . toGObject--instance MemoryOutputStreamClass MemoryOutputStream-instance OutputStreamClass MemoryOutputStream-instance GObjectClass MemoryOutputStream where- toGObject = GObject . castForeignPtr . unMemoryOutputStream- unsafeCastGObject = MemoryOutputStream . castForeignPtr . unGObject--castToMemoryOutputStream :: GObjectClass obj => obj -> MemoryOutputStream-castToMemoryOutputStream = castTo gTypeMemoryOutputStream "MemoryOutputStream"--gTypeMemoryOutputStream :: GType-gTypeMemoryOutputStream =- {# call fun unsafe g_memory_output_stream_get_type #}---- **************************************************************** InputStream--{#pointer *GInputStream as InputStream foreign newtype #} deriving (Eq,Ord)--mkInputStream = (InputStream, objectUnref)-unInputStream (InputStream o) = o--class GObjectClass o => InputStreamClass o-toInputStream :: InputStreamClass o => o -> InputStream-toInputStream = unsafeCastGObject . toGObject--instance InputStreamClass InputStream-instance GObjectClass InputStream where- toGObject = GObject . castForeignPtr . unInputStream- unsafeCastGObject = InputStream . castForeignPtr . unGObject--castToInputStream :: GObjectClass obj => obj -> InputStream-castToInputStream = castTo gTypeInputStream "InputStream"--gTypeInputStream :: GType-gTypeInputStream =- {# call fun unsafe g_input_stream_get_type #}---- ********************************************************** MemoryInputStream--{#pointer *GMemoryInputStream as MemoryInputStream foreign newtype #} deriving (Eq,Ord)--mkMemoryInputStream = (MemoryInputStream, objectUnref)-unMemoryInputStream (MemoryInputStream o) = o--class InputStreamClass o => MemoryInputStreamClass o-toMemoryInputStream :: MemoryInputStreamClass o => o -> MemoryInputStream-toMemoryInputStream = unsafeCastGObject . toGObject--instance MemoryInputStreamClass MemoryInputStream-instance InputStreamClass MemoryInputStream-instance GObjectClass MemoryInputStream where- toGObject = GObject . castForeignPtr . unMemoryInputStream- unsafeCastGObject = MemoryInputStream . castForeignPtr . unGObject--castToMemoryInputStream :: GObjectClass obj => obj -> MemoryInputStream-castToMemoryInputStream = castTo gTypeMemoryInputStream "MemoryInputStream"--gTypeMemoryInputStream :: GType-gTypeMemoryInputStream =- {# call fun unsafe g_memory_input_stream_get_type #}---- ********************************************************** FilterInputStream--{#pointer *GFilterInputStream as FilterInputStream foreign newtype #} deriving (Eq,Ord)--mkFilterInputStream = (FilterInputStream, objectUnref)-unFilterInputStream (FilterInputStream o) = o--class InputStreamClass o => FilterInputStreamClass o-toFilterInputStream :: FilterInputStreamClass o => o -> FilterInputStream-toFilterInputStream = unsafeCastGObject . toGObject--instance FilterInputStreamClass FilterInputStream-instance InputStreamClass FilterInputStream-instance GObjectClass FilterInputStream where- toGObject = GObject . castForeignPtr . unFilterInputStream- unsafeCastGObject = FilterInputStream . castForeignPtr . unGObject--castToFilterInputStream :: GObjectClass obj => obj -> FilterInputStream-castToFilterInputStream = castTo gTypeFilterInputStream "FilterInputStream"--gTypeFilterInputStream :: GType-gTypeFilterInputStream =- {# call fun unsafe g_filter_input_stream_get_type #}---- ******************************************************** BufferedInputStream--{#pointer *GBufferedInputStream as BufferedInputStream foreign newtype #} deriving (Eq,Ord)--mkBufferedInputStream = (BufferedInputStream, objectUnref)-unBufferedInputStream (BufferedInputStream o) = o--class FilterInputStreamClass o => BufferedInputStreamClass o-toBufferedInputStream :: BufferedInputStreamClass o => o -> BufferedInputStream-toBufferedInputStream = unsafeCastGObject . toGObject--instance BufferedInputStreamClass BufferedInputStream-instance FilterInputStreamClass BufferedInputStream-instance InputStreamClass BufferedInputStream-instance GObjectClass BufferedInputStream where- toGObject = GObject . castForeignPtr . unBufferedInputStream- unsafeCastGObject = BufferedInputStream . castForeignPtr . unGObject--castToBufferedInputStream :: GObjectClass obj => obj -> BufferedInputStream-castToBufferedInputStream = castTo gTypeBufferedInputStream "BufferedInputStream"--gTypeBufferedInputStream :: GType-gTypeBufferedInputStream =- {# call fun unsafe g_buffered_input_stream_get_type #}---- ************************************************************ DataInputStream--{#pointer *GDataInputStream as DataInputStream foreign newtype #} deriving (Eq,Ord)--mkDataInputStream = (DataInputStream, objectUnref)-unDataInputStream (DataInputStream o) = o--class BufferedInputStreamClass o => DataInputStreamClass o-toDataInputStream :: DataInputStreamClass o => o -> DataInputStream-toDataInputStream = unsafeCastGObject . toGObject--instance DataInputStreamClass DataInputStream-instance BufferedInputStreamClass DataInputStream-instance FilterInputStreamClass DataInputStream-instance InputStreamClass DataInputStream-instance GObjectClass DataInputStream where- toGObject = GObject . castForeignPtr . unDataInputStream- unsafeCastGObject = DataInputStream . castForeignPtr . unGObject--castToDataInputStream :: GObjectClass obj => obj -> DataInputStream-castToDataInputStream = castTo gTypeDataInputStream "DataInputStream"--gTypeDataInputStream :: GType-gTypeDataInputStream =- {# call fun unsafe g_data_input_stream_get_type #}---- ************************************************************ FileInputStream--{#pointer *GFileInputStream as FileInputStream foreign newtype #} deriving (Eq,Ord)--mkFileInputStream = (FileInputStream, objectUnref)-unFileInputStream (FileInputStream o) = o--class InputStreamClass o => FileInputStreamClass o-toFileInputStream :: FileInputStreamClass o => o -> FileInputStream-toFileInputStream = unsafeCastGObject . toGObject--instance FileInputStreamClass FileInputStream-instance InputStreamClass FileInputStream-instance GObjectClass FileInputStream where- toGObject = GObject . castForeignPtr . unFileInputStream- unsafeCastGObject = FileInputStream . castForeignPtr . unGObject--castToFileInputStream :: GObjectClass obj => obj -> FileInputStream-castToFileInputStream = castTo gTypeFileInputStream "FileInputStream"--gTypeFileInputStream :: GType-gTypeFileInputStream =- {# call fun unsafe g_file_input_stream_get_type #}---- **************************************************************** FileMonitor--{#pointer *GFileMonitor as FileMonitor foreign newtype #} deriving (Eq,Ord)--mkFileMonitor = (FileMonitor, objectUnref)-unFileMonitor (FileMonitor o) = o--class GObjectClass o => FileMonitorClass o-toFileMonitor :: FileMonitorClass o => o -> FileMonitor-toFileMonitor = unsafeCastGObject . toGObject--instance FileMonitorClass FileMonitor-instance GObjectClass FileMonitor where- toGObject = GObject . castForeignPtr . unFileMonitor- unsafeCastGObject = FileMonitor . castForeignPtr . unGObject--castToFileMonitor :: GObjectClass obj => obj -> FileMonitor-castToFileMonitor = castTo gTypeFileMonitor "FileMonitor"--gTypeFileMonitor :: GType-gTypeFileMonitor =- {# call fun unsafe g_file_monitor_get_type #}---- ************************************************************************ Vfs--{#pointer *GVfs as Vfs foreign newtype #} deriving (Eq,Ord)--mkVfs = (Vfs, objectUnref)-unVfs (Vfs o) = o--class GObjectClass o => VfsClass o-toVfs :: VfsClass o => o -> Vfs-toVfs = unsafeCastGObject . toGObject--instance VfsClass Vfs-instance GObjectClass Vfs where- toGObject = GObject . castForeignPtr . unVfs- unsafeCastGObject = Vfs . castForeignPtr . unGObject--castToVfs :: GObjectClass obj => obj -> Vfs-castToVfs = castTo gTypeVfs "Vfs"--gTypeVfs :: GType-gTypeVfs =- {# call fun unsafe g_vfs_get_type #}---- ************************************************************* MountOperation--{#pointer *GMountOperation as MountOperation foreign newtype #} deriving (Eq,Ord)--mkMountOperation = (MountOperation, objectUnref)-unMountOperation (MountOperation o) = o--class GObjectClass o => MountOperationClass o-toMountOperation :: MountOperationClass o => o -> MountOperation-toMountOperation = unsafeCastGObject . toGObject--instance MountOperationClass MountOperation-instance GObjectClass MountOperation where- toGObject = GObject . castForeignPtr . unMountOperation- unsafeCastGObject = MountOperation . castForeignPtr . unGObject--castToMountOperation :: GObjectClass obj => obj -> MountOperation-castToMountOperation = castTo gTypeMountOperation "MountOperation"--gTypeMountOperation :: GType-gTypeMountOperation =- {# call fun unsafe g_mount_operation_get_type #}---- ***************************************************************** ThemedIcon--{#pointer *GThemedIcon as ThemedIcon foreign newtype #} deriving (Eq,Ord)--mkThemedIcon = (ThemedIcon, objectUnref)-unThemedIcon (ThemedIcon o) = o--class GObjectClass o => ThemedIconClass o-toThemedIcon :: ThemedIconClass o => o -> ThemedIcon-toThemedIcon = unsafeCastGObject . toGObject--instance ThemedIconClass ThemedIcon-instance GObjectClass ThemedIcon where- toGObject = GObject . castForeignPtr . unThemedIcon- unsafeCastGObject = ThemedIcon . castForeignPtr . unGObject--castToThemedIcon :: GObjectClass obj => obj -> ThemedIcon-castToThemedIcon = castTo gTypeThemedIcon "ThemedIcon"--gTypeThemedIcon :: GType-gTypeThemedIcon =- {# call fun unsafe g_themed_icon_get_type #}---- ********************************************************************* Emblem--{#pointer *GEmblem as Emblem foreign newtype #} deriving (Eq,Ord)--mkEmblem = (Emblem, objectUnref)-unEmblem (Emblem o) = o--class GObjectClass o => EmblemClass o-toEmblem :: EmblemClass o => o -> Emblem-toEmblem = unsafeCastGObject . toGObject--instance EmblemClass Emblem-instance GObjectClass Emblem where- toGObject = GObject . castForeignPtr . unEmblem- unsafeCastGObject = Emblem . castForeignPtr . unGObject--castToEmblem :: GObjectClass obj => obj -> Emblem-castToEmblem = castTo gTypeEmblem "Emblem"--gTypeEmblem :: GType-gTypeEmblem =- {# call fun unsafe g_emblem_get_type #}---- *************************************************************** EmblemedIcon--{#pointer *GEmblemedIcon as EmblemedIcon foreign newtype #} deriving (Eq,Ord)--mkEmblemedIcon = (EmblemedIcon, objectUnref)-unEmblemedIcon (EmblemedIcon o) = o--class GObjectClass o => EmblemedIconClass o-toEmblemedIcon :: EmblemedIconClass o => o -> EmblemedIcon-toEmblemedIcon = unsafeCastGObject . toGObject--instance EmblemedIconClass EmblemedIcon-instance GObjectClass EmblemedIcon where- toGObject = GObject . castForeignPtr . unEmblemedIcon- unsafeCastGObject = EmblemedIcon . castForeignPtr . unGObject--castToEmblemedIcon :: GObjectClass obj => obj -> EmblemedIcon-castToEmblemedIcon = castTo gTypeEmblemedIcon "EmblemedIcon"--gTypeEmblemedIcon :: GType-gTypeEmblemedIcon =- {# call fun unsafe g_emblemed_icon_get_type #}---- ************************************************************* FileEnumerator--{#pointer *GFileEnumerator as FileEnumerator foreign newtype #} deriving (Eq,Ord)--mkFileEnumerator = (FileEnumerator, objectUnref)-unFileEnumerator (FileEnumerator o) = o--class GObjectClass o => FileEnumeratorClass o-toFileEnumerator :: FileEnumeratorClass o => o -> FileEnumerator-toFileEnumerator = unsafeCastGObject . toGObject--instance FileEnumeratorClass FileEnumerator-instance GObjectClass FileEnumerator where- toGObject = GObject . castForeignPtr . unFileEnumerator- unsafeCastGObject = FileEnumerator . castForeignPtr . unGObject--castToFileEnumerator :: GObjectClass obj => obj -> FileEnumerator-castToFileEnumerator = castTo gTypeFileEnumerator "FileEnumerator"--gTypeFileEnumerator :: GType-gTypeFileEnumerator =- {# call fun unsafe g_file_enumerator_get_type #}---- ********************************************************** FilenameCompleter--{#pointer *GFilenameCompleter as FilenameCompleter foreign newtype #} deriving (Eq,Ord)--mkFilenameCompleter = (FilenameCompleter, objectUnref)-unFilenameCompleter (FilenameCompleter o) = o--class GObjectClass o => FilenameCompleterClass o-toFilenameCompleter :: FilenameCompleterClass o => o -> FilenameCompleter-toFilenameCompleter = unsafeCastGObject . toGObject--instance FilenameCompleterClass FilenameCompleter-instance GObjectClass FilenameCompleter where- toGObject = GObject . castForeignPtr . unFilenameCompleter- unsafeCastGObject = FilenameCompleter . castForeignPtr . unGObject--castToFilenameCompleter :: GObjectClass obj => obj -> FilenameCompleter-castToFilenameCompleter = castTo gTypeFilenameCompleter "FilenameCompleter"--gTypeFilenameCompleter :: GType-gTypeFilenameCompleter =- {# call fun unsafe g_filename_completer_get_type #}---- ******************************************************************* FileIcon--{#pointer *GFileIcon as FileIcon foreign newtype #} deriving (Eq,Ord)--mkFileIcon = (FileIcon, objectUnref)-unFileIcon (FileIcon o) = o--class GObjectClass o => FileIconClass o-toFileIcon :: FileIconClass o => o -> FileIcon-toFileIcon = unsafeCastGObject . toGObject--instance FileIconClass FileIcon-instance GObjectClass FileIcon where- toGObject = GObject . castForeignPtr . unFileIcon- unsafeCastGObject = FileIcon . castForeignPtr . unGObject--castToFileIcon :: GObjectClass obj => obj -> FileIcon-castToFileIcon = castTo gTypeFileIcon "FileIcon"--gTypeFileIcon :: GType-gTypeFileIcon =- {# call fun unsafe g_file_icon_get_type #}---- ************************************************************** VolumeMonitor--{#pointer *GVolumeMonitor as VolumeMonitor foreign newtype #} deriving (Eq,Ord)--mkVolumeMonitor = (VolumeMonitor, objectUnref)-unVolumeMonitor (VolumeMonitor o) = o--class GObjectClass o => VolumeMonitorClass o-toVolumeMonitor :: VolumeMonitorClass o => o -> VolumeMonitor-toVolumeMonitor = unsafeCastGObject . toGObject--instance VolumeMonitorClass VolumeMonitor-instance GObjectClass VolumeMonitor where- toGObject = GObject . castForeignPtr . unVolumeMonitor- unsafeCastGObject = VolumeMonitor . castForeignPtr . unGObject--castToVolumeMonitor :: GObjectClass obj => obj -> VolumeMonitor-castToVolumeMonitor = castTo gTypeVolumeMonitor "VolumeMonitor"--gTypeVolumeMonitor :: GType-gTypeVolumeMonitor =- {# call fun unsafe g_volume_monitor_get_type #}---- **************************************************************** Cancellable--{#pointer *GCancellable as Cancellable foreign newtype #} deriving (Eq,Ord)--mkCancellable = (Cancellable, objectUnref)-unCancellable (Cancellable o) = o--class GObjectClass o => CancellableClass o-toCancellable :: CancellableClass o => o -> Cancellable-toCancellable = unsafeCastGObject . toGObject--instance CancellableClass Cancellable-instance GObjectClass Cancellable where- toGObject = GObject . castForeignPtr . unCancellable- unsafeCastGObject = Cancellable . castForeignPtr . unGObject--castToCancellable :: GObjectClass obj => obj -> Cancellable-castToCancellable = castTo gTypeCancellable "Cancellable"--gTypeCancellable :: GType-gTypeCancellable =- {# call fun unsafe g_cancellable_get_type #}---- ********************************************************** SimpleAsyncResult--{#pointer *GSimpleAsyncResult as SimpleAsyncResult foreign newtype #} deriving (Eq,Ord)--mkSimpleAsyncResult = (SimpleAsyncResult, objectUnref)-unSimpleAsyncResult (SimpleAsyncResult o) = o--class GObjectClass o => SimpleAsyncResultClass o-toSimpleAsyncResult :: SimpleAsyncResultClass o => o -> SimpleAsyncResult-toSimpleAsyncResult = unsafeCastGObject . toGObject--instance SimpleAsyncResultClass SimpleAsyncResult-instance GObjectClass SimpleAsyncResult where- toGObject = GObject . castForeignPtr . unSimpleAsyncResult- unsafeCastGObject = SimpleAsyncResult . castForeignPtr . unGObject--castToSimpleAsyncResult :: GObjectClass obj => obj -> SimpleAsyncResult-castToSimpleAsyncResult = castTo gTypeSimpleAsyncResult "SimpleAsyncResult"--gTypeSimpleAsyncResult :: GType-gTypeSimpleAsyncResult =- {# call fun unsafe g_async_result_get_type #}---- ******************************************************************* FileInfo--{#pointer *GFileInfo as FileInfo foreign newtype #} deriving (Eq,Ord)--mkFileInfo = (FileInfo, objectUnref)-unFileInfo (FileInfo o) = o--class GObjectClass o => FileInfoClass o-toFileInfo :: FileInfoClass o => o -> FileInfo-toFileInfo = unsafeCastGObject . toGObject--instance FileInfoClass FileInfo-instance GObjectClass FileInfo where- toGObject = GObject . castForeignPtr . unFileInfo- unsafeCastGObject = FileInfo . castForeignPtr . unGObject--castToFileInfo :: GObjectClass obj => obj -> FileInfo-castToFileInfo = castTo gTypeFileInfo "FileInfo"--gTypeFileInfo :: GType-gTypeFileInfo =- {# call fun unsafe g_file_info_get_type #}---- *********************************************************** AppLaunchContext--{#pointer *GAppLaunchContext as AppLaunchContext foreign newtype #} deriving (Eq,Ord)--mkAppLaunchContext = (AppLaunchContext, objectUnref)-unAppLaunchContext (AppLaunchContext o) = o--class FileInfoClass o => AppLaunchContextClass o-toAppLaunchContext :: AppLaunchContextClass o => o -> AppLaunchContext-toAppLaunchContext = unsafeCastGObject . toGObject--instance AppLaunchContextClass AppLaunchContext-instance FileInfoClass AppLaunchContext-instance GObjectClass AppLaunchContext where- toGObject = GObject . castForeignPtr . unAppLaunchContext- unsafeCastGObject = AppLaunchContext . castForeignPtr . unGObject--castToAppLaunchContext :: GObjectClass obj => obj -> AppLaunchContext-castToAppLaunchContext = castTo gTypeAppLaunchContext "AppLaunchContext"--gTypeAppLaunchContext :: GType-gTypeAppLaunchContext =- {# call fun unsafe g_app_launch_context_get_type #}---- *********************************************************************** Icon--{#pointer *GIcon as Icon foreign newtype #} deriving (Eq,Ord)--mkIcon = (Icon, objectUnref)-unIcon (Icon o) = o--class GObjectClass o => IconClass o-toIcon :: IconClass o => o -> Icon-toIcon = unsafeCastGObject . toGObject--instance IconClass Icon-instance GObjectClass Icon where- toGObject = GObject . castForeignPtr . unIcon- unsafeCastGObject = Icon . castForeignPtr . unGObject--castToIcon :: GObjectClass obj => obj -> Icon-castToIcon = castTo gTypeIcon "Icon"--gTypeIcon :: GType-gTypeIcon =- {# call fun unsafe g_icon_get_type #}---- ******************************************************************* Seekable--{#pointer *GSeekable as Seekable foreign newtype #} deriving (Eq,Ord)--mkSeekable = (Seekable, objectUnref)-unSeekable (Seekable o) = o--class GObjectClass o => SeekableClass o-toSeekable :: SeekableClass o => o -> Seekable-toSeekable = unsafeCastGObject . toGObject--instance SeekableClass Seekable-instance GObjectClass Seekable where- toGObject = GObject . castForeignPtr . unSeekable- unsafeCastGObject = Seekable . castForeignPtr . unGObject--castToSeekable :: GObjectClass obj => obj -> Seekable-castToSeekable = castTo gTypeSeekable "Seekable"--gTypeSeekable :: GType-gTypeSeekable =- {# call fun unsafe g_seekable_get_type #}---- ******************************************************************** AppInfo--{#pointer *GAppInfo as AppInfo foreign newtype #} deriving (Eq,Ord)--mkAppInfo = (AppInfo, objectUnref)-unAppInfo (AppInfo o) = o--class GObjectClass o => AppInfoClass o-toAppInfo :: AppInfoClass o => o -> AppInfo-toAppInfo = unsafeCastGObject . toGObject--instance AppInfoClass AppInfo-instance GObjectClass AppInfo where- toGObject = GObject . castForeignPtr . unAppInfo- unsafeCastGObject = AppInfo . castForeignPtr . unGObject--castToAppInfo :: GObjectClass obj => obj -> AppInfo-castToAppInfo = castTo gTypeAppInfo "AppInfo"--gTypeAppInfo :: GType-gTypeAppInfo =- {# call fun unsafe g_app_info_get_type #}---- ********************************************************************* Volume--{#pointer *GVolume as Volume foreign newtype #} deriving (Eq,Ord)--mkVolume = (Volume, objectUnref)-unVolume (Volume o) = o--class GObjectClass o => VolumeClass o-toVolume :: VolumeClass o => o -> Volume-toVolume = unsafeCastGObject . toGObject--instance VolumeClass Volume-instance GObjectClass Volume where- toGObject = GObject . castForeignPtr . unVolume- unsafeCastGObject = Volume . castForeignPtr . unGObject--castToVolume :: GObjectClass obj => obj -> Volume-castToVolume = castTo gTypeVolume "Volume"--gTypeVolume :: GType-gTypeVolume =- {# call fun unsafe g_volume_get_type #}---- **************************************************************** AsyncResult--{#pointer *GAsyncResult as AsyncResult foreign newtype #} deriving (Eq,Ord)--mkAsyncResult = (AsyncResult, objectUnref)-unAsyncResult (AsyncResult o) = o--class GObjectClass o => AsyncResultClass o-toAsyncResult :: AsyncResultClass o => o -> AsyncResult-toAsyncResult = unsafeCastGObject . toGObject--instance AsyncResultClass AsyncResult-instance GObjectClass AsyncResult where- toGObject = GObject . castForeignPtr . unAsyncResult- unsafeCastGObject = AsyncResult . castForeignPtr . unGObject--castToAsyncResult :: GObjectClass obj => obj -> AsyncResult-castToAsyncResult = castTo gTypeAsyncResult "AsyncResult"--gTypeAsyncResult :: GType-gTypeAsyncResult =- {# call fun unsafe g_async_result_get_type #}---- *************************************************************** LoadableIcon--{#pointer *GLoadableIcon as LoadableIcon foreign newtype #} deriving (Eq,Ord)--mkLoadableIcon = (LoadableIcon, objectUnref)-unLoadableIcon (LoadableIcon o) = o--class GObjectClass o => LoadableIconClass o-toLoadableIcon :: LoadableIconClass o => o -> LoadableIcon-toLoadableIcon = unsafeCastGObject . toGObject--instance LoadableIconClass LoadableIcon-instance GObjectClass LoadableIcon where- toGObject = GObject . castForeignPtr . unLoadableIcon- unsafeCastGObject = LoadableIcon . castForeignPtr . unGObject--castToLoadableIcon :: GObjectClass obj => obj -> LoadableIcon-castToLoadableIcon = castTo gTypeLoadableIcon "LoadableIcon"--gTypeLoadableIcon :: GType-gTypeLoadableIcon =- {# call fun unsafe g_loadable_icon_get_type #}---- ********************************************************************** Drive--{#pointer *GDrive as Drive foreign newtype #} deriving (Eq,Ord)--mkDrive = (Drive, objectUnref)-unDrive (Drive o) = o--class GObjectClass o => DriveClass o-toDrive :: DriveClass o => o -> Drive-toDrive = unsafeCastGObject . toGObject--instance DriveClass Drive-instance GObjectClass Drive where- toGObject = GObject . castForeignPtr . unDrive- unsafeCastGObject = Drive . castForeignPtr . unGObject--castToDrive :: GObjectClass obj => obj -> Drive-castToDrive = castTo gTypeDrive "Drive"--gTypeDrive :: GType-gTypeDrive =- {# call fun unsafe g_drive_get_type #}---- *********************************************************************** File--{#pointer *GFile as File foreign newtype #}--mkFile = (File, objectUnref)-unFile (File o) = o--class GObjectClass o => FileClass o-toFile :: FileClass o => o -> File-toFile = unsafeCastGObject . toGObject--instance FileClass File-instance GObjectClass File where- toGObject = GObject . castForeignPtr . unFile- unsafeCastGObject = File . castForeignPtr . unGObject--castToFile :: GObjectClass obj => obj -> File-castToFile = castTo gTypeFile "File"--gTypeFile :: GType-gTypeFile =- {# call fun unsafe g_file_get_type #}---- ********************************************************************** Mount--{#pointer *GMount as Mount foreign newtype #} deriving (Eq,Ord)--mkMount = (Mount, objectUnref)-unMount (Mount o) = o--class GObjectClass o => MountClass o-toMount :: MountClass o => o -> Mount-toMount = unsafeCastGObject . toGObject--instance MountClass Mount-instance GObjectClass Mount where- toGObject = GObject . castForeignPtr . unMount- unsafeCastGObject = Mount . castForeignPtr . unGObject--castToMount :: GObjectClass obj => obj -> Mount-castToMount = castTo gTypeMount "Mount"--gTypeMount :: GType-gTypeMount =- {# call fun unsafe g_mount_get_type #}-
System/GIO/Volumes/Drive.chs view
@@ -35,11 +35,11 @@ -- -- 'Drive' is a container class for 'Volume' objects that stem from the same piece of media. As such, -- 'Drive' abstracts a drive with (or without) removable media and provides operations for querying--- whether media is available, determing whether media change is automatically detected and ejecting+-- whether media is available, determining whether media change is automatically detected and ejecting -- the media. -- -- If the 'Drive' reports that media isn't automatically detected, one can poll for media; typically one--- should not do this periodically as a poll for media operation is potententially expensive and may+-- should not do this periodically as a poll for media operation is potentially expensive and may -- spin up the drive creating noise. -- -- 'Drive' supports starting and stopping drives with authentication support for the former. This can be@@ -175,9 +175,9 @@ liftM toBool $ {#call g_drive_can_start_degraded#} (toDrive drive) --- | Checks if a drive can be stoped.+-- | Checks if a drive can be stopped. driveCanStop :: DriveClass drive => drive- -> IO Bool -- ^ returns 'True' if the drive can be stoped, 'False' otherwise.+ -> IO Bool -- ^ returns 'True' if the drive can be stopped, 'False' otherwise. driveCanStop drive = liftM toBool $ {#call g_drive_can_stop#} (toDrive drive)@@ -228,9 +228,9 @@ liftM toBool $ {#call g_drive_has_media#} (toDrive drive) --- | Checks if drive is capabable of automatically detecting media changes.+-- | Checks if drive is capable of automatically detecting media changes. driveIsMediaCheckAutomatic :: DriveClass drive => drive- -> IO Bool -- ^ returns 'True' if the drive is capabable of automatically detecting media changes, 'False' otherwise.+ -> IO Bool -- ^ returns 'True' if the drive is capable of automatically detecting media changes, 'False' otherwise. driveIsMediaCheckAutomatic drive = liftM toBool $ {#call g_drive_is_media_check_automatic#} (toDrive drive)@@ -335,7 +335,7 @@ cCallback (castFunPtrToPtr cCallback) --- | Finishes stoping a drive.+-- | Finishes stopping a drive. -- -- Throws a 'GError' if an error occurs. driveStopFinish :: DriveClass drive@@ -351,7 +351,7 @@ return ()) #endif --- | Gets the kinds of identifiers that drive has. Use 'driveGetIdentifer' to obtain the+-- | Gets the kinds of identifiers that drive has. Use 'driveGetIdentifier' to obtain the -- identifiers themselves. driveEnumerateIdentifiers :: (DriveClass drive, GlibString string) => drive -> IO [string]
System/GIO/Volumes/Mount.chs view
@@ -317,7 +317,7 @@ cCallback (castFunPtrToPtr cCallback) --- | Finishes guessing content types of mount. If any errors occured during the operation, error will be+-- | Finishes guessing content types of mount. If any errors occurred during the operation, error will be -- set to contain the errors and 'False' will be returned. In particular, you may get an -- 'IoErrorNotSupported' if the mount does not support content guessing. mountGuessContentTypeFinish :: (MountClass mount, GlibString string) => mount
System/GIO/Volumes/Volume.chs view
@@ -189,7 +189,7 @@ cCallback (castFunPtrToPtr cCallback) --- | Finishes mounting a volume. If any errors occured during the operation, error will be set to contain+-- | Finishes mounting a volume. If any errors occurred during the operation, error will be set to contain -- the errors and 'False' will be returned. -- -- If the mount operation succeeded, 'volumeGetMount' on volume is guaranteed to return the mount@@ -251,7 +251,7 @@ return ()) #endif --- | Gets the kinds of identifiers that volume has. Use 'volumeGetIdentifer' to obtain the+-- | Gets the kinds of identifiers that volume has. Use 'volumeGetIdentifier' to obtain the -- identifiers themselves. volumeEnumerateIdentifiers :: (VolumeClass volume, GlibString string) => volume -> IO [string]
gio.cabal view
@@ -1,6 +1,6 @@-cabal-version: 3.0+cabal-version: 2.2 Name: gio-Version: 0.13.10.0+Version: 0.13.11.0 License: LGPL-2.1-only License-file: COPYING Copyright: (c) 2001-2010 The Gtk2Hs Team@@ -17,7 +17,7 @@ Among other things that means using GObject. It also means not cloning the POSIX API, but providing higher-level, document-centric interfaces. Category: System-Tested-With: GHC == 7.0.4, GHC == 7.2.2, GHC == 7.4.1+Tested-With: GHC == 9.10.1, GHC == 9.8.2, GHC == 9.6.6, GHC == 9.4.8, GHC == 9.2.8, GHC==9.0.2, GHC==8.10.7, GHC==8.8.4, GHC==8.6.5, GHC==8.4.4, GHC==8.2.2, GHC==8.0.2 Extra-Source-Files: marshal.list hierarchy.list @@ -40,14 +40,14 @@ custom-setup setup-depends: base >= 4.6 && < 5,- Cabal >= 2.0 && < 3.11,+ Cabal >= 2.2 && < 3.13, gtk2hs-buildtools >= 0.13.2.0 && < 0.14 Library build-depends: base >= 4 && < 5, array < 0.6,- bytestring < 0.12,- containers < 0.7,+ bytestring < 0.13,+ containers < 0.8, mtl < 2.4, glib >= 0.13.0.0 && < 0.14 @@ -81,6 +81,9 @@ System.GIO.Volumes.VolumeMonitor other-modules: System.GIO.Signals+ autogen-modules:+ System.GIO.Signals+ System.GIO.Types default-language: Haskell98 default-extensions: ForeignFunctionInterface
hierarchy.list view
@@ -10,7 +10,7 @@ # function is not specified, the <name> is converted to # gtk_<name'>_get_type where <name'> is <name> where each upperscore # letter is converted to an underscore and lowerletter. The underscore-# is omitted if an upperscore letter preceeded: GtkHButtonBox ->+# is omitted if an upperscore letter preceded: GtkHButtonBox -> # gtk_hbutton_box_get_type. The generation of a type can be # conditional by appending 'if <tag>'. Such types are only produces if # --tag=<tag> is given on the command line of TypeGenerator.@@ -211,7 +211,7 @@ GtkSourceLanguageManager if gtksourceview2 GladeXML as GladeXML, glade_xml_get_type if libglade GConfClient as GConf if gconf-# These ones are actualy interfaces, but interface implementations are GObjects+# These ones are actually interfaces, but interface implementations are GObjects GtkEditable GtkSourceStyle as SourceStyleObject if gtksourceview2 GtkSourceStyleScheme if sourceview