module Graphics.UI.Gtk.SourceView.Types (
module Graphics.UI.GtkInternals,
SourceGutter(SourceGutter), SourceGutterClass,
toSourceGutter,
mkSourceGutter, unSourceGutter,
castToSourceGutter, gTypeSourceGutter,
SourceUndoManager(SourceUndoManager), SourceUndoManagerClass,
toSourceUndoManager,
mkSourceUndoManager, unSourceUndoManager,
castToSourceUndoManager, gTypeSourceUndoManager,
SourceCompletionProvider(SourceCompletionProvider), SourceCompletionProviderClass,
toSourceCompletionProvider,
mkSourceCompletionProvider, unSourceCompletionProvider,
castToSourceCompletionProvider, gTypeSourceCompletionProvider,
SourceCompletionProposal(SourceCompletionProposal), SourceCompletionProposalClass,
toSourceCompletionProposal,
mkSourceCompletionProposal, unSourceCompletionProposal,
castToSourceCompletionProposal, gTypeSourceCompletionProposal,
SourceCompletionContext(SourceCompletionContext), SourceCompletionContextClass,
toSourceCompletionContext,
mkSourceCompletionContext, unSourceCompletionContext,
castToSourceCompletionContext, gTypeSourceCompletionContext,
SourceCompletionItem(SourceCompletionItem), SourceCompletionItemClass,
toSourceCompletionItem,
mkSourceCompletionItem, unSourceCompletionItem,
castToSourceCompletionItem, gTypeSourceCompletionItem,
SourceBuffer(SourceBuffer), SourceBufferClass,
toSourceBuffer,
mkSourceBuffer, unSourceBuffer,
castToSourceBuffer, gTypeSourceBuffer,
SourceMark(SourceMark), SourceMarkClass,
toSourceMark,
mkSourceMark, unSourceMark,
castToSourceMark, gTypeSourceMark,
SourceCompletion(SourceCompletion), SourceCompletionClass,
toSourceCompletion,
mkSourceCompletion, unSourceCompletion,
castToSourceCompletion, gTypeSourceCompletion,
SourceCompletionInfo(SourceCompletionInfo), SourceCompletionInfoClass,
toSourceCompletionInfo,
mkSourceCompletionInfo, unSourceCompletionInfo,
castToSourceCompletionInfo, gTypeSourceCompletionInfo,
SourceView(SourceView), SourceViewClass,
toSourceView,
mkSourceView, unSourceView,
castToSourceView, gTypeSourceView,
SourceLanguage(SourceLanguage), SourceLanguageClass,
toSourceLanguage,
mkSourceLanguage, unSourceLanguage,
castToSourceLanguage, gTypeSourceLanguage,
SourceLanguageManager(SourceLanguageManager), SourceLanguageManagerClass,
toSourceLanguageManager,
mkSourceLanguageManager, unSourceLanguageManager,
castToSourceLanguageManager, gTypeSourceLanguageManager,
SourceStyleObject(SourceStyleObject), SourceStyleObjectClass,
toSourceStyleObject,
mkSourceStyleObject, unSourceStyleObject,
castToSourceStyleObject, gTypeSourceStyleObject,
SourceStyleScheme(SourceStyleScheme), SourceStyleSchemeClass,
toSourceStyleScheme,
mkSourceStyleScheme, unSourceStyleScheme,
castToSourceStyleScheme, gTypeSourceStyleScheme,
SourceStyleSchemeManager(SourceStyleSchemeManager), SourceStyleSchemeManagerClass,
toSourceStyleSchemeManager,
mkSourceStyleSchemeManager, unSourceStyleSchemeManager,
castToSourceStyleSchemeManager, gTypeSourceStyleSchemeManager
) where
import Foreign.ForeignPtr (ForeignPtr, castForeignPtr)
import Foreign.ForeignPtr (unsafeForeignPtrToPtr)
import Foreign.C.Types (CULong(..), CUInt(..))
import System.Glib.GType (GType, typeInstanceIsA)
import Graphics.UI.GtkInternals
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
newtype SourceGutter = SourceGutter (ForeignPtr (SourceGutter)) deriving (Eq,Ord)
mkSourceGutter = (SourceGutter, objectUnrefFromMainloop)
unSourceGutter (SourceGutter o) = o
class GObjectClass o => SourceGutterClass o
toSourceGutter :: SourceGutterClass o => o -> SourceGutter
toSourceGutter = unsafeCastGObject . toGObject
instance SourceGutterClass SourceGutter
instance GObjectClass SourceGutter where
toGObject = GObject . castForeignPtr . unSourceGutter
unsafeCastGObject = SourceGutter . castForeignPtr . unGObject
castToSourceGutter :: GObjectClass obj => obj -> SourceGutter
castToSourceGutter = castTo gTypeSourceGutter "SourceGutter"
gTypeSourceGutter :: GType
gTypeSourceGutter =
gtk_source_gutter_get_type
newtype SourceUndoManager = SourceUndoManager (ForeignPtr (SourceUndoManager)) deriving (Eq,Ord)
mkSourceUndoManager = (SourceUndoManager, objectUnrefFromMainloop)
unSourceUndoManager (SourceUndoManager o) = o
class GObjectClass o => SourceUndoManagerClass o
toSourceUndoManager :: SourceUndoManagerClass o => o -> SourceUndoManager
toSourceUndoManager = unsafeCastGObject . toGObject
instance SourceUndoManagerClass SourceUndoManager
instance GObjectClass SourceUndoManager where
toGObject = GObject . castForeignPtr . unSourceUndoManager
unsafeCastGObject = SourceUndoManager . castForeignPtr . unGObject
castToSourceUndoManager :: GObjectClass obj => obj -> SourceUndoManager
castToSourceUndoManager = castTo gTypeSourceUndoManager "SourceUndoManager"
gTypeSourceUndoManager :: GType
gTypeSourceUndoManager =
gtk_source_undo_manager_get_type
newtype SourceCompletionProvider = SourceCompletionProvider (ForeignPtr (SourceCompletionProvider)) deriving (Eq,Ord)
mkSourceCompletionProvider = (SourceCompletionProvider, objectUnrefFromMainloop)
unSourceCompletionProvider (SourceCompletionProvider o) = o
class GObjectClass o => SourceCompletionProviderClass o
toSourceCompletionProvider :: SourceCompletionProviderClass o => o -> SourceCompletionProvider
toSourceCompletionProvider = unsafeCastGObject . toGObject
instance SourceCompletionProviderClass SourceCompletionProvider
instance GObjectClass SourceCompletionProvider where
toGObject = GObject . castForeignPtr . unSourceCompletionProvider
unsafeCastGObject = SourceCompletionProvider . castForeignPtr . unGObject
castToSourceCompletionProvider :: GObjectClass obj => obj -> SourceCompletionProvider
castToSourceCompletionProvider = castTo gTypeSourceCompletionProvider "SourceCompletionProvider"
gTypeSourceCompletionProvider :: GType
gTypeSourceCompletionProvider =
gtk_source_completion_provider_get_type
newtype SourceCompletionProposal = SourceCompletionProposal (ForeignPtr (SourceCompletionProposal)) deriving (Eq,Ord)
mkSourceCompletionProposal = (SourceCompletionProposal, objectUnrefFromMainloop)
unSourceCompletionProposal (SourceCompletionProposal o) = o
class GObjectClass o => SourceCompletionProposalClass o
toSourceCompletionProposal :: SourceCompletionProposalClass o => o -> SourceCompletionProposal
toSourceCompletionProposal = unsafeCastGObject . toGObject
instance SourceCompletionProposalClass SourceCompletionProposal
instance GObjectClass SourceCompletionProposal where
toGObject = GObject . castForeignPtr . unSourceCompletionProposal
unsafeCastGObject = SourceCompletionProposal . castForeignPtr . unGObject
castToSourceCompletionProposal :: GObjectClass obj => obj -> SourceCompletionProposal
castToSourceCompletionProposal = castTo gTypeSourceCompletionProposal "SourceCompletionProposal"
gTypeSourceCompletionProposal :: GType
gTypeSourceCompletionProposal =
gtk_source_completion_proposal_get_type
newtype SourceCompletionContext = SourceCompletionContext (ForeignPtr (SourceCompletionContext)) deriving (Eq,Ord)
mkSourceCompletionContext = (SourceCompletionContext, objectUnrefFromMainloop)
unSourceCompletionContext (SourceCompletionContext o) = o
class GObjectClass o => SourceCompletionContextClass o
toSourceCompletionContext :: SourceCompletionContextClass o => o -> SourceCompletionContext
toSourceCompletionContext = unsafeCastGObject . toGObject
instance SourceCompletionContextClass SourceCompletionContext
instance GObjectClass SourceCompletionContext where
toGObject = GObject . castForeignPtr . unSourceCompletionContext
unsafeCastGObject = SourceCompletionContext . castForeignPtr . unGObject
castToSourceCompletionContext :: GObjectClass obj => obj -> SourceCompletionContext
castToSourceCompletionContext = castTo gTypeSourceCompletionContext "SourceCompletionContext"
gTypeSourceCompletionContext :: GType
gTypeSourceCompletionContext =
gtk_source_completion_context_get_type
newtype SourceCompletionItem = SourceCompletionItem (ForeignPtr (SourceCompletionItem)) deriving (Eq,Ord)
mkSourceCompletionItem = (SourceCompletionItem, objectUnrefFromMainloop)
unSourceCompletionItem (SourceCompletionItem o) = o
class GObjectClass o => SourceCompletionItemClass o
toSourceCompletionItem :: SourceCompletionItemClass o => o -> SourceCompletionItem
toSourceCompletionItem = unsafeCastGObject . toGObject
instance SourceCompletionItemClass SourceCompletionItem
instance GObjectClass SourceCompletionItem where
toGObject = GObject . castForeignPtr . unSourceCompletionItem
unsafeCastGObject = SourceCompletionItem . castForeignPtr . unGObject
castToSourceCompletionItem :: GObjectClass obj => obj -> SourceCompletionItem
castToSourceCompletionItem = castTo gTypeSourceCompletionItem "SourceCompletionItem"
gTypeSourceCompletionItem :: GType
gTypeSourceCompletionItem =
gtk_source_completion_item_get_type
newtype SourceBuffer = SourceBuffer (ForeignPtr (SourceBuffer)) deriving (Eq,Ord)
mkSourceBuffer = (SourceBuffer, objectUnrefFromMainloop)
unSourceBuffer (SourceBuffer o) = o
class TextBufferClass o => SourceBufferClass o
toSourceBuffer :: SourceBufferClass o => o -> SourceBuffer
toSourceBuffer = unsafeCastGObject . toGObject
instance SourceBufferClass SourceBuffer
instance TextBufferClass SourceBuffer
instance GObjectClass SourceBuffer where
toGObject = GObject . castForeignPtr . unSourceBuffer
unsafeCastGObject = SourceBuffer . castForeignPtr . unGObject
castToSourceBuffer :: GObjectClass obj => obj -> SourceBuffer
castToSourceBuffer = castTo gTypeSourceBuffer "SourceBuffer"
gTypeSourceBuffer :: GType
gTypeSourceBuffer =
gtk_source_buffer_get_type
newtype SourceMark = SourceMark (ForeignPtr (SourceMark)) deriving (Eq,Ord)
mkSourceMark = (SourceMark, objectUnrefFromMainloop)
unSourceMark (SourceMark o) = o
class TextMarkClass o => SourceMarkClass o
toSourceMark :: SourceMarkClass o => o -> SourceMark
toSourceMark = unsafeCastGObject . toGObject
instance SourceMarkClass SourceMark
instance TextMarkClass SourceMark
instance GObjectClass SourceMark where
toGObject = GObject . castForeignPtr . unSourceMark
unsafeCastGObject = SourceMark . castForeignPtr . unGObject
castToSourceMark :: GObjectClass obj => obj -> SourceMark
castToSourceMark = castTo gTypeSourceMark "SourceMark"
gTypeSourceMark :: GType
gTypeSourceMark =
gtk_source_mark_get_type
newtype SourceCompletion = SourceCompletion (ForeignPtr (SourceCompletion)) deriving (Eq,Ord)
mkSourceCompletion = (SourceCompletion, objectUnrefFromMainloop)
unSourceCompletion (SourceCompletion o) = o
class ObjectClass o => SourceCompletionClass o
toSourceCompletion :: SourceCompletionClass o => o -> SourceCompletion
toSourceCompletion = unsafeCastGObject . toGObject
instance SourceCompletionClass SourceCompletion
instance ObjectClass SourceCompletion
instance GObjectClass SourceCompletion where
toGObject = GObject . castForeignPtr . unSourceCompletion
unsafeCastGObject = SourceCompletion . castForeignPtr . unGObject
castToSourceCompletion :: GObjectClass obj => obj -> SourceCompletion
castToSourceCompletion = castTo gTypeSourceCompletion "SourceCompletion"
gTypeSourceCompletion :: GType
gTypeSourceCompletion =
gtk_source_completion_get_type
newtype SourceCompletionInfo = SourceCompletionInfo (ForeignPtr (SourceCompletionInfo)) deriving (Eq,Ord)
mkSourceCompletionInfo = (SourceCompletionInfo, objectUnrefFromMainloop)
unSourceCompletionInfo (SourceCompletionInfo o) = o
class WindowClass o => SourceCompletionInfoClass o
toSourceCompletionInfo :: SourceCompletionInfoClass o => o -> SourceCompletionInfo
toSourceCompletionInfo = unsafeCastGObject . toGObject
instance SourceCompletionInfoClass SourceCompletionInfo
instance WindowClass SourceCompletionInfo
instance BinClass SourceCompletionInfo
instance ContainerClass SourceCompletionInfo
instance WidgetClass SourceCompletionInfo
instance ObjectClass SourceCompletionInfo
instance GObjectClass SourceCompletionInfo where
toGObject = GObject . castForeignPtr . unSourceCompletionInfo
unsafeCastGObject = SourceCompletionInfo . castForeignPtr . unGObject
castToSourceCompletionInfo :: GObjectClass obj => obj -> SourceCompletionInfo
castToSourceCompletionInfo = castTo gTypeSourceCompletionInfo "SourceCompletionInfo"
gTypeSourceCompletionInfo :: GType
gTypeSourceCompletionInfo =
gtk_source_completion_info_get_type
newtype SourceView = SourceView (ForeignPtr (SourceView)) deriving (Eq,Ord)
mkSourceView = (SourceView, objectUnrefFromMainloop)
unSourceView (SourceView o) = o
class TextViewClass o => SourceViewClass o
toSourceView :: SourceViewClass o => o -> SourceView
toSourceView = unsafeCastGObject . toGObject
instance SourceViewClass SourceView
instance TextViewClass SourceView
instance ContainerClass SourceView
instance WidgetClass SourceView
instance ObjectClass SourceView
instance GObjectClass SourceView where
toGObject = GObject . castForeignPtr . unSourceView
unsafeCastGObject = SourceView . castForeignPtr . unGObject
castToSourceView :: GObjectClass obj => obj -> SourceView
castToSourceView = castTo gTypeSourceView "SourceView"
gTypeSourceView :: GType
gTypeSourceView =
gtk_source_view_get_type
newtype SourceLanguage = SourceLanguage (ForeignPtr (SourceLanguage)) deriving (Eq,Ord)
mkSourceLanguage = (SourceLanguage, objectUnrefFromMainloop)
unSourceLanguage (SourceLanguage o) = o
class GObjectClass o => SourceLanguageClass o
toSourceLanguage :: SourceLanguageClass o => o -> SourceLanguage
toSourceLanguage = unsafeCastGObject . toGObject
instance SourceLanguageClass SourceLanguage
instance GObjectClass SourceLanguage where
toGObject = GObject . castForeignPtr . unSourceLanguage
unsafeCastGObject = SourceLanguage . castForeignPtr . unGObject
castToSourceLanguage :: GObjectClass obj => obj -> SourceLanguage
castToSourceLanguage = castTo gTypeSourceLanguage "SourceLanguage"
gTypeSourceLanguage :: GType
gTypeSourceLanguage =
gtk_source_language_get_type
newtype SourceLanguageManager = SourceLanguageManager (ForeignPtr (SourceLanguageManager)) deriving (Eq,Ord)
mkSourceLanguageManager = (SourceLanguageManager, objectUnrefFromMainloop)
unSourceLanguageManager (SourceLanguageManager o) = o
class GObjectClass o => SourceLanguageManagerClass o
toSourceLanguageManager :: SourceLanguageManagerClass o => o -> SourceLanguageManager
toSourceLanguageManager = unsafeCastGObject . toGObject
instance SourceLanguageManagerClass SourceLanguageManager
instance GObjectClass SourceLanguageManager where
toGObject = GObject . castForeignPtr . unSourceLanguageManager
unsafeCastGObject = SourceLanguageManager . castForeignPtr . unGObject
castToSourceLanguageManager :: GObjectClass obj => obj -> SourceLanguageManager
castToSourceLanguageManager = castTo gTypeSourceLanguageManager "SourceLanguageManager"
gTypeSourceLanguageManager :: GType
gTypeSourceLanguageManager =
gtk_source_language_manager_get_type
newtype SourceStyleObject = SourceStyleObject (ForeignPtr (SourceStyleObject)) deriving (Eq,Ord)
mkSourceStyleObject = (SourceStyleObject, objectUnrefFromMainloop)
unSourceStyleObject (SourceStyleObject o) = o
class GObjectClass o => SourceStyleObjectClass o
toSourceStyleObject :: SourceStyleObjectClass o => o -> SourceStyleObject
toSourceStyleObject = unsafeCastGObject . toGObject
instance SourceStyleObjectClass SourceStyleObject
instance GObjectClass SourceStyleObject where
toGObject = GObject . castForeignPtr . unSourceStyleObject
unsafeCastGObject = SourceStyleObject . castForeignPtr . unGObject
castToSourceStyleObject :: GObjectClass obj => obj -> SourceStyleObject
castToSourceStyleObject = castTo gTypeSourceStyleObject "SourceStyleObject"
gTypeSourceStyleObject :: GType
gTypeSourceStyleObject =
gtk_source_style_get_type
newtype SourceStyleScheme = SourceStyleScheme (ForeignPtr (SourceStyleScheme)) deriving (Eq,Ord)
mkSourceStyleScheme = (SourceStyleScheme, objectUnrefFromMainloop)
unSourceStyleScheme (SourceStyleScheme o) = o
class GObjectClass o => SourceStyleSchemeClass o
toSourceStyleScheme :: SourceStyleSchemeClass o => o -> SourceStyleScheme
toSourceStyleScheme = unsafeCastGObject . toGObject
instance SourceStyleSchemeClass SourceStyleScheme
instance GObjectClass SourceStyleScheme where
toGObject = GObject . castForeignPtr . unSourceStyleScheme
unsafeCastGObject = SourceStyleScheme . castForeignPtr . unGObject
castToSourceStyleScheme :: GObjectClass obj => obj -> SourceStyleScheme
castToSourceStyleScheme = castTo gTypeSourceStyleScheme "SourceStyleScheme"
gTypeSourceStyleScheme :: GType
gTypeSourceStyleScheme =
gtk_source_style_scheme_get_type
newtype SourceStyleSchemeManager = SourceStyleSchemeManager (ForeignPtr (SourceStyleSchemeManager)) deriving (Eq,Ord)
mkSourceStyleSchemeManager = (SourceStyleSchemeManager, objectUnrefFromMainloop)
unSourceStyleSchemeManager (SourceStyleSchemeManager o) = o
class GObjectClass o => SourceStyleSchemeManagerClass o
toSourceStyleSchemeManager :: SourceStyleSchemeManagerClass o => o -> SourceStyleSchemeManager
toSourceStyleSchemeManager = unsafeCastGObject . toGObject
instance SourceStyleSchemeManagerClass SourceStyleSchemeManager
instance GObjectClass SourceStyleSchemeManager where
toGObject = GObject . castForeignPtr . unSourceStyleSchemeManager
unsafeCastGObject = SourceStyleSchemeManager . castForeignPtr . unGObject
castToSourceStyleSchemeManager :: GObjectClass obj => obj -> SourceStyleSchemeManager
castToSourceStyleSchemeManager = castTo gTypeSourceStyleSchemeManager "SourceStyleSchemeManager"
gTypeSourceStyleSchemeManager :: GType
gTypeSourceStyleSchemeManager =
gtk_source_style_scheme_manager_get_type
foreign import ccall unsafe "gtk_source_gutter_get_type"
gtk_source_gutter_get_type :: CULong
foreign import ccall unsafe "gtk_source_undo_manager_get_type"
gtk_source_undo_manager_get_type :: CULong
foreign import ccall unsafe "gtk_source_completion_provider_get_type"
gtk_source_completion_provider_get_type :: CULong
foreign import ccall unsafe "gtk_source_completion_proposal_get_type"
gtk_source_completion_proposal_get_type :: CULong
foreign import ccall unsafe "gtk_source_completion_context_get_type"
gtk_source_completion_context_get_type :: CULong
foreign import ccall unsafe "gtk_source_completion_item_get_type"
gtk_source_completion_item_get_type :: CULong
foreign import ccall unsafe "gtk_source_buffer_get_type"
gtk_source_buffer_get_type :: CULong
foreign import ccall unsafe "gtk_source_mark_get_type"
gtk_source_mark_get_type :: CULong
foreign import ccall unsafe "gtk_source_completion_get_type"
gtk_source_completion_get_type :: CULong
foreign import ccall unsafe "gtk_source_completion_info_get_type"
gtk_source_completion_info_get_type :: CULong
foreign import ccall unsafe "gtk_source_view_get_type"
gtk_source_view_get_type :: CULong
foreign import ccall unsafe "gtk_source_language_get_type"
gtk_source_language_get_type :: CULong
foreign import ccall unsafe "gtk_source_language_manager_get_type"
gtk_source_language_manager_get_type :: CULong
foreign import ccall unsafe "gtk_source_style_get_type"
gtk_source_style_get_type :: CULong
foreign import ccall unsafe "gtk_source_style_scheme_get_type"
gtk_source_style_scheme_get_type :: CULong
foreign import ccall unsafe "gtk_source_style_scheme_manager_get_type"
gtk_source_style_scheme_manager_get_type :: CULong