gi-gtksource 0.3.18.15 → 3.0.1
raw patch · 75 files changed
+32/−27181 lines, 75 filesdep ~gi-atkdep ~gi-cairodep ~gi-gdkbuild-type:Customsetup-changed
Dependency ranges changed: gi-atk, gi-cairo, gi-gdk, gi-gdkpixbuf, gi-gio, gi-glib, gi-gobject, gi-gtk, gi-pango, transformers
Files
- GI/GtkSource.hs +0/−44
- GI/GtkSource/Callbacks.hs +0/−21
- GI/GtkSource/Enums.hs +0/−369
- GI/GtkSource/Flags.hs +0/−196
- GI/GtkSource/Functions.hs +0/−87
- GI/GtkSource/Interfaces.hs +0/−33
- GI/GtkSource/Interfaces/CompletionProposal.hs +0/−514
- GI/GtkSource/Interfaces/CompletionProposal.hs-boot +0/−24
- GI/GtkSource/Interfaces/CompletionProvider.hs +0/−587
- GI/GtkSource/Interfaces/CompletionProvider.hs-boot +0/−26
- GI/GtkSource/Interfaces/StyleSchemeChooser.hs +0/−209
- GI/GtkSource/Interfaces/StyleSchemeChooser.hs-boot +0/−16
- GI/GtkSource/Interfaces/UndoManager.hs +0/−476
- GI/GtkSource/Interfaces/UndoManager.hs-boot +0/−23
- GI/GtkSource/Objects.hs +0/−79
- GI/GtkSource/Objects/Buffer.hs +0/−2190
- GI/GtkSource/Objects/Buffer.hs-boot +0/−61
- GI/GtkSource/Objects/Completion.hs +0/−1202
- GI/GtkSource/Objects/Completion.hs-boot +0/−39
- GI/GtkSource/Objects/CompletionContext.hs +0/−385
- GI/GtkSource/Objects/CompletionContext.hs-boot +0/−20
- GI/GtkSource/Objects/CompletionInfo.hs +0/−692
- GI/GtkSource/Objects/CompletionInfo.hs-boot +0/−17
- GI/GtkSource/Objects/CompletionItem.hs +0/−544
- GI/GtkSource/Objects/CompletionItem.hs-boot +0/−20
- GI/GtkSource/Objects/CompletionWords.hs +0/−532
- GI/GtkSource/Objects/CompletionWords.hs-boot +0/−23
- GI/GtkSource/Objects/File.hs +0/−629
- GI/GtkSource/Objects/File.hs-boot +0/−28
- GI/GtkSource/Objects/FileLoader.hs +0/−693
- GI/GtkSource/Objects/FileLoader.hs-boot +0/−27
- GI/GtkSource/Objects/FileSaver.hs +0/−919
- GI/GtkSource/Objects/FileSaver.hs-boot +0/−33
- GI/GtkSource/Objects/Gutter.hs +0/−538
- GI/GtkSource/Objects/Gutter.hs-boot +0/−25
- GI/GtkSource/Objects/GutterRenderer.hs +0/−1707
- GI/GtkSource/Objects/GutterRenderer.hs-boot +0/−51
- GI/GtkSource/Objects/GutterRendererPixbuf.hs +0/−615
- GI/GtkSource/Objects/GutterRendererPixbuf.hs-boot +0/−25
- GI/GtkSource/Objects/GutterRendererText.hs +0/−395
- GI/GtkSource/Objects/GutterRendererText.hs-boot +0/−19
- GI/GtkSource/Objects/Language.hs +0/−587
- GI/GtkSource/Objects/Language.hs-boot +0/−27
- GI/GtkSource/Objects/LanguageManager.hs +0/−423
- GI/GtkSource/Objects/LanguageManager.hs-boot +0/−20
- GI/GtkSource/Objects/Map.hs +0/−674
- GI/GtkSource/Objects/Map.hs-boot +0/−17
- GI/GtkSource/Objects/Mark.hs +0/−290
- GI/GtkSource/Objects/Mark.hs-boot +0/−17
- GI/GtkSource/Objects/MarkAttributes.hs +0/−920
- GI/GtkSource/Objects/MarkAttributes.hs-boot +0/−33
- GI/GtkSource/Objects/PrintCompositor.hs +0/−1924
- GI/GtkSource/Objects/PrintCompositor.hs-boot +0/−60
- GI/GtkSource/Objects/SearchContext.hs +0/−1108
- GI/GtkSource/Objects/SearchContext.hs-boot +0/−37
- GI/GtkSource/Objects/SearchSettings.hs +0/−669
- GI/GtkSource/Objects/SearchSettings.hs-boot +0/−28
- GI/GtkSource/Objects/Style.hs +0/−761
- GI/GtkSource/Objects/Style.hs-boot +0/−33
- GI/GtkSource/Objects/StyleScheme.hs +0/−436
- GI/GtkSource/Objects/StyleScheme.hs-boot +0/−23
- GI/GtkSource/Objects/StyleSchemeChooserButton.hs +0/−449
- GI/GtkSource/Objects/StyleSchemeChooserButton.hs-boot +0/−13
- GI/GtkSource/Objects/StyleSchemeChooserWidget.hs +0/−414
- GI/GtkSource/Objects/StyleSchemeChooserWidget.hs-boot +0/−13
- GI/GtkSource/Objects/StyleSchemeManager.hs +0/−477
- GI/GtkSource/Objects/StyleSchemeManager.hs-boot +0/−22
- GI/GtkSource/Objects/View.hs +0/−2958
- GI/GtkSource/Objects/View.hs-boot +0/−74
- GI/GtkSource/Structs.hs +0/−27
- GI/GtkSource/Structs/Encoding.hs +0/−363
- GI/GtkSource/Structs/Encoding.hs-boot +0/−16
- GI/GtkSource/Types.hs +0/−76
- Setup.hs +12/−3
- gi-gtksource.cabal +20/−56
− GI/GtkSource.hs
@@ -1,44 +0,0 @@---{- |-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.GtkSource- ( module GI.GtkSource.Callbacks ,- module GI.GtkSource.Enums ,- module GI.GtkSource.Flags ,- module GI.GtkSource.Functions ,- module GI.GtkSource.Interfaces ,- module GI.GtkSource.Objects ,- module GI.GtkSource.Structs ,---- module Data.GI.Base ,--- ) where--import GI.GtkSource.Callbacks-import GI.GtkSource.Enums-import GI.GtkSource.Flags-import GI.GtkSource.Functions-import GI.GtkSource.Interfaces-import GI.GtkSource.Objects-import GI.GtkSource.Structs--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks--import Data.GI.Base-
− GI/GtkSource/Callbacks.hs
@@ -1,21 +0,0 @@---{- |-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.GtkSource.Callbacks () where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types---
− GI/GtkSource/Enums.hs
@@ -1,369 +0,0 @@---{- |-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.GtkSource.Enums- ( - catchFileSaverError ,- handleFileSaverError ,- catchFileLoaderError ,- handleFileLoaderError ,- catchCompletionError ,- handleCompletionError ,---- * Exported types- ViewGutterPosition(..) ,- SmartHomeEndType(..) ,- NewlineType(..) ,- GutterRendererAlignmentMode(..) ,- FileSaverError(..) ,- FileLoaderError(..) ,- CompressionType(..) ,- CompletionError(..) ,- ChangeCaseType(..) ,- BracketMatchType(..) ,- BackgroundPatternType(..) ,--- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map------- Enum ViewGutterPosition--data ViewGutterPosition = - ViewGutterPositionLines- | ViewGutterPositionMarks- | AnotherViewGutterPosition Int- deriving (Show, Eq)--instance Enum ViewGutterPosition where- fromEnum ViewGutterPositionLines = -30- fromEnum ViewGutterPositionMarks = -20- fromEnum (AnotherViewGutterPosition k) = k-- toEnum -30 = ViewGutterPositionLines- toEnum -20 = ViewGutterPositionMarks- toEnum k = AnotherViewGutterPosition k--foreign import ccall "gtk_source_view_gutter_position_get_type" c_gtk_source_view_gutter_position_get_type :: - IO GType--instance BoxedEnum ViewGutterPosition where- boxedEnumType _ = c_gtk_source_view_gutter_position_get_type---- Enum SmartHomeEndType--data SmartHomeEndType = - SmartHomeEndTypeDisabled- | SmartHomeEndTypeBefore- | SmartHomeEndTypeAfter- | SmartHomeEndTypeAlways- | AnotherSmartHomeEndType Int- deriving (Show, Eq)--instance Enum SmartHomeEndType where- fromEnum SmartHomeEndTypeDisabled = 0- fromEnum SmartHomeEndTypeBefore = 1- fromEnum SmartHomeEndTypeAfter = 2- fromEnum SmartHomeEndTypeAlways = 3- fromEnum (AnotherSmartHomeEndType k) = k-- toEnum 0 = SmartHomeEndTypeDisabled- toEnum 1 = SmartHomeEndTypeBefore- toEnum 2 = SmartHomeEndTypeAfter- toEnum 3 = SmartHomeEndTypeAlways- toEnum k = AnotherSmartHomeEndType k--foreign import ccall "gtk_source_smart_home_end_type_get_type" c_gtk_source_smart_home_end_type_get_type :: - IO GType--instance BoxedEnum SmartHomeEndType where- boxedEnumType _ = c_gtk_source_smart_home_end_type_get_type---- Enum NewlineType--data NewlineType = - NewlineTypeLf- | NewlineTypeCr- | NewlineTypeCrLf- | AnotherNewlineType Int- deriving (Show, Eq)--instance Enum NewlineType where- fromEnum NewlineTypeLf = 0- fromEnum NewlineTypeCr = 1- fromEnum NewlineTypeCrLf = 2- fromEnum (AnotherNewlineType k) = k-- toEnum 0 = NewlineTypeLf- toEnum 1 = NewlineTypeCr- toEnum 2 = NewlineTypeCrLf- toEnum k = AnotherNewlineType k--foreign import ccall "gtk_source_newline_type_get_type" c_gtk_source_newline_type_get_type :: - IO GType--instance BoxedEnum NewlineType where- boxedEnumType _ = c_gtk_source_newline_type_get_type---- Enum GutterRendererAlignmentMode--data GutterRendererAlignmentMode = - GutterRendererAlignmentModeCell- | GutterRendererAlignmentModeFirst- | GutterRendererAlignmentModeLast- | AnotherGutterRendererAlignmentMode Int- deriving (Show, Eq)--instance Enum GutterRendererAlignmentMode where- fromEnum GutterRendererAlignmentModeCell = 0- fromEnum GutterRendererAlignmentModeFirst = 1- fromEnum GutterRendererAlignmentModeLast = 2- fromEnum (AnotherGutterRendererAlignmentMode k) = k-- toEnum 0 = GutterRendererAlignmentModeCell- toEnum 1 = GutterRendererAlignmentModeFirst- toEnum 2 = GutterRendererAlignmentModeLast- toEnum k = AnotherGutterRendererAlignmentMode k--foreign import ccall "gtk_source_gutter_renderer_alignment_mode_get_type" c_gtk_source_gutter_renderer_alignment_mode_get_type :: - IO GType--instance BoxedEnum GutterRendererAlignmentMode where- boxedEnumType _ = c_gtk_source_gutter_renderer_alignment_mode_get_type---- Enum FileSaverError--data FileSaverError = - FileSaverErrorInvalidChars- | FileSaverErrorExternallyModified- | AnotherFileSaverError Int- deriving (Show, Eq)--instance Enum FileSaverError where- fromEnum FileSaverErrorInvalidChars = 0- fromEnum FileSaverErrorExternallyModified = 1- fromEnum (AnotherFileSaverError k) = k-- toEnum 0 = FileSaverErrorInvalidChars- toEnum 1 = FileSaverErrorExternallyModified- toEnum k = AnotherFileSaverError k--instance GErrorClass FileSaverError where- gerrorClassDomain _ = "gtk-source-file-saver-error"--catchFileSaverError ::- IO a ->- (FileSaverError -> GErrorMessage -> IO a) ->- IO a-catchFileSaverError = catchGErrorJustDomain--handleFileSaverError ::- (FileSaverError -> GErrorMessage -> IO a) ->- IO a ->- IO a-handleFileSaverError = handleGErrorJustDomain--foreign import ccall "gtk_source_file_saver_error_get_type" c_gtk_source_file_saver_error_get_type :: - IO GType--instance BoxedEnum FileSaverError where- boxedEnumType _ = c_gtk_source_file_saver_error_get_type---- Enum FileLoaderError--data FileLoaderError = - FileLoaderErrorTooBig- | FileLoaderErrorEncodingAutoDetectionFailed- | FileLoaderErrorConversionFallback- | AnotherFileLoaderError Int- deriving (Show, Eq)--instance Enum FileLoaderError where- fromEnum FileLoaderErrorTooBig = 0- fromEnum FileLoaderErrorEncodingAutoDetectionFailed = 1- fromEnum FileLoaderErrorConversionFallback = 2- fromEnum (AnotherFileLoaderError k) = k-- toEnum 0 = FileLoaderErrorTooBig- toEnum 1 = FileLoaderErrorEncodingAutoDetectionFailed- toEnum 2 = FileLoaderErrorConversionFallback- toEnum k = AnotherFileLoaderError k--instance GErrorClass FileLoaderError where- gerrorClassDomain _ = "gtk-source-file-loader-error"--catchFileLoaderError ::- IO a ->- (FileLoaderError -> GErrorMessage -> IO a) ->- IO a-catchFileLoaderError = catchGErrorJustDomain--handleFileLoaderError ::- (FileLoaderError -> GErrorMessage -> IO a) ->- IO a ->- IO a-handleFileLoaderError = handleGErrorJustDomain--foreign import ccall "gtk_source_file_loader_error_get_type" c_gtk_source_file_loader_error_get_type :: - IO GType--instance BoxedEnum FileLoaderError where- boxedEnumType _ = c_gtk_source_file_loader_error_get_type---- Enum CompressionType--data CompressionType = - CompressionTypeNone- | CompressionTypeGzip- | AnotherCompressionType Int- deriving (Show, Eq)--instance Enum CompressionType where- fromEnum CompressionTypeNone = 0- fromEnum CompressionTypeGzip = 1- fromEnum (AnotherCompressionType k) = k-- toEnum 0 = CompressionTypeNone- toEnum 1 = CompressionTypeGzip- toEnum k = AnotherCompressionType k--foreign import ccall "gtk_source_compression_type_get_type" c_gtk_source_compression_type_get_type :: - IO GType--instance BoxedEnum CompressionType where- boxedEnumType _ = c_gtk_source_compression_type_get_type---- Enum CompletionError--data CompletionError = - CompletionErrorAlreadyBound- | CompletionErrorNotBound- | AnotherCompletionError Int- deriving (Show, Eq)--instance Enum CompletionError where- fromEnum CompletionErrorAlreadyBound = 0- fromEnum CompletionErrorNotBound = 1- fromEnum (AnotherCompletionError k) = k-- toEnum 0 = CompletionErrorAlreadyBound- toEnum 1 = CompletionErrorNotBound- toEnum k = AnotherCompletionError k--instance GErrorClass CompletionError where- gerrorClassDomain _ = "gtk-source-completion-error-quark"--catchCompletionError ::- IO a ->- (CompletionError -> GErrorMessage -> IO a) ->- IO a-catchCompletionError = catchGErrorJustDomain--handleCompletionError ::- (CompletionError -> GErrorMessage -> IO a) ->- IO a ->- IO a-handleCompletionError = handleGErrorJustDomain--foreign import ccall "gtk_source_completion_error_get_type" c_gtk_source_completion_error_get_type :: - IO GType--instance BoxedEnum CompletionError where- boxedEnumType _ = c_gtk_source_completion_error_get_type---- Enum ChangeCaseType--data ChangeCaseType = - ChangeCaseTypeLower- | ChangeCaseTypeUpper- | ChangeCaseTypeToggle- | ChangeCaseTypeTitle- | AnotherChangeCaseType Int- deriving (Show, Eq)--instance Enum ChangeCaseType where- fromEnum ChangeCaseTypeLower = 0- fromEnum ChangeCaseTypeUpper = 1- fromEnum ChangeCaseTypeToggle = 2- fromEnum ChangeCaseTypeTitle = 3- fromEnum (AnotherChangeCaseType k) = k-- toEnum 0 = ChangeCaseTypeLower- toEnum 1 = ChangeCaseTypeUpper- toEnum 2 = ChangeCaseTypeToggle- toEnum 3 = ChangeCaseTypeTitle- toEnum k = AnotherChangeCaseType k--foreign import ccall "gtk_source_change_case_type_get_type" c_gtk_source_change_case_type_get_type :: - IO GType--instance BoxedEnum ChangeCaseType where- boxedEnumType _ = c_gtk_source_change_case_type_get_type---- Enum BracketMatchType--data BracketMatchType = - BracketMatchTypeNone- | BracketMatchTypeOutOfRange- | BracketMatchTypeNotFound- | BracketMatchTypeFound- | AnotherBracketMatchType Int- deriving (Show, Eq)--instance Enum BracketMatchType where- fromEnum BracketMatchTypeNone = 0- fromEnum BracketMatchTypeOutOfRange = 1- fromEnum BracketMatchTypeNotFound = 2- fromEnum BracketMatchTypeFound = 3- fromEnum (AnotherBracketMatchType k) = k-- toEnum 0 = BracketMatchTypeNone- toEnum 1 = BracketMatchTypeOutOfRange- toEnum 2 = BracketMatchTypeNotFound- toEnum 3 = BracketMatchTypeFound- toEnum k = AnotherBracketMatchType k--foreign import ccall "gtk_source_bracket_match_type_get_type" c_gtk_source_bracket_match_type_get_type :: - IO GType--instance BoxedEnum BracketMatchType where- boxedEnumType _ = c_gtk_source_bracket_match_type_get_type---- Enum BackgroundPatternType--data BackgroundPatternType = - BackgroundPatternTypeNone- | BackgroundPatternTypeGrid- | AnotherBackgroundPatternType Int- deriving (Show, Eq)--instance Enum BackgroundPatternType where- fromEnum BackgroundPatternTypeNone = 0- fromEnum BackgroundPatternTypeGrid = 1- fromEnum (AnotherBackgroundPatternType k) = k-- toEnum 0 = BackgroundPatternTypeNone- toEnum 1 = BackgroundPatternTypeGrid- toEnum k = AnotherBackgroundPatternType k--foreign import ccall "gtk_source_background_pattern_type_get_type" c_gtk_source_background_pattern_type_get_type :: - IO GType--instance BoxedEnum BackgroundPatternType where- boxedEnumType _ = c_gtk_source_background_pattern_type_get_type--
− GI/GtkSource/Flags.hs
@@ -1,196 +0,0 @@---{- |-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.GtkSource.Flags- ( ---- * Exported types- SortFlags(..) ,- GutterRendererState(..) ,- FileSaverFlags(..) ,- DrawSpacesFlags(..) ,- CompletionActivation(..) ,--- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map------- Flags SortFlags--data SortFlags = - SortFlagsNone- | SortFlagsCaseSensitive- | SortFlagsReverseOrder- | SortFlagsRemoveDuplicates- | AnotherSortFlags Int- deriving (Show, Eq)--instance Enum SortFlags where- fromEnum SortFlagsNone = 0- fromEnum SortFlagsCaseSensitive = 1- fromEnum SortFlagsReverseOrder = 2- fromEnum SortFlagsRemoveDuplicates = 4- fromEnum (AnotherSortFlags k) = k-- toEnum 0 = SortFlagsNone- toEnum 1 = SortFlagsCaseSensitive- toEnum 2 = SortFlagsReverseOrder- toEnum 4 = SortFlagsRemoveDuplicates- toEnum k = AnotherSortFlags k--foreign import ccall "gtk_source_sort_flags_get_type" c_gtk_source_sort_flags_get_type :: - IO GType--instance BoxedFlags SortFlags where- boxedFlagsType _ = c_gtk_source_sort_flags_get_type--instance IsGFlag SortFlags---- Flags GutterRendererState--data GutterRendererState = - GutterRendererStateNormal- | GutterRendererStateCursor- | GutterRendererStatePrelit- | GutterRendererStateSelected- | AnotherGutterRendererState Int- deriving (Show, Eq)--instance Enum GutterRendererState where- fromEnum GutterRendererStateNormal = 0- fromEnum GutterRendererStateCursor = 1- fromEnum GutterRendererStatePrelit = 2- fromEnum GutterRendererStateSelected = 4- fromEnum (AnotherGutterRendererState k) = k-- toEnum 0 = GutterRendererStateNormal- toEnum 1 = GutterRendererStateCursor- toEnum 2 = GutterRendererStatePrelit- toEnum 4 = GutterRendererStateSelected- toEnum k = AnotherGutterRendererState k--foreign import ccall "gtk_source_gutter_renderer_state_get_type" c_gtk_source_gutter_renderer_state_get_type :: - IO GType--instance BoxedFlags GutterRendererState where- boxedFlagsType _ = c_gtk_source_gutter_renderer_state_get_type--instance IsGFlag GutterRendererState---- Flags FileSaverFlags--data FileSaverFlags = - FileSaverFlagsNone- | FileSaverFlagsIgnoreInvalidChars- | FileSaverFlagsIgnoreModificationTime- | FileSaverFlagsCreateBackup- | AnotherFileSaverFlags Int- deriving (Show, Eq)--instance Enum FileSaverFlags where- fromEnum FileSaverFlagsNone = 0- fromEnum FileSaverFlagsIgnoreInvalidChars = 1- fromEnum FileSaverFlagsIgnoreModificationTime = 2- fromEnum FileSaverFlagsCreateBackup = 4- fromEnum (AnotherFileSaverFlags k) = k-- toEnum 0 = FileSaverFlagsNone- toEnum 1 = FileSaverFlagsIgnoreInvalidChars- toEnum 2 = FileSaverFlagsIgnoreModificationTime- toEnum 4 = FileSaverFlagsCreateBackup- toEnum k = AnotherFileSaverFlags k--foreign import ccall "gtk_source_file_saver_flags_get_type" c_gtk_source_file_saver_flags_get_type :: - IO GType--instance BoxedFlags FileSaverFlags where- boxedFlagsType _ = c_gtk_source_file_saver_flags_get_type--instance IsGFlag FileSaverFlags---- Flags DrawSpacesFlags--data DrawSpacesFlags = - DrawSpacesFlagsSpace- | DrawSpacesFlagsTab- | DrawSpacesFlagsNewline- | DrawSpacesFlagsNbsp- | DrawSpacesFlagsLeading- | DrawSpacesFlagsText- | DrawSpacesFlagsTrailing- | DrawSpacesFlagsAll- | AnotherDrawSpacesFlags Int- deriving (Show, Eq)--instance Enum DrawSpacesFlags where- fromEnum DrawSpacesFlagsSpace = 1- fromEnum DrawSpacesFlagsTab = 2- fromEnum DrawSpacesFlagsNewline = 4- fromEnum DrawSpacesFlagsNbsp = 8- fromEnum DrawSpacesFlagsLeading = 16- fromEnum DrawSpacesFlagsText = 32- fromEnum DrawSpacesFlagsTrailing = 64- fromEnum DrawSpacesFlagsAll = 127- fromEnum (AnotherDrawSpacesFlags k) = k-- toEnum 1 = DrawSpacesFlagsSpace- toEnum 2 = DrawSpacesFlagsTab- toEnum 4 = DrawSpacesFlagsNewline- toEnum 8 = DrawSpacesFlagsNbsp- toEnum 16 = DrawSpacesFlagsLeading- toEnum 32 = DrawSpacesFlagsText- toEnum 64 = DrawSpacesFlagsTrailing- toEnum 127 = DrawSpacesFlagsAll- toEnum k = AnotherDrawSpacesFlags k--foreign import ccall "gtk_source_draw_spaces_flags_get_type" c_gtk_source_draw_spaces_flags_get_type :: - IO GType--instance BoxedFlags DrawSpacesFlags where- boxedFlagsType _ = c_gtk_source_draw_spaces_flags_get_type--instance IsGFlag DrawSpacesFlags---- Flags CompletionActivation--data CompletionActivation = - CompletionActivationNone- | CompletionActivationInteractive- | CompletionActivationUserRequested- | AnotherCompletionActivation Int- deriving (Show, Eq)--instance Enum CompletionActivation where- fromEnum CompletionActivationNone = 0- fromEnum CompletionActivationInteractive = 1- fromEnum CompletionActivationUserRequested = 2- fromEnum (AnotherCompletionActivation k) = k-- toEnum 0 = CompletionActivationNone- toEnum 1 = CompletionActivationInteractive- toEnum 2 = CompletionActivationUserRequested- toEnum k = AnotherCompletionActivation k--foreign import ccall "gtk_source_completion_activation_get_type" c_gtk_source_completion_activation_get_type :: - IO GType--instance BoxedFlags CompletionActivation where- boxedFlagsType _ = c_gtk_source_completion_activation_get_type--instance IsGFlag CompletionActivation--
− GI/GtkSource/Functions.hs
@@ -1,87 +0,0 @@---{- |-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.GtkSource.Functions- ( -- -- * Methods--- ** utilsEscapeSearchText- utilsEscapeSearchText ,----- ** utilsUnescapeSearchText- utilsUnescapeSearchText ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks---- function gtk_source_utils_unescape_search_text--- Args : [Arg {argCName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_utils_unescape_search_text" gtk_source_utils_unescape_search_text :: - CString -> -- text : TBasicType TUTF8- IO CString---utilsUnescapeSearchText ::- (MonadIO m) =>- T.Text -- text- -> m T.Text -- result-utilsUnescapeSearchText text = liftIO $ do- text' <- textToCString text- result <- gtk_source_utils_unescape_search_text text'- checkUnexpectedReturnNULL "gtk_source_utils_unescape_search_text" result- result' <- cstringToText result- freeMem result- freeMem text'- return result'----- function gtk_source_utils_escape_search_text--- Args : [Arg {argCName = "text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_utils_escape_search_text" gtk_source_utils_escape_search_text :: - CString -> -- text : TBasicType TUTF8- IO CString---utilsEscapeSearchText ::- (MonadIO m) =>- T.Text -- text- -> m T.Text -- result-utilsEscapeSearchText text = liftIO $ do- text' <- textToCString text- result <- gtk_source_utils_escape_search_text text'- checkUnexpectedReturnNULL "gtk_source_utils_escape_search_text" result- result' <- cstringToText result- freeMem result- freeMem text'- return result'---
− GI/GtkSource/Interfaces.hs
@@ -1,33 +0,0 @@---{- |-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.GtkSource.Interfaces- ( module GI.GtkSource.Interfaces.CompletionProposal,- module GI.GtkSource.Interfaces.CompletionProvider,- module GI.GtkSource.Interfaces.StyleSchemeChooser,- module GI.GtkSource.Interfaces.UndoManager,--- ) where--import GI.GtkSource.Interfaces.CompletionProposal-import GI.GtkSource.Interfaces.CompletionProvider-import GI.GtkSource.Interfaces.StyleSchemeChooser-import GI.GtkSource.Interfaces.UndoManager--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks--
− GI/GtkSource/Interfaces/CompletionProposal.hs
@@ -1,514 +0,0 @@---{- |-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.GtkSource.Interfaces.CompletionProposal- ( ---- * Exported types- CompletionProposal(..) ,- noCompletionProposal ,- CompletionProposalK ,- toCompletionProposal ,--- -- * Methods--- ** completionProposalChanged- CompletionProposalChangedMethodInfo ,- completionProposalChanged ,----- ** completionProposalEqual- CompletionProposalEqualMethodInfo ,- completionProposalEqual ,----- ** completionProposalGetGicon- CompletionProposalGetGiconMethodInfo ,- completionProposalGetGicon ,----- ** completionProposalGetIcon- CompletionProposalGetIconMethodInfo ,- completionProposalGetIcon ,----- ** completionProposalGetIconName- CompletionProposalGetIconNameMethodInfo ,- completionProposalGetIconName ,----- ** completionProposalGetInfo- CompletionProposalGetInfoMethodInfo ,- completionProposalGetInfo ,----- ** completionProposalGetLabel- CompletionProposalGetLabelMethodInfo ,- completionProposalGetLabel ,----- ** completionProposalGetMarkup- CompletionProposalGetMarkupMethodInfo ,- completionProposalGetMarkup ,----- ** completionProposalGetText- CompletionProposalGetTextMethodInfo ,- completionProposalGetText ,----- ** completionProposalHash- CompletionProposalHashMethodInfo ,- completionProposalHash ,----- -- * Signals--- ** Changed- CompletionProposalChangedCallback ,- CompletionProposalChangedCallbackC ,- CompletionProposalChangedSignalInfo ,- afterCompletionProposalChanged ,- completionProposalChangedCallbackWrapper,- completionProposalChangedClosure ,- mkCompletionProposalChangedCallback ,- noCompletionProposalChangedCallback ,- onCompletionProposalChanged ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.GdkPixbuf as GdkPixbuf-import qualified GI.Gio as Gio---- interface CompletionProposal --newtype CompletionProposal = CompletionProposal (ForeignPtr CompletionProposal)-noCompletionProposal :: Maybe CompletionProposal-noCompletionProposal = Nothing--type family ResolveCompletionProposalMethod (t :: Symbol) (o :: *) :: * where- ResolveCompletionProposalMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveCompletionProposalMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveCompletionProposalMethod "changed" o = CompletionProposalChangedMethodInfo- ResolveCompletionProposalMethod "equal" o = CompletionProposalEqualMethodInfo- ResolveCompletionProposalMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveCompletionProposalMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveCompletionProposalMethod "hash" o = CompletionProposalHashMethodInfo- ResolveCompletionProposalMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveCompletionProposalMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveCompletionProposalMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveCompletionProposalMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveCompletionProposalMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveCompletionProposalMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveCompletionProposalMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveCompletionProposalMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveCompletionProposalMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveCompletionProposalMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveCompletionProposalMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveCompletionProposalMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveCompletionProposalMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveCompletionProposalMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveCompletionProposalMethod "getGicon" o = CompletionProposalGetGiconMethodInfo- ResolveCompletionProposalMethod "getIcon" o = CompletionProposalGetIconMethodInfo- ResolveCompletionProposalMethod "getIconName" o = CompletionProposalGetIconNameMethodInfo- ResolveCompletionProposalMethod "getInfo" o = CompletionProposalGetInfoMethodInfo- ResolveCompletionProposalMethod "getLabel" o = CompletionProposalGetLabelMethodInfo- ResolveCompletionProposalMethod "getMarkup" o = CompletionProposalGetMarkupMethodInfo- ResolveCompletionProposalMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveCompletionProposalMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveCompletionProposalMethod "getText" o = CompletionProposalGetTextMethodInfo- ResolveCompletionProposalMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveCompletionProposalMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveCompletionProposalMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveCompletionProposalMethod t CompletionProposal, MethodInfo info CompletionProposal p) => IsLabelProxy t (CompletionProposal -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveCompletionProposalMethod t CompletionProposal, MethodInfo info CompletionProposal p) => IsLabel t (CompletionProposal -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- signal CompletionProposal::changed-type CompletionProposalChangedCallback =- IO ()--noCompletionProposalChangedCallback :: Maybe CompletionProposalChangedCallback-noCompletionProposalChangedCallback = Nothing--type CompletionProposalChangedCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkCompletionProposalChangedCallback :: CompletionProposalChangedCallbackC -> IO (FunPtr CompletionProposalChangedCallbackC)--completionProposalChangedClosure :: CompletionProposalChangedCallback -> IO Closure-completionProposalChangedClosure cb = newCClosure =<< mkCompletionProposalChangedCallback wrapped- where wrapped = completionProposalChangedCallbackWrapper cb--completionProposalChangedCallbackWrapper ::- CompletionProposalChangedCallback ->- Ptr () ->- Ptr () ->- IO ()-completionProposalChangedCallbackWrapper _cb _ _ = do- _cb --onCompletionProposalChanged :: (GObject a, MonadIO m) => a -> CompletionProposalChangedCallback -> m SignalHandlerId-onCompletionProposalChanged obj cb = liftIO $ connectCompletionProposalChanged obj cb SignalConnectBefore-afterCompletionProposalChanged :: (GObject a, MonadIO m) => a -> CompletionProposalChangedCallback -> m SignalHandlerId-afterCompletionProposalChanged obj cb = connectCompletionProposalChanged obj cb SignalConnectAfter--connectCompletionProposalChanged :: (GObject a, MonadIO m) =>- a -> CompletionProposalChangedCallback -> SignalConnectMode -> m SignalHandlerId-connectCompletionProposalChanged obj cb after = liftIO $ do- cb' <- mkCompletionProposalChangedCallback (completionProposalChangedCallbackWrapper cb)- connectSignalFunPtr obj "changed" cb' after--type instance AttributeList CompletionProposal = CompletionProposalAttributeList-type CompletionProposalAttributeList = ('[ ] :: [(Symbol, *)])--data CompletionProposalChangedSignalInfo-instance SignalInfo CompletionProposalChangedSignalInfo where- type HaskellCallbackType CompletionProposalChangedSignalInfo = CompletionProposalChangedCallback- connectSignal _ = connectCompletionProposalChanged--type instance SignalList CompletionProposal = CompletionProposalSignalList-type CompletionProposalSignalList = ('[ '("changed", CompletionProposalChangedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])--foreign import ccall "gtk_source_completion_proposal_get_type"- c_gtk_source_completion_proposal_get_type :: IO GType--type instance ParentTypes CompletionProposal = CompletionProposalParentTypes-type CompletionProposalParentTypes = '[GObject.Object]--instance GObject CompletionProposal where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_completion_proposal_get_type- --class GObject o => CompletionProposalK o-instance (GObject o, IsDescendantOf CompletionProposal o) => CompletionProposalK o--toCompletionProposal :: CompletionProposalK o => o -> IO CompletionProposal-toCompletionProposal = unsafeCastTo CompletionProposal---- method CompletionProposal::changed--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_proposal_changed" gtk_source_completion_proposal_changed :: - Ptr CompletionProposal -> -- _obj : TInterface "GtkSource" "CompletionProposal"- IO ()---completionProposalChanged ::- (MonadIO m, CompletionProposalK a) =>- a -- _obj- -> m () -- result-completionProposalChanged _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_completion_proposal_changed _obj'- touchManagedPtr _obj- return ()--data CompletionProposalChangedMethodInfo-instance (signature ~ (m ()), MonadIO m, CompletionProposalK a) => MethodInfo CompletionProposalChangedMethodInfo a signature where- overloadedMethod _ = completionProposalChanged---- method CompletionProposal::equal--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "other", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_proposal_equal" gtk_source_completion_proposal_equal :: - Ptr CompletionProposal -> -- _obj : TInterface "GtkSource" "CompletionProposal"- Ptr CompletionProposal -> -- other : TInterface "GtkSource" "CompletionProposal"- IO CInt---completionProposalEqual ::- (MonadIO m, CompletionProposalK a, CompletionProposalK b) =>- a -- _obj- -> b -- other- -> m Bool -- result-completionProposalEqual _obj other = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let other' = unsafeManagedPtrCastPtr other- result <- gtk_source_completion_proposal_equal _obj' other'- let result' = (/= 0) result- touchManagedPtr _obj- touchManagedPtr other- return result'--data CompletionProposalEqualMethodInfo-instance (signature ~ (b -> m Bool), MonadIO m, CompletionProposalK a, CompletionProposalK b) => MethodInfo CompletionProposalEqualMethodInfo a signature where- overloadedMethod _ = completionProposalEqual---- method CompletionProposal::get_gicon--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gio" "Icon")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_proposal_get_gicon" gtk_source_completion_proposal_get_gicon :: - Ptr CompletionProposal -> -- _obj : TInterface "GtkSource" "CompletionProposal"- IO (Ptr Gio.Icon)---completionProposalGetGicon ::- (MonadIO m, CompletionProposalK a) =>- a -- _obj- -> m (Maybe Gio.Icon) -- result-completionProposalGetGicon _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_proposal_get_gicon _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject Gio.Icon) result'- return result''- touchManagedPtr _obj- return maybeResult--data CompletionProposalGetGiconMethodInfo-instance (signature ~ (m (Maybe Gio.Icon)), MonadIO m, CompletionProposalK a) => MethodInfo CompletionProposalGetGiconMethodInfo a signature where- overloadedMethod _ = completionProposalGetGicon---- method CompletionProposal::get_icon--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GdkPixbuf" "Pixbuf")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_proposal_get_icon" gtk_source_completion_proposal_get_icon :: - Ptr CompletionProposal -> -- _obj : TInterface "GtkSource" "CompletionProposal"- IO (Ptr GdkPixbuf.Pixbuf)---completionProposalGetIcon ::- (MonadIO m, CompletionProposalK a) =>- a -- _obj- -> m (Maybe GdkPixbuf.Pixbuf) -- result-completionProposalGetIcon _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_proposal_get_icon _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject GdkPixbuf.Pixbuf) result'- return result''- touchManagedPtr _obj- return maybeResult--data CompletionProposalGetIconMethodInfo-instance (signature ~ (m (Maybe GdkPixbuf.Pixbuf)), MonadIO m, CompletionProposalK a) => MethodInfo CompletionProposalGetIconMethodInfo a signature where- overloadedMethod _ = completionProposalGetIcon---- method CompletionProposal::get_icon_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_proposal_get_icon_name" gtk_source_completion_proposal_get_icon_name :: - Ptr CompletionProposal -> -- _obj : TInterface "GtkSource" "CompletionProposal"- IO CString---completionProposalGetIconName ::- (MonadIO m, CompletionProposalK a) =>- a -- _obj- -> m (Maybe T.Text) -- result-completionProposalGetIconName _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_proposal_get_icon_name _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- cstringToText result'- return result''- touchManagedPtr _obj- return maybeResult--data CompletionProposalGetIconNameMethodInfo-instance (signature ~ (m (Maybe T.Text)), MonadIO m, CompletionProposalK a) => MethodInfo CompletionProposalGetIconNameMethodInfo a signature where- overloadedMethod _ = completionProposalGetIconName---- method CompletionProposal::get_info--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_proposal_get_info" gtk_source_completion_proposal_get_info :: - Ptr CompletionProposal -> -- _obj : TInterface "GtkSource" "CompletionProposal"- IO CString---completionProposalGetInfo ::- (MonadIO m, CompletionProposalK a) =>- a -- _obj- -> m (Maybe T.Text) -- result-completionProposalGetInfo _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_proposal_get_info _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- cstringToText result'- freeMem result'- return result''- touchManagedPtr _obj- return maybeResult--data CompletionProposalGetInfoMethodInfo-instance (signature ~ (m (Maybe T.Text)), MonadIO m, CompletionProposalK a) => MethodInfo CompletionProposalGetInfoMethodInfo a signature where- overloadedMethod _ = completionProposalGetInfo---- method CompletionProposal::get_label--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_proposal_get_label" gtk_source_completion_proposal_get_label :: - Ptr CompletionProposal -> -- _obj : TInterface "GtkSource" "CompletionProposal"- IO CString---completionProposalGetLabel ::- (MonadIO m, CompletionProposalK a) =>- a -- _obj- -> m T.Text -- result-completionProposalGetLabel _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_proposal_get_label _obj'- checkUnexpectedReturnNULL "gtk_source_completion_proposal_get_label" result- result' <- cstringToText result- freeMem result- touchManagedPtr _obj- return result'--data CompletionProposalGetLabelMethodInfo-instance (signature ~ (m T.Text), MonadIO m, CompletionProposalK a) => MethodInfo CompletionProposalGetLabelMethodInfo a signature where- overloadedMethod _ = completionProposalGetLabel---- method CompletionProposal::get_markup--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_proposal_get_markup" gtk_source_completion_proposal_get_markup :: - Ptr CompletionProposal -> -- _obj : TInterface "GtkSource" "CompletionProposal"- IO CString---completionProposalGetMarkup ::- (MonadIO m, CompletionProposalK a) =>- a -- _obj- -> m T.Text -- result-completionProposalGetMarkup _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_proposal_get_markup _obj'- checkUnexpectedReturnNULL "gtk_source_completion_proposal_get_markup" result- result' <- cstringToText result- freeMem result- touchManagedPtr _obj- return result'--data CompletionProposalGetMarkupMethodInfo-instance (signature ~ (m T.Text), MonadIO m, CompletionProposalK a) => MethodInfo CompletionProposalGetMarkupMethodInfo a signature where- overloadedMethod _ = completionProposalGetMarkup---- method CompletionProposal::get_text--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_proposal_get_text" gtk_source_completion_proposal_get_text :: - Ptr CompletionProposal -> -- _obj : TInterface "GtkSource" "CompletionProposal"- IO CString---completionProposalGetText ::- (MonadIO m, CompletionProposalK a) =>- a -- _obj- -> m T.Text -- result-completionProposalGetText _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_proposal_get_text _obj'- checkUnexpectedReturnNULL "gtk_source_completion_proposal_get_text" result- result' <- cstringToText result- freeMem result- touchManagedPtr _obj- return result'--data CompletionProposalGetTextMethodInfo-instance (signature ~ (m T.Text), MonadIO m, CompletionProposalK a) => MethodInfo CompletionProposalGetTextMethodInfo a signature where- overloadedMethod _ = completionProposalGetText---- method CompletionProposal::hash--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_proposal_hash" gtk_source_completion_proposal_hash :: - Ptr CompletionProposal -> -- _obj : TInterface "GtkSource" "CompletionProposal"- IO Word32---completionProposalHash ::- (MonadIO m, CompletionProposalK a) =>- a -- _obj- -> m Word32 -- result-completionProposalHash _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_proposal_hash _obj'- touchManagedPtr _obj- return result--data CompletionProposalHashMethodInfo-instance (signature ~ (m Word32), MonadIO m, CompletionProposalK a) => MethodInfo CompletionProposalHashMethodInfo a signature where- overloadedMethod _ = completionProposalHash--
− GI/GtkSource/Interfaces/CompletionProposal.hs-boot
@@ -1,24 +0,0 @@-module GI.GtkSource.Interfaces.CompletionProposal where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype CompletionProposal = CompletionProposal (ForeignPtr CompletionProposal)-data CompletionProposalChangedSignalInfo-instance GObject CompletionProposal where-class GObject o => CompletionProposalK o-instance (GObject o, IsDescendantOf CompletionProposal o) => CompletionProposalK o-data CompletionProposalChangedMethodInfo-data CompletionProposalEqualMethodInfo-data CompletionProposalGetGiconMethodInfo-data CompletionProposalGetIconMethodInfo-data CompletionProposalGetIconNameMethodInfo-data CompletionProposalGetInfoMethodInfo-data CompletionProposalGetLabelMethodInfo-data CompletionProposalGetMarkupMethodInfo-data CompletionProposalGetTextMethodInfo-data CompletionProposalHashMethodInfo
− GI/GtkSource/Interfaces/CompletionProvider.hs
@@ -1,587 +0,0 @@---{- |-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.GtkSource.Interfaces.CompletionProvider- ( ---- * Exported types- CompletionProvider(..) ,- noCompletionProvider ,- CompletionProviderK ,- toCompletionProvider ,--- -- * Methods--- ** completionProviderActivateProposal- CompletionProviderActivateProposalMethodInfo,- completionProviderActivateProposal ,----- ** completionProviderGetActivation- CompletionProviderGetActivationMethodInfo,- completionProviderGetActivation ,----- ** completionProviderGetGicon- CompletionProviderGetGiconMethodInfo ,- completionProviderGetGicon ,----- ** completionProviderGetIcon- CompletionProviderGetIconMethodInfo ,- completionProviderGetIcon ,----- ** completionProviderGetIconName- CompletionProviderGetIconNameMethodInfo ,- completionProviderGetIconName ,----- ** completionProviderGetInfoWidget- CompletionProviderGetInfoWidgetMethodInfo,- completionProviderGetInfoWidget ,----- ** completionProviderGetInteractiveDelay- CompletionProviderGetInteractiveDelayMethodInfo,- completionProviderGetInteractiveDelay ,----- ** completionProviderGetName- CompletionProviderGetNameMethodInfo ,- completionProviderGetName ,----- ** completionProviderGetPriority- CompletionProviderGetPriorityMethodInfo ,- completionProviderGetPriority ,----- ** completionProviderGetStartIter- CompletionProviderGetStartIterMethodInfo,- completionProviderGetStartIter ,----- ** completionProviderMatch- CompletionProviderMatchMethodInfo ,- completionProviderMatch ,----- ** completionProviderPopulate- CompletionProviderPopulateMethodInfo ,- completionProviderPopulate ,----- ** completionProviderUpdateInfo- CompletionProviderUpdateInfoMethodInfo ,- completionProviderUpdateInfo ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.GdkPixbuf as GdkPixbuf-import qualified GI.Gio as Gio-import qualified GI.Gtk as Gtk---- interface CompletionProvider --newtype CompletionProvider = CompletionProvider (ForeignPtr CompletionProvider)-noCompletionProvider :: Maybe CompletionProvider-noCompletionProvider = Nothing--type family ResolveCompletionProviderMethod (t :: Symbol) (o :: *) :: * where- ResolveCompletionProviderMethod "activateProposal" o = CompletionProviderActivateProposalMethodInfo- ResolveCompletionProviderMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveCompletionProviderMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveCompletionProviderMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveCompletionProviderMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveCompletionProviderMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveCompletionProviderMethod "match" o = CompletionProviderMatchMethodInfo- ResolveCompletionProviderMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveCompletionProviderMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveCompletionProviderMethod "populate" o = CompletionProviderPopulateMethodInfo- ResolveCompletionProviderMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveCompletionProviderMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveCompletionProviderMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveCompletionProviderMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveCompletionProviderMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveCompletionProviderMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveCompletionProviderMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveCompletionProviderMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveCompletionProviderMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveCompletionProviderMethod "updateInfo" o = CompletionProviderUpdateInfoMethodInfo- ResolveCompletionProviderMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveCompletionProviderMethod "getActivation" o = CompletionProviderGetActivationMethodInfo- ResolveCompletionProviderMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveCompletionProviderMethod "getGicon" o = CompletionProviderGetGiconMethodInfo- ResolveCompletionProviderMethod "getIcon" o = CompletionProviderGetIconMethodInfo- ResolveCompletionProviderMethod "getIconName" o = CompletionProviderGetIconNameMethodInfo- ResolveCompletionProviderMethod "getInfoWidget" o = CompletionProviderGetInfoWidgetMethodInfo- ResolveCompletionProviderMethod "getInteractiveDelay" o = CompletionProviderGetInteractiveDelayMethodInfo- ResolveCompletionProviderMethod "getName" o = CompletionProviderGetNameMethodInfo- ResolveCompletionProviderMethod "getPriority" o = CompletionProviderGetPriorityMethodInfo- ResolveCompletionProviderMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveCompletionProviderMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveCompletionProviderMethod "getStartIter" o = CompletionProviderGetStartIterMethodInfo- ResolveCompletionProviderMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveCompletionProviderMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveCompletionProviderMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveCompletionProviderMethod t CompletionProvider, MethodInfo info CompletionProvider p) => IsLabelProxy t (CompletionProvider -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveCompletionProviderMethod t CompletionProvider, MethodInfo info CompletionProvider p) => IsLabel t (CompletionProvider -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif--type instance AttributeList CompletionProvider = CompletionProviderAttributeList-type CompletionProviderAttributeList = ('[ ] :: [(Symbol, *)])--type instance SignalList CompletionProvider = CompletionProviderSignalList-type CompletionProviderSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])--foreign import ccall "gtk_source_completion_provider_get_type"- c_gtk_source_completion_provider_get_type :: IO GType--type instance ParentTypes CompletionProvider = CompletionProviderParentTypes-type CompletionProviderParentTypes = '[GObject.Object]--instance GObject CompletionProvider where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_completion_provider_get_type- --class GObject o => CompletionProviderK o-instance (GObject o, IsDescendantOf CompletionProvider o) => CompletionProviderK o--toCompletionProvider :: CompletionProviderK o => o -> IO CompletionProvider-toCompletionProvider = unsafeCastTo CompletionProvider---- method CompletionProvider::activate_proposal--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "proposal", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_activate_proposal" gtk_source_completion_provider_activate_proposal :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- Ptr CompletionProposal -> -- proposal : TInterface "GtkSource" "CompletionProposal"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- IO CInt---completionProviderActivateProposal ::- (MonadIO m, CompletionProviderK a, CompletionProposalK b) =>- a -- _obj- -> b -- proposal- -> Gtk.TextIter -- iter- -> m Bool -- result-completionProviderActivateProposal _obj proposal iter = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let proposal' = unsafeManagedPtrCastPtr proposal- let iter' = unsafeManagedPtrGetPtr iter- result <- gtk_source_completion_provider_activate_proposal _obj' proposal' iter'- let result' = (/= 0) result- touchManagedPtr _obj- touchManagedPtr proposal- touchManagedPtr iter- return result'--data CompletionProviderActivateProposalMethodInfo-instance (signature ~ (b -> Gtk.TextIter -> m Bool), MonadIO m, CompletionProviderK a, CompletionProposalK b) => MethodInfo CompletionProviderActivateProposalMethodInfo a signature where- overloadedMethod _ = completionProviderActivateProposal---- method CompletionProvider::get_activation--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompletionActivation")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_get_activation" gtk_source_completion_provider_get_activation :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- IO CUInt---completionProviderGetActivation ::- (MonadIO m, CompletionProviderK a) =>- a -- _obj- -> m [CompletionActivation] -- result-completionProviderGetActivation _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_provider_get_activation _obj'- let result' = wordToGFlags result- touchManagedPtr _obj- return result'--data CompletionProviderGetActivationMethodInfo-instance (signature ~ (m [CompletionActivation]), MonadIO m, CompletionProviderK a) => MethodInfo CompletionProviderGetActivationMethodInfo a signature where- overloadedMethod _ = completionProviderGetActivation---- method CompletionProvider::get_gicon--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gio" "Icon")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_get_gicon" gtk_source_completion_provider_get_gicon :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- IO (Ptr Gio.Icon)---completionProviderGetGicon ::- (MonadIO m, CompletionProviderK a) =>- a -- _obj- -> m (Maybe Gio.Icon) -- result-completionProviderGetGicon _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_provider_get_gicon _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject Gio.Icon) result'- return result''- touchManagedPtr _obj- return maybeResult--data CompletionProviderGetGiconMethodInfo-instance (signature ~ (m (Maybe Gio.Icon)), MonadIO m, CompletionProviderK a) => MethodInfo CompletionProviderGetGiconMethodInfo a signature where- overloadedMethod _ = completionProviderGetGicon---- method CompletionProvider::get_icon--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GdkPixbuf" "Pixbuf")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_get_icon" gtk_source_completion_provider_get_icon :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- IO (Ptr GdkPixbuf.Pixbuf)---completionProviderGetIcon ::- (MonadIO m, CompletionProviderK a) =>- a -- _obj- -> m (Maybe GdkPixbuf.Pixbuf) -- result-completionProviderGetIcon _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_provider_get_icon _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject GdkPixbuf.Pixbuf) result'- return result''- touchManagedPtr _obj- return maybeResult--data CompletionProviderGetIconMethodInfo-instance (signature ~ (m (Maybe GdkPixbuf.Pixbuf)), MonadIO m, CompletionProviderK a) => MethodInfo CompletionProviderGetIconMethodInfo a signature where- overloadedMethod _ = completionProviderGetIcon---- method CompletionProvider::get_icon_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_get_icon_name" gtk_source_completion_provider_get_icon_name :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- IO CString---completionProviderGetIconName ::- (MonadIO m, CompletionProviderK a) =>- a -- _obj- -> m (Maybe T.Text) -- result-completionProviderGetIconName _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_provider_get_icon_name _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- cstringToText result'- return result''- touchManagedPtr _obj- return maybeResult--data CompletionProviderGetIconNameMethodInfo-instance (signature ~ (m (Maybe T.Text)), MonadIO m, CompletionProviderK a) => MethodInfo CompletionProviderGetIconNameMethodInfo a signature where- overloadedMethod _ = completionProviderGetIconName---- method CompletionProvider::get_info_widget--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "proposal", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gtk" "Widget")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_get_info_widget" gtk_source_completion_provider_get_info_widget :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- Ptr CompletionProposal -> -- proposal : TInterface "GtkSource" "CompletionProposal"- IO (Ptr Gtk.Widget)---completionProviderGetInfoWidget ::- (MonadIO m, CompletionProviderK a, CompletionProposalK b) =>- a -- _obj- -> b -- proposal- -> m (Maybe Gtk.Widget) -- result-completionProviderGetInfoWidget _obj proposal = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let proposal' = unsafeManagedPtrCastPtr proposal- result <- gtk_source_completion_provider_get_info_widget _obj' proposal'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject Gtk.Widget) result'- return result''- touchManagedPtr _obj- touchManagedPtr proposal- return maybeResult--data CompletionProviderGetInfoWidgetMethodInfo-instance (signature ~ (b -> m (Maybe Gtk.Widget)), MonadIO m, CompletionProviderK a, CompletionProposalK b) => MethodInfo CompletionProviderGetInfoWidgetMethodInfo a signature where- overloadedMethod _ = completionProviderGetInfoWidget---- method CompletionProvider::get_interactive_delay--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_get_interactive_delay" gtk_source_completion_provider_get_interactive_delay :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- IO Int32---completionProviderGetInteractiveDelay ::- (MonadIO m, CompletionProviderK a) =>- a -- _obj- -> m Int32 -- result-completionProviderGetInteractiveDelay _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_provider_get_interactive_delay _obj'- touchManagedPtr _obj- return result--data CompletionProviderGetInteractiveDelayMethodInfo-instance (signature ~ (m Int32), MonadIO m, CompletionProviderK a) => MethodInfo CompletionProviderGetInteractiveDelayMethodInfo a signature where- overloadedMethod _ = completionProviderGetInteractiveDelay---- method CompletionProvider::get_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_get_name" gtk_source_completion_provider_get_name :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- IO CString---completionProviderGetName ::- (MonadIO m, CompletionProviderK a) =>- a -- _obj- -> m T.Text -- result-completionProviderGetName _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_provider_get_name _obj'- checkUnexpectedReturnNULL "gtk_source_completion_provider_get_name" result- result' <- cstringToText result- freeMem result- touchManagedPtr _obj- return result'--data CompletionProviderGetNameMethodInfo-instance (signature ~ (m T.Text), MonadIO m, CompletionProviderK a) => MethodInfo CompletionProviderGetNameMethodInfo a signature where- overloadedMethod _ = completionProviderGetName---- method CompletionProvider::get_priority--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_get_priority" gtk_source_completion_provider_get_priority :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- IO Int32---completionProviderGetPriority ::- (MonadIO m, CompletionProviderK a) =>- a -- _obj- -> m Int32 -- result-completionProviderGetPriority _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_provider_get_priority _obj'- touchManagedPtr _obj- return result--data CompletionProviderGetPriorityMethodInfo-instance (signature ~ (m Int32), MonadIO m, CompletionProviderK a) => MethodInfo CompletionProviderGetPriorityMethodInfo a signature where- overloadedMethod _ = completionProviderGetPriority---- method CompletionProvider::get_start_iter--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "context", argType = TInterface "GtkSource" "CompletionContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "proposal", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_get_start_iter" gtk_source_completion_provider_get_start_iter :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- Ptr CompletionContext -> -- context : TInterface "GtkSource" "CompletionContext"- Ptr CompletionProposal -> -- proposal : TInterface "GtkSource" "CompletionProposal"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- IO CInt---completionProviderGetStartIter ::- (MonadIO m, CompletionProviderK a, CompletionContextK b, CompletionProposalK c) =>- a -- _obj- -> b -- context- -> c -- proposal- -> m (Bool,Gtk.TextIter) -- result-completionProviderGetStartIter _obj context proposal = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let context' = unsafeManagedPtrCastPtr context- let proposal' = unsafeManagedPtrCastPtr proposal- iter <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- result <- gtk_source_completion_provider_get_start_iter _obj' context' proposal' iter- let result' = (/= 0) result- iter' <- (wrapBoxed Gtk.TextIter) iter- touchManagedPtr _obj- touchManagedPtr context- touchManagedPtr proposal- return (result', iter')--data CompletionProviderGetStartIterMethodInfo-instance (signature ~ (b -> c -> m (Bool,Gtk.TextIter)), MonadIO m, CompletionProviderK a, CompletionContextK b, CompletionProposalK c) => MethodInfo CompletionProviderGetStartIterMethodInfo a signature where- overloadedMethod _ = completionProviderGetStartIter---- method CompletionProvider::match--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "context", argType = TInterface "GtkSource" "CompletionContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_match" gtk_source_completion_provider_match :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- Ptr CompletionContext -> -- context : TInterface "GtkSource" "CompletionContext"- IO CInt---completionProviderMatch ::- (MonadIO m, CompletionProviderK a, CompletionContextK b) =>- a -- _obj- -> b -- context- -> m Bool -- result-completionProviderMatch _obj context = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let context' = unsafeManagedPtrCastPtr context- result <- gtk_source_completion_provider_match _obj' context'- let result' = (/= 0) result- touchManagedPtr _obj- touchManagedPtr context- return result'--data CompletionProviderMatchMethodInfo-instance (signature ~ (b -> m Bool), MonadIO m, CompletionProviderK a, CompletionContextK b) => MethodInfo CompletionProviderMatchMethodInfo a signature where- overloadedMethod _ = completionProviderMatch---- method CompletionProvider::populate--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "context", argType = TInterface "GtkSource" "CompletionContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_populate" gtk_source_completion_provider_populate :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- Ptr CompletionContext -> -- context : TInterface "GtkSource" "CompletionContext"- IO ()---completionProviderPopulate ::- (MonadIO m, CompletionProviderK a, CompletionContextK b) =>- a -- _obj- -> b -- context- -> m () -- result-completionProviderPopulate _obj context = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let context' = unsafeManagedPtrCastPtr context- gtk_source_completion_provider_populate _obj' context'- touchManagedPtr _obj- touchManagedPtr context- return ()--data CompletionProviderPopulateMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, CompletionProviderK a, CompletionContextK b) => MethodInfo CompletionProviderPopulateMethodInfo a signature where- overloadedMethod _ = completionProviderPopulate---- method CompletionProvider::update_info--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "proposal", argType = TInterface "GtkSource" "CompletionProposal", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "info", argType = TInterface "GtkSource" "CompletionInfo", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_provider_update_info" gtk_source_completion_provider_update_info :: - Ptr CompletionProvider -> -- _obj : TInterface "GtkSource" "CompletionProvider"- Ptr CompletionProposal -> -- proposal : TInterface "GtkSource" "CompletionProposal"- Ptr CompletionInfo -> -- info : TInterface "GtkSource" "CompletionInfo"- IO ()---completionProviderUpdateInfo ::- (MonadIO m, CompletionProviderK a, CompletionProposalK b, CompletionInfoK c) =>- a -- _obj- -> b -- proposal- -> c -- info- -> m () -- result-completionProviderUpdateInfo _obj proposal info = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let proposal' = unsafeManagedPtrCastPtr proposal- let info' = unsafeManagedPtrCastPtr info- gtk_source_completion_provider_update_info _obj' proposal' info'- touchManagedPtr _obj- touchManagedPtr proposal- touchManagedPtr info- return ()--data CompletionProviderUpdateInfoMethodInfo-instance (signature ~ (b -> c -> m ()), MonadIO m, CompletionProviderK a, CompletionProposalK b, CompletionInfoK c) => MethodInfo CompletionProviderUpdateInfoMethodInfo a signature where- overloadedMethod _ = completionProviderUpdateInfo--
− GI/GtkSource/Interfaces/CompletionProvider.hs-boot
@@ -1,26 +0,0 @@-module GI.GtkSource.Interfaces.CompletionProvider where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype CompletionProvider = CompletionProvider (ForeignPtr CompletionProvider)-instance GObject CompletionProvider where-class GObject o => CompletionProviderK o-instance (GObject o, IsDescendantOf CompletionProvider o) => CompletionProviderK o-data CompletionProviderActivateProposalMethodInfo-data CompletionProviderGetActivationMethodInfo-data CompletionProviderGetGiconMethodInfo-data CompletionProviderGetIconMethodInfo-data CompletionProviderGetIconNameMethodInfo-data CompletionProviderGetInfoWidgetMethodInfo-data CompletionProviderGetInteractiveDelayMethodInfo-data CompletionProviderGetNameMethodInfo-data CompletionProviderGetPriorityMethodInfo-data CompletionProviderGetStartIterMethodInfo-data CompletionProviderMatchMethodInfo-data CompletionProviderPopulateMethodInfo-data CompletionProviderUpdateInfoMethodInfo
− GI/GtkSource/Interfaces/StyleSchemeChooser.hs
@@ -1,209 +0,0 @@---{- |-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.GtkSource.Interfaces.StyleSchemeChooser- ( ---- * Exported types- StyleSchemeChooser(..) ,- noStyleSchemeChooser ,- StyleSchemeChooserK ,- toStyleSchemeChooser ,--- -- * Methods--- ** styleSchemeChooserGetStyleScheme- StyleSchemeChooserGetStyleSchemeMethodInfo,- styleSchemeChooserGetStyleScheme ,----- ** styleSchemeChooserSetStyleScheme- StyleSchemeChooserSetStyleSchemeMethodInfo,- styleSchemeChooserSetStyleScheme ,----- -- * Properties--- ** StyleScheme- StyleSchemeChooserStyleSchemePropertyInfo,- constructStyleSchemeChooserStyleScheme ,- getStyleSchemeChooserStyleScheme ,- setStyleSchemeChooserStyleScheme ,- styleSchemeChooserStyleScheme ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject---- interface StyleSchemeChooser --newtype StyleSchemeChooser = StyleSchemeChooser (ForeignPtr StyleSchemeChooser)-noStyleSchemeChooser :: Maybe StyleSchemeChooser-noStyleSchemeChooser = Nothing--type family ResolveStyleSchemeChooserMethod (t :: Symbol) (o :: *) :: * where- ResolveStyleSchemeChooserMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveStyleSchemeChooserMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveStyleSchemeChooserMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveStyleSchemeChooserMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveStyleSchemeChooserMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveStyleSchemeChooserMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveStyleSchemeChooserMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveStyleSchemeChooserMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveStyleSchemeChooserMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveStyleSchemeChooserMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveStyleSchemeChooserMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveStyleSchemeChooserMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveStyleSchemeChooserMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveStyleSchemeChooserMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveStyleSchemeChooserMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveStyleSchemeChooserMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveStyleSchemeChooserMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveStyleSchemeChooserMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveStyleSchemeChooserMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveStyleSchemeChooserMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveStyleSchemeChooserMethod "getStyleScheme" o = StyleSchemeChooserGetStyleSchemeMethodInfo- ResolveStyleSchemeChooserMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveStyleSchemeChooserMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveStyleSchemeChooserMethod "setStyleScheme" o = StyleSchemeChooserSetStyleSchemeMethodInfo- ResolveStyleSchemeChooserMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveStyleSchemeChooserMethod t StyleSchemeChooser, MethodInfo info StyleSchemeChooser p) => IsLabelProxy t (StyleSchemeChooser -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveStyleSchemeChooserMethod t StyleSchemeChooser, MethodInfo info StyleSchemeChooser p) => IsLabel t (StyleSchemeChooser -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "style-scheme"- -- Type: TInterface "GtkSource" "StyleScheme"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getStyleSchemeChooserStyleScheme :: (MonadIO m, StyleSchemeChooserK o) => o -> m StyleScheme-getStyleSchemeChooserStyleScheme obj = liftIO $ checkUnexpectedNothing "getStyleSchemeChooserStyleScheme" $ getObjectPropertyObject obj "style-scheme" StyleScheme--setStyleSchemeChooserStyleScheme :: (MonadIO m, StyleSchemeChooserK o, StyleSchemeK a) => o -> a -> m ()-setStyleSchemeChooserStyleScheme obj val = liftIO $ setObjectPropertyObject obj "style-scheme" (Just val)--constructStyleSchemeChooserStyleScheme :: (StyleSchemeK a) => a -> IO ([Char], GValue)-constructStyleSchemeChooserStyleScheme val = constructObjectPropertyObject "style-scheme" (Just val)--data StyleSchemeChooserStyleSchemePropertyInfo-instance AttrInfo StyleSchemeChooserStyleSchemePropertyInfo where- type AttrAllowedOps StyleSchemeChooserStyleSchemePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleSchemeChooserStyleSchemePropertyInfo = StyleSchemeK- type AttrBaseTypeConstraint StyleSchemeChooserStyleSchemePropertyInfo = StyleSchemeChooserK- type AttrGetType StyleSchemeChooserStyleSchemePropertyInfo = StyleScheme- type AttrLabel StyleSchemeChooserStyleSchemePropertyInfo = "style-scheme"- attrGet _ = getStyleSchemeChooserStyleScheme- attrSet _ = setStyleSchemeChooserStyleScheme- attrConstruct _ = constructStyleSchemeChooserStyleScheme- attrClear _ = undefined--type instance AttributeList StyleSchemeChooser = StyleSchemeChooserAttributeList-type StyleSchemeChooserAttributeList = ('[ '("styleScheme", StyleSchemeChooserStyleSchemePropertyInfo)] :: [(Symbol, *)])--styleSchemeChooserStyleScheme :: AttrLabelProxy "styleScheme"-styleSchemeChooserStyleScheme = AttrLabelProxy--type instance SignalList StyleSchemeChooser = StyleSchemeChooserSignalList-type StyleSchemeChooserSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])--foreign import ccall "gtk_source_style_scheme_chooser_get_type"- c_gtk_source_style_scheme_chooser_get_type :: IO GType--type instance ParentTypes StyleSchemeChooser = StyleSchemeChooserParentTypes-type StyleSchemeChooserParentTypes = '[GObject.Object]--instance GObject StyleSchemeChooser where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_style_scheme_chooser_get_type- --class GObject o => StyleSchemeChooserK o-instance (GObject o, IsDescendantOf StyleSchemeChooser o) => StyleSchemeChooserK o--toStyleSchemeChooser :: StyleSchemeChooserK o => o -> IO StyleSchemeChooser-toStyleSchemeChooser = unsafeCastTo StyleSchemeChooser---- method StyleSchemeChooser::get_style_scheme--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleSchemeChooser", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "StyleScheme")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_chooser_get_style_scheme" gtk_source_style_scheme_chooser_get_style_scheme :: - Ptr StyleSchemeChooser -> -- _obj : TInterface "GtkSource" "StyleSchemeChooser"- IO (Ptr StyleScheme)---styleSchemeChooserGetStyleScheme ::- (MonadIO m, StyleSchemeChooserK a) =>- a -- _obj- -> m StyleScheme -- result-styleSchemeChooserGetStyleScheme _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_style_scheme_chooser_get_style_scheme _obj'- checkUnexpectedReturnNULL "gtk_source_style_scheme_chooser_get_style_scheme" result- result' <- (newObject StyleScheme) result- touchManagedPtr _obj- return result'--data StyleSchemeChooserGetStyleSchemeMethodInfo-instance (signature ~ (m StyleScheme), MonadIO m, StyleSchemeChooserK a) => MethodInfo StyleSchemeChooserGetStyleSchemeMethodInfo a signature where- overloadedMethod _ = styleSchemeChooserGetStyleScheme---- method StyleSchemeChooser::set_style_scheme--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleSchemeChooser", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "scheme", argType = TInterface "GtkSource" "StyleScheme", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_chooser_set_style_scheme" gtk_source_style_scheme_chooser_set_style_scheme :: - Ptr StyleSchemeChooser -> -- _obj : TInterface "GtkSource" "StyleSchemeChooser"- Ptr StyleScheme -> -- scheme : TInterface "GtkSource" "StyleScheme"- IO ()---styleSchemeChooserSetStyleScheme ::- (MonadIO m, StyleSchemeChooserK a, StyleSchemeK b) =>- a -- _obj- -> b -- scheme- -> m () -- result-styleSchemeChooserSetStyleScheme _obj scheme = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let scheme' = unsafeManagedPtrCastPtr scheme- gtk_source_style_scheme_chooser_set_style_scheme _obj' scheme'- touchManagedPtr _obj- touchManagedPtr scheme- return ()--data StyleSchemeChooserSetStyleSchemeMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, StyleSchemeChooserK a, StyleSchemeK b) => MethodInfo StyleSchemeChooserSetStyleSchemeMethodInfo a signature where- overloadedMethod _ = styleSchemeChooserSetStyleScheme--
− GI/GtkSource/Interfaces/StyleSchemeChooser.hs-boot
@@ -1,16 +0,0 @@-module GI.GtkSource.Interfaces.StyleSchemeChooser where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype StyleSchemeChooser = StyleSchemeChooser (ForeignPtr StyleSchemeChooser)-data StyleSchemeChooserStyleSchemePropertyInfo-instance GObject StyleSchemeChooser where-class GObject o => StyleSchemeChooserK o-instance (GObject o, IsDescendantOf StyleSchemeChooser o) => StyleSchemeChooserK o-data StyleSchemeChooserGetStyleSchemeMethodInfo-data StyleSchemeChooserSetStyleSchemeMethodInfo
− GI/GtkSource/Interfaces/UndoManager.hs
@@ -1,476 +0,0 @@---{- |-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.GtkSource.Interfaces.UndoManager- ( ---- * Exported types- UndoManager(..) ,- noUndoManager ,- UndoManagerK ,- toUndoManager ,--- -- * Methods--- ** undoManagerBeginNotUndoableAction- UndoManagerBeginNotUndoableActionMethodInfo,- undoManagerBeginNotUndoableAction ,----- ** undoManagerCanRedo- UndoManagerCanRedoMethodInfo ,- undoManagerCanRedo ,----- ** undoManagerCanRedoChanged- UndoManagerCanRedoChangedMethodInfo ,- undoManagerCanRedoChanged ,----- ** undoManagerCanUndo- UndoManagerCanUndoMethodInfo ,- undoManagerCanUndo ,----- ** undoManagerCanUndoChanged- UndoManagerCanUndoChangedMethodInfo ,- undoManagerCanUndoChanged ,----- ** undoManagerEndNotUndoableAction- UndoManagerEndNotUndoableActionMethodInfo,- undoManagerEndNotUndoableAction ,----- ** undoManagerRedo- UndoManagerRedoMethodInfo ,- undoManagerRedo ,----- ** undoManagerUndo- UndoManagerUndoMethodInfo ,- undoManagerUndo ,----- -- * Signals--- ** CanRedoChanged- UndoManagerCanRedoChangedCallback ,- UndoManagerCanRedoChangedCallbackC ,- UndoManagerCanRedoChangedSignalInfo ,- afterUndoManagerCanRedoChanged ,- mkUndoManagerCanRedoChangedCallback ,- noUndoManagerCanRedoChangedCallback ,- onUndoManagerCanRedoChanged ,- undoManagerCanRedoChangedCallbackWrapper,- undoManagerCanRedoChangedClosure ,----- ** CanUndoChanged- UndoManagerCanUndoChangedCallback ,- UndoManagerCanUndoChangedCallbackC ,- UndoManagerCanUndoChangedSignalInfo ,- afterUndoManagerCanUndoChanged ,- mkUndoManagerCanUndoChangedCallback ,- noUndoManagerCanUndoChangedCallback ,- onUndoManagerCanUndoChanged ,- undoManagerCanUndoChangedCallbackWrapper,- undoManagerCanUndoChangedClosure ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject---- interface UndoManager --newtype UndoManager = UndoManager (ForeignPtr UndoManager)-noUndoManager :: Maybe UndoManager-noUndoManager = Nothing--type family ResolveUndoManagerMethod (t :: Symbol) (o :: *) :: * where- ResolveUndoManagerMethod "beginNotUndoableAction" o = UndoManagerBeginNotUndoableActionMethodInfo- ResolveUndoManagerMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveUndoManagerMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveUndoManagerMethod "canRedo" o = UndoManagerCanRedoMethodInfo- ResolveUndoManagerMethod "canRedoChanged" o = UndoManagerCanRedoChangedMethodInfo- ResolveUndoManagerMethod "canUndo" o = UndoManagerCanUndoMethodInfo- ResolveUndoManagerMethod "canUndoChanged" o = UndoManagerCanUndoChangedMethodInfo- ResolveUndoManagerMethod "endNotUndoableAction" o = UndoManagerEndNotUndoableActionMethodInfo- ResolveUndoManagerMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveUndoManagerMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveUndoManagerMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveUndoManagerMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveUndoManagerMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveUndoManagerMethod "redo" o = UndoManagerRedoMethodInfo- ResolveUndoManagerMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveUndoManagerMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveUndoManagerMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveUndoManagerMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveUndoManagerMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveUndoManagerMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveUndoManagerMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveUndoManagerMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveUndoManagerMethod "undo" o = UndoManagerUndoMethodInfo- ResolveUndoManagerMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveUndoManagerMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveUndoManagerMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveUndoManagerMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveUndoManagerMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveUndoManagerMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveUndoManagerMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveUndoManagerMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveUndoManagerMethod t UndoManager, MethodInfo info UndoManager p) => IsLabelProxy t (UndoManager -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveUndoManagerMethod t UndoManager, MethodInfo info UndoManager p) => IsLabel t (UndoManager -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- signal UndoManager::can-redo-changed-type UndoManagerCanRedoChangedCallback =- IO ()--noUndoManagerCanRedoChangedCallback :: Maybe UndoManagerCanRedoChangedCallback-noUndoManagerCanRedoChangedCallback = Nothing--type UndoManagerCanRedoChangedCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkUndoManagerCanRedoChangedCallback :: UndoManagerCanRedoChangedCallbackC -> IO (FunPtr UndoManagerCanRedoChangedCallbackC)--undoManagerCanRedoChangedClosure :: UndoManagerCanRedoChangedCallback -> IO Closure-undoManagerCanRedoChangedClosure cb = newCClosure =<< mkUndoManagerCanRedoChangedCallback wrapped- where wrapped = undoManagerCanRedoChangedCallbackWrapper cb--undoManagerCanRedoChangedCallbackWrapper ::- UndoManagerCanRedoChangedCallback ->- Ptr () ->- Ptr () ->- IO ()-undoManagerCanRedoChangedCallbackWrapper _cb _ _ = do- _cb --onUndoManagerCanRedoChanged :: (GObject a, MonadIO m) => a -> UndoManagerCanRedoChangedCallback -> m SignalHandlerId-onUndoManagerCanRedoChanged obj cb = liftIO $ connectUndoManagerCanRedoChanged obj cb SignalConnectBefore-afterUndoManagerCanRedoChanged :: (GObject a, MonadIO m) => a -> UndoManagerCanRedoChangedCallback -> m SignalHandlerId-afterUndoManagerCanRedoChanged obj cb = connectUndoManagerCanRedoChanged obj cb SignalConnectAfter--connectUndoManagerCanRedoChanged :: (GObject a, MonadIO m) =>- a -> UndoManagerCanRedoChangedCallback -> SignalConnectMode -> m SignalHandlerId-connectUndoManagerCanRedoChanged obj cb after = liftIO $ do- cb' <- mkUndoManagerCanRedoChangedCallback (undoManagerCanRedoChangedCallbackWrapper cb)- connectSignalFunPtr obj "can-redo-changed" cb' after---- signal UndoManager::can-undo-changed-type UndoManagerCanUndoChangedCallback =- IO ()--noUndoManagerCanUndoChangedCallback :: Maybe UndoManagerCanUndoChangedCallback-noUndoManagerCanUndoChangedCallback = Nothing--type UndoManagerCanUndoChangedCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkUndoManagerCanUndoChangedCallback :: UndoManagerCanUndoChangedCallbackC -> IO (FunPtr UndoManagerCanUndoChangedCallbackC)--undoManagerCanUndoChangedClosure :: UndoManagerCanUndoChangedCallback -> IO Closure-undoManagerCanUndoChangedClosure cb = newCClosure =<< mkUndoManagerCanUndoChangedCallback wrapped- where wrapped = undoManagerCanUndoChangedCallbackWrapper cb--undoManagerCanUndoChangedCallbackWrapper ::- UndoManagerCanUndoChangedCallback ->- Ptr () ->- Ptr () ->- IO ()-undoManagerCanUndoChangedCallbackWrapper _cb _ _ = do- _cb --onUndoManagerCanUndoChanged :: (GObject a, MonadIO m) => a -> UndoManagerCanUndoChangedCallback -> m SignalHandlerId-onUndoManagerCanUndoChanged obj cb = liftIO $ connectUndoManagerCanUndoChanged obj cb SignalConnectBefore-afterUndoManagerCanUndoChanged :: (GObject a, MonadIO m) => a -> UndoManagerCanUndoChangedCallback -> m SignalHandlerId-afterUndoManagerCanUndoChanged obj cb = connectUndoManagerCanUndoChanged obj cb SignalConnectAfter--connectUndoManagerCanUndoChanged :: (GObject a, MonadIO m) =>- a -> UndoManagerCanUndoChangedCallback -> SignalConnectMode -> m SignalHandlerId-connectUndoManagerCanUndoChanged obj cb after = liftIO $ do- cb' <- mkUndoManagerCanUndoChangedCallback (undoManagerCanUndoChangedCallbackWrapper cb)- connectSignalFunPtr obj "can-undo-changed" cb' after--type instance AttributeList UndoManager = UndoManagerAttributeList-type UndoManagerAttributeList = ('[ ] :: [(Symbol, *)])--data UndoManagerCanRedoChangedSignalInfo-instance SignalInfo UndoManagerCanRedoChangedSignalInfo where- type HaskellCallbackType UndoManagerCanRedoChangedSignalInfo = UndoManagerCanRedoChangedCallback- connectSignal _ = connectUndoManagerCanRedoChanged--data UndoManagerCanUndoChangedSignalInfo-instance SignalInfo UndoManagerCanUndoChangedSignalInfo where- type HaskellCallbackType UndoManagerCanUndoChangedSignalInfo = UndoManagerCanUndoChangedCallback- connectSignal _ = connectUndoManagerCanUndoChanged--type instance SignalList UndoManager = UndoManagerSignalList-type UndoManagerSignalList = ('[ '("canRedoChanged", UndoManagerCanRedoChangedSignalInfo), '("canUndoChanged", UndoManagerCanUndoChangedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])--foreign import ccall "gtk_source_undo_manager_get_type"- c_gtk_source_undo_manager_get_type :: IO GType--type instance ParentTypes UndoManager = UndoManagerParentTypes-type UndoManagerParentTypes = '[GObject.Object]--instance GObject UndoManager where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_undo_manager_get_type- --class GObject o => UndoManagerK o-instance (GObject o, IsDescendantOf UndoManager o) => UndoManagerK o--toUndoManager :: UndoManagerK o => o -> IO UndoManager-toUndoManager = unsafeCastTo UndoManager---- method UndoManager::begin_not_undoable_action--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "UndoManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_undo_manager_begin_not_undoable_action" gtk_source_undo_manager_begin_not_undoable_action :: - Ptr UndoManager -> -- _obj : TInterface "GtkSource" "UndoManager"- IO ()---undoManagerBeginNotUndoableAction ::- (MonadIO m, UndoManagerK a) =>- a -- _obj- -> m () -- result-undoManagerBeginNotUndoableAction _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_undo_manager_begin_not_undoable_action _obj'- touchManagedPtr _obj- return ()--data UndoManagerBeginNotUndoableActionMethodInfo-instance (signature ~ (m ()), MonadIO m, UndoManagerK a) => MethodInfo UndoManagerBeginNotUndoableActionMethodInfo a signature where- overloadedMethod _ = undoManagerBeginNotUndoableAction---- method UndoManager::can_redo--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "UndoManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_undo_manager_can_redo" gtk_source_undo_manager_can_redo :: - Ptr UndoManager -> -- _obj : TInterface "GtkSource" "UndoManager"- IO CInt---undoManagerCanRedo ::- (MonadIO m, UndoManagerK a) =>- a -- _obj- -> m Bool -- result-undoManagerCanRedo _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_undo_manager_can_redo _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data UndoManagerCanRedoMethodInfo-instance (signature ~ (m Bool), MonadIO m, UndoManagerK a) => MethodInfo UndoManagerCanRedoMethodInfo a signature where- overloadedMethod _ = undoManagerCanRedo---- method UndoManager::can_redo_changed--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "UndoManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_undo_manager_can_redo_changed" gtk_source_undo_manager_can_redo_changed :: - Ptr UndoManager -> -- _obj : TInterface "GtkSource" "UndoManager"- IO ()---undoManagerCanRedoChanged ::- (MonadIO m, UndoManagerK a) =>- a -- _obj- -> m () -- result-undoManagerCanRedoChanged _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_undo_manager_can_redo_changed _obj'- touchManagedPtr _obj- return ()--data UndoManagerCanRedoChangedMethodInfo-instance (signature ~ (m ()), MonadIO m, UndoManagerK a) => MethodInfo UndoManagerCanRedoChangedMethodInfo a signature where- overloadedMethod _ = undoManagerCanRedoChanged---- method UndoManager::can_undo--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "UndoManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_undo_manager_can_undo" gtk_source_undo_manager_can_undo :: - Ptr UndoManager -> -- _obj : TInterface "GtkSource" "UndoManager"- IO CInt---undoManagerCanUndo ::- (MonadIO m, UndoManagerK a) =>- a -- _obj- -> m Bool -- result-undoManagerCanUndo _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_undo_manager_can_undo _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data UndoManagerCanUndoMethodInfo-instance (signature ~ (m Bool), MonadIO m, UndoManagerK a) => MethodInfo UndoManagerCanUndoMethodInfo a signature where- overloadedMethod _ = undoManagerCanUndo---- method UndoManager::can_undo_changed--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "UndoManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_undo_manager_can_undo_changed" gtk_source_undo_manager_can_undo_changed :: - Ptr UndoManager -> -- _obj : TInterface "GtkSource" "UndoManager"- IO ()---undoManagerCanUndoChanged ::- (MonadIO m, UndoManagerK a) =>- a -- _obj- -> m () -- result-undoManagerCanUndoChanged _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_undo_manager_can_undo_changed _obj'- touchManagedPtr _obj- return ()--data UndoManagerCanUndoChangedMethodInfo-instance (signature ~ (m ()), MonadIO m, UndoManagerK a) => MethodInfo UndoManagerCanUndoChangedMethodInfo a signature where- overloadedMethod _ = undoManagerCanUndoChanged---- method UndoManager::end_not_undoable_action--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "UndoManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_undo_manager_end_not_undoable_action" gtk_source_undo_manager_end_not_undoable_action :: - Ptr UndoManager -> -- _obj : TInterface "GtkSource" "UndoManager"- IO ()---undoManagerEndNotUndoableAction ::- (MonadIO m, UndoManagerK a) =>- a -- _obj- -> m () -- result-undoManagerEndNotUndoableAction _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_undo_manager_end_not_undoable_action _obj'- touchManagedPtr _obj- return ()--data UndoManagerEndNotUndoableActionMethodInfo-instance (signature ~ (m ()), MonadIO m, UndoManagerK a) => MethodInfo UndoManagerEndNotUndoableActionMethodInfo a signature where- overloadedMethod _ = undoManagerEndNotUndoableAction---- method UndoManager::redo--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "UndoManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_undo_manager_redo" gtk_source_undo_manager_redo :: - Ptr UndoManager -> -- _obj : TInterface "GtkSource" "UndoManager"- IO ()---undoManagerRedo ::- (MonadIO m, UndoManagerK a) =>- a -- _obj- -> m () -- result-undoManagerRedo _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_undo_manager_redo _obj'- touchManagedPtr _obj- return ()--data UndoManagerRedoMethodInfo-instance (signature ~ (m ()), MonadIO m, UndoManagerK a) => MethodInfo UndoManagerRedoMethodInfo a signature where- overloadedMethod _ = undoManagerRedo---- method UndoManager::undo--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "UndoManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_undo_manager_undo" gtk_source_undo_manager_undo :: - Ptr UndoManager -> -- _obj : TInterface "GtkSource" "UndoManager"- IO ()---undoManagerUndo ::- (MonadIO m, UndoManagerK a) =>- a -- _obj- -> m () -- result-undoManagerUndo _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_undo_manager_undo _obj'- touchManagedPtr _obj- return ()--data UndoManagerUndoMethodInfo-instance (signature ~ (m ()), MonadIO m, UndoManagerK a) => MethodInfo UndoManagerUndoMethodInfo a signature where- overloadedMethod _ = undoManagerUndo--
− GI/GtkSource/Interfaces/UndoManager.hs-boot
@@ -1,23 +0,0 @@-module GI.GtkSource.Interfaces.UndoManager where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype UndoManager = UndoManager (ForeignPtr UndoManager)-data UndoManagerCanRedoChangedSignalInfo-data UndoManagerCanUndoChangedSignalInfo-instance GObject UndoManager where-class GObject o => UndoManagerK o-instance (GObject o, IsDescendantOf UndoManager o) => UndoManagerK o-data UndoManagerBeginNotUndoableActionMethodInfo-data UndoManagerCanRedoMethodInfo-data UndoManagerCanRedoChangedMethodInfo-data UndoManagerCanUndoMethodInfo-data UndoManagerCanUndoChangedMethodInfo-data UndoManagerEndNotUndoableActionMethodInfo-data UndoManagerRedoMethodInfo-data UndoManagerUndoMethodInfo
− GI/GtkSource/Objects.hs
@@ -1,79 +0,0 @@---{- |-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.GtkSource.Objects- ( module GI.GtkSource.Objects.Buffer ,- module GI.GtkSource.Objects.Completion ,- module GI.GtkSource.Objects.CompletionContext,- module GI.GtkSource.Objects.CompletionInfo,- module GI.GtkSource.Objects.CompletionItem,- module GI.GtkSource.Objects.CompletionWords,- module GI.GtkSource.Objects.File ,- module GI.GtkSource.Objects.FileLoader ,- module GI.GtkSource.Objects.FileSaver ,- module GI.GtkSource.Objects.Gutter ,- module GI.GtkSource.Objects.GutterRenderer,- module GI.GtkSource.Objects.GutterRendererPixbuf,- module GI.GtkSource.Objects.GutterRendererText,- module GI.GtkSource.Objects.Language ,- module GI.GtkSource.Objects.LanguageManager,- module GI.GtkSource.Objects.Map ,- module GI.GtkSource.Objects.Mark ,- module GI.GtkSource.Objects.MarkAttributes,- module GI.GtkSource.Objects.PrintCompositor,- module GI.GtkSource.Objects.SearchContext,- module GI.GtkSource.Objects.SearchSettings,- module GI.GtkSource.Objects.Style ,- module GI.GtkSource.Objects.StyleScheme ,- module GI.GtkSource.Objects.StyleSchemeChooserButton,- module GI.GtkSource.Objects.StyleSchemeChooserWidget,- module GI.GtkSource.Objects.StyleSchemeManager,- module GI.GtkSource.Objects.View ,--- ) where--import GI.GtkSource.Objects.Buffer-import GI.GtkSource.Objects.Completion-import GI.GtkSource.Objects.CompletionContext-import GI.GtkSource.Objects.CompletionInfo-import GI.GtkSource.Objects.CompletionItem-import GI.GtkSource.Objects.CompletionWords-import GI.GtkSource.Objects.File-import GI.GtkSource.Objects.FileLoader-import GI.GtkSource.Objects.FileSaver-import GI.GtkSource.Objects.Gutter-import GI.GtkSource.Objects.GutterRenderer-import GI.GtkSource.Objects.GutterRendererPixbuf-import GI.GtkSource.Objects.GutterRendererText-import GI.GtkSource.Objects.Language-import GI.GtkSource.Objects.LanguageManager-import GI.GtkSource.Objects.Map-import GI.GtkSource.Objects.Mark-import GI.GtkSource.Objects.MarkAttributes-import GI.GtkSource.Objects.PrintCompositor-import GI.GtkSource.Objects.SearchContext-import GI.GtkSource.Objects.SearchSettings-import GI.GtkSource.Objects.Style-import GI.GtkSource.Objects.StyleScheme-import GI.GtkSource.Objects.StyleSchemeChooserButton-import GI.GtkSource.Objects.StyleSchemeChooserWidget-import GI.GtkSource.Objects.StyleSchemeManager-import GI.GtkSource.Objects.View--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks--
− GI/GtkSource/Objects/Buffer.hs
@@ -1,2190 +0,0 @@---{- |-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.GtkSource.Objects.Buffer- ( ---- * Exported types- Buffer(..) ,- BufferK ,- toBuffer ,- noBuffer ,--- -- * Methods--- ** bufferBackwardIterToSourceMark- BufferBackwardIterToSourceMarkMethodInfo,- bufferBackwardIterToSourceMark ,----- ** bufferBeginNotUndoableAction- BufferBeginNotUndoableActionMethodInfo ,- bufferBeginNotUndoableAction ,----- ** bufferCanRedo- BufferCanRedoMethodInfo ,- bufferCanRedo ,----- ** bufferCanUndo- BufferCanUndoMethodInfo ,- bufferCanUndo ,----- ** bufferChangeCase- BufferChangeCaseMethodInfo ,- bufferChangeCase ,----- ** bufferCreateSourceMark- BufferCreateSourceMarkMethodInfo ,- bufferCreateSourceMark ,----- ** bufferEndNotUndoableAction- BufferEndNotUndoableActionMethodInfo ,- bufferEndNotUndoableAction ,----- ** bufferEnsureHighlight- BufferEnsureHighlightMethodInfo ,- bufferEnsureHighlight ,----- ** bufferForwardIterToSourceMark- BufferForwardIterToSourceMarkMethodInfo ,- bufferForwardIterToSourceMark ,----- ** bufferGetContextClassesAtIter- BufferGetContextClassesAtIterMethodInfo ,- bufferGetContextClassesAtIter ,----- ** bufferGetHighlightMatchingBrackets- BufferGetHighlightMatchingBracketsMethodInfo,- bufferGetHighlightMatchingBrackets ,----- ** bufferGetHighlightSyntax- BufferGetHighlightSyntaxMethodInfo ,- bufferGetHighlightSyntax ,----- ** bufferGetImplicitTrailingNewline- BufferGetImplicitTrailingNewlineMethodInfo,- bufferGetImplicitTrailingNewline ,----- ** bufferGetLanguage- BufferGetLanguageMethodInfo ,- bufferGetLanguage ,----- ** bufferGetMaxUndoLevels- BufferGetMaxUndoLevelsMethodInfo ,- bufferGetMaxUndoLevels ,----- ** bufferGetSourceMarksAtIter- BufferGetSourceMarksAtIterMethodInfo ,- bufferGetSourceMarksAtIter ,----- ** bufferGetSourceMarksAtLine- BufferGetSourceMarksAtLineMethodInfo ,- bufferGetSourceMarksAtLine ,----- ** bufferGetStyleScheme- BufferGetStyleSchemeMethodInfo ,- bufferGetStyleScheme ,----- ** bufferGetUndoManager- BufferGetUndoManagerMethodInfo ,- bufferGetUndoManager ,----- ** bufferIterBackwardToContextClassToggle- BufferIterBackwardToContextClassToggleMethodInfo,- bufferIterBackwardToContextClassToggle ,----- ** bufferIterForwardToContextClassToggle- BufferIterForwardToContextClassToggleMethodInfo,- bufferIterForwardToContextClassToggle ,----- ** bufferIterHasContextClass- BufferIterHasContextClassMethodInfo ,- bufferIterHasContextClass ,----- ** bufferJoinLines- BufferJoinLinesMethodInfo ,- bufferJoinLines ,----- ** bufferNew- bufferNew ,----- ** bufferNewWithLanguage- bufferNewWithLanguage ,----- ** bufferRedo- BufferRedoMethodInfo ,- bufferRedo ,----- ** bufferRemoveSourceMarks- BufferRemoveSourceMarksMethodInfo ,- bufferRemoveSourceMarks ,----- ** bufferSetHighlightMatchingBrackets- BufferSetHighlightMatchingBracketsMethodInfo,- bufferSetHighlightMatchingBrackets ,----- ** bufferSetHighlightSyntax- BufferSetHighlightSyntaxMethodInfo ,- bufferSetHighlightSyntax ,----- ** bufferSetImplicitTrailingNewline- BufferSetImplicitTrailingNewlineMethodInfo,- bufferSetImplicitTrailingNewline ,----- ** bufferSetLanguage- BufferSetLanguageMethodInfo ,- bufferSetLanguage ,----- ** bufferSetMaxUndoLevels- BufferSetMaxUndoLevelsMethodInfo ,- bufferSetMaxUndoLevels ,----- ** bufferSetStyleScheme- BufferSetStyleSchemeMethodInfo ,- bufferSetStyleScheme ,----- ** bufferSetUndoManager- BufferSetUndoManagerMethodInfo ,- bufferSetUndoManager ,----- ** bufferSortLines- BufferSortLinesMethodInfo ,- bufferSortLines ,----- ** bufferUndo- BufferUndoMethodInfo ,- bufferUndo ,----- -- * Properties--- ** CanRedo- BufferCanRedoPropertyInfo ,- getBufferCanRedo ,----- ** CanUndo- BufferCanUndoPropertyInfo ,- getBufferCanUndo ,----- ** HighlightMatchingBrackets- BufferHighlightMatchingBracketsPropertyInfo,- bufferHighlightMatchingBrackets ,- constructBufferHighlightMatchingBrackets,- getBufferHighlightMatchingBrackets ,- setBufferHighlightMatchingBrackets ,----- ** HighlightSyntax- BufferHighlightSyntaxPropertyInfo ,- bufferHighlightSyntax ,- constructBufferHighlightSyntax ,- getBufferHighlightSyntax ,- setBufferHighlightSyntax ,----- ** ImplicitTrailingNewline- BufferImplicitTrailingNewlinePropertyInfo,- bufferImplicitTrailingNewline ,- constructBufferImplicitTrailingNewline ,- getBufferImplicitTrailingNewline ,- setBufferImplicitTrailingNewline ,----- ** Language- BufferLanguagePropertyInfo ,- bufferLanguage ,- clearBufferLanguage ,- constructBufferLanguage ,- getBufferLanguage ,- setBufferLanguage ,----- ** MaxUndoLevels- BufferMaxUndoLevelsPropertyInfo ,- bufferMaxUndoLevels ,- constructBufferMaxUndoLevels ,- getBufferMaxUndoLevels ,- setBufferMaxUndoLevels ,----- ** StyleScheme- BufferStyleSchemePropertyInfo ,- bufferStyleScheme ,- clearBufferStyleScheme ,- constructBufferStyleScheme ,- getBufferStyleScheme ,- setBufferStyleScheme ,----- ** UndoManager- BufferUndoManagerPropertyInfo ,- bufferUndoManager ,- clearBufferUndoManager ,- constructBufferUndoManager ,- getBufferUndoManager ,- setBufferUndoManager ,----- -- * Signals--- ** BracketMatched- BufferBracketMatchedCallback ,- BufferBracketMatchedCallbackC ,- BufferBracketMatchedSignalInfo ,- afterBufferBracketMatched ,- bufferBracketMatchedCallbackWrapper ,- bufferBracketMatchedClosure ,- mkBufferBracketMatchedCallback ,- noBufferBracketMatchedCallback ,- onBufferBracketMatched ,----- ** HighlightUpdated- BufferHighlightUpdatedCallback ,- BufferHighlightUpdatedCallbackC ,- BufferHighlightUpdatedSignalInfo ,- afterBufferHighlightUpdated ,- bufferHighlightUpdatedCallbackWrapper ,- bufferHighlightUpdatedClosure ,- mkBufferHighlightUpdatedCallback ,- noBufferHighlightUpdatedCallback ,- onBufferHighlightUpdated ,----- ** Redo- BufferRedoCallback ,- BufferRedoCallbackC ,- BufferRedoSignalInfo ,- afterBufferRedo ,- bufferRedoCallbackWrapper ,- bufferRedoClosure ,- mkBufferRedoCallback ,- noBufferRedoCallback ,- onBufferRedo ,----- ** SourceMarkUpdated- BufferSourceMarkUpdatedCallback ,- BufferSourceMarkUpdatedCallbackC ,- BufferSourceMarkUpdatedSignalInfo ,- afterBufferSourceMarkUpdated ,- bufferSourceMarkUpdatedCallbackWrapper ,- bufferSourceMarkUpdatedClosure ,- mkBufferSourceMarkUpdatedCallback ,- noBufferSourceMarkUpdatedCallback ,- onBufferSourceMarkUpdated ,----- ** Undo- BufferUndoCallback ,- BufferUndoCallbackC ,- BufferUndoSignalInfo ,- afterBufferUndo ,- bufferUndoCallbackWrapper ,- bufferUndoClosure ,- mkBufferUndoCallback ,- noBufferUndoCallback ,- onBufferUndo ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.Gtk as Gtk--newtype Buffer = Buffer (ForeignPtr Buffer)-foreign import ccall "gtk_source_buffer_get_type"- c_gtk_source_buffer_get_type :: IO GType--type instance ParentTypes Buffer = BufferParentTypes-type BufferParentTypes = '[Gtk.TextBuffer, GObject.Object]--instance GObject Buffer where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_buffer_get_type- --class GObject o => BufferK o-instance (GObject o, IsDescendantOf Buffer o) => BufferK o--toBuffer :: BufferK o => o -> IO Buffer-toBuffer = unsafeCastTo Buffer--noBuffer :: Maybe Buffer-noBuffer = Nothing--type family ResolveBufferMethod (t :: Symbol) (o :: *) :: * where- ResolveBufferMethod "addMark" o = Gtk.TextBufferAddMarkMethodInfo- ResolveBufferMethod "addSelectionClipboard" o = Gtk.TextBufferAddSelectionClipboardMethodInfo- ResolveBufferMethod "applyTag" o = Gtk.TextBufferApplyTagMethodInfo- ResolveBufferMethod "applyTagByName" o = Gtk.TextBufferApplyTagByNameMethodInfo- ResolveBufferMethod "backspace" o = Gtk.TextBufferBackspaceMethodInfo- ResolveBufferMethod "backwardIterToSourceMark" o = BufferBackwardIterToSourceMarkMethodInfo- ResolveBufferMethod "beginNotUndoableAction" o = BufferBeginNotUndoableActionMethodInfo- ResolveBufferMethod "beginUserAction" o = Gtk.TextBufferBeginUserActionMethodInfo- ResolveBufferMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveBufferMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveBufferMethod "canRedo" o = BufferCanRedoMethodInfo- ResolveBufferMethod "canUndo" o = BufferCanUndoMethodInfo- ResolveBufferMethod "changeCase" o = BufferChangeCaseMethodInfo- ResolveBufferMethod "copyClipboard" o = Gtk.TextBufferCopyClipboardMethodInfo- ResolveBufferMethod "createChildAnchor" o = Gtk.TextBufferCreateChildAnchorMethodInfo- ResolveBufferMethod "createMark" o = Gtk.TextBufferCreateMarkMethodInfo- ResolveBufferMethod "createSourceMark" o = BufferCreateSourceMarkMethodInfo- ResolveBufferMethod "cutClipboard" o = Gtk.TextBufferCutClipboardMethodInfo- ResolveBufferMethod "delete" o = Gtk.TextBufferDeleteMethodInfo- ResolveBufferMethod "deleteInteractive" o = Gtk.TextBufferDeleteInteractiveMethodInfo- ResolveBufferMethod "deleteMark" o = Gtk.TextBufferDeleteMarkMethodInfo- ResolveBufferMethod "deleteMarkByName" o = Gtk.TextBufferDeleteMarkByNameMethodInfo- ResolveBufferMethod "deleteSelection" o = Gtk.TextBufferDeleteSelectionMethodInfo- ResolveBufferMethod "deserialize" o = Gtk.TextBufferDeserializeMethodInfo- ResolveBufferMethod "deserializeGetCanCreateTags" o = Gtk.TextBufferDeserializeGetCanCreateTagsMethodInfo- ResolveBufferMethod "deserializeSetCanCreateTags" o = Gtk.TextBufferDeserializeSetCanCreateTagsMethodInfo- ResolveBufferMethod "endNotUndoableAction" o = BufferEndNotUndoableActionMethodInfo- ResolveBufferMethod "endUserAction" o = Gtk.TextBufferEndUserActionMethodInfo- ResolveBufferMethod "ensureHighlight" o = BufferEnsureHighlightMethodInfo- ResolveBufferMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveBufferMethod "forwardIterToSourceMark" o = BufferForwardIterToSourceMarkMethodInfo- ResolveBufferMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveBufferMethod "insert" o = Gtk.TextBufferInsertMethodInfo- ResolveBufferMethod "insertAtCursor" o = Gtk.TextBufferInsertAtCursorMethodInfo- ResolveBufferMethod "insertChildAnchor" o = Gtk.TextBufferInsertChildAnchorMethodInfo- ResolveBufferMethod "insertInteractive" o = Gtk.TextBufferInsertInteractiveMethodInfo- ResolveBufferMethod "insertInteractiveAtCursor" o = Gtk.TextBufferInsertInteractiveAtCursorMethodInfo- ResolveBufferMethod "insertMarkup" o = Gtk.TextBufferInsertMarkupMethodInfo- ResolveBufferMethod "insertPixbuf" o = Gtk.TextBufferInsertPixbufMethodInfo- ResolveBufferMethod "insertRange" o = Gtk.TextBufferInsertRangeMethodInfo- ResolveBufferMethod "insertRangeInteractive" o = Gtk.TextBufferInsertRangeInteractiveMethodInfo- ResolveBufferMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveBufferMethod "iterBackwardToContextClassToggle" o = BufferIterBackwardToContextClassToggleMethodInfo- ResolveBufferMethod "iterForwardToContextClassToggle" o = BufferIterForwardToContextClassToggleMethodInfo- ResolveBufferMethod "iterHasContextClass" o = BufferIterHasContextClassMethodInfo- ResolveBufferMethod "joinLines" o = BufferJoinLinesMethodInfo- ResolveBufferMethod "moveMark" o = Gtk.TextBufferMoveMarkMethodInfo- ResolveBufferMethod "moveMarkByName" o = Gtk.TextBufferMoveMarkByNameMethodInfo- ResolveBufferMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveBufferMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveBufferMethod "pasteClipboard" o = Gtk.TextBufferPasteClipboardMethodInfo- ResolveBufferMethod "placeCursor" o = Gtk.TextBufferPlaceCursorMethodInfo- ResolveBufferMethod "redo" o = BufferRedoMethodInfo- ResolveBufferMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveBufferMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveBufferMethod "registerDeserializeFormat" o = Gtk.TextBufferRegisterDeserializeFormatMethodInfo- ResolveBufferMethod "registerDeserializeTagset" o = Gtk.TextBufferRegisterDeserializeTagsetMethodInfo- ResolveBufferMethod "registerSerializeFormat" o = Gtk.TextBufferRegisterSerializeFormatMethodInfo- ResolveBufferMethod "registerSerializeTagset" o = Gtk.TextBufferRegisterSerializeTagsetMethodInfo- ResolveBufferMethod "removeAllTags" o = Gtk.TextBufferRemoveAllTagsMethodInfo- ResolveBufferMethod "removeSelectionClipboard" o = Gtk.TextBufferRemoveSelectionClipboardMethodInfo- ResolveBufferMethod "removeSourceMarks" o = BufferRemoveSourceMarksMethodInfo- ResolveBufferMethod "removeTag" o = Gtk.TextBufferRemoveTagMethodInfo- ResolveBufferMethod "removeTagByName" o = Gtk.TextBufferRemoveTagByNameMethodInfo- ResolveBufferMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveBufferMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveBufferMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveBufferMethod "selectRange" o = Gtk.TextBufferSelectRangeMethodInfo- ResolveBufferMethod "serialize" o = Gtk.TextBufferSerializeMethodInfo- ResolveBufferMethod "sortLines" o = BufferSortLinesMethodInfo- ResolveBufferMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveBufferMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveBufferMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveBufferMethod "undo" o = BufferUndoMethodInfo- ResolveBufferMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveBufferMethod "unregisterDeserializeFormat" o = Gtk.TextBufferUnregisterDeserializeFormatMethodInfo- ResolveBufferMethod "unregisterSerializeFormat" o = Gtk.TextBufferUnregisterSerializeFormatMethodInfo- ResolveBufferMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveBufferMethod "getBounds" o = Gtk.TextBufferGetBoundsMethodInfo- ResolveBufferMethod "getCharCount" o = Gtk.TextBufferGetCharCountMethodInfo- ResolveBufferMethod "getContextClassesAtIter" o = BufferGetContextClassesAtIterMethodInfo- ResolveBufferMethod "getCopyTargetList" o = Gtk.TextBufferGetCopyTargetListMethodInfo- ResolveBufferMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveBufferMethod "getDeserializeFormats" o = Gtk.TextBufferGetDeserializeFormatsMethodInfo- ResolveBufferMethod "getEndIter" o = Gtk.TextBufferGetEndIterMethodInfo- ResolveBufferMethod "getHasSelection" o = Gtk.TextBufferGetHasSelectionMethodInfo- ResolveBufferMethod "getHighlightMatchingBrackets" o = BufferGetHighlightMatchingBracketsMethodInfo- ResolveBufferMethod "getHighlightSyntax" o = BufferGetHighlightSyntaxMethodInfo- ResolveBufferMethod "getImplicitTrailingNewline" o = BufferGetImplicitTrailingNewlineMethodInfo- ResolveBufferMethod "getInsert" o = Gtk.TextBufferGetInsertMethodInfo- ResolveBufferMethod "getIterAtChildAnchor" o = Gtk.TextBufferGetIterAtChildAnchorMethodInfo- ResolveBufferMethod "getIterAtLine" o = Gtk.TextBufferGetIterAtLineMethodInfo- ResolveBufferMethod "getIterAtLineIndex" o = Gtk.TextBufferGetIterAtLineIndexMethodInfo- ResolveBufferMethod "getIterAtLineOffset" o = Gtk.TextBufferGetIterAtLineOffsetMethodInfo- ResolveBufferMethod "getIterAtMark" o = Gtk.TextBufferGetIterAtMarkMethodInfo- ResolveBufferMethod "getIterAtOffset" o = Gtk.TextBufferGetIterAtOffsetMethodInfo- ResolveBufferMethod "getLanguage" o = BufferGetLanguageMethodInfo- ResolveBufferMethod "getLineCount" o = Gtk.TextBufferGetLineCountMethodInfo- ResolveBufferMethod "getMark" o = Gtk.TextBufferGetMarkMethodInfo- ResolveBufferMethod "getMaxUndoLevels" o = BufferGetMaxUndoLevelsMethodInfo- ResolveBufferMethod "getModified" o = Gtk.TextBufferGetModifiedMethodInfo- ResolveBufferMethod "getPasteTargetList" o = Gtk.TextBufferGetPasteTargetListMethodInfo- ResolveBufferMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveBufferMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveBufferMethod "getSelectionBound" o = Gtk.TextBufferGetSelectionBoundMethodInfo- ResolveBufferMethod "getSelectionBounds" o = Gtk.TextBufferGetSelectionBoundsMethodInfo- ResolveBufferMethod "getSerializeFormats" o = Gtk.TextBufferGetSerializeFormatsMethodInfo- ResolveBufferMethod "getSlice" o = Gtk.TextBufferGetSliceMethodInfo- ResolveBufferMethod "getSourceMarksAtIter" o = BufferGetSourceMarksAtIterMethodInfo- ResolveBufferMethod "getSourceMarksAtLine" o = BufferGetSourceMarksAtLineMethodInfo- ResolveBufferMethod "getStartIter" o = Gtk.TextBufferGetStartIterMethodInfo- ResolveBufferMethod "getStyleScheme" o = BufferGetStyleSchemeMethodInfo- ResolveBufferMethod "getTagTable" o = Gtk.TextBufferGetTagTableMethodInfo- ResolveBufferMethod "getText" o = Gtk.TextBufferGetTextMethodInfo- ResolveBufferMethod "getUndoManager" o = BufferGetUndoManagerMethodInfo- ResolveBufferMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveBufferMethod "setHighlightMatchingBrackets" o = BufferSetHighlightMatchingBracketsMethodInfo- ResolveBufferMethod "setHighlightSyntax" o = BufferSetHighlightSyntaxMethodInfo- ResolveBufferMethod "setImplicitTrailingNewline" o = BufferSetImplicitTrailingNewlineMethodInfo- ResolveBufferMethod "setLanguage" o = BufferSetLanguageMethodInfo- ResolveBufferMethod "setMaxUndoLevels" o = BufferSetMaxUndoLevelsMethodInfo- ResolveBufferMethod "setModified" o = Gtk.TextBufferSetModifiedMethodInfo- ResolveBufferMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveBufferMethod "setStyleScheme" o = BufferSetStyleSchemeMethodInfo- ResolveBufferMethod "setText" o = Gtk.TextBufferSetTextMethodInfo- ResolveBufferMethod "setUndoManager" o = BufferSetUndoManagerMethodInfo- ResolveBufferMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveBufferMethod t Buffer, MethodInfo info Buffer p) => IsLabelProxy t (Buffer -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveBufferMethod t Buffer, MethodInfo info Buffer p) => IsLabel t (Buffer -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- signal Buffer::bracket-matched-type BufferBracketMatchedCallback =- Gtk.TextIter ->- BracketMatchType ->- IO ()--noBufferBracketMatchedCallback :: Maybe BufferBracketMatchedCallback-noBufferBracketMatchedCallback = Nothing--type BufferBracketMatchedCallbackC =- Ptr () -> -- object- Ptr Gtk.TextIter ->- CUInt ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkBufferBracketMatchedCallback :: BufferBracketMatchedCallbackC -> IO (FunPtr BufferBracketMatchedCallbackC)--bufferBracketMatchedClosure :: BufferBracketMatchedCallback -> IO Closure-bufferBracketMatchedClosure cb = newCClosure =<< mkBufferBracketMatchedCallback wrapped- where wrapped = bufferBracketMatchedCallbackWrapper cb--bufferBracketMatchedCallbackWrapper ::- BufferBracketMatchedCallback ->- Ptr () ->- Ptr Gtk.TextIter ->- CUInt ->- Ptr () ->- IO ()-bufferBracketMatchedCallbackWrapper _cb _ iter state _ = do- iter' <- (newBoxed Gtk.TextIter) iter- let state' = (toEnum . fromIntegral) state- _cb iter' state'--onBufferBracketMatched :: (GObject a, MonadIO m) => a -> BufferBracketMatchedCallback -> m SignalHandlerId-onBufferBracketMatched obj cb = liftIO $ connectBufferBracketMatched obj cb SignalConnectBefore-afterBufferBracketMatched :: (GObject a, MonadIO m) => a -> BufferBracketMatchedCallback -> m SignalHandlerId-afterBufferBracketMatched obj cb = connectBufferBracketMatched obj cb SignalConnectAfter--connectBufferBracketMatched :: (GObject a, MonadIO m) =>- a -> BufferBracketMatchedCallback -> SignalConnectMode -> m SignalHandlerId-connectBufferBracketMatched obj cb after = liftIO $ do- cb' <- mkBufferBracketMatchedCallback (bufferBracketMatchedCallbackWrapper cb)- connectSignalFunPtr obj "bracket-matched" cb' after---- signal Buffer::highlight-updated-type BufferHighlightUpdatedCallback =- Gtk.TextIter ->- Gtk.TextIter ->- IO ()--noBufferHighlightUpdatedCallback :: Maybe BufferHighlightUpdatedCallback-noBufferHighlightUpdatedCallback = Nothing--type BufferHighlightUpdatedCallbackC =- Ptr () -> -- object- Ptr Gtk.TextIter ->- Ptr Gtk.TextIter ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkBufferHighlightUpdatedCallback :: BufferHighlightUpdatedCallbackC -> IO (FunPtr BufferHighlightUpdatedCallbackC)--bufferHighlightUpdatedClosure :: BufferHighlightUpdatedCallback -> IO Closure-bufferHighlightUpdatedClosure cb = newCClosure =<< mkBufferHighlightUpdatedCallback wrapped- where wrapped = bufferHighlightUpdatedCallbackWrapper cb--bufferHighlightUpdatedCallbackWrapper ::- BufferHighlightUpdatedCallback ->- Ptr () ->- Ptr Gtk.TextIter ->- Ptr Gtk.TextIter ->- Ptr () ->- IO ()-bufferHighlightUpdatedCallbackWrapper _cb _ start end _ = do- start' <- (newBoxed Gtk.TextIter) start- end' <- (newBoxed Gtk.TextIter) end- _cb start' end'--onBufferHighlightUpdated :: (GObject a, MonadIO m) => a -> BufferHighlightUpdatedCallback -> m SignalHandlerId-onBufferHighlightUpdated obj cb = liftIO $ connectBufferHighlightUpdated obj cb SignalConnectBefore-afterBufferHighlightUpdated :: (GObject a, MonadIO m) => a -> BufferHighlightUpdatedCallback -> m SignalHandlerId-afterBufferHighlightUpdated obj cb = connectBufferHighlightUpdated obj cb SignalConnectAfter--connectBufferHighlightUpdated :: (GObject a, MonadIO m) =>- a -> BufferHighlightUpdatedCallback -> SignalConnectMode -> m SignalHandlerId-connectBufferHighlightUpdated obj cb after = liftIO $ do- cb' <- mkBufferHighlightUpdatedCallback (bufferHighlightUpdatedCallbackWrapper cb)- connectSignalFunPtr obj "highlight-updated" cb' after---- signal Buffer::redo-type BufferRedoCallback =- IO ()--noBufferRedoCallback :: Maybe BufferRedoCallback-noBufferRedoCallback = Nothing--type BufferRedoCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkBufferRedoCallback :: BufferRedoCallbackC -> IO (FunPtr BufferRedoCallbackC)--bufferRedoClosure :: BufferRedoCallback -> IO Closure-bufferRedoClosure cb = newCClosure =<< mkBufferRedoCallback wrapped- where wrapped = bufferRedoCallbackWrapper cb--bufferRedoCallbackWrapper ::- BufferRedoCallback ->- Ptr () ->- Ptr () ->- IO ()-bufferRedoCallbackWrapper _cb _ _ = do- _cb --onBufferRedo :: (GObject a, MonadIO m) => a -> BufferRedoCallback -> m SignalHandlerId-onBufferRedo obj cb = liftIO $ connectBufferRedo obj cb SignalConnectBefore-afterBufferRedo :: (GObject a, MonadIO m) => a -> BufferRedoCallback -> m SignalHandlerId-afterBufferRedo obj cb = connectBufferRedo obj cb SignalConnectAfter--connectBufferRedo :: (GObject a, MonadIO m) =>- a -> BufferRedoCallback -> SignalConnectMode -> m SignalHandlerId-connectBufferRedo obj cb after = liftIO $ do- cb' <- mkBufferRedoCallback (bufferRedoCallbackWrapper cb)- connectSignalFunPtr obj "redo" cb' after---- signal Buffer::source-mark-updated-type BufferSourceMarkUpdatedCallback =- Gtk.TextMark ->- IO ()--noBufferSourceMarkUpdatedCallback :: Maybe BufferSourceMarkUpdatedCallback-noBufferSourceMarkUpdatedCallback = Nothing--type BufferSourceMarkUpdatedCallbackC =- Ptr () -> -- object- Ptr Gtk.TextMark ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkBufferSourceMarkUpdatedCallback :: BufferSourceMarkUpdatedCallbackC -> IO (FunPtr BufferSourceMarkUpdatedCallbackC)--bufferSourceMarkUpdatedClosure :: BufferSourceMarkUpdatedCallback -> IO Closure-bufferSourceMarkUpdatedClosure cb = newCClosure =<< mkBufferSourceMarkUpdatedCallback wrapped- where wrapped = bufferSourceMarkUpdatedCallbackWrapper cb--bufferSourceMarkUpdatedCallbackWrapper ::- BufferSourceMarkUpdatedCallback ->- Ptr () ->- Ptr Gtk.TextMark ->- Ptr () ->- IO ()-bufferSourceMarkUpdatedCallbackWrapper _cb _ mark _ = do- mark' <- (newObject Gtk.TextMark) mark- _cb mark'--onBufferSourceMarkUpdated :: (GObject a, MonadIO m) => a -> BufferSourceMarkUpdatedCallback -> m SignalHandlerId-onBufferSourceMarkUpdated obj cb = liftIO $ connectBufferSourceMarkUpdated obj cb SignalConnectBefore-afterBufferSourceMarkUpdated :: (GObject a, MonadIO m) => a -> BufferSourceMarkUpdatedCallback -> m SignalHandlerId-afterBufferSourceMarkUpdated obj cb = connectBufferSourceMarkUpdated obj cb SignalConnectAfter--connectBufferSourceMarkUpdated :: (GObject a, MonadIO m) =>- a -> BufferSourceMarkUpdatedCallback -> SignalConnectMode -> m SignalHandlerId-connectBufferSourceMarkUpdated obj cb after = liftIO $ do- cb' <- mkBufferSourceMarkUpdatedCallback (bufferSourceMarkUpdatedCallbackWrapper cb)- connectSignalFunPtr obj "source-mark-updated" cb' after---- signal Buffer::undo-type BufferUndoCallback =- IO ()--noBufferUndoCallback :: Maybe BufferUndoCallback-noBufferUndoCallback = Nothing--type BufferUndoCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkBufferUndoCallback :: BufferUndoCallbackC -> IO (FunPtr BufferUndoCallbackC)--bufferUndoClosure :: BufferUndoCallback -> IO Closure-bufferUndoClosure cb = newCClosure =<< mkBufferUndoCallback wrapped- where wrapped = bufferUndoCallbackWrapper cb--bufferUndoCallbackWrapper ::- BufferUndoCallback ->- Ptr () ->- Ptr () ->- IO ()-bufferUndoCallbackWrapper _cb _ _ = do- _cb --onBufferUndo :: (GObject a, MonadIO m) => a -> BufferUndoCallback -> m SignalHandlerId-onBufferUndo obj cb = liftIO $ connectBufferUndo obj cb SignalConnectBefore-afterBufferUndo :: (GObject a, MonadIO m) => a -> BufferUndoCallback -> m SignalHandlerId-afterBufferUndo obj cb = connectBufferUndo obj cb SignalConnectAfter--connectBufferUndo :: (GObject a, MonadIO m) =>- a -> BufferUndoCallback -> SignalConnectMode -> m SignalHandlerId-connectBufferUndo obj cb after = liftIO $ do- cb' <- mkBufferUndoCallback (bufferUndoCallbackWrapper cb)- connectSignalFunPtr obj "undo" cb' after---- VVV Prop "can-redo"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable]- -- Nullable: (Nothing,Nothing)--getBufferCanRedo :: (MonadIO m, BufferK o) => o -> m Bool-getBufferCanRedo obj = liftIO $ getObjectPropertyBool obj "can-redo"--data BufferCanRedoPropertyInfo-instance AttrInfo BufferCanRedoPropertyInfo where- type AttrAllowedOps BufferCanRedoPropertyInfo = '[ 'AttrGet]- type AttrSetTypeConstraint BufferCanRedoPropertyInfo = (~) ()- type AttrBaseTypeConstraint BufferCanRedoPropertyInfo = BufferK- type AttrGetType BufferCanRedoPropertyInfo = Bool- type AttrLabel BufferCanRedoPropertyInfo = "can-redo"- attrGet _ = getBufferCanRedo- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "can-undo"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable]- -- Nullable: (Nothing,Nothing)--getBufferCanUndo :: (MonadIO m, BufferK o) => o -> m Bool-getBufferCanUndo obj = liftIO $ getObjectPropertyBool obj "can-undo"--data BufferCanUndoPropertyInfo-instance AttrInfo BufferCanUndoPropertyInfo where- type AttrAllowedOps BufferCanUndoPropertyInfo = '[ 'AttrGet]- type AttrSetTypeConstraint BufferCanUndoPropertyInfo = (~) ()- type AttrBaseTypeConstraint BufferCanUndoPropertyInfo = BufferK- type AttrGetType BufferCanUndoPropertyInfo = Bool- type AttrLabel BufferCanUndoPropertyInfo = "can-undo"- attrGet _ = getBufferCanUndo- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "highlight-matching-brackets"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getBufferHighlightMatchingBrackets :: (MonadIO m, BufferK o) => o -> m Bool-getBufferHighlightMatchingBrackets obj = liftIO $ getObjectPropertyBool obj "highlight-matching-brackets"--setBufferHighlightMatchingBrackets :: (MonadIO m, BufferK o) => o -> Bool -> m ()-setBufferHighlightMatchingBrackets obj val = liftIO $ setObjectPropertyBool obj "highlight-matching-brackets" val--constructBufferHighlightMatchingBrackets :: Bool -> IO ([Char], GValue)-constructBufferHighlightMatchingBrackets val = constructObjectPropertyBool "highlight-matching-brackets" val--data BufferHighlightMatchingBracketsPropertyInfo-instance AttrInfo BufferHighlightMatchingBracketsPropertyInfo where- type AttrAllowedOps BufferHighlightMatchingBracketsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint BufferHighlightMatchingBracketsPropertyInfo = (~) Bool- type AttrBaseTypeConstraint BufferHighlightMatchingBracketsPropertyInfo = BufferK- type AttrGetType BufferHighlightMatchingBracketsPropertyInfo = Bool- type AttrLabel BufferHighlightMatchingBracketsPropertyInfo = "highlight-matching-brackets"- attrGet _ = getBufferHighlightMatchingBrackets- attrSet _ = setBufferHighlightMatchingBrackets- attrConstruct _ = constructBufferHighlightMatchingBrackets- attrClear _ = undefined---- VVV Prop "highlight-syntax"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getBufferHighlightSyntax :: (MonadIO m, BufferK o) => o -> m Bool-getBufferHighlightSyntax obj = liftIO $ getObjectPropertyBool obj "highlight-syntax"--setBufferHighlightSyntax :: (MonadIO m, BufferK o) => o -> Bool -> m ()-setBufferHighlightSyntax obj val = liftIO $ setObjectPropertyBool obj "highlight-syntax" val--constructBufferHighlightSyntax :: Bool -> IO ([Char], GValue)-constructBufferHighlightSyntax val = constructObjectPropertyBool "highlight-syntax" val--data BufferHighlightSyntaxPropertyInfo-instance AttrInfo BufferHighlightSyntaxPropertyInfo where- type AttrAllowedOps BufferHighlightSyntaxPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint BufferHighlightSyntaxPropertyInfo = (~) Bool- type AttrBaseTypeConstraint BufferHighlightSyntaxPropertyInfo = BufferK- type AttrGetType BufferHighlightSyntaxPropertyInfo = Bool- type AttrLabel BufferHighlightSyntaxPropertyInfo = "highlight-syntax"- attrGet _ = getBufferHighlightSyntax- attrSet _ = setBufferHighlightSyntax- attrConstruct _ = constructBufferHighlightSyntax- attrClear _ = undefined---- VVV Prop "implicit-trailing-newline"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getBufferImplicitTrailingNewline :: (MonadIO m, BufferK o) => o -> m Bool-getBufferImplicitTrailingNewline obj = liftIO $ getObjectPropertyBool obj "implicit-trailing-newline"--setBufferImplicitTrailingNewline :: (MonadIO m, BufferK o) => o -> Bool -> m ()-setBufferImplicitTrailingNewline obj val = liftIO $ setObjectPropertyBool obj "implicit-trailing-newline" val--constructBufferImplicitTrailingNewline :: Bool -> IO ([Char], GValue)-constructBufferImplicitTrailingNewline val = constructObjectPropertyBool "implicit-trailing-newline" val--data BufferImplicitTrailingNewlinePropertyInfo-instance AttrInfo BufferImplicitTrailingNewlinePropertyInfo where- type AttrAllowedOps BufferImplicitTrailingNewlinePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint BufferImplicitTrailingNewlinePropertyInfo = (~) Bool- type AttrBaseTypeConstraint BufferImplicitTrailingNewlinePropertyInfo = BufferK- type AttrGetType BufferImplicitTrailingNewlinePropertyInfo = Bool- type AttrLabel BufferImplicitTrailingNewlinePropertyInfo = "implicit-trailing-newline"- attrGet _ = getBufferImplicitTrailingNewline- attrSet _ = setBufferImplicitTrailingNewline- attrConstruct _ = constructBufferImplicitTrailingNewline- attrClear _ = undefined---- VVV Prop "language"- -- Type: TInterface "GtkSource" "Language"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just True,Just True)--getBufferLanguage :: (MonadIO m, BufferK o) => o -> m (Maybe Language)-getBufferLanguage obj = liftIO $ getObjectPropertyObject obj "language" Language--setBufferLanguage :: (MonadIO m, BufferK o, LanguageK a) => o -> a -> m ()-setBufferLanguage obj val = liftIO $ setObjectPropertyObject obj "language" (Just val)--constructBufferLanguage :: (LanguageK a) => a -> IO ([Char], GValue)-constructBufferLanguage val = constructObjectPropertyObject "language" (Just val)--clearBufferLanguage :: (MonadIO m, BufferK o) => o -> m ()-clearBufferLanguage obj = liftIO $ setObjectPropertyObject obj "language" (Nothing :: Maybe Language)--data BufferLanguagePropertyInfo-instance AttrInfo BufferLanguagePropertyInfo where- type AttrAllowedOps BufferLanguagePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint BufferLanguagePropertyInfo = LanguageK- type AttrBaseTypeConstraint BufferLanguagePropertyInfo = BufferK- type AttrGetType BufferLanguagePropertyInfo = (Maybe Language)- type AttrLabel BufferLanguagePropertyInfo = "language"- attrGet _ = getBufferLanguage- attrSet _ = setBufferLanguage- attrConstruct _ = constructBufferLanguage- attrClear _ = clearBufferLanguage---- VVV Prop "max-undo-levels"- -- Type: TBasicType TInt- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getBufferMaxUndoLevels :: (MonadIO m, BufferK o) => o -> m Int32-getBufferMaxUndoLevels obj = liftIO $ getObjectPropertyInt32 obj "max-undo-levels"--setBufferMaxUndoLevels :: (MonadIO m, BufferK o) => o -> Int32 -> m ()-setBufferMaxUndoLevels obj val = liftIO $ setObjectPropertyInt32 obj "max-undo-levels" val--constructBufferMaxUndoLevels :: Int32 -> IO ([Char], GValue)-constructBufferMaxUndoLevels val = constructObjectPropertyInt32 "max-undo-levels" val--data BufferMaxUndoLevelsPropertyInfo-instance AttrInfo BufferMaxUndoLevelsPropertyInfo where- type AttrAllowedOps BufferMaxUndoLevelsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint BufferMaxUndoLevelsPropertyInfo = (~) Int32- type AttrBaseTypeConstraint BufferMaxUndoLevelsPropertyInfo = BufferK- type AttrGetType BufferMaxUndoLevelsPropertyInfo = Int32- type AttrLabel BufferMaxUndoLevelsPropertyInfo = "max-undo-levels"- attrGet _ = getBufferMaxUndoLevels- attrSet _ = setBufferMaxUndoLevels- attrConstruct _ = constructBufferMaxUndoLevels- attrClear _ = undefined---- VVV Prop "style-scheme"- -- Type: TInterface "GtkSource" "StyleScheme"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just True,Just True)--getBufferStyleScheme :: (MonadIO m, BufferK o) => o -> m (Maybe StyleScheme)-getBufferStyleScheme obj = liftIO $ getObjectPropertyObject obj "style-scheme" StyleScheme--setBufferStyleScheme :: (MonadIO m, BufferK o, StyleSchemeK a) => o -> a -> m ()-setBufferStyleScheme obj val = liftIO $ setObjectPropertyObject obj "style-scheme" (Just val)--constructBufferStyleScheme :: (StyleSchemeK a) => a -> IO ([Char], GValue)-constructBufferStyleScheme val = constructObjectPropertyObject "style-scheme" (Just val)--clearBufferStyleScheme :: (MonadIO m, BufferK o) => o -> m ()-clearBufferStyleScheme obj = liftIO $ setObjectPropertyObject obj "style-scheme" (Nothing :: Maybe StyleScheme)--data BufferStyleSchemePropertyInfo-instance AttrInfo BufferStyleSchemePropertyInfo where- type AttrAllowedOps BufferStyleSchemePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint BufferStyleSchemePropertyInfo = StyleSchemeK- type AttrBaseTypeConstraint BufferStyleSchemePropertyInfo = BufferK- type AttrGetType BufferStyleSchemePropertyInfo = (Maybe StyleScheme)- type AttrLabel BufferStyleSchemePropertyInfo = "style-scheme"- attrGet _ = getBufferStyleScheme- attrSet _ = setBufferStyleScheme- attrConstruct _ = constructBufferStyleScheme- attrClear _ = clearBufferStyleScheme---- VVV Prop "undo-manager"- -- Type: TInterface "GtkSource" "UndoManager"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just True,Just True)--getBufferUndoManager :: (MonadIO m, BufferK o) => o -> m (Maybe UndoManager)-getBufferUndoManager obj = liftIO $ getObjectPropertyObject obj "undo-manager" UndoManager--setBufferUndoManager :: (MonadIO m, BufferK o, UndoManagerK a) => o -> a -> m ()-setBufferUndoManager obj val = liftIO $ setObjectPropertyObject obj "undo-manager" (Just val)--constructBufferUndoManager :: (UndoManagerK a) => a -> IO ([Char], GValue)-constructBufferUndoManager val = constructObjectPropertyObject "undo-manager" (Just val)--clearBufferUndoManager :: (MonadIO m, BufferK o) => o -> m ()-clearBufferUndoManager obj = liftIO $ setObjectPropertyObject obj "undo-manager" (Nothing :: Maybe UndoManager)--data BufferUndoManagerPropertyInfo-instance AttrInfo BufferUndoManagerPropertyInfo where- type AttrAllowedOps BufferUndoManagerPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint BufferUndoManagerPropertyInfo = UndoManagerK- type AttrBaseTypeConstraint BufferUndoManagerPropertyInfo = BufferK- type AttrGetType BufferUndoManagerPropertyInfo = (Maybe UndoManager)- type AttrLabel BufferUndoManagerPropertyInfo = "undo-manager"- attrGet _ = getBufferUndoManager- attrSet _ = setBufferUndoManager- attrConstruct _ = constructBufferUndoManager- attrClear _ = clearBufferUndoManager--type instance AttributeList Buffer = BufferAttributeList-type BufferAttributeList = ('[ '("canRedo", BufferCanRedoPropertyInfo), '("canUndo", BufferCanUndoPropertyInfo), '("copyTargetList", Gtk.TextBufferCopyTargetListPropertyInfo), '("cursorPosition", Gtk.TextBufferCursorPositionPropertyInfo), '("hasSelection", Gtk.TextBufferHasSelectionPropertyInfo), '("highlightMatchingBrackets", BufferHighlightMatchingBracketsPropertyInfo), '("highlightSyntax", BufferHighlightSyntaxPropertyInfo), '("implicitTrailingNewline", BufferImplicitTrailingNewlinePropertyInfo), '("language", BufferLanguagePropertyInfo), '("maxUndoLevels", BufferMaxUndoLevelsPropertyInfo), '("pasteTargetList", Gtk.TextBufferPasteTargetListPropertyInfo), '("styleScheme", BufferStyleSchemePropertyInfo), '("tagTable", Gtk.TextBufferTagTablePropertyInfo), '("text", Gtk.TextBufferTextPropertyInfo), '("undoManager", BufferUndoManagerPropertyInfo)] :: [(Symbol, *)])--bufferHighlightMatchingBrackets :: AttrLabelProxy "highlightMatchingBrackets"-bufferHighlightMatchingBrackets = AttrLabelProxy--bufferHighlightSyntax :: AttrLabelProxy "highlightSyntax"-bufferHighlightSyntax = AttrLabelProxy--bufferImplicitTrailingNewline :: AttrLabelProxy "implicitTrailingNewline"-bufferImplicitTrailingNewline = AttrLabelProxy--bufferLanguage :: AttrLabelProxy "language"-bufferLanguage = AttrLabelProxy--bufferMaxUndoLevels :: AttrLabelProxy "maxUndoLevels"-bufferMaxUndoLevels = AttrLabelProxy--bufferStyleScheme :: AttrLabelProxy "styleScheme"-bufferStyleScheme = AttrLabelProxy--bufferUndoManager :: AttrLabelProxy "undoManager"-bufferUndoManager = AttrLabelProxy--data BufferBracketMatchedSignalInfo-instance SignalInfo BufferBracketMatchedSignalInfo where- type HaskellCallbackType BufferBracketMatchedSignalInfo = BufferBracketMatchedCallback- connectSignal _ = connectBufferBracketMatched--data BufferHighlightUpdatedSignalInfo-instance SignalInfo BufferHighlightUpdatedSignalInfo where- type HaskellCallbackType BufferHighlightUpdatedSignalInfo = BufferHighlightUpdatedCallback- connectSignal _ = connectBufferHighlightUpdated--data BufferRedoSignalInfo-instance SignalInfo BufferRedoSignalInfo where- type HaskellCallbackType BufferRedoSignalInfo = BufferRedoCallback- connectSignal _ = connectBufferRedo--data BufferSourceMarkUpdatedSignalInfo-instance SignalInfo BufferSourceMarkUpdatedSignalInfo where- type HaskellCallbackType BufferSourceMarkUpdatedSignalInfo = BufferSourceMarkUpdatedCallback- connectSignal _ = connectBufferSourceMarkUpdated--data BufferUndoSignalInfo-instance SignalInfo BufferUndoSignalInfo where- type HaskellCallbackType BufferUndoSignalInfo = BufferUndoCallback- connectSignal _ = connectBufferUndo--type instance SignalList Buffer = BufferSignalList-type BufferSignalList = ('[ '("applyTag", Gtk.TextBufferApplyTagSignalInfo), '("beginUserAction", Gtk.TextBufferBeginUserActionSignalInfo), '("bracketMatched", BufferBracketMatchedSignalInfo), '("changed", Gtk.TextBufferChangedSignalInfo), '("deleteRange", Gtk.TextBufferDeleteRangeSignalInfo), '("endUserAction", Gtk.TextBufferEndUserActionSignalInfo), '("highlightUpdated", BufferHighlightUpdatedSignalInfo), '("insertChildAnchor", Gtk.TextBufferInsertChildAnchorSignalInfo), '("insertPixbuf", Gtk.TextBufferInsertPixbufSignalInfo), '("insertText", Gtk.TextBufferInsertTextSignalInfo), '("markDeleted", Gtk.TextBufferMarkDeletedSignalInfo), '("markSet", Gtk.TextBufferMarkSetSignalInfo), '("modifiedChanged", Gtk.TextBufferModifiedChangedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("pasteDone", Gtk.TextBufferPasteDoneSignalInfo), '("redo", BufferRedoSignalInfo), '("removeTag", Gtk.TextBufferRemoveTagSignalInfo), '("sourceMarkUpdated", BufferSourceMarkUpdatedSignalInfo), '("undo", BufferUndoSignalInfo)] :: [(Symbol, *)])---- method Buffer::new--- method type : Constructor--- Args : [Arg {argCName = "table", argType = TInterface "Gtk" "TextTagTable", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Buffer")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_new" gtk_source_buffer_new :: - Ptr Gtk.TextTagTable -> -- table : TInterface "Gtk" "TextTagTable"- IO (Ptr Buffer)---bufferNew ::- (MonadIO m, Gtk.TextTagTableK a) =>- Maybe (a) -- table- -> m Buffer -- result-bufferNew table = liftIO $ do- maybeTable <- case table of- Nothing -> return nullPtr- Just jTable -> do- let jTable' = unsafeManagedPtrCastPtr jTable- return jTable'- result <- gtk_source_buffer_new maybeTable- checkUnexpectedReturnNULL "gtk_source_buffer_new" result- result' <- (wrapObject Buffer) result- whenJust table touchManagedPtr- return result'---- method Buffer::new_with_language--- method type : Constructor--- Args : [Arg {argCName = "language", argType = TInterface "GtkSource" "Language", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Buffer")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_new_with_language" gtk_source_buffer_new_with_language :: - Ptr Language -> -- language : TInterface "GtkSource" "Language"- IO (Ptr Buffer)---bufferNewWithLanguage ::- (MonadIO m, LanguageK a) =>- a -- language- -> m Buffer -- result-bufferNewWithLanguage language = liftIO $ do- let language' = unsafeManagedPtrCastPtr language- result <- gtk_source_buffer_new_with_language language'- checkUnexpectedReturnNULL "gtk_source_buffer_new_with_language" result- result' <- (wrapObject Buffer) result- touchManagedPtr language- return result'---- method Buffer::backward_iter_to_source_mark--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_backward_iter_to_source_mark" gtk_source_buffer_backward_iter_to_source_mark :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- CString -> -- category : TBasicType TUTF8- IO CInt---bufferBackwardIterToSourceMark ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> Maybe (T.Text) -- category- -> m Bool -- result-bufferBackwardIterToSourceMark _obj iter category = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- maybeCategory <- case category of- Nothing -> return nullPtr- Just jCategory -> do- jCategory' <- textToCString jCategory- return jCategory'- result <- gtk_source_buffer_backward_iter_to_source_mark _obj' iter' maybeCategory- let result' = (/= 0) result- touchManagedPtr _obj- touchManagedPtr iter- freeMem maybeCategory- return result'--data BufferBackwardIterToSourceMarkMethodInfo-instance (signature ~ (Gtk.TextIter -> Maybe (T.Text) -> m Bool), MonadIO m, BufferK a) => MethodInfo BufferBackwardIterToSourceMarkMethodInfo a signature where- overloadedMethod _ = bufferBackwardIterToSourceMark---- method Buffer::begin_not_undoable_action--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_begin_not_undoable_action" gtk_source_buffer_begin_not_undoable_action :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO ()---bufferBeginNotUndoableAction ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m () -- result-bufferBeginNotUndoableAction _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_buffer_begin_not_undoable_action _obj'- touchManagedPtr _obj- return ()--data BufferBeginNotUndoableActionMethodInfo-instance (signature ~ (m ()), MonadIO m, BufferK a) => MethodInfo BufferBeginNotUndoableActionMethodInfo a signature where- overloadedMethod _ = bufferBeginNotUndoableAction---- method Buffer::can_redo--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_can_redo" gtk_source_buffer_can_redo :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO CInt---bufferCanRedo ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m Bool -- result-bufferCanRedo _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_buffer_can_redo _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data BufferCanRedoMethodInfo-instance (signature ~ (m Bool), MonadIO m, BufferK a) => MethodInfo BufferCanRedoMethodInfo a signature where- overloadedMethod _ = bufferCanRedo---- method Buffer::can_undo--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_can_undo" gtk_source_buffer_can_undo :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO CInt---bufferCanUndo ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m Bool -- result-bufferCanUndo _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_buffer_can_undo _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data BufferCanUndoMethodInfo-instance (signature ~ (m Bool), MonadIO m, BufferK a) => MethodInfo BufferCanUndoMethodInfo a signature where- overloadedMethod _ = bufferCanUndo---- method Buffer::change_case--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "case_type", argType = TInterface "GtkSource" "ChangeCaseType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_change_case" gtk_source_buffer_change_case :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- CUInt -> -- case_type : TInterface "GtkSource" "ChangeCaseType"- Ptr Gtk.TextIter -> -- start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- end : TInterface "Gtk" "TextIter"- IO ()---bufferChangeCase ::- (MonadIO m, BufferK a) =>- a -- _obj- -> ChangeCaseType -- caseType- -> Gtk.TextIter -- start- -> Gtk.TextIter -- end- -> m () -- result-bufferChangeCase _obj caseType start end = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let caseType' = (fromIntegral . fromEnum) caseType- let start' = unsafeManagedPtrGetPtr start- let end' = unsafeManagedPtrGetPtr end- gtk_source_buffer_change_case _obj' caseType' start' end'- touchManagedPtr _obj- touchManagedPtr start- touchManagedPtr end- return ()--data BufferChangeCaseMethodInfo-instance (signature ~ (ChangeCaseType -> Gtk.TextIter -> Gtk.TextIter -> m ()), MonadIO m, BufferK a) => MethodInfo BufferChangeCaseMethodInfo a signature where- overloadedMethod _ = bufferChangeCase---- method Buffer::create_source_mark--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", 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},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "where", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Mark")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_create_source_mark" gtk_source_buffer_create_source_mark :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- CString -> -- name : TBasicType TUTF8- CString -> -- category : TBasicType TUTF8- Ptr Gtk.TextIter -> -- where : TInterface "Gtk" "TextIter"- IO (Ptr Mark)---bufferCreateSourceMark ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Maybe (T.Text) -- name- -> T.Text -- category- -> Gtk.TextIter -- where_- -> m Mark -- result-bufferCreateSourceMark _obj name category where_ = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeName <- case name of- Nothing -> return nullPtr- Just jName -> do- jName' <- textToCString jName- return jName'- category' <- textToCString category- let where_' = unsafeManagedPtrGetPtr where_- result <- gtk_source_buffer_create_source_mark _obj' maybeName category' where_'- checkUnexpectedReturnNULL "gtk_source_buffer_create_source_mark" result- result' <- (newObject Mark) result- touchManagedPtr _obj- touchManagedPtr where_- freeMem maybeName- freeMem category'- return result'--data BufferCreateSourceMarkMethodInfo-instance (signature ~ (Maybe (T.Text) -> T.Text -> Gtk.TextIter -> m Mark), MonadIO m, BufferK a) => MethodInfo BufferCreateSourceMarkMethodInfo a signature where- overloadedMethod _ = bufferCreateSourceMark---- method Buffer::end_not_undoable_action--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_end_not_undoable_action" gtk_source_buffer_end_not_undoable_action :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO ()---bufferEndNotUndoableAction ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m () -- result-bufferEndNotUndoableAction _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_buffer_end_not_undoable_action _obj'- touchManagedPtr _obj- return ()--data BufferEndNotUndoableActionMethodInfo-instance (signature ~ (m ()), MonadIO m, BufferK a) => MethodInfo BufferEndNotUndoableActionMethodInfo a signature where- overloadedMethod _ = bufferEndNotUndoableAction---- method Buffer::ensure_highlight--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_ensure_highlight" gtk_source_buffer_ensure_highlight :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Gtk.TextIter -> -- start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- end : TInterface "Gtk" "TextIter"- IO ()---bufferEnsureHighlight ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Gtk.TextIter -- start- -> Gtk.TextIter -- end- -> m () -- result-bufferEnsureHighlight _obj start end = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let start' = unsafeManagedPtrGetPtr start- let end' = unsafeManagedPtrGetPtr end- gtk_source_buffer_ensure_highlight _obj' start' end'- touchManagedPtr _obj- touchManagedPtr start- touchManagedPtr end- return ()--data BufferEnsureHighlightMethodInfo-instance (signature ~ (Gtk.TextIter -> Gtk.TextIter -> m ()), MonadIO m, BufferK a) => MethodInfo BufferEnsureHighlightMethodInfo a signature where- overloadedMethod _ = bufferEnsureHighlight---- method Buffer::forward_iter_to_source_mark--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_forward_iter_to_source_mark" gtk_source_buffer_forward_iter_to_source_mark :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- CString -> -- category : TBasicType TUTF8- IO CInt---bufferForwardIterToSourceMark ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> Maybe (T.Text) -- category- -> m Bool -- result-bufferForwardIterToSourceMark _obj iter category = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- maybeCategory <- case category of- Nothing -> return nullPtr- Just jCategory -> do- jCategory' <- textToCString jCategory- return jCategory'- result <- gtk_source_buffer_forward_iter_to_source_mark _obj' iter' maybeCategory- let result' = (/= 0) result- touchManagedPtr _obj- touchManagedPtr iter- freeMem maybeCategory- return result'--data BufferForwardIterToSourceMarkMethodInfo-instance (signature ~ (Gtk.TextIter -> Maybe (T.Text) -> m Bool), MonadIO m, BufferK a) => MethodInfo BufferForwardIterToSourceMarkMethodInfo a signature where- overloadedMethod _ = bufferForwardIterToSourceMark---- method Buffer::get_context_classes_at_iter--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TCArray True (-1) (-1) (TBasicType TUTF8))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_get_context_classes_at_iter" gtk_source_buffer_get_context_classes_at_iter :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- IO (Ptr CString)---bufferGetContextClassesAtIter ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> m [T.Text] -- result-bufferGetContextClassesAtIter _obj iter = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- result <- gtk_source_buffer_get_context_classes_at_iter _obj' iter'- checkUnexpectedReturnNULL "gtk_source_buffer_get_context_classes_at_iter" result- result' <- unpackZeroTerminatedUTF8CArray result- mapZeroTerminatedCArray freeMem result- freeMem result- touchManagedPtr _obj- touchManagedPtr iter- return result'--data BufferGetContextClassesAtIterMethodInfo-instance (signature ~ (Gtk.TextIter -> m [T.Text]), MonadIO m, BufferK a) => MethodInfo BufferGetContextClassesAtIterMethodInfo a signature where- overloadedMethod _ = bufferGetContextClassesAtIter---- method Buffer::get_highlight_matching_brackets--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_get_highlight_matching_brackets" gtk_source_buffer_get_highlight_matching_brackets :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO CInt---bufferGetHighlightMatchingBrackets ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m Bool -- result-bufferGetHighlightMatchingBrackets _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_buffer_get_highlight_matching_brackets _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data BufferGetHighlightMatchingBracketsMethodInfo-instance (signature ~ (m Bool), MonadIO m, BufferK a) => MethodInfo BufferGetHighlightMatchingBracketsMethodInfo a signature where- overloadedMethod _ = bufferGetHighlightMatchingBrackets---- method Buffer::get_highlight_syntax--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_get_highlight_syntax" gtk_source_buffer_get_highlight_syntax :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO CInt---bufferGetHighlightSyntax ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m Bool -- result-bufferGetHighlightSyntax _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_buffer_get_highlight_syntax _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data BufferGetHighlightSyntaxMethodInfo-instance (signature ~ (m Bool), MonadIO m, BufferK a) => MethodInfo BufferGetHighlightSyntaxMethodInfo a signature where- overloadedMethod _ = bufferGetHighlightSyntax---- method Buffer::get_implicit_trailing_newline--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_get_implicit_trailing_newline" gtk_source_buffer_get_implicit_trailing_newline :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO CInt---bufferGetImplicitTrailingNewline ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m Bool -- result-bufferGetImplicitTrailingNewline _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_buffer_get_implicit_trailing_newline _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data BufferGetImplicitTrailingNewlineMethodInfo-instance (signature ~ (m Bool), MonadIO m, BufferK a) => MethodInfo BufferGetImplicitTrailingNewlineMethodInfo a signature where- overloadedMethod _ = bufferGetImplicitTrailingNewline---- method Buffer::get_language--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Language")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_get_language" gtk_source_buffer_get_language :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO (Ptr Language)---bufferGetLanguage ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m (Maybe Language) -- result-bufferGetLanguage _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_buffer_get_language _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject Language) result'- return result''- touchManagedPtr _obj- return maybeResult--data BufferGetLanguageMethodInfo-instance (signature ~ (m (Maybe Language)), MonadIO m, BufferK a) => MethodInfo BufferGetLanguageMethodInfo a signature where- overloadedMethod _ = bufferGetLanguage---- method Buffer::get_max_undo_levels--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_get_max_undo_levels" gtk_source_buffer_get_max_undo_levels :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO Int32---bufferGetMaxUndoLevels ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m Int32 -- result-bufferGetMaxUndoLevels _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_buffer_get_max_undo_levels _obj'- touchManagedPtr _obj- return result--data BufferGetMaxUndoLevelsMethodInfo-instance (signature ~ (m Int32), MonadIO m, BufferK a) => MethodInfo BufferGetMaxUndoLevelsMethodInfo a signature where- overloadedMethod _ = bufferGetMaxUndoLevels---- method Buffer::get_source_marks_at_iter--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TGSList (TInterface "GtkSource" "Mark"))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_get_source_marks_at_iter" gtk_source_buffer_get_source_marks_at_iter :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- CString -> -- category : TBasicType TUTF8- IO (Ptr (GSList (Ptr Mark)))---bufferGetSourceMarksAtIter ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> Maybe (T.Text) -- category- -> m [Mark] -- result-bufferGetSourceMarksAtIter _obj iter category = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- maybeCategory <- case category of- Nothing -> return nullPtr- Just jCategory -> do- jCategory' <- textToCString jCategory- return jCategory'- result <- gtk_source_buffer_get_source_marks_at_iter _obj' iter' maybeCategory- result' <- unpackGSList result- result'' <- mapM (newObject Mark) result'- g_slist_free result- touchManagedPtr _obj- touchManagedPtr iter- freeMem maybeCategory- return result''--data BufferGetSourceMarksAtIterMethodInfo-instance (signature ~ (Gtk.TextIter -> Maybe (T.Text) -> m [Mark]), MonadIO m, BufferK a) => MethodInfo BufferGetSourceMarksAtIterMethodInfo a signature where- overloadedMethod _ = bufferGetSourceMarksAtIter---- method Buffer::get_source_marks_at_line--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "line", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TGSList (TInterface "GtkSource" "Mark"))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_get_source_marks_at_line" gtk_source_buffer_get_source_marks_at_line :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Int32 -> -- line : TBasicType TInt- CString -> -- category : TBasicType TUTF8- IO (Ptr (GSList (Ptr Mark)))---bufferGetSourceMarksAtLine ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Int32 -- line- -> Maybe (T.Text) -- category- -> m [Mark] -- result-bufferGetSourceMarksAtLine _obj line category = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeCategory <- case category of- Nothing -> return nullPtr- Just jCategory -> do- jCategory' <- textToCString jCategory- return jCategory'- result <- gtk_source_buffer_get_source_marks_at_line _obj' line maybeCategory- result' <- unpackGSList result- result'' <- mapM (newObject Mark) result'- g_slist_free result- touchManagedPtr _obj- freeMem maybeCategory- return result''--data BufferGetSourceMarksAtLineMethodInfo-instance (signature ~ (Int32 -> Maybe (T.Text) -> m [Mark]), MonadIO m, BufferK a) => MethodInfo BufferGetSourceMarksAtLineMethodInfo a signature where- overloadedMethod _ = bufferGetSourceMarksAtLine---- method Buffer::get_style_scheme--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "StyleScheme")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_get_style_scheme" gtk_source_buffer_get_style_scheme :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO (Ptr StyleScheme)---bufferGetStyleScheme ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m (Maybe StyleScheme) -- result-bufferGetStyleScheme _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_buffer_get_style_scheme _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject StyleScheme) result'- return result''- touchManagedPtr _obj- return maybeResult--data BufferGetStyleSchemeMethodInfo-instance (signature ~ (m (Maybe StyleScheme)), MonadIO m, BufferK a) => MethodInfo BufferGetStyleSchemeMethodInfo a signature where- overloadedMethod _ = bufferGetStyleScheme---- method Buffer::get_undo_manager--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "UndoManager")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_get_undo_manager" gtk_source_buffer_get_undo_manager :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO (Ptr UndoManager)---bufferGetUndoManager ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m (Maybe UndoManager) -- result-bufferGetUndoManager _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_buffer_get_undo_manager _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject UndoManager) result'- return result''- touchManagedPtr _obj- return maybeResult--data BufferGetUndoManagerMethodInfo-instance (signature ~ (m (Maybe UndoManager)), MonadIO m, BufferK a) => MethodInfo BufferGetUndoManagerMethodInfo a signature where- overloadedMethod _ = bufferGetUndoManager---- method Buffer::iter_backward_to_context_class_toggle--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionInout, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "context_class", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_iter_backward_to_context_class_toggle" gtk_source_buffer_iter_backward_to_context_class_toggle :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- CString -> -- context_class : TBasicType TUTF8- IO CInt---bufferIterBackwardToContextClassToggle ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> T.Text -- contextClass- -> m (Bool,Gtk.TextIter) -- result-bufferIterBackwardToContextClassToggle _obj iter contextClass = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- iter' <- copyBoxed iter- iter'' <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- memcpy iter'' iter' 80- contextClass' <- textToCString contextClass- result <- gtk_source_buffer_iter_backward_to_context_class_toggle _obj' iter'' contextClass'- let result' = (/= 0) result- iter''' <- (wrapBoxed Gtk.TextIter) iter''- touchManagedPtr _obj- touchManagedPtr iter- freeMem contextClass'- return (result', iter''')--data BufferIterBackwardToContextClassToggleMethodInfo-instance (signature ~ (Gtk.TextIter -> T.Text -> m (Bool,Gtk.TextIter)), MonadIO m, BufferK a) => MethodInfo BufferIterBackwardToContextClassToggleMethodInfo a signature where- overloadedMethod _ = bufferIterBackwardToContextClassToggle---- method Buffer::iter_forward_to_context_class_toggle--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionInout, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "context_class", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_iter_forward_to_context_class_toggle" gtk_source_buffer_iter_forward_to_context_class_toggle :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- CString -> -- context_class : TBasicType TUTF8- IO CInt---bufferIterForwardToContextClassToggle ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> T.Text -- contextClass- -> m (Bool,Gtk.TextIter) -- result-bufferIterForwardToContextClassToggle _obj iter contextClass = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- iter' <- copyBoxed iter- iter'' <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- memcpy iter'' iter' 80- contextClass' <- textToCString contextClass- result <- gtk_source_buffer_iter_forward_to_context_class_toggle _obj' iter'' contextClass'- let result' = (/= 0) result- iter''' <- (wrapBoxed Gtk.TextIter) iter''- touchManagedPtr _obj- touchManagedPtr iter- freeMem contextClass'- return (result', iter''')--data BufferIterForwardToContextClassToggleMethodInfo-instance (signature ~ (Gtk.TextIter -> T.Text -> m (Bool,Gtk.TextIter)), MonadIO m, BufferK a) => MethodInfo BufferIterForwardToContextClassToggleMethodInfo a signature where- overloadedMethod _ = bufferIterForwardToContextClassToggle---- method Buffer::iter_has_context_class--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "context_class", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_iter_has_context_class" gtk_source_buffer_iter_has_context_class :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- CString -> -- context_class : TBasicType TUTF8- IO CInt---bufferIterHasContextClass ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> T.Text -- contextClass- -> m Bool -- result-bufferIterHasContextClass _obj iter contextClass = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- contextClass' <- textToCString contextClass- result <- gtk_source_buffer_iter_has_context_class _obj' iter' contextClass'- let result' = (/= 0) result- touchManagedPtr _obj- touchManagedPtr iter- freeMem contextClass'- return result'--data BufferIterHasContextClassMethodInfo-instance (signature ~ (Gtk.TextIter -> T.Text -> m Bool), MonadIO m, BufferK a) => MethodInfo BufferIterHasContextClassMethodInfo a signature where- overloadedMethod _ = bufferIterHasContextClass---- method Buffer::join_lines--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_join_lines" gtk_source_buffer_join_lines :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Gtk.TextIter -> -- start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- end : TInterface "Gtk" "TextIter"- IO ()---bufferJoinLines ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Gtk.TextIter -- start- -> Gtk.TextIter -- end- -> m () -- result-bufferJoinLines _obj start end = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let start' = unsafeManagedPtrGetPtr start- let end' = unsafeManagedPtrGetPtr end- gtk_source_buffer_join_lines _obj' start' end'- touchManagedPtr _obj- touchManagedPtr start- touchManagedPtr end- return ()--data BufferJoinLinesMethodInfo-instance (signature ~ (Gtk.TextIter -> Gtk.TextIter -> m ()), MonadIO m, BufferK a) => MethodInfo BufferJoinLinesMethodInfo a signature where- overloadedMethod _ = bufferJoinLines---- method Buffer::redo--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_redo" gtk_source_buffer_redo :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO ()---bufferRedo ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m () -- result-bufferRedo _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_buffer_redo _obj'- touchManagedPtr _obj- return ()--data BufferRedoMethodInfo-instance (signature ~ (m ()), MonadIO m, BufferK a) => MethodInfo BufferRedoMethodInfo a signature where- overloadedMethod _ = bufferRedo---- method Buffer::remove_source_marks--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_remove_source_marks" gtk_source_buffer_remove_source_marks :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Gtk.TextIter -> -- start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- end : TInterface "Gtk" "TextIter"- CString -> -- category : TBasicType TUTF8- IO ()---bufferRemoveSourceMarks ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Gtk.TextIter -- start- -> Gtk.TextIter -- end- -> Maybe (T.Text) -- category- -> m () -- result-bufferRemoveSourceMarks _obj start end category = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let start' = unsafeManagedPtrGetPtr start- let end' = unsafeManagedPtrGetPtr end- maybeCategory <- case category of- Nothing -> return nullPtr- Just jCategory -> do- jCategory' <- textToCString jCategory- return jCategory'- gtk_source_buffer_remove_source_marks _obj' start' end' maybeCategory- touchManagedPtr _obj- touchManagedPtr start- touchManagedPtr end- freeMem maybeCategory- return ()--data BufferRemoveSourceMarksMethodInfo-instance (signature ~ (Gtk.TextIter -> Gtk.TextIter -> Maybe (T.Text) -> m ()), MonadIO m, BufferK a) => MethodInfo BufferRemoveSourceMarksMethodInfo a signature where- overloadedMethod _ = bufferRemoveSourceMarks---- method Buffer::set_highlight_matching_brackets--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", 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 : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_set_highlight_matching_brackets" gtk_source_buffer_set_highlight_matching_brackets :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- CInt -> -- highlight : TBasicType TBoolean- IO ()---bufferSetHighlightMatchingBrackets ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Bool -- highlight- -> m () -- result-bufferSetHighlightMatchingBrackets _obj highlight = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let highlight' = (fromIntegral . fromEnum) highlight- gtk_source_buffer_set_highlight_matching_brackets _obj' highlight'- touchManagedPtr _obj- return ()--data BufferSetHighlightMatchingBracketsMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, BufferK a) => MethodInfo BufferSetHighlightMatchingBracketsMethodInfo a signature where- overloadedMethod _ = bufferSetHighlightMatchingBrackets---- method Buffer::set_highlight_syntax--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", 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 : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_set_highlight_syntax" gtk_source_buffer_set_highlight_syntax :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- CInt -> -- highlight : TBasicType TBoolean- IO ()---bufferSetHighlightSyntax ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Bool -- highlight- -> m () -- result-bufferSetHighlightSyntax _obj highlight = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let highlight' = (fromIntegral . fromEnum) highlight- gtk_source_buffer_set_highlight_syntax _obj' highlight'- touchManagedPtr _obj- return ()--data BufferSetHighlightSyntaxMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, BufferK a) => MethodInfo BufferSetHighlightSyntaxMethodInfo a signature where- overloadedMethod _ = bufferSetHighlightSyntax---- method Buffer::set_implicit_trailing_newline--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "implicit_trailing_newline", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_set_implicit_trailing_newline" gtk_source_buffer_set_implicit_trailing_newline :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- CInt -> -- implicit_trailing_newline : TBasicType TBoolean- IO ()---bufferSetImplicitTrailingNewline ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Bool -- implicitTrailingNewline- -> m () -- result-bufferSetImplicitTrailingNewline _obj implicitTrailingNewline = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let implicitTrailingNewline' = (fromIntegral . fromEnum) implicitTrailingNewline- gtk_source_buffer_set_implicit_trailing_newline _obj' implicitTrailingNewline'- touchManagedPtr _obj- return ()--data BufferSetImplicitTrailingNewlineMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, BufferK a) => MethodInfo BufferSetImplicitTrailingNewlineMethodInfo a signature where- overloadedMethod _ = bufferSetImplicitTrailingNewline---- method Buffer::set_language--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "language", argType = TInterface "GtkSource" "Language", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_set_language" gtk_source_buffer_set_language :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Language -> -- language : TInterface "GtkSource" "Language"- IO ()---bufferSetLanguage ::- (MonadIO m, BufferK a, LanguageK b) =>- a -- _obj- -> Maybe (b) -- language- -> m () -- result-bufferSetLanguage _obj language = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeLanguage <- case language of- Nothing -> return nullPtr- Just jLanguage -> do- let jLanguage' = unsafeManagedPtrCastPtr jLanguage- return jLanguage'- gtk_source_buffer_set_language _obj' maybeLanguage- touchManagedPtr _obj- whenJust language touchManagedPtr- return ()--data BufferSetLanguageMethodInfo-instance (signature ~ (Maybe (b) -> m ()), MonadIO m, BufferK a, LanguageK b) => MethodInfo BufferSetLanguageMethodInfo a signature where- overloadedMethod _ = bufferSetLanguage---- method Buffer::set_max_undo_levels--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "max_undo_levels", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_set_max_undo_levels" gtk_source_buffer_set_max_undo_levels :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Int32 -> -- max_undo_levels : TBasicType TInt- IO ()---bufferSetMaxUndoLevels ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Int32 -- maxUndoLevels- -> m () -- result-bufferSetMaxUndoLevels _obj maxUndoLevels = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_buffer_set_max_undo_levels _obj' maxUndoLevels- touchManagedPtr _obj- return ()--data BufferSetMaxUndoLevelsMethodInfo-instance (signature ~ (Int32 -> m ()), MonadIO m, BufferK a) => MethodInfo BufferSetMaxUndoLevelsMethodInfo a signature where- overloadedMethod _ = bufferSetMaxUndoLevels---- method Buffer::set_style_scheme--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "scheme", argType = TInterface "GtkSource" "StyleScheme", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_set_style_scheme" gtk_source_buffer_set_style_scheme :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr StyleScheme -> -- scheme : TInterface "GtkSource" "StyleScheme"- IO ()---bufferSetStyleScheme ::- (MonadIO m, BufferK a, StyleSchemeK b) =>- a -- _obj- -> Maybe (b) -- scheme- -> m () -- result-bufferSetStyleScheme _obj scheme = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeScheme <- case scheme of- Nothing -> return nullPtr- Just jScheme -> do- let jScheme' = unsafeManagedPtrCastPtr jScheme- return jScheme'- gtk_source_buffer_set_style_scheme _obj' maybeScheme- touchManagedPtr _obj- whenJust scheme touchManagedPtr- return ()--data BufferSetStyleSchemeMethodInfo-instance (signature ~ (Maybe (b) -> m ()), MonadIO m, BufferK a, StyleSchemeK b) => MethodInfo BufferSetStyleSchemeMethodInfo a signature where- overloadedMethod _ = bufferSetStyleScheme---- method Buffer::set_undo_manager--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "manager", argType = TInterface "GtkSource" "UndoManager", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_set_undo_manager" gtk_source_buffer_set_undo_manager :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr UndoManager -> -- manager : TInterface "GtkSource" "UndoManager"- IO ()---bufferSetUndoManager ::- (MonadIO m, BufferK a, UndoManagerK b) =>- a -- _obj- -> Maybe (b) -- manager- -> m () -- result-bufferSetUndoManager _obj manager = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeManager <- case manager of- Nothing -> return nullPtr- Just jManager -> do- let jManager' = unsafeManagedPtrCastPtr jManager- return jManager'- gtk_source_buffer_set_undo_manager _obj' maybeManager- touchManagedPtr _obj- whenJust manager touchManagedPtr- return ()--data BufferSetUndoManagerMethodInfo-instance (signature ~ (Maybe (b) -> m ()), MonadIO m, BufferK a, UndoManagerK b) => MethodInfo BufferSetUndoManagerMethodInfo a signature where- overloadedMethod _ = bufferSetUndoManager---- method Buffer::sort_lines--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flags", argType = TInterface "GtkSource" "SortFlags", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "column", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_sort_lines" gtk_source_buffer_sort_lines :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- Ptr Gtk.TextIter -> -- start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- end : TInterface "Gtk" "TextIter"- CUInt -> -- flags : TInterface "GtkSource" "SortFlags"- Int32 -> -- column : TBasicType TInt- IO ()---bufferSortLines ::- (MonadIO m, BufferK a) =>- a -- _obj- -> Gtk.TextIter -- start- -> Gtk.TextIter -- end- -> [SortFlags] -- flags- -> Int32 -- column- -> m () -- result-bufferSortLines _obj start end flags column = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let start' = unsafeManagedPtrGetPtr start- let end' = unsafeManagedPtrGetPtr end- let flags' = gflagsToWord flags- gtk_source_buffer_sort_lines _obj' start' end' flags' column- touchManagedPtr _obj- touchManagedPtr start- touchManagedPtr end- return ()--data BufferSortLinesMethodInfo-instance (signature ~ (Gtk.TextIter -> Gtk.TextIter -> [SortFlags] -> Int32 -> m ()), MonadIO m, BufferK a) => MethodInfo BufferSortLinesMethodInfo a signature where- overloadedMethod _ = bufferSortLines---- method Buffer::undo--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_buffer_undo" gtk_source_buffer_undo :: - Ptr Buffer -> -- _obj : TInterface "GtkSource" "Buffer"- IO ()---bufferUndo ::- (MonadIO m, BufferK a) =>- a -- _obj- -> m () -- result-bufferUndo _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_buffer_undo _obj'- touchManagedPtr _obj- return ()--data BufferUndoMethodInfo-instance (signature ~ (m ()), MonadIO m, BufferK a) => MethodInfo BufferUndoMethodInfo a signature where- overloadedMethod _ = bufferUndo--
− GI/GtkSource/Objects/Buffer.hs-boot
@@ -1,61 +0,0 @@-module GI.GtkSource.Objects.Buffer where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype Buffer = Buffer (ForeignPtr Buffer)-instance GObject Buffer where-class GObject o => BufferK o-instance (GObject o, IsDescendantOf Buffer o) => BufferK o-data BufferCanRedoPropertyInfo-data BufferCanUndoPropertyInfo-data BufferHighlightMatchingBracketsPropertyInfo-data BufferHighlightSyntaxPropertyInfo-data BufferImplicitTrailingNewlinePropertyInfo-data BufferLanguagePropertyInfo-data BufferMaxUndoLevelsPropertyInfo-data BufferStyleSchemePropertyInfo-data BufferUndoManagerPropertyInfo-data BufferBracketMatchedSignalInfo-data BufferHighlightUpdatedSignalInfo-data BufferRedoSignalInfo-data BufferSourceMarkUpdatedSignalInfo-data BufferUndoSignalInfo-data BufferBackwardIterToSourceMarkMethodInfo-data BufferBeginNotUndoableActionMethodInfo-data BufferCanRedoMethodInfo-data BufferCanUndoMethodInfo-data BufferChangeCaseMethodInfo-data BufferCreateSourceMarkMethodInfo-data BufferEndNotUndoableActionMethodInfo-data BufferEnsureHighlightMethodInfo-data BufferForwardIterToSourceMarkMethodInfo-data BufferGetContextClassesAtIterMethodInfo-data BufferGetHighlightMatchingBracketsMethodInfo-data BufferGetHighlightSyntaxMethodInfo-data BufferGetImplicitTrailingNewlineMethodInfo-data BufferGetLanguageMethodInfo-data BufferGetMaxUndoLevelsMethodInfo-data BufferGetSourceMarksAtIterMethodInfo-data BufferGetSourceMarksAtLineMethodInfo-data BufferGetStyleSchemeMethodInfo-data BufferGetUndoManagerMethodInfo-data BufferIterBackwardToContextClassToggleMethodInfo-data BufferIterForwardToContextClassToggleMethodInfo-data BufferIterHasContextClassMethodInfo-data BufferJoinLinesMethodInfo-data BufferRedoMethodInfo-data BufferRemoveSourceMarksMethodInfo-data BufferSetHighlightMatchingBracketsMethodInfo-data BufferSetHighlightSyntaxMethodInfo-data BufferSetImplicitTrailingNewlineMethodInfo-data BufferSetLanguageMethodInfo-data BufferSetMaxUndoLevelsMethodInfo-data BufferSetStyleSchemeMethodInfo-data BufferSetUndoManagerMethodInfo-data BufferSortLinesMethodInfo-data BufferUndoMethodInfo
− GI/GtkSource/Objects/Completion.hs
@@ -1,1202 +0,0 @@---{- |-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.GtkSource.Objects.Completion- ( ---- * Exported types- Completion(..) ,- CompletionK ,- toCompletion ,- noCompletion ,--- -- * Methods--- ** completionAddProvider- CompletionAddProviderMethodInfo ,- completionAddProvider ,----- ** completionBlockInteractive- CompletionBlockInteractiveMethodInfo ,- completionBlockInteractive ,----- ** completionCreateContext- CompletionCreateContextMethodInfo ,- completionCreateContext ,----- ** completionGetInfoWindow- CompletionGetInfoWindowMethodInfo ,- completionGetInfoWindow ,----- ** completionGetProviders- CompletionGetProvidersMethodInfo ,- completionGetProviders ,----- ** completionGetView- CompletionGetViewMethodInfo ,- completionGetView ,----- ** completionHide- CompletionHideMethodInfo ,- completionHide ,----- ** completionMoveWindow- CompletionMoveWindowMethodInfo ,- completionMoveWindow ,----- ** completionRemoveProvider- CompletionRemoveProviderMethodInfo ,- completionRemoveProvider ,----- ** completionShow- CompletionShowMethodInfo ,- completionShow ,----- ** completionUnblockInteractive- CompletionUnblockInteractiveMethodInfo ,- completionUnblockInteractive ,----- -- * Properties--- ** Accelerators- CompletionAcceleratorsPropertyInfo ,- completionAccelerators ,- constructCompletionAccelerators ,- getCompletionAccelerators ,- setCompletionAccelerators ,----- ** AutoCompleteDelay- CompletionAutoCompleteDelayPropertyInfo ,- completionAutoCompleteDelay ,- constructCompletionAutoCompleteDelay ,- getCompletionAutoCompleteDelay ,- setCompletionAutoCompleteDelay ,----- ** ProposalPageSize- CompletionProposalPageSizePropertyInfo ,- completionProposalPageSize ,- constructCompletionProposalPageSize ,- getCompletionProposalPageSize ,- setCompletionProposalPageSize ,----- ** ProviderPageSize- CompletionProviderPageSizePropertyInfo ,- completionProviderPageSize ,- constructCompletionProviderPageSize ,- getCompletionProviderPageSize ,- setCompletionProviderPageSize ,----- ** RememberInfoVisibility- CompletionRememberInfoVisibilityPropertyInfo,- completionRememberInfoVisibility ,- constructCompletionRememberInfoVisibility,- getCompletionRememberInfoVisibility ,- setCompletionRememberInfoVisibility ,----- ** SelectOnShow- CompletionSelectOnShowPropertyInfo ,- completionSelectOnShow ,- constructCompletionSelectOnShow ,- getCompletionSelectOnShow ,- setCompletionSelectOnShow ,----- ** ShowHeaders- CompletionShowHeadersPropertyInfo ,- completionShowHeaders ,- constructCompletionShowHeaders ,- getCompletionShowHeaders ,- setCompletionShowHeaders ,----- ** ShowIcons- CompletionShowIconsPropertyInfo ,- completionShowIcons ,- constructCompletionShowIcons ,- getCompletionShowIcons ,- setCompletionShowIcons ,----- ** View- CompletionViewPropertyInfo ,- completionView ,- constructCompletionView ,- getCompletionView ,----- -- * Signals--- ** ActivateProposal- CompletionActivateProposalCallback ,- CompletionActivateProposalCallbackC ,- CompletionActivateProposalSignalInfo ,- afterCompletionActivateProposal ,- completionActivateProposalCallbackWrapper,- completionActivateProposalClosure ,- mkCompletionActivateProposalCallback ,- noCompletionActivateProposalCallback ,- onCompletionActivateProposal ,----- ** Hide- CompletionHideCallback ,- CompletionHideCallbackC ,- CompletionHideSignalInfo ,- afterCompletionHide ,- completionHideCallbackWrapper ,- completionHideClosure ,- mkCompletionHideCallback ,- noCompletionHideCallback ,- onCompletionHide ,----- ** MoveCursor- CompletionMoveCursorCallback ,- CompletionMoveCursorCallbackC ,- CompletionMoveCursorSignalInfo ,- afterCompletionMoveCursor ,- completionMoveCursorCallbackWrapper ,- completionMoveCursorClosure ,- mkCompletionMoveCursorCallback ,- noCompletionMoveCursorCallback ,- onCompletionMoveCursor ,----- ** MovePage- CompletionMovePageCallback ,- CompletionMovePageCallbackC ,- CompletionMovePageSignalInfo ,- afterCompletionMovePage ,- completionMovePageCallbackWrapper ,- completionMovePageClosure ,- mkCompletionMovePageCallback ,- noCompletionMovePageCallback ,- onCompletionMovePage ,----- ** PopulateContext- CompletionPopulateContextCallback ,- CompletionPopulateContextCallbackC ,- CompletionPopulateContextSignalInfo ,- afterCompletionPopulateContext ,- completionPopulateContextCallbackWrapper,- completionPopulateContextClosure ,- mkCompletionPopulateContextCallback ,- noCompletionPopulateContextCallback ,- onCompletionPopulateContext ,----- ** Show- CompletionShowCallback ,- CompletionShowCallbackC ,- CompletionShowSignalInfo ,- afterCompletionShow ,- completionShowCallbackWrapper ,- completionShowClosure ,- mkCompletionShowCallback ,- noCompletionShowCallback ,- onCompletionShow ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.Gtk as Gtk--newtype Completion = Completion (ForeignPtr Completion)-foreign import ccall "gtk_source_completion_get_type"- c_gtk_source_completion_get_type :: IO GType--type instance ParentTypes Completion = CompletionParentTypes-type CompletionParentTypes = '[GObject.Object, Gtk.Buildable]--instance GObject Completion where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_completion_get_type- --class GObject o => CompletionK o-instance (GObject o, IsDescendantOf Completion o) => CompletionK o--toCompletion :: CompletionK o => o -> IO Completion-toCompletion = unsafeCastTo Completion--noCompletion :: Maybe Completion-noCompletion = Nothing--type family ResolveCompletionMethod (t :: Symbol) (o :: *) :: * where- ResolveCompletionMethod "addChild" o = Gtk.BuildableAddChildMethodInfo- ResolveCompletionMethod "addProvider" o = CompletionAddProviderMethodInfo- ResolveCompletionMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveCompletionMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveCompletionMethod "blockInteractive" o = CompletionBlockInteractiveMethodInfo- ResolveCompletionMethod "constructChild" o = Gtk.BuildableConstructChildMethodInfo- ResolveCompletionMethod "createContext" o = CompletionCreateContextMethodInfo- ResolveCompletionMethod "customFinished" o = Gtk.BuildableCustomFinishedMethodInfo- ResolveCompletionMethod "customTagEnd" o = Gtk.BuildableCustomTagEndMethodInfo- ResolveCompletionMethod "customTagStart" o = Gtk.BuildableCustomTagStartMethodInfo- ResolveCompletionMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveCompletionMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveCompletionMethod "hide" o = CompletionHideMethodInfo- ResolveCompletionMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveCompletionMethod "moveWindow" o = CompletionMoveWindowMethodInfo- ResolveCompletionMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveCompletionMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveCompletionMethod "parserFinished" o = Gtk.BuildableParserFinishedMethodInfo- ResolveCompletionMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveCompletionMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveCompletionMethod "removeProvider" o = CompletionRemoveProviderMethodInfo- ResolveCompletionMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveCompletionMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveCompletionMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveCompletionMethod "show" o = CompletionShowMethodInfo- ResolveCompletionMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveCompletionMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveCompletionMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveCompletionMethod "unblockInteractive" o = CompletionUnblockInteractiveMethodInfo- ResolveCompletionMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveCompletionMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveCompletionMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveCompletionMethod "getInfoWindow" o = CompletionGetInfoWindowMethodInfo- ResolveCompletionMethod "getInternalChild" o = Gtk.BuildableGetInternalChildMethodInfo- ResolveCompletionMethod "getName" o = Gtk.BuildableGetNameMethodInfo- ResolveCompletionMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveCompletionMethod "getProviders" o = CompletionGetProvidersMethodInfo- ResolveCompletionMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveCompletionMethod "getView" o = CompletionGetViewMethodInfo- ResolveCompletionMethod "setBuildableProperty" o = Gtk.BuildableSetBuildablePropertyMethodInfo- ResolveCompletionMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveCompletionMethod "setName" o = Gtk.BuildableSetNameMethodInfo- ResolveCompletionMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveCompletionMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveCompletionMethod t Completion, MethodInfo info Completion p) => IsLabelProxy t (Completion -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveCompletionMethod t Completion, MethodInfo info Completion p) => IsLabel t (Completion -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- signal Completion::activate-proposal-type CompletionActivateProposalCallback =- IO ()--noCompletionActivateProposalCallback :: Maybe CompletionActivateProposalCallback-noCompletionActivateProposalCallback = Nothing--type CompletionActivateProposalCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkCompletionActivateProposalCallback :: CompletionActivateProposalCallbackC -> IO (FunPtr CompletionActivateProposalCallbackC)--completionActivateProposalClosure :: CompletionActivateProposalCallback -> IO Closure-completionActivateProposalClosure cb = newCClosure =<< mkCompletionActivateProposalCallback wrapped- where wrapped = completionActivateProposalCallbackWrapper cb--completionActivateProposalCallbackWrapper ::- CompletionActivateProposalCallback ->- Ptr () ->- Ptr () ->- IO ()-completionActivateProposalCallbackWrapper _cb _ _ = do- _cb --onCompletionActivateProposal :: (GObject a, MonadIO m) => a -> CompletionActivateProposalCallback -> m SignalHandlerId-onCompletionActivateProposal obj cb = liftIO $ connectCompletionActivateProposal obj cb SignalConnectBefore-afterCompletionActivateProposal :: (GObject a, MonadIO m) => a -> CompletionActivateProposalCallback -> m SignalHandlerId-afterCompletionActivateProposal obj cb = connectCompletionActivateProposal obj cb SignalConnectAfter--connectCompletionActivateProposal :: (GObject a, MonadIO m) =>- a -> CompletionActivateProposalCallback -> SignalConnectMode -> m SignalHandlerId-connectCompletionActivateProposal obj cb after = liftIO $ do- cb' <- mkCompletionActivateProposalCallback (completionActivateProposalCallbackWrapper cb)- connectSignalFunPtr obj "activate-proposal" cb' after---- signal Completion::hide-type CompletionHideCallback =- IO ()--noCompletionHideCallback :: Maybe CompletionHideCallback-noCompletionHideCallback = Nothing--type CompletionHideCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkCompletionHideCallback :: CompletionHideCallbackC -> IO (FunPtr CompletionHideCallbackC)--completionHideClosure :: CompletionHideCallback -> IO Closure-completionHideClosure cb = newCClosure =<< mkCompletionHideCallback wrapped- where wrapped = completionHideCallbackWrapper cb--completionHideCallbackWrapper ::- CompletionHideCallback ->- Ptr () ->- Ptr () ->- IO ()-completionHideCallbackWrapper _cb _ _ = do- _cb --onCompletionHide :: (GObject a, MonadIO m) => a -> CompletionHideCallback -> m SignalHandlerId-onCompletionHide obj cb = liftIO $ connectCompletionHide obj cb SignalConnectBefore-afterCompletionHide :: (GObject a, MonadIO m) => a -> CompletionHideCallback -> m SignalHandlerId-afterCompletionHide obj cb = connectCompletionHide obj cb SignalConnectAfter--connectCompletionHide :: (GObject a, MonadIO m) =>- a -> CompletionHideCallback -> SignalConnectMode -> m SignalHandlerId-connectCompletionHide obj cb after = liftIO $ do- cb' <- mkCompletionHideCallback (completionHideCallbackWrapper cb)- connectSignalFunPtr obj "hide" cb' after---- signal Completion::move-cursor-type CompletionMoveCursorCallback =- Gtk.ScrollStep ->- Int32 ->- IO ()--noCompletionMoveCursorCallback :: Maybe CompletionMoveCursorCallback-noCompletionMoveCursorCallback = Nothing--type CompletionMoveCursorCallbackC =- Ptr () -> -- object- CUInt ->- Int32 ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkCompletionMoveCursorCallback :: CompletionMoveCursorCallbackC -> IO (FunPtr CompletionMoveCursorCallbackC)--completionMoveCursorClosure :: CompletionMoveCursorCallback -> IO Closure-completionMoveCursorClosure cb = newCClosure =<< mkCompletionMoveCursorCallback wrapped- where wrapped = completionMoveCursorCallbackWrapper cb--completionMoveCursorCallbackWrapper ::- CompletionMoveCursorCallback ->- Ptr () ->- CUInt ->- Int32 ->- Ptr () ->- IO ()-completionMoveCursorCallbackWrapper _cb _ step num _ = do- let step' = (toEnum . fromIntegral) step- _cb step' num--onCompletionMoveCursor :: (GObject a, MonadIO m) => a -> CompletionMoveCursorCallback -> m SignalHandlerId-onCompletionMoveCursor obj cb = liftIO $ connectCompletionMoveCursor obj cb SignalConnectBefore-afterCompletionMoveCursor :: (GObject a, MonadIO m) => a -> CompletionMoveCursorCallback -> m SignalHandlerId-afterCompletionMoveCursor obj cb = connectCompletionMoveCursor obj cb SignalConnectAfter--connectCompletionMoveCursor :: (GObject a, MonadIO m) =>- a -> CompletionMoveCursorCallback -> SignalConnectMode -> m SignalHandlerId-connectCompletionMoveCursor obj cb after = liftIO $ do- cb' <- mkCompletionMoveCursorCallback (completionMoveCursorCallbackWrapper cb)- connectSignalFunPtr obj "move-cursor" cb' after---- signal Completion::move-page-type CompletionMovePageCallback =- Gtk.ScrollStep ->- Int32 ->- IO ()--noCompletionMovePageCallback :: Maybe CompletionMovePageCallback-noCompletionMovePageCallback = Nothing--type CompletionMovePageCallbackC =- Ptr () -> -- object- CUInt ->- Int32 ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkCompletionMovePageCallback :: CompletionMovePageCallbackC -> IO (FunPtr CompletionMovePageCallbackC)--completionMovePageClosure :: CompletionMovePageCallback -> IO Closure-completionMovePageClosure cb = newCClosure =<< mkCompletionMovePageCallback wrapped- where wrapped = completionMovePageCallbackWrapper cb--completionMovePageCallbackWrapper ::- CompletionMovePageCallback ->- Ptr () ->- CUInt ->- Int32 ->- Ptr () ->- IO ()-completionMovePageCallbackWrapper _cb _ step num _ = do- let step' = (toEnum . fromIntegral) step- _cb step' num--onCompletionMovePage :: (GObject a, MonadIO m) => a -> CompletionMovePageCallback -> m SignalHandlerId-onCompletionMovePage obj cb = liftIO $ connectCompletionMovePage obj cb SignalConnectBefore-afterCompletionMovePage :: (GObject a, MonadIO m) => a -> CompletionMovePageCallback -> m SignalHandlerId-afterCompletionMovePage obj cb = connectCompletionMovePage obj cb SignalConnectAfter--connectCompletionMovePage :: (GObject a, MonadIO m) =>- a -> CompletionMovePageCallback -> SignalConnectMode -> m SignalHandlerId-connectCompletionMovePage obj cb after = liftIO $ do- cb' <- mkCompletionMovePageCallback (completionMovePageCallbackWrapper cb)- connectSignalFunPtr obj "move-page" cb' after---- signal Completion::populate-context-type CompletionPopulateContextCallback =- CompletionContext ->- IO ()--noCompletionPopulateContextCallback :: Maybe CompletionPopulateContextCallback-noCompletionPopulateContextCallback = Nothing--type CompletionPopulateContextCallbackC =- Ptr () -> -- object- Ptr CompletionContext ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkCompletionPopulateContextCallback :: CompletionPopulateContextCallbackC -> IO (FunPtr CompletionPopulateContextCallbackC)--completionPopulateContextClosure :: CompletionPopulateContextCallback -> IO Closure-completionPopulateContextClosure cb = newCClosure =<< mkCompletionPopulateContextCallback wrapped- where wrapped = completionPopulateContextCallbackWrapper cb--completionPopulateContextCallbackWrapper ::- CompletionPopulateContextCallback ->- Ptr () ->- Ptr CompletionContext ->- Ptr () ->- IO ()-completionPopulateContextCallbackWrapper _cb _ context _ = do- context' <- (newObject CompletionContext) context- _cb context'--onCompletionPopulateContext :: (GObject a, MonadIO m) => a -> CompletionPopulateContextCallback -> m SignalHandlerId-onCompletionPopulateContext obj cb = liftIO $ connectCompletionPopulateContext obj cb SignalConnectBefore-afterCompletionPopulateContext :: (GObject a, MonadIO m) => a -> CompletionPopulateContextCallback -> m SignalHandlerId-afterCompletionPopulateContext obj cb = connectCompletionPopulateContext obj cb SignalConnectAfter--connectCompletionPopulateContext :: (GObject a, MonadIO m) =>- a -> CompletionPopulateContextCallback -> SignalConnectMode -> m SignalHandlerId-connectCompletionPopulateContext obj cb after = liftIO $ do- cb' <- mkCompletionPopulateContextCallback (completionPopulateContextCallbackWrapper cb)- connectSignalFunPtr obj "populate-context" cb' after---- signal Completion::show-type CompletionShowCallback =- IO ()--noCompletionShowCallback :: Maybe CompletionShowCallback-noCompletionShowCallback = Nothing--type CompletionShowCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkCompletionShowCallback :: CompletionShowCallbackC -> IO (FunPtr CompletionShowCallbackC)--completionShowClosure :: CompletionShowCallback -> IO Closure-completionShowClosure cb = newCClosure =<< mkCompletionShowCallback wrapped- where wrapped = completionShowCallbackWrapper cb--completionShowCallbackWrapper ::- CompletionShowCallback ->- Ptr () ->- Ptr () ->- IO ()-completionShowCallbackWrapper _cb _ _ = do- _cb --onCompletionShow :: (GObject a, MonadIO m) => a -> CompletionShowCallback -> m SignalHandlerId-onCompletionShow obj cb = liftIO $ connectCompletionShow obj cb SignalConnectBefore-afterCompletionShow :: (GObject a, MonadIO m) => a -> CompletionShowCallback -> m SignalHandlerId-afterCompletionShow obj cb = connectCompletionShow obj cb SignalConnectAfter--connectCompletionShow :: (GObject a, MonadIO m) =>- a -> CompletionShowCallback -> SignalConnectMode -> m SignalHandlerId-connectCompletionShow obj cb after = liftIO $ do- cb' <- mkCompletionShowCallback (completionShowCallbackWrapper cb)- connectSignalFunPtr obj "show" cb' after---- VVV Prop "accelerators"- -- Type: TBasicType TUInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionAccelerators :: (MonadIO m, CompletionK o) => o -> m Word32-getCompletionAccelerators obj = liftIO $ getObjectPropertyUInt32 obj "accelerators"--setCompletionAccelerators :: (MonadIO m, CompletionK o) => o -> Word32 -> m ()-setCompletionAccelerators obj val = liftIO $ setObjectPropertyUInt32 obj "accelerators" val--constructCompletionAccelerators :: Word32 -> IO ([Char], GValue)-constructCompletionAccelerators val = constructObjectPropertyUInt32 "accelerators" val--data CompletionAcceleratorsPropertyInfo-instance AttrInfo CompletionAcceleratorsPropertyInfo where- type AttrAllowedOps CompletionAcceleratorsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionAcceleratorsPropertyInfo = (~) Word32- type AttrBaseTypeConstraint CompletionAcceleratorsPropertyInfo = CompletionK- type AttrGetType CompletionAcceleratorsPropertyInfo = Word32- type AttrLabel CompletionAcceleratorsPropertyInfo = "accelerators"- attrGet _ = getCompletionAccelerators- attrSet _ = setCompletionAccelerators- attrConstruct _ = constructCompletionAccelerators- attrClear _ = undefined---- VVV Prop "auto-complete-delay"- -- Type: TBasicType TUInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionAutoCompleteDelay :: (MonadIO m, CompletionK o) => o -> m Word32-getCompletionAutoCompleteDelay obj = liftIO $ getObjectPropertyUInt32 obj "auto-complete-delay"--setCompletionAutoCompleteDelay :: (MonadIO m, CompletionK o) => o -> Word32 -> m ()-setCompletionAutoCompleteDelay obj val = liftIO $ setObjectPropertyUInt32 obj "auto-complete-delay" val--constructCompletionAutoCompleteDelay :: Word32 -> IO ([Char], GValue)-constructCompletionAutoCompleteDelay val = constructObjectPropertyUInt32 "auto-complete-delay" val--data CompletionAutoCompleteDelayPropertyInfo-instance AttrInfo CompletionAutoCompleteDelayPropertyInfo where- type AttrAllowedOps CompletionAutoCompleteDelayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionAutoCompleteDelayPropertyInfo = (~) Word32- type AttrBaseTypeConstraint CompletionAutoCompleteDelayPropertyInfo = CompletionK- type AttrGetType CompletionAutoCompleteDelayPropertyInfo = Word32- type AttrLabel CompletionAutoCompleteDelayPropertyInfo = "auto-complete-delay"- attrGet _ = getCompletionAutoCompleteDelay- attrSet _ = setCompletionAutoCompleteDelay- attrConstruct _ = constructCompletionAutoCompleteDelay- attrClear _ = undefined---- VVV Prop "proposal-page-size"- -- Type: TBasicType TUInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionProposalPageSize :: (MonadIO m, CompletionK o) => o -> m Word32-getCompletionProposalPageSize obj = liftIO $ getObjectPropertyUInt32 obj "proposal-page-size"--setCompletionProposalPageSize :: (MonadIO m, CompletionK o) => o -> Word32 -> m ()-setCompletionProposalPageSize obj val = liftIO $ setObjectPropertyUInt32 obj "proposal-page-size" val--constructCompletionProposalPageSize :: Word32 -> IO ([Char], GValue)-constructCompletionProposalPageSize val = constructObjectPropertyUInt32 "proposal-page-size" val--data CompletionProposalPageSizePropertyInfo-instance AttrInfo CompletionProposalPageSizePropertyInfo where- type AttrAllowedOps CompletionProposalPageSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionProposalPageSizePropertyInfo = (~) Word32- type AttrBaseTypeConstraint CompletionProposalPageSizePropertyInfo = CompletionK- type AttrGetType CompletionProposalPageSizePropertyInfo = Word32- type AttrLabel CompletionProposalPageSizePropertyInfo = "proposal-page-size"- attrGet _ = getCompletionProposalPageSize- attrSet _ = setCompletionProposalPageSize- attrConstruct _ = constructCompletionProposalPageSize- attrClear _ = undefined---- VVV Prop "provider-page-size"- -- Type: TBasicType TUInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionProviderPageSize :: (MonadIO m, CompletionK o) => o -> m Word32-getCompletionProviderPageSize obj = liftIO $ getObjectPropertyUInt32 obj "provider-page-size"--setCompletionProviderPageSize :: (MonadIO m, CompletionK o) => o -> Word32 -> m ()-setCompletionProviderPageSize obj val = liftIO $ setObjectPropertyUInt32 obj "provider-page-size" val--constructCompletionProviderPageSize :: Word32 -> IO ([Char], GValue)-constructCompletionProviderPageSize val = constructObjectPropertyUInt32 "provider-page-size" val--data CompletionProviderPageSizePropertyInfo-instance AttrInfo CompletionProviderPageSizePropertyInfo where- type AttrAllowedOps CompletionProviderPageSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionProviderPageSizePropertyInfo = (~) Word32- type AttrBaseTypeConstraint CompletionProviderPageSizePropertyInfo = CompletionK- type AttrGetType CompletionProviderPageSizePropertyInfo = Word32- type AttrLabel CompletionProviderPageSizePropertyInfo = "provider-page-size"- attrGet _ = getCompletionProviderPageSize- attrSet _ = setCompletionProviderPageSize- attrConstruct _ = constructCompletionProviderPageSize- attrClear _ = undefined---- VVV Prop "remember-info-visibility"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionRememberInfoVisibility :: (MonadIO m, CompletionK o) => o -> m Bool-getCompletionRememberInfoVisibility obj = liftIO $ getObjectPropertyBool obj "remember-info-visibility"--setCompletionRememberInfoVisibility :: (MonadIO m, CompletionK o) => o -> Bool -> m ()-setCompletionRememberInfoVisibility obj val = liftIO $ setObjectPropertyBool obj "remember-info-visibility" val--constructCompletionRememberInfoVisibility :: Bool -> IO ([Char], GValue)-constructCompletionRememberInfoVisibility val = constructObjectPropertyBool "remember-info-visibility" val--data CompletionRememberInfoVisibilityPropertyInfo-instance AttrInfo CompletionRememberInfoVisibilityPropertyInfo where- type AttrAllowedOps CompletionRememberInfoVisibilityPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionRememberInfoVisibilityPropertyInfo = (~) Bool- type AttrBaseTypeConstraint CompletionRememberInfoVisibilityPropertyInfo = CompletionK- type AttrGetType CompletionRememberInfoVisibilityPropertyInfo = Bool- type AttrLabel CompletionRememberInfoVisibilityPropertyInfo = "remember-info-visibility"- attrGet _ = getCompletionRememberInfoVisibility- attrSet _ = setCompletionRememberInfoVisibility- attrConstruct _ = constructCompletionRememberInfoVisibility- attrClear _ = undefined---- VVV Prop "select-on-show"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionSelectOnShow :: (MonadIO m, CompletionK o) => o -> m Bool-getCompletionSelectOnShow obj = liftIO $ getObjectPropertyBool obj "select-on-show"--setCompletionSelectOnShow :: (MonadIO m, CompletionK o) => o -> Bool -> m ()-setCompletionSelectOnShow obj val = liftIO $ setObjectPropertyBool obj "select-on-show" val--constructCompletionSelectOnShow :: Bool -> IO ([Char], GValue)-constructCompletionSelectOnShow val = constructObjectPropertyBool "select-on-show" val--data CompletionSelectOnShowPropertyInfo-instance AttrInfo CompletionSelectOnShowPropertyInfo where- type AttrAllowedOps CompletionSelectOnShowPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionSelectOnShowPropertyInfo = (~) Bool- type AttrBaseTypeConstraint CompletionSelectOnShowPropertyInfo = CompletionK- type AttrGetType CompletionSelectOnShowPropertyInfo = Bool- type AttrLabel CompletionSelectOnShowPropertyInfo = "select-on-show"- attrGet _ = getCompletionSelectOnShow- attrSet _ = setCompletionSelectOnShow- attrConstruct _ = constructCompletionSelectOnShow- attrClear _ = undefined---- VVV Prop "show-headers"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionShowHeaders :: (MonadIO m, CompletionK o) => o -> m Bool-getCompletionShowHeaders obj = liftIO $ getObjectPropertyBool obj "show-headers"--setCompletionShowHeaders :: (MonadIO m, CompletionK o) => o -> Bool -> m ()-setCompletionShowHeaders obj val = liftIO $ setObjectPropertyBool obj "show-headers" val--constructCompletionShowHeaders :: Bool -> IO ([Char], GValue)-constructCompletionShowHeaders val = constructObjectPropertyBool "show-headers" val--data CompletionShowHeadersPropertyInfo-instance AttrInfo CompletionShowHeadersPropertyInfo where- type AttrAllowedOps CompletionShowHeadersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionShowHeadersPropertyInfo = (~) Bool- type AttrBaseTypeConstraint CompletionShowHeadersPropertyInfo = CompletionK- type AttrGetType CompletionShowHeadersPropertyInfo = Bool- type AttrLabel CompletionShowHeadersPropertyInfo = "show-headers"- attrGet _ = getCompletionShowHeaders- attrSet _ = setCompletionShowHeaders- attrConstruct _ = constructCompletionShowHeaders- attrClear _ = undefined---- VVV Prop "show-icons"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionShowIcons :: (MonadIO m, CompletionK o) => o -> m Bool-getCompletionShowIcons obj = liftIO $ getObjectPropertyBool obj "show-icons"--setCompletionShowIcons :: (MonadIO m, CompletionK o) => o -> Bool -> m ()-setCompletionShowIcons obj val = liftIO $ setObjectPropertyBool obj "show-icons" val--constructCompletionShowIcons :: Bool -> IO ([Char], GValue)-constructCompletionShowIcons val = constructObjectPropertyBool "show-icons" val--data CompletionShowIconsPropertyInfo-instance AttrInfo CompletionShowIconsPropertyInfo where- type AttrAllowedOps CompletionShowIconsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionShowIconsPropertyInfo = (~) Bool- type AttrBaseTypeConstraint CompletionShowIconsPropertyInfo = CompletionK- type AttrGetType CompletionShowIconsPropertyInfo = Bool- type AttrLabel CompletionShowIconsPropertyInfo = "show-icons"- attrGet _ = getCompletionShowIcons- attrSet _ = setCompletionShowIcons- attrConstruct _ = constructCompletionShowIcons- attrClear _ = undefined---- VVV Prop "view"- -- Type: TInterface "GtkSource" "View"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just True,Nothing)--getCompletionView :: (MonadIO m, CompletionK o) => o -> m (Maybe View)-getCompletionView obj = liftIO $ getObjectPropertyObject obj "view" View--constructCompletionView :: (ViewK a) => a -> IO ([Char], GValue)-constructCompletionView val = constructObjectPropertyObject "view" (Just val)--data CompletionViewPropertyInfo-instance AttrInfo CompletionViewPropertyInfo where- type AttrAllowedOps CompletionViewPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionViewPropertyInfo = ViewK- type AttrBaseTypeConstraint CompletionViewPropertyInfo = CompletionK- type AttrGetType CompletionViewPropertyInfo = (Maybe View)- type AttrLabel CompletionViewPropertyInfo = "view"- attrGet _ = getCompletionView- attrSet _ = undefined- attrConstruct _ = constructCompletionView- attrClear _ = undefined--type instance AttributeList Completion = CompletionAttributeList-type CompletionAttributeList = ('[ '("accelerators", CompletionAcceleratorsPropertyInfo), '("autoCompleteDelay", CompletionAutoCompleteDelayPropertyInfo), '("proposalPageSize", CompletionProposalPageSizePropertyInfo), '("providerPageSize", CompletionProviderPageSizePropertyInfo), '("rememberInfoVisibility", CompletionRememberInfoVisibilityPropertyInfo), '("selectOnShow", CompletionSelectOnShowPropertyInfo), '("showHeaders", CompletionShowHeadersPropertyInfo), '("showIcons", CompletionShowIconsPropertyInfo), '("view", CompletionViewPropertyInfo)] :: [(Symbol, *)])--completionAccelerators :: AttrLabelProxy "accelerators"-completionAccelerators = AttrLabelProxy--completionAutoCompleteDelay :: AttrLabelProxy "autoCompleteDelay"-completionAutoCompleteDelay = AttrLabelProxy--completionProposalPageSize :: AttrLabelProxy "proposalPageSize"-completionProposalPageSize = AttrLabelProxy--completionProviderPageSize :: AttrLabelProxy "providerPageSize"-completionProviderPageSize = AttrLabelProxy--completionRememberInfoVisibility :: AttrLabelProxy "rememberInfoVisibility"-completionRememberInfoVisibility = AttrLabelProxy--completionSelectOnShow :: AttrLabelProxy "selectOnShow"-completionSelectOnShow = AttrLabelProxy--completionShowHeaders :: AttrLabelProxy "showHeaders"-completionShowHeaders = AttrLabelProxy--completionShowIcons :: AttrLabelProxy "showIcons"-completionShowIcons = AttrLabelProxy--completionView :: AttrLabelProxy "view"-completionView = AttrLabelProxy--data CompletionActivateProposalSignalInfo-instance SignalInfo CompletionActivateProposalSignalInfo where- type HaskellCallbackType CompletionActivateProposalSignalInfo = CompletionActivateProposalCallback- connectSignal _ = connectCompletionActivateProposal--data CompletionHideSignalInfo-instance SignalInfo CompletionHideSignalInfo where- type HaskellCallbackType CompletionHideSignalInfo = CompletionHideCallback- connectSignal _ = connectCompletionHide--data CompletionMoveCursorSignalInfo-instance SignalInfo CompletionMoveCursorSignalInfo where- type HaskellCallbackType CompletionMoveCursorSignalInfo = CompletionMoveCursorCallback- connectSignal _ = connectCompletionMoveCursor--data CompletionMovePageSignalInfo-instance SignalInfo CompletionMovePageSignalInfo where- type HaskellCallbackType CompletionMovePageSignalInfo = CompletionMovePageCallback- connectSignal _ = connectCompletionMovePage--data CompletionPopulateContextSignalInfo-instance SignalInfo CompletionPopulateContextSignalInfo where- type HaskellCallbackType CompletionPopulateContextSignalInfo = CompletionPopulateContextCallback- connectSignal _ = connectCompletionPopulateContext--data CompletionShowSignalInfo-instance SignalInfo CompletionShowSignalInfo where- type HaskellCallbackType CompletionShowSignalInfo = CompletionShowCallback- connectSignal _ = connectCompletionShow--type instance SignalList Completion = CompletionSignalList-type CompletionSignalList = ('[ '("activateProposal", CompletionActivateProposalSignalInfo), '("hide", CompletionHideSignalInfo), '("moveCursor", CompletionMoveCursorSignalInfo), '("movePage", CompletionMovePageSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("populateContext", CompletionPopulateContextSignalInfo), '("show", CompletionShowSignalInfo)] :: [(Symbol, *)])---- method Completion::add_provider--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Completion", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "provider", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : True--- Skip return : False--foreign import ccall "gtk_source_completion_add_provider" gtk_source_completion_add_provider :: - Ptr Completion -> -- _obj : TInterface "GtkSource" "Completion"- Ptr CompletionProvider -> -- provider : TInterface "GtkSource" "CompletionProvider"- Ptr (Ptr GError) -> -- error- IO CInt---completionAddProvider ::- (MonadIO m, CompletionK a, CompletionProviderK b) =>- a -- _obj- -> b -- provider- -> m () -- result-completionAddProvider _obj provider = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let provider' = unsafeManagedPtrCastPtr provider- onException (do- _ <- propagateGError $ gtk_source_completion_add_provider _obj' provider'- touchManagedPtr _obj- touchManagedPtr provider- return ()- ) (do- return ()- )--data CompletionAddProviderMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, CompletionK a, CompletionProviderK b) => MethodInfo CompletionAddProviderMethodInfo a signature where- overloadedMethod _ = completionAddProvider---- method Completion::block_interactive--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Completion", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_block_interactive" gtk_source_completion_block_interactive :: - Ptr Completion -> -- _obj : TInterface "GtkSource" "Completion"- IO ()---completionBlockInteractive ::- (MonadIO m, CompletionK a) =>- a -- _obj- -> m () -- result-completionBlockInteractive _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_completion_block_interactive _obj'- touchManagedPtr _obj- return ()--data CompletionBlockInteractiveMethodInfo-instance (signature ~ (m ()), MonadIO m, CompletionK a) => MethodInfo CompletionBlockInteractiveMethodInfo a signature where- overloadedMethod _ = completionBlockInteractive---- method Completion::create_context--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Completion", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "position", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompletionContext")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_create_context" gtk_source_completion_create_context :: - Ptr Completion -> -- _obj : TInterface "GtkSource" "Completion"- Ptr Gtk.TextIter -> -- position : TInterface "Gtk" "TextIter"- IO (Ptr CompletionContext)---completionCreateContext ::- (MonadIO m, CompletionK a) =>- a -- _obj- -> Maybe (Gtk.TextIter) -- position- -> m CompletionContext -- result-completionCreateContext _obj position = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybePosition <- case position of- Nothing -> return nullPtr- Just jPosition -> do- let jPosition' = unsafeManagedPtrGetPtr jPosition- return jPosition'- result <- gtk_source_completion_create_context _obj' maybePosition- checkUnexpectedReturnNULL "gtk_source_completion_create_context" result- result' <- (newObject CompletionContext) result- touchManagedPtr _obj- whenJust position touchManagedPtr- return result'--data CompletionCreateContextMethodInfo-instance (signature ~ (Maybe (Gtk.TextIter) -> m CompletionContext), MonadIO m, CompletionK a) => MethodInfo CompletionCreateContextMethodInfo a signature where- overloadedMethod _ = completionCreateContext---- method Completion::get_info_window--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Completion", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompletionInfo")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_get_info_window" gtk_source_completion_get_info_window :: - Ptr Completion -> -- _obj : TInterface "GtkSource" "Completion"- IO (Ptr CompletionInfo)---completionGetInfoWindow ::- (MonadIO m, CompletionK a) =>- a -- _obj- -> m CompletionInfo -- result-completionGetInfoWindow _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_get_info_window _obj'- checkUnexpectedReturnNULL "gtk_source_completion_get_info_window" result- result' <- (newObject CompletionInfo) result- touchManagedPtr _obj- return result'--data CompletionGetInfoWindowMethodInfo-instance (signature ~ (m CompletionInfo), MonadIO m, CompletionK a) => MethodInfo CompletionGetInfoWindowMethodInfo a signature where- overloadedMethod _ = completionGetInfoWindow---- method Completion::get_providers--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Completion", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TGList (TInterface "GtkSource" "CompletionProvider"))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_get_providers" gtk_source_completion_get_providers :: - Ptr Completion -> -- _obj : TInterface "GtkSource" "Completion"- IO (Ptr (GList (Ptr CompletionProvider)))---completionGetProviders ::- (MonadIO m, CompletionK a) =>- a -- _obj- -> m [CompletionProvider] -- result-completionGetProviders _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_get_providers _obj'- result' <- unpackGList result- result'' <- mapM (newObject CompletionProvider) result'- touchManagedPtr _obj- return result''--data CompletionGetProvidersMethodInfo-instance (signature ~ (m [CompletionProvider]), MonadIO m, CompletionK a) => MethodInfo CompletionGetProvidersMethodInfo a signature where- overloadedMethod _ = completionGetProviders---- method Completion::get_view--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Completion", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "View")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_get_view" gtk_source_completion_get_view :: - Ptr Completion -> -- _obj : TInterface "GtkSource" "Completion"- IO (Ptr View)---completionGetView ::- (MonadIO m, CompletionK a) =>- a -- _obj- -> m (Maybe View) -- result-completionGetView _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_get_view _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject View) result'- return result''- touchManagedPtr _obj- return maybeResult--data CompletionGetViewMethodInfo-instance (signature ~ (m (Maybe View)), MonadIO m, CompletionK a) => MethodInfo CompletionGetViewMethodInfo a signature where- overloadedMethod _ = completionGetView---- method Completion::hide--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Completion", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_hide" gtk_source_completion_hide :: - Ptr Completion -> -- _obj : TInterface "GtkSource" "Completion"- IO ()---completionHide ::- (MonadIO m, CompletionK a) =>- a -- _obj- -> m () -- result-completionHide _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_completion_hide _obj'- touchManagedPtr _obj- return ()--data CompletionHideMethodInfo-instance (signature ~ (m ()), MonadIO m, CompletionK a) => MethodInfo CompletionHideMethodInfo a signature where- overloadedMethod _ = completionHide---- method Completion::move_window--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Completion", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_move_window" gtk_source_completion_move_window :: - Ptr Completion -> -- _obj : TInterface "GtkSource" "Completion"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- IO ()--{-# DEPRECATED completionMoveWindow ["(Since version 3.8)","Use gtk_source_completion_provider_get_start_iter() instead."]#-}-completionMoveWindow ::- (MonadIO m, CompletionK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> m () -- result-completionMoveWindow _obj iter = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- gtk_source_completion_move_window _obj' iter'- touchManagedPtr _obj- touchManagedPtr iter- return ()--data CompletionMoveWindowMethodInfo-instance (signature ~ (Gtk.TextIter -> m ()), MonadIO m, CompletionK a) => MethodInfo CompletionMoveWindowMethodInfo a signature where- overloadedMethod _ = completionMoveWindow---- method Completion::remove_provider--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Completion", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "provider", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : True--- Skip return : False--foreign import ccall "gtk_source_completion_remove_provider" gtk_source_completion_remove_provider :: - Ptr Completion -> -- _obj : TInterface "GtkSource" "Completion"- Ptr CompletionProvider -> -- provider : TInterface "GtkSource" "CompletionProvider"- Ptr (Ptr GError) -> -- error- IO CInt---completionRemoveProvider ::- (MonadIO m, CompletionK a, CompletionProviderK b) =>- a -- _obj- -> b -- provider- -> m () -- result-completionRemoveProvider _obj provider = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let provider' = unsafeManagedPtrCastPtr provider- onException (do- _ <- propagateGError $ gtk_source_completion_remove_provider _obj' provider'- touchManagedPtr _obj- touchManagedPtr provider- return ()- ) (do- return ()- )--data CompletionRemoveProviderMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, CompletionK a, CompletionProviderK b) => MethodInfo CompletionRemoveProviderMethodInfo a signature where- overloadedMethod _ = completionRemoveProvider---- method Completion::show--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Completion", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "providers", argType = TGList (TInterface "GtkSource" "CompletionProvider"), direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "context", argType = TInterface "GtkSource" "CompletionContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_show" gtk_source_completion_show :: - Ptr Completion -> -- _obj : TInterface "GtkSource" "Completion"- Ptr (GList (Ptr CompletionProvider)) -> -- providers : TGList (TInterface "GtkSource" "CompletionProvider")- Ptr CompletionContext -> -- context : TInterface "GtkSource" "CompletionContext"- IO CInt---completionShow ::- (MonadIO m, CompletionK a, CompletionProviderK b, CompletionContextK c) =>- a -- _obj- -> [b] -- providers- -> c -- context- -> m Bool -- result-completionShow _obj providers context = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let providers' = map unsafeManagedPtrCastPtr providers- providers'' <- packGList providers'- let context' = unsafeManagedPtrCastPtr context- result <- gtk_source_completion_show _obj' providers'' context'- let result' = (/= 0) result- touchManagedPtr _obj- mapM_ touchManagedPtr providers- touchManagedPtr context- g_list_free providers''- return result'--data CompletionShowMethodInfo-instance (signature ~ ([b] -> c -> m Bool), MonadIO m, CompletionK a, CompletionProviderK b, CompletionContextK c) => MethodInfo CompletionShowMethodInfo a signature where- overloadedMethod _ = completionShow---- method Completion::unblock_interactive--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Completion", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_unblock_interactive" gtk_source_completion_unblock_interactive :: - Ptr Completion -> -- _obj : TInterface "GtkSource" "Completion"- IO ()---completionUnblockInteractive ::- (MonadIO m, CompletionK a) =>- a -- _obj- -> m () -- result-completionUnblockInteractive _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_completion_unblock_interactive _obj'- touchManagedPtr _obj- return ()--data CompletionUnblockInteractiveMethodInfo-instance (signature ~ (m ()), MonadIO m, CompletionK a) => MethodInfo CompletionUnblockInteractiveMethodInfo a signature where- overloadedMethod _ = completionUnblockInteractive--
− GI/GtkSource/Objects/Completion.hs-boot
@@ -1,39 +0,0 @@-module GI.GtkSource.Objects.Completion where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype Completion = Completion (ForeignPtr Completion)-instance GObject Completion where-class GObject o => CompletionK o-instance (GObject o, IsDescendantOf Completion o) => CompletionK o-data CompletionAcceleratorsPropertyInfo-data CompletionAutoCompleteDelayPropertyInfo-data CompletionProposalPageSizePropertyInfo-data CompletionProviderPageSizePropertyInfo-data CompletionRememberInfoVisibilityPropertyInfo-data CompletionSelectOnShowPropertyInfo-data CompletionShowHeadersPropertyInfo-data CompletionShowIconsPropertyInfo-data CompletionViewPropertyInfo-data CompletionActivateProposalSignalInfo-data CompletionHideSignalInfo-data CompletionMoveCursorSignalInfo-data CompletionMovePageSignalInfo-data CompletionPopulateContextSignalInfo-data CompletionShowSignalInfo-data CompletionAddProviderMethodInfo-data CompletionBlockInteractiveMethodInfo-data CompletionCreateContextMethodInfo-data CompletionGetInfoWindowMethodInfo-data CompletionGetProvidersMethodInfo-data CompletionGetViewMethodInfo-data CompletionHideMethodInfo-data CompletionMoveWindowMethodInfo-data CompletionRemoveProviderMethodInfo-data CompletionShowMethodInfo-data CompletionUnblockInteractiveMethodInfo
− GI/GtkSource/Objects/CompletionContext.hs
@@ -1,385 +0,0 @@---{- |-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.GtkSource.Objects.CompletionContext- ( ---- * Exported types- CompletionContext(..) ,- CompletionContextK ,- toCompletionContext ,- noCompletionContext ,--- -- * Methods--- ** completionContextAddProposals- CompletionContextAddProposalsMethodInfo ,- completionContextAddProposals ,----- ** completionContextGetActivation- CompletionContextGetActivationMethodInfo,- completionContextGetActivation ,----- ** completionContextGetIter- CompletionContextGetIterMethodInfo ,- completionContextGetIter ,----- -- * Properties--- ** Activation- CompletionContextActivationPropertyInfo ,- completionContextActivation ,- constructCompletionContextActivation ,- getCompletionContextActivation ,- setCompletionContextActivation ,----- ** Completion- CompletionContextCompletionPropertyInfo ,- completionContextCompletion ,- constructCompletionContextCompletion ,- getCompletionContextCompletion ,----- ** Iter- CompletionContextIterPropertyInfo ,- clearCompletionContextIter ,- completionContextIter ,- constructCompletionContextIter ,- getCompletionContextIter ,- setCompletionContextIter ,----- -- * Signals--- ** Cancelled- CompletionContextCancelledCallback ,- CompletionContextCancelledCallbackC ,- CompletionContextCancelledSignalInfo ,- afterCompletionContextCancelled ,- completionContextCancelledCallbackWrapper,- completionContextCancelledClosure ,- mkCompletionContextCancelledCallback ,- noCompletionContextCancelledCallback ,- onCompletionContextCancelled ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.Gtk as Gtk--newtype CompletionContext = CompletionContext (ForeignPtr CompletionContext)-foreign import ccall "gtk_source_completion_context_get_type"- c_gtk_source_completion_context_get_type :: IO GType--type instance ParentTypes CompletionContext = CompletionContextParentTypes-type CompletionContextParentTypes = '[GObject.Object]--instance GObject CompletionContext where- gobjectIsInitiallyUnowned _ = True- gobjectType _ = c_gtk_source_completion_context_get_type- --class GObject o => CompletionContextK o-instance (GObject o, IsDescendantOf CompletionContext o) => CompletionContextK o--toCompletionContext :: CompletionContextK o => o -> IO CompletionContext-toCompletionContext = unsafeCastTo CompletionContext--noCompletionContext :: Maybe CompletionContext-noCompletionContext = Nothing--type family ResolveCompletionContextMethod (t :: Symbol) (o :: *) :: * where- ResolveCompletionContextMethod "addProposals" o = CompletionContextAddProposalsMethodInfo- ResolveCompletionContextMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveCompletionContextMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveCompletionContextMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveCompletionContextMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveCompletionContextMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveCompletionContextMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveCompletionContextMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveCompletionContextMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveCompletionContextMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveCompletionContextMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveCompletionContextMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveCompletionContextMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveCompletionContextMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveCompletionContextMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveCompletionContextMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveCompletionContextMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveCompletionContextMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveCompletionContextMethod "getActivation" o = CompletionContextGetActivationMethodInfo- ResolveCompletionContextMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveCompletionContextMethod "getIter" o = CompletionContextGetIterMethodInfo- ResolveCompletionContextMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveCompletionContextMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveCompletionContextMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveCompletionContextMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveCompletionContextMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveCompletionContextMethod t CompletionContext, MethodInfo info CompletionContext p) => IsLabelProxy t (CompletionContext -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveCompletionContextMethod t CompletionContext, MethodInfo info CompletionContext p) => IsLabel t (CompletionContext -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- signal CompletionContext::cancelled-type CompletionContextCancelledCallback =- IO ()--noCompletionContextCancelledCallback :: Maybe CompletionContextCancelledCallback-noCompletionContextCancelledCallback = Nothing--type CompletionContextCancelledCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkCompletionContextCancelledCallback :: CompletionContextCancelledCallbackC -> IO (FunPtr CompletionContextCancelledCallbackC)--completionContextCancelledClosure :: CompletionContextCancelledCallback -> IO Closure-completionContextCancelledClosure cb = newCClosure =<< mkCompletionContextCancelledCallback wrapped- where wrapped = completionContextCancelledCallbackWrapper cb--completionContextCancelledCallbackWrapper ::- CompletionContextCancelledCallback ->- Ptr () ->- Ptr () ->- IO ()-completionContextCancelledCallbackWrapper _cb _ _ = do- _cb --onCompletionContextCancelled :: (GObject a, MonadIO m) => a -> CompletionContextCancelledCallback -> m SignalHandlerId-onCompletionContextCancelled obj cb = liftIO $ connectCompletionContextCancelled obj cb SignalConnectBefore-afterCompletionContextCancelled :: (GObject a, MonadIO m) => a -> CompletionContextCancelledCallback -> m SignalHandlerId-afterCompletionContextCancelled obj cb = connectCompletionContextCancelled obj cb SignalConnectAfter--connectCompletionContextCancelled :: (GObject a, MonadIO m) =>- a -> CompletionContextCancelledCallback -> SignalConnectMode -> m SignalHandlerId-connectCompletionContextCancelled obj cb after = liftIO $ do- cb' <- mkCompletionContextCancelledCallback (completionContextCancelledCallbackWrapper cb)- connectSignalFunPtr obj "cancelled" cb' after---- VVV Prop "activation"- -- Type: TInterface "GtkSource" "CompletionActivation"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Nothing)--getCompletionContextActivation :: (MonadIO m, CompletionContextK o) => o -> m [CompletionActivation]-getCompletionContextActivation obj = liftIO $ getObjectPropertyFlags obj "activation"--setCompletionContextActivation :: (MonadIO m, CompletionContextK o) => o -> [CompletionActivation] -> m ()-setCompletionContextActivation obj val = liftIO $ setObjectPropertyFlags obj "activation" val--constructCompletionContextActivation :: [CompletionActivation] -> IO ([Char], GValue)-constructCompletionContextActivation val = constructObjectPropertyFlags "activation" val--data CompletionContextActivationPropertyInfo-instance AttrInfo CompletionContextActivationPropertyInfo where- type AttrAllowedOps CompletionContextActivationPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionContextActivationPropertyInfo = (~) [CompletionActivation]- type AttrBaseTypeConstraint CompletionContextActivationPropertyInfo = CompletionContextK- type AttrGetType CompletionContextActivationPropertyInfo = [CompletionActivation]- type AttrLabel CompletionContextActivationPropertyInfo = "activation"- attrGet _ = getCompletionContextActivation- attrSet _ = setCompletionContextActivation- attrConstruct _ = constructCompletionContextActivation- attrClear _ = undefined---- VVV Prop "completion"- -- Type: TInterface "GtkSource" "Completion"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getCompletionContextCompletion :: (MonadIO m, CompletionContextK o) => o -> m (Maybe Completion)-getCompletionContextCompletion obj = liftIO $ getObjectPropertyObject obj "completion" Completion--constructCompletionContextCompletion :: (CompletionK a) => a -> IO ([Char], GValue)-constructCompletionContextCompletion val = constructObjectPropertyObject "completion" (Just val)--data CompletionContextCompletionPropertyInfo-instance AttrInfo CompletionContextCompletionPropertyInfo where- type AttrAllowedOps CompletionContextCompletionPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionContextCompletionPropertyInfo = CompletionK- type AttrBaseTypeConstraint CompletionContextCompletionPropertyInfo = CompletionContextK- type AttrGetType CompletionContextCompletionPropertyInfo = (Maybe Completion)- type AttrLabel CompletionContextCompletionPropertyInfo = "completion"- attrGet _ = getCompletionContextCompletion- attrSet _ = undefined- attrConstruct _ = constructCompletionContextCompletion- attrClear _ = undefined---- VVV Prop "iter"- -- Type: TInterface "Gtk" "TextIter"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Nothing)--getCompletionContextIter :: (MonadIO m, CompletionContextK o) => o -> m (Maybe Gtk.TextIter)-getCompletionContextIter obj = liftIO $ getObjectPropertyBoxed obj "iter" Gtk.TextIter--setCompletionContextIter :: (MonadIO m, CompletionContextK o) => o -> Gtk.TextIter -> m ()-setCompletionContextIter obj val = liftIO $ setObjectPropertyBoxed obj "iter" (Just val)--constructCompletionContextIter :: Gtk.TextIter -> IO ([Char], GValue)-constructCompletionContextIter val = constructObjectPropertyBoxed "iter" (Just val)--clearCompletionContextIter :: (MonadIO m, CompletionContextK o) => o -> m ()-clearCompletionContextIter obj = liftIO $ setObjectPropertyBoxed obj "iter" (Nothing :: Maybe Gtk.TextIter)--data CompletionContextIterPropertyInfo-instance AttrInfo CompletionContextIterPropertyInfo where- type AttrAllowedOps CompletionContextIterPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionContextIterPropertyInfo = (~) Gtk.TextIter- type AttrBaseTypeConstraint CompletionContextIterPropertyInfo = CompletionContextK- type AttrGetType CompletionContextIterPropertyInfo = (Maybe Gtk.TextIter)- type AttrLabel CompletionContextIterPropertyInfo = "iter"- attrGet _ = getCompletionContextIter- attrSet _ = setCompletionContextIter- attrConstruct _ = constructCompletionContextIter- attrClear _ = clearCompletionContextIter--type instance AttributeList CompletionContext = CompletionContextAttributeList-type CompletionContextAttributeList = ('[ '("activation", CompletionContextActivationPropertyInfo), '("completion", CompletionContextCompletionPropertyInfo), '("iter", CompletionContextIterPropertyInfo)] :: [(Symbol, *)])--completionContextActivation :: AttrLabelProxy "activation"-completionContextActivation = AttrLabelProxy--completionContextCompletion :: AttrLabelProxy "completion"-completionContextCompletion = AttrLabelProxy--completionContextIter :: AttrLabelProxy "iter"-completionContextIter = AttrLabelProxy--data CompletionContextCancelledSignalInfo-instance SignalInfo CompletionContextCancelledSignalInfo where- type HaskellCallbackType CompletionContextCancelledSignalInfo = CompletionContextCancelledCallback- connectSignal _ = connectCompletionContextCancelled--type instance SignalList CompletionContext = CompletionContextSignalList-type CompletionContextSignalList = ('[ '("cancelled", CompletionContextCancelledSignalInfo), '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method CompletionContext::add_proposals--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "provider", argType = TInterface "GtkSource" "CompletionProvider", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "proposals", argType = TGList (TInterface "GtkSource" "CompletionProposal"), direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "finished", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_context_add_proposals" gtk_source_completion_context_add_proposals :: - Ptr CompletionContext -> -- _obj : TInterface "GtkSource" "CompletionContext"- Ptr CompletionProvider -> -- provider : TInterface "GtkSource" "CompletionProvider"- Ptr (GList (Ptr CompletionProposal)) -> -- proposals : TGList (TInterface "GtkSource" "CompletionProposal")- CInt -> -- finished : TBasicType TBoolean- IO ()---completionContextAddProposals ::- (MonadIO m, CompletionContextK a, CompletionProviderK b, CompletionProposalK c) =>- a -- _obj- -> b -- provider- -> [c] -- proposals- -> Bool -- finished- -> m () -- result-completionContextAddProposals _obj provider proposals finished = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let provider' = unsafeManagedPtrCastPtr provider- let proposals' = map unsafeManagedPtrCastPtr proposals- proposals'' <- packGList proposals'- let finished' = (fromIntegral . fromEnum) finished- gtk_source_completion_context_add_proposals _obj' provider' proposals'' finished'- touchManagedPtr _obj- touchManagedPtr provider- mapM_ touchManagedPtr proposals- g_list_free proposals''- return ()--data CompletionContextAddProposalsMethodInfo-instance (signature ~ (b -> [c] -> Bool -> m ()), MonadIO m, CompletionContextK a, CompletionProviderK b, CompletionProposalK c) => MethodInfo CompletionContextAddProposalsMethodInfo a signature where- overloadedMethod _ = completionContextAddProposals---- method CompletionContext::get_activation--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompletionActivation")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_context_get_activation" gtk_source_completion_context_get_activation :: - Ptr CompletionContext -> -- _obj : TInterface "GtkSource" "CompletionContext"- IO CUInt---completionContextGetActivation ::- (MonadIO m, CompletionContextK a) =>- a -- _obj- -> m [CompletionActivation] -- result-completionContextGetActivation _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_context_get_activation _obj'- let result' = wordToGFlags result- touchManagedPtr _obj- return result'--data CompletionContextGetActivationMethodInfo-instance (signature ~ (m [CompletionActivation]), MonadIO m, CompletionContextK a) => MethodInfo CompletionContextGetActivationMethodInfo a signature where- overloadedMethod _ = completionContextGetActivation---- method CompletionContext::get_iter--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_context_get_iter" gtk_source_completion_context_get_iter :: - Ptr CompletionContext -> -- _obj : TInterface "GtkSource" "CompletionContext"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- IO CInt---completionContextGetIter ::- (MonadIO m, CompletionContextK a) =>- a -- _obj- -> m (Bool,Gtk.TextIter) -- result-completionContextGetIter _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- iter <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- result <- gtk_source_completion_context_get_iter _obj' iter- let result' = (/= 0) result- iter' <- (wrapBoxed Gtk.TextIter) iter- touchManagedPtr _obj- return (result', iter')--data CompletionContextGetIterMethodInfo-instance (signature ~ (m (Bool,Gtk.TextIter)), MonadIO m, CompletionContextK a) => MethodInfo CompletionContextGetIterMethodInfo a signature where- overloadedMethod _ = completionContextGetIter--
− GI/GtkSource/Objects/CompletionContext.hs-boot
@@ -1,20 +0,0 @@-module GI.GtkSource.Objects.CompletionContext where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype CompletionContext = CompletionContext (ForeignPtr CompletionContext)-instance GObject CompletionContext where-class GObject o => CompletionContextK o-instance (GObject o, IsDescendantOf CompletionContext o) => CompletionContextK o-data CompletionContextActivationPropertyInfo-data CompletionContextCompletionPropertyInfo-data CompletionContextIterPropertyInfo-data CompletionContextCancelledSignalInfo-data CompletionContextAddProposalsMethodInfo-data CompletionContextGetActivationMethodInfo-data CompletionContextGetIterMethodInfo
− GI/GtkSource/Objects/CompletionInfo.hs
@@ -1,692 +0,0 @@---{- |-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.GtkSource.Objects.CompletionInfo- ( ---- * Exported types- CompletionInfo(..) ,- CompletionInfoK ,- toCompletionInfo ,- noCompletionInfo ,--- -- * Methods--- ** completionInfoGetWidget- CompletionInfoGetWidgetMethodInfo ,- completionInfoGetWidget ,----- ** completionInfoMoveToIter- CompletionInfoMoveToIterMethodInfo ,- completionInfoMoveToIter ,----- ** completionInfoNew- completionInfoNew ,----- ** completionInfoSetWidget- CompletionInfoSetWidgetMethodInfo ,- completionInfoSetWidget ,----- -- * Signals--- ** BeforeShow- CompletionInfoBeforeShowCallback ,- CompletionInfoBeforeShowCallbackC ,- CompletionInfoBeforeShowSignalInfo ,- afterCompletionInfoBeforeShow ,- completionInfoBeforeShowCallbackWrapper ,- completionInfoBeforeShowClosure ,- mkCompletionInfoBeforeShowCallback ,- noCompletionInfoBeforeShowCallback ,- onCompletionInfoBeforeShow ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.Atk as Atk-import qualified GI.GObject as GObject-import qualified GI.Gtk as Gtk--newtype CompletionInfo = CompletionInfo (ForeignPtr CompletionInfo)-foreign import ccall "gtk_source_completion_info_get_type"- c_gtk_source_completion_info_get_type :: IO GType--type instance ParentTypes CompletionInfo = CompletionInfoParentTypes-type CompletionInfoParentTypes = '[Gtk.Window, Gtk.Bin, Gtk.Container, Gtk.Widget, GObject.Object, Atk.ImplementorIface, Gtk.Buildable]--instance GObject CompletionInfo where- gobjectIsInitiallyUnowned _ = True- gobjectType _ = c_gtk_source_completion_info_get_type- --class GObject o => CompletionInfoK o-instance (GObject o, IsDescendantOf CompletionInfo o) => CompletionInfoK o--toCompletionInfo :: CompletionInfoK o => o -> IO CompletionInfo-toCompletionInfo = unsafeCastTo CompletionInfo--noCompletionInfo :: Maybe CompletionInfo-noCompletionInfo = Nothing--type family ResolveCompletionInfoMethod (t :: Symbol) (o :: *) :: * where- ResolveCompletionInfoMethod "activate" o = Gtk.WidgetActivateMethodInfo- ResolveCompletionInfoMethod "activateDefault" o = Gtk.WindowActivateDefaultMethodInfo- ResolveCompletionInfoMethod "activateFocus" o = Gtk.WindowActivateFocusMethodInfo- ResolveCompletionInfoMethod "activateKey" o = Gtk.WindowActivateKeyMethodInfo- ResolveCompletionInfoMethod "add" o = Gtk.ContainerAddMethodInfo- ResolveCompletionInfoMethod "addAccelGroup" o = Gtk.WindowAddAccelGroupMethodInfo- ResolveCompletionInfoMethod "addAccelerator" o = Gtk.WidgetAddAcceleratorMethodInfo- ResolveCompletionInfoMethod "addChild" o = Gtk.BuildableAddChildMethodInfo- ResolveCompletionInfoMethod "addDeviceEvents" o = Gtk.WidgetAddDeviceEventsMethodInfo- ResolveCompletionInfoMethod "addEvents" o = Gtk.WidgetAddEventsMethodInfo- ResolveCompletionInfoMethod "addMnemonic" o = Gtk.WindowAddMnemonicMethodInfo- ResolveCompletionInfoMethod "addMnemonicLabel" o = Gtk.WidgetAddMnemonicLabelMethodInfo- ResolveCompletionInfoMethod "addTickCallback" o = Gtk.WidgetAddTickCallbackMethodInfo- ResolveCompletionInfoMethod "beginMoveDrag" o = Gtk.WindowBeginMoveDragMethodInfo- ResolveCompletionInfoMethod "beginResizeDrag" o = Gtk.WindowBeginResizeDragMethodInfo- ResolveCompletionInfoMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveCompletionInfoMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveCompletionInfoMethod "canActivateAccel" o = Gtk.WidgetCanActivateAccelMethodInfo- ResolveCompletionInfoMethod "checkResize" o = Gtk.ContainerCheckResizeMethodInfo- ResolveCompletionInfoMethod "childFocus" o = Gtk.WidgetChildFocusMethodInfo- ResolveCompletionInfoMethod "childGetProperty" o = Gtk.ContainerChildGetPropertyMethodInfo- ResolveCompletionInfoMethod "childNotifyByPspec" o = Gtk.ContainerChildNotifyByPspecMethodInfo- ResolveCompletionInfoMethod "childSetProperty" o = Gtk.ContainerChildSetPropertyMethodInfo- ResolveCompletionInfoMethod "childType" o = Gtk.ContainerChildTypeMethodInfo- ResolveCompletionInfoMethod "classPath" o = Gtk.WidgetClassPathMethodInfo- ResolveCompletionInfoMethod "close" o = Gtk.WindowCloseMethodInfo- ResolveCompletionInfoMethod "computeExpand" o = Gtk.WidgetComputeExpandMethodInfo- ResolveCompletionInfoMethod "constructChild" o = Gtk.BuildableConstructChildMethodInfo- ResolveCompletionInfoMethod "createPangoContext" o = Gtk.WidgetCreatePangoContextMethodInfo- ResolveCompletionInfoMethod "createPangoLayout" o = Gtk.WidgetCreatePangoLayoutMethodInfo- ResolveCompletionInfoMethod "customFinished" o = Gtk.BuildableCustomFinishedMethodInfo- ResolveCompletionInfoMethod "customTagEnd" o = Gtk.BuildableCustomTagEndMethodInfo- ResolveCompletionInfoMethod "customTagStart" o = Gtk.BuildableCustomTagStartMethodInfo- ResolveCompletionInfoMethod "deiconify" o = Gtk.WindowDeiconifyMethodInfo- ResolveCompletionInfoMethod "destroy" o = Gtk.WidgetDestroyMethodInfo- ResolveCompletionInfoMethod "destroyed" o = Gtk.WidgetDestroyedMethodInfo- ResolveCompletionInfoMethod "deviceIsShadowed" o = Gtk.WidgetDeviceIsShadowedMethodInfo- ResolveCompletionInfoMethod "dragBegin" o = Gtk.WidgetDragBeginMethodInfo- ResolveCompletionInfoMethod "dragBeginWithCoordinates" o = Gtk.WidgetDragBeginWithCoordinatesMethodInfo- ResolveCompletionInfoMethod "dragCheckThreshold" o = Gtk.WidgetDragCheckThresholdMethodInfo- ResolveCompletionInfoMethod "dragDestAddImageTargets" o = Gtk.WidgetDragDestAddImageTargetsMethodInfo- ResolveCompletionInfoMethod "dragDestAddTextTargets" o = Gtk.WidgetDragDestAddTextTargetsMethodInfo- ResolveCompletionInfoMethod "dragDestAddUriTargets" o = Gtk.WidgetDragDestAddUriTargetsMethodInfo- ResolveCompletionInfoMethod "dragDestFindTarget" o = Gtk.WidgetDragDestFindTargetMethodInfo- ResolveCompletionInfoMethod "dragDestGetTargetList" o = Gtk.WidgetDragDestGetTargetListMethodInfo- ResolveCompletionInfoMethod "dragDestGetTrackMotion" o = Gtk.WidgetDragDestGetTrackMotionMethodInfo- ResolveCompletionInfoMethod "dragDestSet" o = Gtk.WidgetDragDestSetMethodInfo- ResolveCompletionInfoMethod "dragDestSetProxy" o = Gtk.WidgetDragDestSetProxyMethodInfo- ResolveCompletionInfoMethod "dragDestSetTargetList" o = Gtk.WidgetDragDestSetTargetListMethodInfo- ResolveCompletionInfoMethod "dragDestSetTrackMotion" o = Gtk.WidgetDragDestSetTrackMotionMethodInfo- ResolveCompletionInfoMethod "dragDestUnset" o = Gtk.WidgetDragDestUnsetMethodInfo- ResolveCompletionInfoMethod "dragGetData" o = Gtk.WidgetDragGetDataMethodInfo- ResolveCompletionInfoMethod "dragHighlight" o = Gtk.WidgetDragHighlightMethodInfo- ResolveCompletionInfoMethod "dragSourceAddImageTargets" o = Gtk.WidgetDragSourceAddImageTargetsMethodInfo- ResolveCompletionInfoMethod "dragSourceAddTextTargets" o = Gtk.WidgetDragSourceAddTextTargetsMethodInfo- ResolveCompletionInfoMethod "dragSourceAddUriTargets" o = Gtk.WidgetDragSourceAddUriTargetsMethodInfo- ResolveCompletionInfoMethod "dragSourceGetTargetList" o = Gtk.WidgetDragSourceGetTargetListMethodInfo- ResolveCompletionInfoMethod "dragSourceSet" o = Gtk.WidgetDragSourceSetMethodInfo- ResolveCompletionInfoMethod "dragSourceSetIconGicon" o = Gtk.WidgetDragSourceSetIconGiconMethodInfo- ResolveCompletionInfoMethod "dragSourceSetIconName" o = Gtk.WidgetDragSourceSetIconNameMethodInfo- ResolveCompletionInfoMethod "dragSourceSetIconPixbuf" o = Gtk.WidgetDragSourceSetIconPixbufMethodInfo- ResolveCompletionInfoMethod "dragSourceSetIconStock" o = Gtk.WidgetDragSourceSetIconStockMethodInfo- ResolveCompletionInfoMethod "dragSourceSetTargetList" o = Gtk.WidgetDragSourceSetTargetListMethodInfo- ResolveCompletionInfoMethod "dragSourceUnset" o = Gtk.WidgetDragSourceUnsetMethodInfo- ResolveCompletionInfoMethod "dragUnhighlight" o = Gtk.WidgetDragUnhighlightMethodInfo- ResolveCompletionInfoMethod "draw" o = Gtk.WidgetDrawMethodInfo- ResolveCompletionInfoMethod "ensureStyle" o = Gtk.WidgetEnsureStyleMethodInfo- ResolveCompletionInfoMethod "errorBell" o = Gtk.WidgetErrorBellMethodInfo- ResolveCompletionInfoMethod "event" o = Gtk.WidgetEventMethodInfo- ResolveCompletionInfoMethod "forall" o = Gtk.ContainerForallMethodInfo- ResolveCompletionInfoMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveCompletionInfoMethod "foreach" o = Gtk.ContainerForeachMethodInfo- ResolveCompletionInfoMethod "freezeChildNotify" o = Gtk.WidgetFreezeChildNotifyMethodInfo- ResolveCompletionInfoMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveCompletionInfoMethod "fullscreen" o = Gtk.WindowFullscreenMethodInfo- ResolveCompletionInfoMethod "fullscreenOnMonitor" o = Gtk.WindowFullscreenOnMonitorMethodInfo- ResolveCompletionInfoMethod "grabAdd" o = Gtk.WidgetGrabAddMethodInfo- ResolveCompletionInfoMethod "grabDefault" o = Gtk.WidgetGrabDefaultMethodInfo- ResolveCompletionInfoMethod "grabFocus" o = Gtk.WidgetGrabFocusMethodInfo- ResolveCompletionInfoMethod "grabRemove" o = Gtk.WidgetGrabRemoveMethodInfo- ResolveCompletionInfoMethod "hasDefault" o = Gtk.WidgetHasDefaultMethodInfo- ResolveCompletionInfoMethod "hasFocus" o = Gtk.WidgetHasFocusMethodInfo- ResolveCompletionInfoMethod "hasGrab" o = Gtk.WidgetHasGrabMethodInfo- ResolveCompletionInfoMethod "hasGroup" o = Gtk.WindowHasGroupMethodInfo- ResolveCompletionInfoMethod "hasRcStyle" o = Gtk.WidgetHasRcStyleMethodInfo- ResolveCompletionInfoMethod "hasScreen" o = Gtk.WidgetHasScreenMethodInfo- ResolveCompletionInfoMethod "hasToplevelFocus" o = Gtk.WindowHasToplevelFocusMethodInfo- ResolveCompletionInfoMethod "hasVisibleFocus" o = Gtk.WidgetHasVisibleFocusMethodInfo- ResolveCompletionInfoMethod "hide" o = Gtk.WidgetHideMethodInfo- ResolveCompletionInfoMethod "hideOnDelete" o = Gtk.WidgetHideOnDeleteMethodInfo- ResolveCompletionInfoMethod "iconify" o = Gtk.WindowIconifyMethodInfo- ResolveCompletionInfoMethod "inDestruction" o = Gtk.WidgetInDestructionMethodInfo- ResolveCompletionInfoMethod "initTemplate" o = Gtk.WidgetInitTemplateMethodInfo- ResolveCompletionInfoMethod "inputShapeCombineRegion" o = Gtk.WidgetInputShapeCombineRegionMethodInfo- ResolveCompletionInfoMethod "insertActionGroup" o = Gtk.WidgetInsertActionGroupMethodInfo- ResolveCompletionInfoMethod "intersect" o = Gtk.WidgetIntersectMethodInfo- ResolveCompletionInfoMethod "isActive" o = Gtk.WindowIsActiveMethodInfo- ResolveCompletionInfoMethod "isAncestor" o = Gtk.WidgetIsAncestorMethodInfo- ResolveCompletionInfoMethod "isComposited" o = Gtk.WidgetIsCompositedMethodInfo- ResolveCompletionInfoMethod "isDrawable" o = Gtk.WidgetIsDrawableMethodInfo- ResolveCompletionInfoMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveCompletionInfoMethod "isFocus" o = Gtk.WidgetIsFocusMethodInfo- ResolveCompletionInfoMethod "isMaximized" o = Gtk.WindowIsMaximizedMethodInfo- ResolveCompletionInfoMethod "isSensitive" o = Gtk.WidgetIsSensitiveMethodInfo- ResolveCompletionInfoMethod "isToplevel" o = Gtk.WidgetIsToplevelMethodInfo- ResolveCompletionInfoMethod "isVisible" o = Gtk.WidgetIsVisibleMethodInfo- ResolveCompletionInfoMethod "keynavFailed" o = Gtk.WidgetKeynavFailedMethodInfo- ResolveCompletionInfoMethod "listAccelClosures" o = Gtk.WidgetListAccelClosuresMethodInfo- ResolveCompletionInfoMethod "listActionPrefixes" o = Gtk.WidgetListActionPrefixesMethodInfo- ResolveCompletionInfoMethod "listMnemonicLabels" o = Gtk.WidgetListMnemonicLabelsMethodInfo- ResolveCompletionInfoMethod "map" o = Gtk.WidgetMapMethodInfo- ResolveCompletionInfoMethod "maximize" o = Gtk.WindowMaximizeMethodInfo- ResolveCompletionInfoMethod "modifyBase" o = Gtk.WidgetModifyBaseMethodInfo- ResolveCompletionInfoMethod "modifyBg" o = Gtk.WidgetModifyBgMethodInfo- ResolveCompletionInfoMethod "modifyCursor" o = Gtk.WidgetModifyCursorMethodInfo- ResolveCompletionInfoMethod "modifyFg" o = Gtk.WidgetModifyFgMethodInfo- ResolveCompletionInfoMethod "modifyFont" o = Gtk.WidgetModifyFontMethodInfo- ResolveCompletionInfoMethod "modifyStyle" o = Gtk.WidgetModifyStyleMethodInfo- ResolveCompletionInfoMethod "modifyText" o = Gtk.WidgetModifyTextMethodInfo- ResolveCompletionInfoMethod "move" o = Gtk.WindowMoveMethodInfo- ResolveCompletionInfoMethod "moveToIter" o = CompletionInfoMoveToIterMethodInfo- ResolveCompletionInfoMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveCompletionInfoMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveCompletionInfoMethod "overrideBackgroundColor" o = Gtk.WidgetOverrideBackgroundColorMethodInfo- ResolveCompletionInfoMethod "overrideColor" o = Gtk.WidgetOverrideColorMethodInfo- ResolveCompletionInfoMethod "overrideCursor" o = Gtk.WidgetOverrideCursorMethodInfo- ResolveCompletionInfoMethod "overrideFont" o = Gtk.WidgetOverrideFontMethodInfo- ResolveCompletionInfoMethod "overrideSymbolicColor" o = Gtk.WidgetOverrideSymbolicColorMethodInfo- ResolveCompletionInfoMethod "parseGeometry" o = Gtk.WindowParseGeometryMethodInfo- ResolveCompletionInfoMethod "parserFinished" o = Gtk.BuildableParserFinishedMethodInfo- ResolveCompletionInfoMethod "path" o = Gtk.WidgetPathMethodInfo- ResolveCompletionInfoMethod "present" o = Gtk.WindowPresentMethodInfo- ResolveCompletionInfoMethod "presentWithTime" o = Gtk.WindowPresentWithTimeMethodInfo- ResolveCompletionInfoMethod "propagateDraw" o = Gtk.ContainerPropagateDrawMethodInfo- ResolveCompletionInfoMethod "propagateKeyEvent" o = Gtk.WindowPropagateKeyEventMethodInfo- ResolveCompletionInfoMethod "queueComputeExpand" o = Gtk.WidgetQueueComputeExpandMethodInfo- ResolveCompletionInfoMethod "queueDraw" o = Gtk.WidgetQueueDrawMethodInfo- ResolveCompletionInfoMethod "queueDrawArea" o = Gtk.WidgetQueueDrawAreaMethodInfo- ResolveCompletionInfoMethod "queueDrawRegion" o = Gtk.WidgetQueueDrawRegionMethodInfo- ResolveCompletionInfoMethod "queueResize" o = Gtk.WidgetQueueResizeMethodInfo- ResolveCompletionInfoMethod "queueResizeNoRedraw" o = Gtk.WidgetQueueResizeNoRedrawMethodInfo- ResolveCompletionInfoMethod "realize" o = Gtk.WidgetRealizeMethodInfo- ResolveCompletionInfoMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveCompletionInfoMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveCompletionInfoMethod "regionIntersect" o = Gtk.WidgetRegionIntersectMethodInfo- ResolveCompletionInfoMethod "registerWindow" o = Gtk.WidgetRegisterWindowMethodInfo- ResolveCompletionInfoMethod "remove" o = Gtk.ContainerRemoveMethodInfo- ResolveCompletionInfoMethod "removeAccelGroup" o = Gtk.WindowRemoveAccelGroupMethodInfo- ResolveCompletionInfoMethod "removeAccelerator" o = Gtk.WidgetRemoveAcceleratorMethodInfo- ResolveCompletionInfoMethod "removeMnemonic" o = Gtk.WindowRemoveMnemonicMethodInfo- ResolveCompletionInfoMethod "removeMnemonicLabel" o = Gtk.WidgetRemoveMnemonicLabelMethodInfo- ResolveCompletionInfoMethod "removeTickCallback" o = Gtk.WidgetRemoveTickCallbackMethodInfo- ResolveCompletionInfoMethod "renderIcon" o = Gtk.WidgetRenderIconMethodInfo- ResolveCompletionInfoMethod "renderIconPixbuf" o = Gtk.WidgetRenderIconPixbufMethodInfo- ResolveCompletionInfoMethod "reparent" o = Gtk.WidgetReparentMethodInfo- ResolveCompletionInfoMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveCompletionInfoMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveCompletionInfoMethod "resetRcStyles" o = Gtk.WidgetResetRcStylesMethodInfo- ResolveCompletionInfoMethod "resetStyle" o = Gtk.WidgetResetStyleMethodInfo- ResolveCompletionInfoMethod "reshowWithInitialSize" o = Gtk.WindowReshowWithInitialSizeMethodInfo- ResolveCompletionInfoMethod "resize" o = Gtk.WindowResizeMethodInfo- ResolveCompletionInfoMethod "resizeChildren" o = Gtk.ContainerResizeChildrenMethodInfo- ResolveCompletionInfoMethod "resizeGripIsVisible" o = Gtk.WindowResizeGripIsVisibleMethodInfo- ResolveCompletionInfoMethod "resizeToGeometry" o = Gtk.WindowResizeToGeometryMethodInfo- ResolveCompletionInfoMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveCompletionInfoMethod "sendExpose" o = Gtk.WidgetSendExposeMethodInfo- ResolveCompletionInfoMethod "sendFocusChange" o = Gtk.WidgetSendFocusChangeMethodInfo- ResolveCompletionInfoMethod "shapeCombineRegion" o = Gtk.WidgetShapeCombineRegionMethodInfo- ResolveCompletionInfoMethod "show" o = Gtk.WidgetShowMethodInfo- ResolveCompletionInfoMethod "showAll" o = Gtk.WidgetShowAllMethodInfo- ResolveCompletionInfoMethod "showNow" o = Gtk.WidgetShowNowMethodInfo- ResolveCompletionInfoMethod "sizeAllocate" o = Gtk.WidgetSizeAllocateMethodInfo- ResolveCompletionInfoMethod "sizeAllocateWithBaseline" o = Gtk.WidgetSizeAllocateWithBaselineMethodInfo- ResolveCompletionInfoMethod "sizeRequest" o = Gtk.WidgetSizeRequestMethodInfo- ResolveCompletionInfoMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveCompletionInfoMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveCompletionInfoMethod "stick" o = Gtk.WindowStickMethodInfo- ResolveCompletionInfoMethod "styleAttach" o = Gtk.WidgetStyleAttachMethodInfo- ResolveCompletionInfoMethod "styleGetProperty" o = Gtk.WidgetStyleGetPropertyMethodInfo- ResolveCompletionInfoMethod "thawChildNotify" o = Gtk.WidgetThawChildNotifyMethodInfo- ResolveCompletionInfoMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveCompletionInfoMethod "translateCoordinates" o = Gtk.WidgetTranslateCoordinatesMethodInfo- ResolveCompletionInfoMethod "triggerTooltipQuery" o = Gtk.WidgetTriggerTooltipQueryMethodInfo- ResolveCompletionInfoMethod "unfullscreen" o = Gtk.WindowUnfullscreenMethodInfo- ResolveCompletionInfoMethod "unmap" o = Gtk.WidgetUnmapMethodInfo- ResolveCompletionInfoMethod "unmaximize" o = Gtk.WindowUnmaximizeMethodInfo- ResolveCompletionInfoMethod "unparent" o = Gtk.WidgetUnparentMethodInfo- ResolveCompletionInfoMethod "unrealize" o = Gtk.WidgetUnrealizeMethodInfo- ResolveCompletionInfoMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveCompletionInfoMethod "unregisterWindow" o = Gtk.WidgetUnregisterWindowMethodInfo- ResolveCompletionInfoMethod "unsetFocusChain" o = Gtk.ContainerUnsetFocusChainMethodInfo- ResolveCompletionInfoMethod "unsetStateFlags" o = Gtk.WidgetUnsetStateFlagsMethodInfo- ResolveCompletionInfoMethod "unstick" o = Gtk.WindowUnstickMethodInfo- ResolveCompletionInfoMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveCompletionInfoMethod "getAcceptFocus" o = Gtk.WindowGetAcceptFocusMethodInfo- ResolveCompletionInfoMethod "getAccessible" o = Gtk.WidgetGetAccessibleMethodInfo- ResolveCompletionInfoMethod "getActionGroup" o = Gtk.WidgetGetActionGroupMethodInfo- ResolveCompletionInfoMethod "getAllocatedBaseline" o = Gtk.WidgetGetAllocatedBaselineMethodInfo- ResolveCompletionInfoMethod "getAllocatedHeight" o = Gtk.WidgetGetAllocatedHeightMethodInfo- ResolveCompletionInfoMethod "getAllocatedWidth" o = Gtk.WidgetGetAllocatedWidthMethodInfo- ResolveCompletionInfoMethod "getAllocation" o = Gtk.WidgetGetAllocationMethodInfo- ResolveCompletionInfoMethod "getAncestor" o = Gtk.WidgetGetAncestorMethodInfo- ResolveCompletionInfoMethod "getAppPaintable" o = Gtk.WidgetGetAppPaintableMethodInfo- ResolveCompletionInfoMethod "getApplication" o = Gtk.WindowGetApplicationMethodInfo- ResolveCompletionInfoMethod "getAttachedTo" o = Gtk.WindowGetAttachedToMethodInfo- ResolveCompletionInfoMethod "getBorderWidth" o = Gtk.ContainerGetBorderWidthMethodInfo- ResolveCompletionInfoMethod "getCanDefault" o = Gtk.WidgetGetCanDefaultMethodInfo- ResolveCompletionInfoMethod "getCanFocus" o = Gtk.WidgetGetCanFocusMethodInfo- ResolveCompletionInfoMethod "getChild" o = Gtk.BinGetChildMethodInfo- ResolveCompletionInfoMethod "getChildRequisition" o = Gtk.WidgetGetChildRequisitionMethodInfo- ResolveCompletionInfoMethod "getChildVisible" o = Gtk.WidgetGetChildVisibleMethodInfo- ResolveCompletionInfoMethod "getChildren" o = Gtk.ContainerGetChildrenMethodInfo- ResolveCompletionInfoMethod "getClip" o = Gtk.WidgetGetClipMethodInfo- ResolveCompletionInfoMethod "getClipboard" o = Gtk.WidgetGetClipboardMethodInfo- ResolveCompletionInfoMethod "getCompositeName" o = Gtk.WidgetGetCompositeNameMethodInfo- ResolveCompletionInfoMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveCompletionInfoMethod "getDecorated" o = Gtk.WindowGetDecoratedMethodInfo- ResolveCompletionInfoMethod "getDefaultSize" o = Gtk.WindowGetDefaultSizeMethodInfo- ResolveCompletionInfoMethod "getDefaultWidget" o = Gtk.WindowGetDefaultWidgetMethodInfo- ResolveCompletionInfoMethod "getDeletable" o = Gtk.WindowGetDeletableMethodInfo- ResolveCompletionInfoMethod "getDestroyWithParent" o = Gtk.WindowGetDestroyWithParentMethodInfo- ResolveCompletionInfoMethod "getDeviceEnabled" o = Gtk.WidgetGetDeviceEnabledMethodInfo- ResolveCompletionInfoMethod "getDeviceEvents" o = Gtk.WidgetGetDeviceEventsMethodInfo- ResolveCompletionInfoMethod "getDirection" o = Gtk.WidgetGetDirectionMethodInfo- ResolveCompletionInfoMethod "getDisplay" o = Gtk.WidgetGetDisplayMethodInfo- ResolveCompletionInfoMethod "getDoubleBuffered" o = Gtk.WidgetGetDoubleBufferedMethodInfo- ResolveCompletionInfoMethod "getEvents" o = Gtk.WidgetGetEventsMethodInfo- ResolveCompletionInfoMethod "getFocus" o = Gtk.WindowGetFocusMethodInfo- ResolveCompletionInfoMethod "getFocusChain" o = Gtk.ContainerGetFocusChainMethodInfo- ResolveCompletionInfoMethod "getFocusChild" o = Gtk.ContainerGetFocusChildMethodInfo- ResolveCompletionInfoMethod "getFocusHadjustment" o = Gtk.ContainerGetFocusHadjustmentMethodInfo- ResolveCompletionInfoMethod "getFocusOnMap" o = Gtk.WindowGetFocusOnMapMethodInfo- ResolveCompletionInfoMethod "getFocusVadjustment" o = Gtk.ContainerGetFocusVadjustmentMethodInfo- ResolveCompletionInfoMethod "getFocusVisible" o = Gtk.WindowGetFocusVisibleMethodInfo- ResolveCompletionInfoMethod "getFontMap" o = Gtk.WidgetGetFontMapMethodInfo- ResolveCompletionInfoMethod "getFontOptions" o = Gtk.WidgetGetFontOptionsMethodInfo- ResolveCompletionInfoMethod "getFrameClock" o = Gtk.WidgetGetFrameClockMethodInfo- ResolveCompletionInfoMethod "getGravity" o = Gtk.WindowGetGravityMethodInfo- ResolveCompletionInfoMethod "getGroup" o = Gtk.WindowGetGroupMethodInfo- ResolveCompletionInfoMethod "getHalign" o = Gtk.WidgetGetHalignMethodInfo- ResolveCompletionInfoMethod "getHasResizeGrip" o = Gtk.WindowGetHasResizeGripMethodInfo- ResolveCompletionInfoMethod "getHasTooltip" o = Gtk.WidgetGetHasTooltipMethodInfo- ResolveCompletionInfoMethod "getHasWindow" o = Gtk.WidgetGetHasWindowMethodInfo- ResolveCompletionInfoMethod "getHexpand" o = Gtk.WidgetGetHexpandMethodInfo- ResolveCompletionInfoMethod "getHexpandSet" o = Gtk.WidgetGetHexpandSetMethodInfo- ResolveCompletionInfoMethod "getHideTitlebarWhenMaximized" o = Gtk.WindowGetHideTitlebarWhenMaximizedMethodInfo- ResolveCompletionInfoMethod "getIcon" o = Gtk.WindowGetIconMethodInfo- ResolveCompletionInfoMethod "getIconList" o = Gtk.WindowGetIconListMethodInfo- ResolveCompletionInfoMethod "getIconName" o = Gtk.WindowGetIconNameMethodInfo- ResolveCompletionInfoMethod "getInternalChild" o = Gtk.BuildableGetInternalChildMethodInfo- ResolveCompletionInfoMethod "getMapped" o = Gtk.WidgetGetMappedMethodInfo- ResolveCompletionInfoMethod "getMarginBottom" o = Gtk.WidgetGetMarginBottomMethodInfo- ResolveCompletionInfoMethod "getMarginEnd" o = Gtk.WidgetGetMarginEndMethodInfo- ResolveCompletionInfoMethod "getMarginLeft" o = Gtk.WidgetGetMarginLeftMethodInfo- ResolveCompletionInfoMethod "getMarginRight" o = Gtk.WidgetGetMarginRightMethodInfo- ResolveCompletionInfoMethod "getMarginStart" o = Gtk.WidgetGetMarginStartMethodInfo- ResolveCompletionInfoMethod "getMarginTop" o = Gtk.WidgetGetMarginTopMethodInfo- ResolveCompletionInfoMethod "getMnemonicModifier" o = Gtk.WindowGetMnemonicModifierMethodInfo- ResolveCompletionInfoMethod "getMnemonicsVisible" o = Gtk.WindowGetMnemonicsVisibleMethodInfo- ResolveCompletionInfoMethod "getModal" o = Gtk.WindowGetModalMethodInfo- ResolveCompletionInfoMethod "getModifierMask" o = Gtk.WidgetGetModifierMaskMethodInfo- ResolveCompletionInfoMethod "getModifierStyle" o = Gtk.WidgetGetModifierStyleMethodInfo- ResolveCompletionInfoMethod "getNoShowAll" o = Gtk.WidgetGetNoShowAllMethodInfo- ResolveCompletionInfoMethod "getPangoContext" o = Gtk.WidgetGetPangoContextMethodInfo- ResolveCompletionInfoMethod "getParent" o = Gtk.WidgetGetParentMethodInfo- ResolveCompletionInfoMethod "getParentWindow" o = Gtk.WidgetGetParentWindowMethodInfo- ResolveCompletionInfoMethod "getPath" o = Gtk.WidgetGetPathMethodInfo- ResolveCompletionInfoMethod "getPathForChild" o = Gtk.ContainerGetPathForChildMethodInfo- ResolveCompletionInfoMethod "getPointer" o = Gtk.WidgetGetPointerMethodInfo- ResolveCompletionInfoMethod "getPosition" o = Gtk.WindowGetPositionMethodInfo- ResolveCompletionInfoMethod "getPreferredHeight" o = Gtk.WidgetGetPreferredHeightMethodInfo- ResolveCompletionInfoMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo- ResolveCompletionInfoMethod "getPreferredHeightForWidth" o = Gtk.WidgetGetPreferredHeightForWidthMethodInfo- ResolveCompletionInfoMethod "getPreferredSize" o = Gtk.WidgetGetPreferredSizeMethodInfo- ResolveCompletionInfoMethod "getPreferredWidth" o = Gtk.WidgetGetPreferredWidthMethodInfo- ResolveCompletionInfoMethod "getPreferredWidthForHeight" o = Gtk.WidgetGetPreferredWidthForHeightMethodInfo- ResolveCompletionInfoMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveCompletionInfoMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveCompletionInfoMethod "getRealized" o = Gtk.WidgetGetRealizedMethodInfo- ResolveCompletionInfoMethod "getReceivesDefault" o = Gtk.WidgetGetReceivesDefaultMethodInfo- ResolveCompletionInfoMethod "getRequestMode" o = Gtk.WidgetGetRequestModeMethodInfo- ResolveCompletionInfoMethod "getRequisition" o = Gtk.WidgetGetRequisitionMethodInfo- ResolveCompletionInfoMethod "getResizable" o = Gtk.WindowGetResizableMethodInfo- ResolveCompletionInfoMethod "getResizeGripArea" o = Gtk.WindowGetResizeGripAreaMethodInfo- ResolveCompletionInfoMethod "getResizeMode" o = Gtk.ContainerGetResizeModeMethodInfo- ResolveCompletionInfoMethod "getRole" o = Gtk.WindowGetRoleMethodInfo- ResolveCompletionInfoMethod "getRootWindow" o = Gtk.WidgetGetRootWindowMethodInfo- ResolveCompletionInfoMethod "getScaleFactor" o = Gtk.WidgetGetScaleFactorMethodInfo- ResolveCompletionInfoMethod "getSensitive" o = Gtk.WidgetGetSensitiveMethodInfo- ResolveCompletionInfoMethod "getSettings" o = Gtk.WidgetGetSettingsMethodInfo- ResolveCompletionInfoMethod "getSize" o = Gtk.WindowGetSizeMethodInfo- ResolveCompletionInfoMethod "getSizeRequest" o = Gtk.WidgetGetSizeRequestMethodInfo- ResolveCompletionInfoMethod "getSkipPagerHint" o = Gtk.WindowGetSkipPagerHintMethodInfo- ResolveCompletionInfoMethod "getSkipTaskbarHint" o = Gtk.WindowGetSkipTaskbarHintMethodInfo- ResolveCompletionInfoMethod "getState" o = Gtk.WidgetGetStateMethodInfo- ResolveCompletionInfoMethod "getStateFlags" o = Gtk.WidgetGetStateFlagsMethodInfo- ResolveCompletionInfoMethod "getStyle" o = Gtk.WidgetGetStyleMethodInfo- ResolveCompletionInfoMethod "getStyleContext" o = Gtk.WidgetGetStyleContextMethodInfo- ResolveCompletionInfoMethod "getSupportMultidevice" o = Gtk.WidgetGetSupportMultideviceMethodInfo- ResolveCompletionInfoMethod "getTemplateChild" o = Gtk.WidgetGetTemplateChildMethodInfo- ResolveCompletionInfoMethod "getTitle" o = Gtk.WindowGetTitleMethodInfo- ResolveCompletionInfoMethod "getTitlebar" o = Gtk.WindowGetTitlebarMethodInfo- ResolveCompletionInfoMethod "getTooltipMarkup" o = Gtk.WidgetGetTooltipMarkupMethodInfo- ResolveCompletionInfoMethod "getTooltipText" o = Gtk.WidgetGetTooltipTextMethodInfo- ResolveCompletionInfoMethod "getTooltipWindow" o = Gtk.WidgetGetTooltipWindowMethodInfo- ResolveCompletionInfoMethod "getToplevel" o = Gtk.WidgetGetToplevelMethodInfo- ResolveCompletionInfoMethod "getTransientFor" o = Gtk.WindowGetTransientForMethodInfo- ResolveCompletionInfoMethod "getTypeHint" o = Gtk.WindowGetTypeHintMethodInfo- ResolveCompletionInfoMethod "getUrgencyHint" o = Gtk.WindowGetUrgencyHintMethodInfo- ResolveCompletionInfoMethod "getValign" o = Gtk.WidgetGetValignMethodInfo- ResolveCompletionInfoMethod "getValignWithBaseline" o = Gtk.WidgetGetValignWithBaselineMethodInfo- ResolveCompletionInfoMethod "getVexpand" o = Gtk.WidgetGetVexpandMethodInfo- ResolveCompletionInfoMethod "getVexpandSet" o = Gtk.WidgetGetVexpandSetMethodInfo- ResolveCompletionInfoMethod "getVisible" o = Gtk.WidgetGetVisibleMethodInfo- ResolveCompletionInfoMethod "getVisual" o = Gtk.WidgetGetVisualMethodInfo- ResolveCompletionInfoMethod "getWidget" o = CompletionInfoGetWidgetMethodInfo- ResolveCompletionInfoMethod "getWindow" o = Gtk.WidgetGetWindowMethodInfo- ResolveCompletionInfoMethod "getWindowType" o = Gtk.WindowGetWindowTypeMethodInfo- ResolveCompletionInfoMethod "setAccelPath" o = Gtk.WidgetSetAccelPathMethodInfo- ResolveCompletionInfoMethod "setAcceptFocus" o = Gtk.WindowSetAcceptFocusMethodInfo- ResolveCompletionInfoMethod "setAllocation" o = Gtk.WidgetSetAllocationMethodInfo- ResolveCompletionInfoMethod "setAppPaintable" o = Gtk.WidgetSetAppPaintableMethodInfo- ResolveCompletionInfoMethod "setApplication" o = Gtk.WindowSetApplicationMethodInfo- ResolveCompletionInfoMethod "setAttachedTo" o = Gtk.WindowSetAttachedToMethodInfo- ResolveCompletionInfoMethod "setBorderWidth" o = Gtk.ContainerSetBorderWidthMethodInfo- ResolveCompletionInfoMethod "setBuildableProperty" o = Gtk.BuildableSetBuildablePropertyMethodInfo- ResolveCompletionInfoMethod "setCanDefault" o = Gtk.WidgetSetCanDefaultMethodInfo- ResolveCompletionInfoMethod "setCanFocus" o = Gtk.WidgetSetCanFocusMethodInfo- ResolveCompletionInfoMethod "setChildVisible" o = Gtk.WidgetSetChildVisibleMethodInfo- ResolveCompletionInfoMethod "setClip" o = Gtk.WidgetSetClipMethodInfo- ResolveCompletionInfoMethod "setCompositeName" o = Gtk.WidgetSetCompositeNameMethodInfo- ResolveCompletionInfoMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveCompletionInfoMethod "setDecorated" o = Gtk.WindowSetDecoratedMethodInfo- ResolveCompletionInfoMethod "setDefault" o = Gtk.WindowSetDefaultMethodInfo- ResolveCompletionInfoMethod "setDefaultGeometry" o = Gtk.WindowSetDefaultGeometryMethodInfo- ResolveCompletionInfoMethod "setDefaultSize" o = Gtk.WindowSetDefaultSizeMethodInfo- ResolveCompletionInfoMethod "setDeletable" o = Gtk.WindowSetDeletableMethodInfo- ResolveCompletionInfoMethod "setDestroyWithParent" o = Gtk.WindowSetDestroyWithParentMethodInfo- ResolveCompletionInfoMethod "setDeviceEnabled" o = Gtk.WidgetSetDeviceEnabledMethodInfo- ResolveCompletionInfoMethod "setDeviceEvents" o = Gtk.WidgetSetDeviceEventsMethodInfo- ResolveCompletionInfoMethod "setDirection" o = Gtk.WidgetSetDirectionMethodInfo- ResolveCompletionInfoMethod "setDoubleBuffered" o = Gtk.WidgetSetDoubleBufferedMethodInfo- ResolveCompletionInfoMethod "setEvents" o = Gtk.WidgetSetEventsMethodInfo- ResolveCompletionInfoMethod "setFocus" o = Gtk.WindowSetFocusMethodInfo- ResolveCompletionInfoMethod "setFocusChain" o = Gtk.ContainerSetFocusChainMethodInfo- ResolveCompletionInfoMethod "setFocusChild" o = Gtk.ContainerSetFocusChildMethodInfo- ResolveCompletionInfoMethod "setFocusHadjustment" o = Gtk.ContainerSetFocusHadjustmentMethodInfo- ResolveCompletionInfoMethod "setFocusOnMap" o = Gtk.WindowSetFocusOnMapMethodInfo- ResolveCompletionInfoMethod "setFocusVadjustment" o = Gtk.ContainerSetFocusVadjustmentMethodInfo- ResolveCompletionInfoMethod "setFocusVisible" o = Gtk.WindowSetFocusVisibleMethodInfo- ResolveCompletionInfoMethod "setFontMap" o = Gtk.WidgetSetFontMapMethodInfo- ResolveCompletionInfoMethod "setFontOptions" o = Gtk.WidgetSetFontOptionsMethodInfo- ResolveCompletionInfoMethod "setGeometryHints" o = Gtk.WindowSetGeometryHintsMethodInfo- ResolveCompletionInfoMethod "setGravity" o = Gtk.WindowSetGravityMethodInfo- ResolveCompletionInfoMethod "setHalign" o = Gtk.WidgetSetHalignMethodInfo- ResolveCompletionInfoMethod "setHasResizeGrip" o = Gtk.WindowSetHasResizeGripMethodInfo- ResolveCompletionInfoMethod "setHasTooltip" o = Gtk.WidgetSetHasTooltipMethodInfo- ResolveCompletionInfoMethod "setHasUserRefCount" o = Gtk.WindowSetHasUserRefCountMethodInfo- ResolveCompletionInfoMethod "setHasWindow" o = Gtk.WidgetSetHasWindowMethodInfo- ResolveCompletionInfoMethod "setHexpand" o = Gtk.WidgetSetHexpandMethodInfo- ResolveCompletionInfoMethod "setHexpandSet" o = Gtk.WidgetSetHexpandSetMethodInfo- ResolveCompletionInfoMethod "setHideTitlebarWhenMaximized" o = Gtk.WindowSetHideTitlebarWhenMaximizedMethodInfo- ResolveCompletionInfoMethod "setIcon" o = Gtk.WindowSetIconMethodInfo- ResolveCompletionInfoMethod "setIconFromFile" o = Gtk.WindowSetIconFromFileMethodInfo- ResolveCompletionInfoMethod "setIconList" o = Gtk.WindowSetIconListMethodInfo- ResolveCompletionInfoMethod "setIconName" o = Gtk.WindowSetIconNameMethodInfo- ResolveCompletionInfoMethod "setKeepAbove" o = Gtk.WindowSetKeepAboveMethodInfo- ResolveCompletionInfoMethod "setKeepBelow" o = Gtk.WindowSetKeepBelowMethodInfo- ResolveCompletionInfoMethod "setMapped" o = Gtk.WidgetSetMappedMethodInfo- ResolveCompletionInfoMethod "setMarginBottom" o = Gtk.WidgetSetMarginBottomMethodInfo- ResolveCompletionInfoMethod "setMarginEnd" o = Gtk.WidgetSetMarginEndMethodInfo- ResolveCompletionInfoMethod "setMarginLeft" o = Gtk.WidgetSetMarginLeftMethodInfo- ResolveCompletionInfoMethod "setMarginRight" o = Gtk.WidgetSetMarginRightMethodInfo- ResolveCompletionInfoMethod "setMarginStart" o = Gtk.WidgetSetMarginStartMethodInfo- ResolveCompletionInfoMethod "setMarginTop" o = Gtk.WidgetSetMarginTopMethodInfo- ResolveCompletionInfoMethod "setMnemonicModifier" o = Gtk.WindowSetMnemonicModifierMethodInfo- ResolveCompletionInfoMethod "setMnemonicsVisible" o = Gtk.WindowSetMnemonicsVisibleMethodInfo- ResolveCompletionInfoMethod "setModal" o = Gtk.WindowSetModalMethodInfo- ResolveCompletionInfoMethod "setNoShowAll" o = Gtk.WidgetSetNoShowAllMethodInfo- ResolveCompletionInfoMethod "setParent" o = Gtk.WidgetSetParentMethodInfo- ResolveCompletionInfoMethod "setParentWindow" o = Gtk.WidgetSetParentWindowMethodInfo- ResolveCompletionInfoMethod "setPosition" o = Gtk.WindowSetPositionMethodInfo- ResolveCompletionInfoMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveCompletionInfoMethod "setRealized" o = Gtk.WidgetSetRealizedMethodInfo- ResolveCompletionInfoMethod "setReallocateRedraws" o = Gtk.ContainerSetReallocateRedrawsMethodInfo- ResolveCompletionInfoMethod "setReceivesDefault" o = Gtk.WidgetSetReceivesDefaultMethodInfo- ResolveCompletionInfoMethod "setRedrawOnAllocate" o = Gtk.WidgetSetRedrawOnAllocateMethodInfo- ResolveCompletionInfoMethod "setResizable" o = Gtk.WindowSetResizableMethodInfo- ResolveCompletionInfoMethod "setResizeMode" o = Gtk.ContainerSetResizeModeMethodInfo- ResolveCompletionInfoMethod "setRole" o = Gtk.WindowSetRoleMethodInfo- ResolveCompletionInfoMethod "setScreen" o = Gtk.WindowSetScreenMethodInfo- ResolveCompletionInfoMethod "setSensitive" o = Gtk.WidgetSetSensitiveMethodInfo- ResolveCompletionInfoMethod "setSizeRequest" o = Gtk.WidgetSetSizeRequestMethodInfo- ResolveCompletionInfoMethod "setSkipPagerHint" o = Gtk.WindowSetSkipPagerHintMethodInfo- ResolveCompletionInfoMethod "setSkipTaskbarHint" o = Gtk.WindowSetSkipTaskbarHintMethodInfo- ResolveCompletionInfoMethod "setStartupId" o = Gtk.WindowSetStartupIdMethodInfo- ResolveCompletionInfoMethod "setState" o = Gtk.WidgetSetStateMethodInfo- ResolveCompletionInfoMethod "setStateFlags" o = Gtk.WidgetSetStateFlagsMethodInfo- ResolveCompletionInfoMethod "setStyle" o = Gtk.WidgetSetStyleMethodInfo- ResolveCompletionInfoMethod "setSupportMultidevice" o = Gtk.WidgetSetSupportMultideviceMethodInfo- ResolveCompletionInfoMethod "setTitle" o = Gtk.WindowSetTitleMethodInfo- ResolveCompletionInfoMethod "setTitlebar" o = Gtk.WindowSetTitlebarMethodInfo- ResolveCompletionInfoMethod "setTooltipMarkup" o = Gtk.WidgetSetTooltipMarkupMethodInfo- ResolveCompletionInfoMethod "setTooltipText" o = Gtk.WidgetSetTooltipTextMethodInfo- ResolveCompletionInfoMethod "setTooltipWindow" o = Gtk.WidgetSetTooltipWindowMethodInfo- ResolveCompletionInfoMethod "setTransientFor" o = Gtk.WindowSetTransientForMethodInfo- ResolveCompletionInfoMethod "setTypeHint" o = Gtk.WindowSetTypeHintMethodInfo- ResolveCompletionInfoMethod "setUrgencyHint" o = Gtk.WindowSetUrgencyHintMethodInfo- ResolveCompletionInfoMethod "setValign" o = Gtk.WidgetSetValignMethodInfo- ResolveCompletionInfoMethod "setVexpand" o = Gtk.WidgetSetVexpandMethodInfo- ResolveCompletionInfoMethod "setVexpandSet" o = Gtk.WidgetSetVexpandSetMethodInfo- ResolveCompletionInfoMethod "setVisible" o = Gtk.WidgetSetVisibleMethodInfo- ResolveCompletionInfoMethod "setVisual" o = Gtk.WidgetSetVisualMethodInfo- ResolveCompletionInfoMethod "setWidget" o = CompletionInfoSetWidgetMethodInfo- ResolveCompletionInfoMethod "setWindow" o = Gtk.WidgetSetWindowMethodInfo- ResolveCompletionInfoMethod "setWmclass" o = Gtk.WindowSetWmclassMethodInfo- ResolveCompletionInfoMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveCompletionInfoMethod t CompletionInfo, MethodInfo info CompletionInfo p) => IsLabelProxy t (CompletionInfo -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveCompletionInfoMethod t CompletionInfo, MethodInfo info CompletionInfo p) => IsLabel t (CompletionInfo -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- signal CompletionInfo::before-show-type CompletionInfoBeforeShowCallback =- IO ()--noCompletionInfoBeforeShowCallback :: Maybe CompletionInfoBeforeShowCallback-noCompletionInfoBeforeShowCallback = Nothing--type CompletionInfoBeforeShowCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkCompletionInfoBeforeShowCallback :: CompletionInfoBeforeShowCallbackC -> IO (FunPtr CompletionInfoBeforeShowCallbackC)--completionInfoBeforeShowClosure :: CompletionInfoBeforeShowCallback -> IO Closure-completionInfoBeforeShowClosure cb = newCClosure =<< mkCompletionInfoBeforeShowCallback wrapped- where wrapped = completionInfoBeforeShowCallbackWrapper cb--completionInfoBeforeShowCallbackWrapper ::- CompletionInfoBeforeShowCallback ->- Ptr () ->- Ptr () ->- IO ()-completionInfoBeforeShowCallbackWrapper _cb _ _ = do- _cb --onCompletionInfoBeforeShow :: (GObject a, MonadIO m) => a -> CompletionInfoBeforeShowCallback -> m SignalHandlerId-onCompletionInfoBeforeShow obj cb = liftIO $ connectCompletionInfoBeforeShow obj cb SignalConnectBefore-afterCompletionInfoBeforeShow :: (GObject a, MonadIO m) => a -> CompletionInfoBeforeShowCallback -> m SignalHandlerId-afterCompletionInfoBeforeShow obj cb = connectCompletionInfoBeforeShow obj cb SignalConnectAfter--connectCompletionInfoBeforeShow :: (GObject a, MonadIO m) =>- a -> CompletionInfoBeforeShowCallback -> SignalConnectMode -> m SignalHandlerId-connectCompletionInfoBeforeShow obj cb after = liftIO $ do- cb' <- mkCompletionInfoBeforeShowCallback (completionInfoBeforeShowCallbackWrapper cb)- connectSignalFunPtr obj "before-show" cb' after--type instance AttributeList CompletionInfo = CompletionInfoAttributeList-type CompletionInfoAttributeList = ('[ '("acceptFocus", Gtk.WindowAcceptFocusPropertyInfo), '("appPaintable", Gtk.WidgetAppPaintablePropertyInfo), '("application", Gtk.WindowApplicationPropertyInfo), '("attachedTo", Gtk.WindowAttachedToPropertyInfo), '("borderWidth", Gtk.ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.WidgetCanFocusPropertyInfo), '("child", Gtk.ContainerChildPropertyInfo), '("compositeChild", Gtk.WidgetCompositeChildPropertyInfo), '("decorated", Gtk.WindowDecoratedPropertyInfo), '("defaultHeight", Gtk.WindowDefaultHeightPropertyInfo), '("defaultWidth", Gtk.WindowDefaultWidthPropertyInfo), '("deletable", Gtk.WindowDeletablePropertyInfo), '("destroyWithParent", Gtk.WindowDestroyWithParentPropertyInfo), '("doubleBuffered", Gtk.WidgetDoubleBufferedPropertyInfo), '("events", Gtk.WidgetEventsPropertyInfo), '("expand", Gtk.WidgetExpandPropertyInfo), '("focusOnMap", Gtk.WindowFocusOnMapPropertyInfo), '("focusVisible", Gtk.WindowFocusVisiblePropertyInfo), '("gravity", Gtk.WindowGravityPropertyInfo), '("halign", Gtk.WidgetHalignPropertyInfo), '("hasDefault", Gtk.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.WidgetHasFocusPropertyInfo), '("hasResizeGrip", Gtk.WindowHasResizeGripPropertyInfo), '("hasTooltip", Gtk.WidgetHasTooltipPropertyInfo), '("hasToplevelFocus", Gtk.WindowHasToplevelFocusPropertyInfo), '("heightRequest", Gtk.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.WidgetHexpandSetPropertyInfo), '("hideTitlebarWhenMaximized", Gtk.WindowHideTitlebarWhenMaximizedPropertyInfo), '("icon", Gtk.WindowIconPropertyInfo), '("iconName", Gtk.WindowIconNamePropertyInfo), '("isActive", Gtk.WindowIsActivePropertyInfo), '("isFocus", Gtk.WidgetIsFocusPropertyInfo), '("isMaximized", Gtk.WindowIsMaximizedPropertyInfo), '("margin", Gtk.WidgetMarginPropertyInfo), '("marginBottom", Gtk.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.WidgetMarginTopPropertyInfo), '("mnemonicsVisible", Gtk.WindowMnemonicsVisiblePropertyInfo), '("modal", Gtk.WindowModalPropertyInfo), '("name", Gtk.WidgetNamePropertyInfo), '("noShowAll", Gtk.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.WidgetOpacityPropertyInfo), '("parent", Gtk.WidgetParentPropertyInfo), '("receivesDefault", Gtk.WidgetReceivesDefaultPropertyInfo), '("resizable", Gtk.WindowResizablePropertyInfo), '("resizeGripVisible", Gtk.WindowResizeGripVisiblePropertyInfo), '("resizeMode", Gtk.ContainerResizeModePropertyInfo), '("role", Gtk.WindowRolePropertyInfo), '("scaleFactor", Gtk.WidgetScaleFactorPropertyInfo), '("screen", Gtk.WindowScreenPropertyInfo), '("sensitive", Gtk.WidgetSensitivePropertyInfo), '("skipPagerHint", Gtk.WindowSkipPagerHintPropertyInfo), '("skipTaskbarHint", Gtk.WindowSkipTaskbarHintPropertyInfo), '("startupId", Gtk.WindowStartupIdPropertyInfo), '("style", Gtk.WidgetStylePropertyInfo), '("title", Gtk.WindowTitlePropertyInfo), '("tooltipMarkup", Gtk.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.WidgetTooltipTextPropertyInfo), '("transientFor", Gtk.WindowTransientForPropertyInfo), '("type", Gtk.WindowTypePropertyInfo), '("typeHint", Gtk.WindowTypeHintPropertyInfo), '("urgencyHint", Gtk.WindowUrgencyHintPropertyInfo), '("valign", Gtk.WidgetValignPropertyInfo), '("vexpand", Gtk.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.WidgetVexpandSetPropertyInfo), '("visible", Gtk.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.WidgetWidthRequestPropertyInfo), '("window", Gtk.WidgetWindowPropertyInfo), '("windowPosition", Gtk.WindowWindowPositionPropertyInfo)] :: [(Symbol, *)])--data CompletionInfoBeforeShowSignalInfo-instance SignalInfo CompletionInfoBeforeShowSignalInfo where- type HaskellCallbackType CompletionInfoBeforeShowSignalInfo = CompletionInfoBeforeShowCallback- connectSignal _ = connectCompletionInfoBeforeShow--type instance SignalList CompletionInfo = CompletionInfoSignalList-type CompletionInfoSignalList = ('[ '("accelClosuresChanged", Gtk.WidgetAccelClosuresChangedSignalInfo), '("activateDefault", Gtk.WindowActivateDefaultSignalInfo), '("activateFocus", Gtk.WindowActivateFocusSignalInfo), '("add", Gtk.ContainerAddSignalInfo), '("beforeShow", CompletionInfoBeforeShowSignalInfo), '("buttonPressEvent", Gtk.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.WidgetCanActivateAccelSignalInfo), '("checkResize", Gtk.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.WidgetConfigureEventSignalInfo), '("damageEvent", Gtk.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.WidgetDeleteEventSignalInfo), '("destroy", Gtk.WidgetDestroySignalInfo), '("destroyEvent", Gtk.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.WidgetDirectionChangedSignalInfo), '("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), '("enableDebugging", Gtk.WindowEnableDebuggingSignalInfo), '("enterNotifyEvent", Gtk.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.WidgetEventSignalInfo), '("eventAfter", Gtk.WidgetEventAfterSignalInfo), '("focus", Gtk.WidgetFocusSignalInfo), '("focusInEvent", Gtk.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.WidgetGrabNotifySignalInfo), '("hide", Gtk.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.WidgetHierarchyChangedSignalInfo), '("keyPressEvent", Gtk.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.WidgetKeynavFailedSignalInfo), '("keysChanged", Gtk.WindowKeysChangedSignalInfo), '("leaveNotifyEvent", Gtk.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.WidgetMapSignalInfo), '("mapEvent", Gtk.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.WidgetMotionNotifyEventSignalInfo), '("moveFocus", Gtk.WidgetMoveFocusSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("parentSet", Gtk.WidgetParentSetSignalInfo), '("popupMenu", Gtk.WidgetPopupMenuSignalInfo), '("propertyNotifyEvent", Gtk.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.WidgetQueryTooltipSignalInfo), '("realize", Gtk.WidgetRealizeSignalInfo), '("remove", Gtk.ContainerRemoveSignalInfo), '("screenChanged", Gtk.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.WidgetSelectionRequestEventSignalInfo), '("setFocus", Gtk.WindowSetFocusSignalInfo), '("setFocusChild", Gtk.ContainerSetFocusChildSignalInfo), '("show", Gtk.WidgetShowSignalInfo), '("showHelp", Gtk.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.WidgetStyleUpdatedSignalInfo), '("touchEvent", Gtk.WidgetTouchEventSignalInfo), '("unmap", Gtk.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])---- method CompletionInfo::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompletionInfo")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_info_new" gtk_source_completion_info_new :: - IO (Ptr CompletionInfo)---completionInfoNew ::- (MonadIO m) =>- m CompletionInfo -- result-completionInfoNew = liftIO $ do- result <- gtk_source_completion_info_new- checkUnexpectedReturnNULL "gtk_source_completion_info_new" result- result' <- (newObject CompletionInfo) result- return result'---- method CompletionInfo::get_widget--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionInfo", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gtk" "Widget")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_info_get_widget" gtk_source_completion_info_get_widget :: - Ptr CompletionInfo -> -- _obj : TInterface "GtkSource" "CompletionInfo"- IO (Ptr Gtk.Widget)--{-# DEPRECATED completionInfoGetWidget ["(Since version 3.8)","Use gtk_bin_get_child() instead."]#-}-completionInfoGetWidget ::- (MonadIO m, CompletionInfoK a) =>- a -- _obj- -> m Gtk.Widget -- result-completionInfoGetWidget _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_completion_info_get_widget _obj'- checkUnexpectedReturnNULL "gtk_source_completion_info_get_widget" result- result' <- (newObject Gtk.Widget) result- touchManagedPtr _obj- return result'--data CompletionInfoGetWidgetMethodInfo-instance (signature ~ (m Gtk.Widget), MonadIO m, CompletionInfoK a) => MethodInfo CompletionInfoGetWidgetMethodInfo a signature where- overloadedMethod _ = completionInfoGetWidget---- method CompletionInfo::move_to_iter--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionInfo", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "view", argType = TInterface "Gtk" "TextView", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_info_move_to_iter" gtk_source_completion_info_move_to_iter :: - Ptr CompletionInfo -> -- _obj : TInterface "GtkSource" "CompletionInfo"- Ptr Gtk.TextView -> -- view : TInterface "Gtk" "TextView"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- IO ()---completionInfoMoveToIter ::- (MonadIO m, CompletionInfoK a, Gtk.TextViewK b) =>- a -- _obj- -> b -- view- -> Maybe (Gtk.TextIter) -- iter- -> m () -- result-completionInfoMoveToIter _obj view iter = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let view' = unsafeManagedPtrCastPtr view- maybeIter <- case iter of- Nothing -> return nullPtr- Just jIter -> do- let jIter' = unsafeManagedPtrGetPtr jIter- return jIter'- gtk_source_completion_info_move_to_iter _obj' view' maybeIter- touchManagedPtr _obj- touchManagedPtr view- whenJust iter touchManagedPtr- return ()--data CompletionInfoMoveToIterMethodInfo-instance (signature ~ (b -> Maybe (Gtk.TextIter) -> m ()), MonadIO m, CompletionInfoK a, Gtk.TextViewK b) => MethodInfo CompletionInfoMoveToIterMethodInfo a signature where- overloadedMethod _ = completionInfoMoveToIter---- method CompletionInfo::set_widget--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionInfo", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "widget", argType = TInterface "Gtk" "Widget", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_info_set_widget" gtk_source_completion_info_set_widget :: - Ptr CompletionInfo -> -- _obj : TInterface "GtkSource" "CompletionInfo"- Ptr Gtk.Widget -> -- widget : TInterface "Gtk" "Widget"- IO ()--{-# DEPRECATED completionInfoSetWidget ["(Since version 3.8)","Use gtk_container_add() instead. If there is already a child","widget, remove it with gtk_container_remove()."]#-}-completionInfoSetWidget ::- (MonadIO m, CompletionInfoK a, Gtk.WidgetK b) =>- a -- _obj- -> Maybe (b) -- widget- -> m () -- result-completionInfoSetWidget _obj widget = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeWidget <- case widget of- Nothing -> return nullPtr- Just jWidget -> do- let jWidget' = unsafeManagedPtrCastPtr jWidget- return jWidget'- gtk_source_completion_info_set_widget _obj' maybeWidget- touchManagedPtr _obj- whenJust widget touchManagedPtr- return ()--data CompletionInfoSetWidgetMethodInfo-instance (signature ~ (Maybe (b) -> m ()), MonadIO m, CompletionInfoK a, Gtk.WidgetK b) => MethodInfo CompletionInfoSetWidgetMethodInfo a signature where- overloadedMethod _ = completionInfoSetWidget--
− GI/GtkSource/Objects/CompletionInfo.hs-boot
@@ -1,17 +0,0 @@-module GI.GtkSource.Objects.CompletionInfo where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype CompletionInfo = CompletionInfo (ForeignPtr CompletionInfo)-instance GObject CompletionInfo where-class GObject o => CompletionInfoK o-instance (GObject o, IsDescendantOf CompletionInfo o) => CompletionInfoK o-data CompletionInfoBeforeShowSignalInfo-data CompletionInfoGetWidgetMethodInfo-data CompletionInfoMoveToIterMethodInfo-data CompletionInfoSetWidgetMethodInfo
− GI/GtkSource/Objects/CompletionItem.hs
@@ -1,544 +0,0 @@---{- |-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.GtkSource.Objects.CompletionItem- ( ---- * Exported types- CompletionItem(..) ,- CompletionItemK ,- toCompletionItem ,- noCompletionItem ,--- -- * Methods--- ** completionItemNew- completionItemNew ,----- ** completionItemNewFromStock- completionItemNewFromStock ,----- ** completionItemNewWithMarkup- completionItemNewWithMarkup ,----- -- * Properties--- ** Gicon- CompletionItemGiconPropertyInfo ,- clearCompletionItemGicon ,- completionItemGicon ,- constructCompletionItemGicon ,- getCompletionItemGicon ,- setCompletionItemGicon ,----- ** Icon- CompletionItemIconPropertyInfo ,- clearCompletionItemIcon ,- completionItemIcon ,- constructCompletionItemIcon ,- getCompletionItemIcon ,- setCompletionItemIcon ,----- ** IconName- CompletionItemIconNamePropertyInfo ,- clearCompletionItemIconName ,- completionItemIconName ,- constructCompletionItemIconName ,- getCompletionItemIconName ,- setCompletionItemIconName ,----- ** Info- CompletionItemInfoPropertyInfo ,- clearCompletionItemInfo ,- completionItemInfo ,- constructCompletionItemInfo ,- getCompletionItemInfo ,- setCompletionItemInfo ,----- ** Label- CompletionItemLabelPropertyInfo ,- clearCompletionItemLabel ,- completionItemLabel ,- constructCompletionItemLabel ,- getCompletionItemLabel ,- setCompletionItemLabel ,----- ** Markup- CompletionItemMarkupPropertyInfo ,- clearCompletionItemMarkup ,- completionItemMarkup ,- constructCompletionItemMarkup ,- getCompletionItemMarkup ,- setCompletionItemMarkup ,----- ** Text- CompletionItemTextPropertyInfo ,- clearCompletionItemText ,- completionItemText ,- constructCompletionItemText ,- getCompletionItemText ,- setCompletionItemText ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.GdkPixbuf as GdkPixbuf-import qualified GI.Gio as Gio--newtype CompletionItem = CompletionItem (ForeignPtr CompletionItem)-foreign import ccall "gtk_source_completion_item_get_type"- c_gtk_source_completion_item_get_type :: IO GType--type instance ParentTypes CompletionItem = CompletionItemParentTypes-type CompletionItemParentTypes = '[GObject.Object, CompletionProposal]--instance GObject CompletionItem where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_completion_item_get_type- --class GObject o => CompletionItemK o-instance (GObject o, IsDescendantOf CompletionItem o) => CompletionItemK o--toCompletionItem :: CompletionItemK o => o -> IO CompletionItem-toCompletionItem = unsafeCastTo CompletionItem--noCompletionItem :: Maybe CompletionItem-noCompletionItem = Nothing--type family ResolveCompletionItemMethod (t :: Symbol) (o :: *) :: * where- ResolveCompletionItemMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveCompletionItemMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveCompletionItemMethod "changed" o = CompletionProposalChangedMethodInfo- ResolveCompletionItemMethod "equal" o = CompletionProposalEqualMethodInfo- ResolveCompletionItemMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveCompletionItemMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveCompletionItemMethod "hash" o = CompletionProposalHashMethodInfo- ResolveCompletionItemMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveCompletionItemMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveCompletionItemMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveCompletionItemMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveCompletionItemMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveCompletionItemMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveCompletionItemMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveCompletionItemMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveCompletionItemMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveCompletionItemMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveCompletionItemMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveCompletionItemMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveCompletionItemMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveCompletionItemMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveCompletionItemMethod "getGicon" o = CompletionProposalGetGiconMethodInfo- ResolveCompletionItemMethod "getIcon" o = CompletionProposalGetIconMethodInfo- ResolveCompletionItemMethod "getIconName" o = CompletionProposalGetIconNameMethodInfo- ResolveCompletionItemMethod "getInfo" o = CompletionProposalGetInfoMethodInfo- ResolveCompletionItemMethod "getLabel" o = CompletionProposalGetLabelMethodInfo- ResolveCompletionItemMethod "getMarkup" o = CompletionProposalGetMarkupMethodInfo- ResolveCompletionItemMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveCompletionItemMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveCompletionItemMethod "getText" o = CompletionProposalGetTextMethodInfo- ResolveCompletionItemMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveCompletionItemMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveCompletionItemMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveCompletionItemMethod t CompletionItem, MethodInfo info CompletionItem p) => IsLabelProxy t (CompletionItem -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveCompletionItemMethod t CompletionItem, MethodInfo info CompletionItem p) => IsLabel t (CompletionItem -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "gicon"- -- Type: TInterface "Gio" "Icon"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Nothing)--getCompletionItemGicon :: (MonadIO m, CompletionItemK o) => o -> m (Maybe Gio.Icon)-getCompletionItemGicon obj = liftIO $ getObjectPropertyObject obj "gicon" Gio.Icon--setCompletionItemGicon :: (MonadIO m, CompletionItemK o, Gio.IconK a) => o -> a -> m ()-setCompletionItemGicon obj val = liftIO $ setObjectPropertyObject obj "gicon" (Just val)--constructCompletionItemGicon :: (Gio.IconK a) => a -> IO ([Char], GValue)-constructCompletionItemGicon val = constructObjectPropertyObject "gicon" (Just val)--clearCompletionItemGicon :: (MonadIO m, CompletionItemK o) => o -> m ()-clearCompletionItemGicon obj = liftIO $ setObjectPropertyObject obj "gicon" (Nothing :: Maybe Gio.Icon)--data CompletionItemGiconPropertyInfo-instance AttrInfo CompletionItemGiconPropertyInfo where- type AttrAllowedOps CompletionItemGiconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionItemGiconPropertyInfo = Gio.IconK- type AttrBaseTypeConstraint CompletionItemGiconPropertyInfo = CompletionItemK- type AttrGetType CompletionItemGiconPropertyInfo = (Maybe Gio.Icon)- type AttrLabel CompletionItemGiconPropertyInfo = "gicon"- attrGet _ = getCompletionItemGicon- attrSet _ = setCompletionItemGicon- attrConstruct _ = constructCompletionItemGicon- attrClear _ = clearCompletionItemGicon---- VVV Prop "icon"- -- Type: TInterface "GdkPixbuf" "Pixbuf"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Nothing)--getCompletionItemIcon :: (MonadIO m, CompletionItemK o) => o -> m (Maybe GdkPixbuf.Pixbuf)-getCompletionItemIcon obj = liftIO $ getObjectPropertyObject obj "icon" GdkPixbuf.Pixbuf--setCompletionItemIcon :: (MonadIO m, CompletionItemK o, GdkPixbuf.PixbufK a) => o -> a -> m ()-setCompletionItemIcon obj val = liftIO $ setObjectPropertyObject obj "icon" (Just val)--constructCompletionItemIcon :: (GdkPixbuf.PixbufK a) => a -> IO ([Char], GValue)-constructCompletionItemIcon val = constructObjectPropertyObject "icon" (Just val)--clearCompletionItemIcon :: (MonadIO m, CompletionItemK o) => o -> m ()-clearCompletionItemIcon obj = liftIO $ setObjectPropertyObject obj "icon" (Nothing :: Maybe GdkPixbuf.Pixbuf)--data CompletionItemIconPropertyInfo-instance AttrInfo CompletionItemIconPropertyInfo where- type AttrAllowedOps CompletionItemIconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionItemIconPropertyInfo = GdkPixbuf.PixbufK- type AttrBaseTypeConstraint CompletionItemIconPropertyInfo = CompletionItemK- type AttrGetType CompletionItemIconPropertyInfo = (Maybe GdkPixbuf.Pixbuf)- type AttrLabel CompletionItemIconPropertyInfo = "icon"- attrGet _ = getCompletionItemIcon- attrSet _ = setCompletionItemIcon- attrConstruct _ = constructCompletionItemIcon- attrClear _ = clearCompletionItemIcon---- VVV Prop "icon-name"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Nothing)--getCompletionItemIconName :: (MonadIO m, CompletionItemK o) => o -> m (Maybe T.Text)-getCompletionItemIconName obj = liftIO $ getObjectPropertyString obj "icon-name"--setCompletionItemIconName :: (MonadIO m, CompletionItemK o) => o -> T.Text -> m ()-setCompletionItemIconName obj val = liftIO $ setObjectPropertyString obj "icon-name" (Just val)--constructCompletionItemIconName :: T.Text -> IO ([Char], GValue)-constructCompletionItemIconName val = constructObjectPropertyString "icon-name" (Just val)--clearCompletionItemIconName :: (MonadIO m, CompletionItemK o) => o -> m ()-clearCompletionItemIconName obj = liftIO $ setObjectPropertyString obj "icon-name" (Nothing :: Maybe T.Text)--data CompletionItemIconNamePropertyInfo-instance AttrInfo CompletionItemIconNamePropertyInfo where- type AttrAllowedOps CompletionItemIconNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionItemIconNamePropertyInfo = (~) T.Text- type AttrBaseTypeConstraint CompletionItemIconNamePropertyInfo = CompletionItemK- type AttrGetType CompletionItemIconNamePropertyInfo = (Maybe T.Text)- type AttrLabel CompletionItemIconNamePropertyInfo = "icon-name"- attrGet _ = getCompletionItemIconName- attrSet _ = setCompletionItemIconName- attrConstruct _ = constructCompletionItemIconName- attrClear _ = clearCompletionItemIconName---- VVV Prop "info"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Nothing)--getCompletionItemInfo :: (MonadIO m, CompletionItemK o) => o -> m (Maybe T.Text)-getCompletionItemInfo obj = liftIO $ getObjectPropertyString obj "info"--setCompletionItemInfo :: (MonadIO m, CompletionItemK o) => o -> T.Text -> m ()-setCompletionItemInfo obj val = liftIO $ setObjectPropertyString obj "info" (Just val)--constructCompletionItemInfo :: T.Text -> IO ([Char], GValue)-constructCompletionItemInfo val = constructObjectPropertyString "info" (Just val)--clearCompletionItemInfo :: (MonadIO m, CompletionItemK o) => o -> m ()-clearCompletionItemInfo obj = liftIO $ setObjectPropertyString obj "info" (Nothing :: Maybe T.Text)--data CompletionItemInfoPropertyInfo-instance AttrInfo CompletionItemInfoPropertyInfo where- type AttrAllowedOps CompletionItemInfoPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionItemInfoPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint CompletionItemInfoPropertyInfo = CompletionItemK- type AttrGetType CompletionItemInfoPropertyInfo = (Maybe T.Text)- type AttrLabel CompletionItemInfoPropertyInfo = "info"- attrGet _ = getCompletionItemInfo- attrSet _ = setCompletionItemInfo- attrConstruct _ = constructCompletionItemInfo- attrClear _ = clearCompletionItemInfo---- VVV Prop "label"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Nothing)--getCompletionItemLabel :: (MonadIO m, CompletionItemK o) => o -> m (Maybe T.Text)-getCompletionItemLabel obj = liftIO $ getObjectPropertyString obj "label"--setCompletionItemLabel :: (MonadIO m, CompletionItemK o) => o -> T.Text -> m ()-setCompletionItemLabel obj val = liftIO $ setObjectPropertyString obj "label" (Just val)--constructCompletionItemLabel :: T.Text -> IO ([Char], GValue)-constructCompletionItemLabel val = constructObjectPropertyString "label" (Just val)--clearCompletionItemLabel :: (MonadIO m, CompletionItemK o) => o -> m ()-clearCompletionItemLabel obj = liftIO $ setObjectPropertyString obj "label" (Nothing :: Maybe T.Text)--data CompletionItemLabelPropertyInfo-instance AttrInfo CompletionItemLabelPropertyInfo where- type AttrAllowedOps CompletionItemLabelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionItemLabelPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint CompletionItemLabelPropertyInfo = CompletionItemK- type AttrGetType CompletionItemLabelPropertyInfo = (Maybe T.Text)- type AttrLabel CompletionItemLabelPropertyInfo = "label"- attrGet _ = getCompletionItemLabel- attrSet _ = setCompletionItemLabel- attrConstruct _ = constructCompletionItemLabel- attrClear _ = clearCompletionItemLabel---- VVV Prop "markup"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Nothing)--getCompletionItemMarkup :: (MonadIO m, CompletionItemK o) => o -> m (Maybe T.Text)-getCompletionItemMarkup obj = liftIO $ getObjectPropertyString obj "markup"--setCompletionItemMarkup :: (MonadIO m, CompletionItemK o) => o -> T.Text -> m ()-setCompletionItemMarkup obj val = liftIO $ setObjectPropertyString obj "markup" (Just val)--constructCompletionItemMarkup :: T.Text -> IO ([Char], GValue)-constructCompletionItemMarkup val = constructObjectPropertyString "markup" (Just val)--clearCompletionItemMarkup :: (MonadIO m, CompletionItemK o) => o -> m ()-clearCompletionItemMarkup obj = liftIO $ setObjectPropertyString obj "markup" (Nothing :: Maybe T.Text)--data CompletionItemMarkupPropertyInfo-instance AttrInfo CompletionItemMarkupPropertyInfo where- type AttrAllowedOps CompletionItemMarkupPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionItemMarkupPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint CompletionItemMarkupPropertyInfo = CompletionItemK- type AttrGetType CompletionItemMarkupPropertyInfo = (Maybe T.Text)- type AttrLabel CompletionItemMarkupPropertyInfo = "markup"- attrGet _ = getCompletionItemMarkup- attrSet _ = setCompletionItemMarkup- attrConstruct _ = constructCompletionItemMarkup- attrClear _ = clearCompletionItemMarkup---- VVV Prop "text"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Nothing)--getCompletionItemText :: (MonadIO m, CompletionItemK o) => o -> m (Maybe T.Text)-getCompletionItemText obj = liftIO $ getObjectPropertyString obj "text"--setCompletionItemText :: (MonadIO m, CompletionItemK o) => o -> T.Text -> m ()-setCompletionItemText obj val = liftIO $ setObjectPropertyString obj "text" (Just val)--constructCompletionItemText :: T.Text -> IO ([Char], GValue)-constructCompletionItemText val = constructObjectPropertyString "text" (Just val)--clearCompletionItemText :: (MonadIO m, CompletionItemK o) => o -> m ()-clearCompletionItemText obj = liftIO $ setObjectPropertyString obj "text" (Nothing :: Maybe T.Text)--data CompletionItemTextPropertyInfo-instance AttrInfo CompletionItemTextPropertyInfo where- type AttrAllowedOps CompletionItemTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionItemTextPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint CompletionItemTextPropertyInfo = CompletionItemK- type AttrGetType CompletionItemTextPropertyInfo = (Maybe T.Text)- type AttrLabel CompletionItemTextPropertyInfo = "text"- attrGet _ = getCompletionItemText- attrSet _ = setCompletionItemText- attrConstruct _ = constructCompletionItemText- attrClear _ = clearCompletionItemText--type instance AttributeList CompletionItem = CompletionItemAttributeList-type CompletionItemAttributeList = ('[ '("gicon", CompletionItemGiconPropertyInfo), '("icon", CompletionItemIconPropertyInfo), '("iconName", CompletionItemIconNamePropertyInfo), '("info", CompletionItemInfoPropertyInfo), '("label", CompletionItemLabelPropertyInfo), '("markup", CompletionItemMarkupPropertyInfo), '("text", CompletionItemTextPropertyInfo)] :: [(Symbol, *)])--completionItemGicon :: AttrLabelProxy "gicon"-completionItemGicon = AttrLabelProxy--completionItemIcon :: AttrLabelProxy "icon"-completionItemIcon = AttrLabelProxy--completionItemIconName :: AttrLabelProxy "iconName"-completionItemIconName = AttrLabelProxy--completionItemInfo :: AttrLabelProxy "info"-completionItemInfo = AttrLabelProxy--completionItemLabel :: AttrLabelProxy "label"-completionItemLabel = AttrLabelProxy--completionItemMarkup :: AttrLabelProxy "markup"-completionItemMarkup = AttrLabelProxy--completionItemText :: AttrLabelProxy "text"-completionItemText = AttrLabelProxy--type instance SignalList CompletionItem = CompletionItemSignalList-type CompletionItemSignalList = ('[ '("changed", CompletionProposalChangedSignalInfo), '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method CompletionItem::new--- method type : Constructor--- Args : [Arg {argCName = "label", 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},Arg {argCName = "icon", argType = TInterface "GdkPixbuf" "Pixbuf", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "info", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompletionItem")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_item_new" gtk_source_completion_item_new :: - CString -> -- label : TBasicType TUTF8- CString -> -- text : TBasicType TUTF8- Ptr GdkPixbuf.Pixbuf -> -- icon : TInterface "GdkPixbuf" "Pixbuf"- CString -> -- info : TBasicType TUTF8- IO (Ptr CompletionItem)---completionItemNew ::- (MonadIO m, GdkPixbuf.PixbufK a) =>- T.Text -- label- -> T.Text -- text- -> Maybe (a) -- icon- -> Maybe (T.Text) -- info- -> m CompletionItem -- result-completionItemNew label text icon info = liftIO $ do- label' <- textToCString label- text' <- textToCString text- maybeIcon <- case icon of- Nothing -> return nullPtr- Just jIcon -> do- let jIcon' = unsafeManagedPtrCastPtr jIcon- return jIcon'- maybeInfo <- case info of- Nothing -> return nullPtr- Just jInfo -> do- jInfo' <- textToCString jInfo- return jInfo'- result <- gtk_source_completion_item_new label' text' maybeIcon maybeInfo- checkUnexpectedReturnNULL "gtk_source_completion_item_new" result- result' <- (wrapObject CompletionItem) result- whenJust icon touchManagedPtr- freeMem label'- freeMem text'- freeMem maybeInfo- return result'---- method CompletionItem::new_from_stock--- method type : Constructor--- Args : [Arg {argCName = "label", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, 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 = "stock", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "info", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompletionItem")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_item_new_from_stock" gtk_source_completion_item_new_from_stock :: - CString -> -- label : TBasicType TUTF8- CString -> -- text : TBasicType TUTF8- CString -> -- stock : TBasicType TUTF8- CString -> -- info : TBasicType TUTF8- IO (Ptr CompletionItem)--{-# DEPRECATED completionItemNewFromStock ["(Since version 3.10)","Use gtk_source_completion_item_new() instead."]#-}-completionItemNewFromStock ::- (MonadIO m) =>- Maybe (T.Text) -- label- -> T.Text -- text- -> T.Text -- stock- -> Maybe (T.Text) -- info- -> m CompletionItem -- result-completionItemNewFromStock label text stock info = liftIO $ do- maybeLabel <- case label of- Nothing -> return nullPtr- Just jLabel -> do- jLabel' <- textToCString jLabel- return jLabel'- text' <- textToCString text- stock' <- textToCString stock- maybeInfo <- case info of- Nothing -> return nullPtr- Just jInfo -> do- jInfo' <- textToCString jInfo- return jInfo'- result <- gtk_source_completion_item_new_from_stock maybeLabel text' stock' maybeInfo- checkUnexpectedReturnNULL "gtk_source_completion_item_new_from_stock" result- result' <- (wrapObject CompletionItem) result- freeMem maybeLabel- freeMem text'- freeMem stock'- freeMem maybeInfo- return result'---- method CompletionItem::new_with_markup--- method type : Constructor--- Args : [Arg {argCName = "markup", 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},Arg {argCName = "icon", argType = TInterface "GdkPixbuf" "Pixbuf", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "info", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompletionItem")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_item_new_with_markup" gtk_source_completion_item_new_with_markup :: - CString -> -- markup : TBasicType TUTF8- CString -> -- text : TBasicType TUTF8- Ptr GdkPixbuf.Pixbuf -> -- icon : TInterface "GdkPixbuf" "Pixbuf"- CString -> -- info : TBasicType TUTF8- IO (Ptr CompletionItem)---completionItemNewWithMarkup ::- (MonadIO m, GdkPixbuf.PixbufK a) =>- T.Text -- markup- -> T.Text -- text- -> Maybe (a) -- icon- -> Maybe (T.Text) -- info- -> m CompletionItem -- result-completionItemNewWithMarkup markup text icon info = liftIO $ do- markup' <- textToCString markup- text' <- textToCString text- maybeIcon <- case icon of- Nothing -> return nullPtr- Just jIcon -> do- let jIcon' = unsafeManagedPtrCastPtr jIcon- return jIcon'- maybeInfo <- case info of- Nothing -> return nullPtr- Just jInfo -> do- jInfo' <- textToCString jInfo- return jInfo'- result <- gtk_source_completion_item_new_with_markup markup' text' maybeIcon maybeInfo- checkUnexpectedReturnNULL "gtk_source_completion_item_new_with_markup" result- result' <- (wrapObject CompletionItem) result- whenJust icon touchManagedPtr- freeMem markup'- freeMem text'- freeMem maybeInfo- return result'--
− GI/GtkSource/Objects/CompletionItem.hs-boot
@@ -1,20 +0,0 @@-module GI.GtkSource.Objects.CompletionItem where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype CompletionItem = CompletionItem (ForeignPtr CompletionItem)-instance GObject CompletionItem where-class GObject o => CompletionItemK o-instance (GObject o, IsDescendantOf CompletionItem o) => CompletionItemK o-data CompletionItemGiconPropertyInfo-data CompletionItemIconPropertyInfo-data CompletionItemIconNamePropertyInfo-data CompletionItemInfoPropertyInfo-data CompletionItemLabelPropertyInfo-data CompletionItemMarkupPropertyInfo-data CompletionItemTextPropertyInfo
− GI/GtkSource/Objects/CompletionWords.hs
@@ -1,532 +0,0 @@---{- |-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.GtkSource.Objects.CompletionWords- ( ---- * Exported types- CompletionWords(..) ,- CompletionWordsK ,- toCompletionWords ,- noCompletionWords ,--- -- * Methods--- ** completionWordsNew- completionWordsNew ,----- ** completionWordsRegister- CompletionWordsRegisterMethodInfo ,- completionWordsRegister ,----- ** completionWordsUnregister- CompletionWordsUnregisterMethodInfo ,- completionWordsUnregister ,----- -- * Properties--- ** Activation- CompletionWordsActivationPropertyInfo ,- completionWordsActivation ,- constructCompletionWordsActivation ,- getCompletionWordsActivation ,- setCompletionWordsActivation ,----- ** Icon- CompletionWordsIconPropertyInfo ,- clearCompletionWordsIcon ,- completionWordsIcon ,- constructCompletionWordsIcon ,- getCompletionWordsIcon ,- setCompletionWordsIcon ,----- ** InteractiveDelay- CompletionWordsInteractiveDelayPropertyInfo,- completionWordsInteractiveDelay ,- constructCompletionWordsInteractiveDelay,- getCompletionWordsInteractiveDelay ,- setCompletionWordsInteractiveDelay ,----- ** MinimumWordSize- CompletionWordsMinimumWordSizePropertyInfo,- completionWordsMinimumWordSize ,- constructCompletionWordsMinimumWordSize ,- getCompletionWordsMinimumWordSize ,- setCompletionWordsMinimumWordSize ,----- ** Name- CompletionWordsNamePropertyInfo ,- clearCompletionWordsName ,- completionWordsName ,- constructCompletionWordsName ,- getCompletionWordsName ,- setCompletionWordsName ,----- ** Priority- CompletionWordsPriorityPropertyInfo ,- completionWordsPriority ,- constructCompletionWordsPriority ,- getCompletionWordsPriority ,- setCompletionWordsPriority ,----- ** ProposalsBatchSize- CompletionWordsProposalsBatchSizePropertyInfo,- completionWordsProposalsBatchSize ,- constructCompletionWordsProposalsBatchSize,- getCompletionWordsProposalsBatchSize ,- setCompletionWordsProposalsBatchSize ,----- ** ScanBatchSize- CompletionWordsScanBatchSizePropertyInfo,- completionWordsScanBatchSize ,- constructCompletionWordsScanBatchSize ,- getCompletionWordsScanBatchSize ,- setCompletionWordsScanBatchSize ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.GdkPixbuf as GdkPixbuf-import qualified GI.Gtk as Gtk--newtype CompletionWords = CompletionWords (ForeignPtr CompletionWords)-foreign import ccall "gtk_source_completion_words_get_type"- c_gtk_source_completion_words_get_type :: IO GType--type instance ParentTypes CompletionWords = CompletionWordsParentTypes-type CompletionWordsParentTypes = '[GObject.Object, CompletionProvider]--instance GObject CompletionWords where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_completion_words_get_type- --class GObject o => CompletionWordsK o-instance (GObject o, IsDescendantOf CompletionWords o) => CompletionWordsK o--toCompletionWords :: CompletionWordsK o => o -> IO CompletionWords-toCompletionWords = unsafeCastTo CompletionWords--noCompletionWords :: Maybe CompletionWords-noCompletionWords = Nothing--type family ResolveCompletionWordsMethod (t :: Symbol) (o :: *) :: * where- ResolveCompletionWordsMethod "activateProposal" o = CompletionProviderActivateProposalMethodInfo- ResolveCompletionWordsMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveCompletionWordsMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveCompletionWordsMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveCompletionWordsMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveCompletionWordsMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveCompletionWordsMethod "match" o = CompletionProviderMatchMethodInfo- ResolveCompletionWordsMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveCompletionWordsMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveCompletionWordsMethod "populate" o = CompletionProviderPopulateMethodInfo- ResolveCompletionWordsMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveCompletionWordsMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveCompletionWordsMethod "register" o = CompletionWordsRegisterMethodInfo- ResolveCompletionWordsMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveCompletionWordsMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveCompletionWordsMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveCompletionWordsMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveCompletionWordsMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveCompletionWordsMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveCompletionWordsMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveCompletionWordsMethod "unregister" o = CompletionWordsUnregisterMethodInfo- ResolveCompletionWordsMethod "updateInfo" o = CompletionProviderUpdateInfoMethodInfo- ResolveCompletionWordsMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveCompletionWordsMethod "getActivation" o = CompletionProviderGetActivationMethodInfo- ResolveCompletionWordsMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveCompletionWordsMethod "getGicon" o = CompletionProviderGetGiconMethodInfo- ResolveCompletionWordsMethod "getIcon" o = CompletionProviderGetIconMethodInfo- ResolveCompletionWordsMethod "getIconName" o = CompletionProviderGetIconNameMethodInfo- ResolveCompletionWordsMethod "getInfoWidget" o = CompletionProviderGetInfoWidgetMethodInfo- ResolveCompletionWordsMethod "getInteractiveDelay" o = CompletionProviderGetInteractiveDelayMethodInfo- ResolveCompletionWordsMethod "getName" o = CompletionProviderGetNameMethodInfo- ResolveCompletionWordsMethod "getPriority" o = CompletionProviderGetPriorityMethodInfo- ResolveCompletionWordsMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveCompletionWordsMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveCompletionWordsMethod "getStartIter" o = CompletionProviderGetStartIterMethodInfo- ResolveCompletionWordsMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveCompletionWordsMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveCompletionWordsMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveCompletionWordsMethod t CompletionWords, MethodInfo info CompletionWords p) => IsLabelProxy t (CompletionWords -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveCompletionWordsMethod t CompletionWords, MethodInfo info CompletionWords p) => IsLabel t (CompletionWords -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "activation"- -- Type: TInterface "GtkSource" "CompletionActivation"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionWordsActivation :: (MonadIO m, CompletionWordsK o) => o -> m [CompletionActivation]-getCompletionWordsActivation obj = liftIO $ getObjectPropertyFlags obj "activation"--setCompletionWordsActivation :: (MonadIO m, CompletionWordsK o) => o -> [CompletionActivation] -> m ()-setCompletionWordsActivation obj val = liftIO $ setObjectPropertyFlags obj "activation" val--constructCompletionWordsActivation :: [CompletionActivation] -> IO ([Char], GValue)-constructCompletionWordsActivation val = constructObjectPropertyFlags "activation" val--data CompletionWordsActivationPropertyInfo-instance AttrInfo CompletionWordsActivationPropertyInfo where- type AttrAllowedOps CompletionWordsActivationPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionWordsActivationPropertyInfo = (~) [CompletionActivation]- type AttrBaseTypeConstraint CompletionWordsActivationPropertyInfo = CompletionWordsK- type AttrGetType CompletionWordsActivationPropertyInfo = [CompletionActivation]- type AttrLabel CompletionWordsActivationPropertyInfo = "activation"- attrGet _ = getCompletionWordsActivation- attrSet _ = setCompletionWordsActivation- attrConstruct _ = constructCompletionWordsActivation- attrClear _ = undefined---- VVV Prop "icon"- -- Type: TInterface "GdkPixbuf" "Pixbuf"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionWordsIcon :: (MonadIO m, CompletionWordsK o) => o -> m (Maybe GdkPixbuf.Pixbuf)-getCompletionWordsIcon obj = liftIO $ getObjectPropertyObject obj "icon" GdkPixbuf.Pixbuf--setCompletionWordsIcon :: (MonadIO m, CompletionWordsK o, GdkPixbuf.PixbufK a) => o -> a -> m ()-setCompletionWordsIcon obj val = liftIO $ setObjectPropertyObject obj "icon" (Just val)--constructCompletionWordsIcon :: (GdkPixbuf.PixbufK a) => a -> IO ([Char], GValue)-constructCompletionWordsIcon val = constructObjectPropertyObject "icon" (Just val)--clearCompletionWordsIcon :: (MonadIO m, CompletionWordsK o) => o -> m ()-clearCompletionWordsIcon obj = liftIO $ setObjectPropertyObject obj "icon" (Nothing :: Maybe GdkPixbuf.Pixbuf)--data CompletionWordsIconPropertyInfo-instance AttrInfo CompletionWordsIconPropertyInfo where- type AttrAllowedOps CompletionWordsIconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionWordsIconPropertyInfo = GdkPixbuf.PixbufK- type AttrBaseTypeConstraint CompletionWordsIconPropertyInfo = CompletionWordsK- type AttrGetType CompletionWordsIconPropertyInfo = (Maybe GdkPixbuf.Pixbuf)- type AttrLabel CompletionWordsIconPropertyInfo = "icon"- attrGet _ = getCompletionWordsIcon- attrSet _ = setCompletionWordsIcon- attrConstruct _ = constructCompletionWordsIcon- attrClear _ = clearCompletionWordsIcon---- VVV Prop "interactive-delay"- -- Type: TBasicType TInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionWordsInteractiveDelay :: (MonadIO m, CompletionWordsK o) => o -> m Int32-getCompletionWordsInteractiveDelay obj = liftIO $ getObjectPropertyInt32 obj "interactive-delay"--setCompletionWordsInteractiveDelay :: (MonadIO m, CompletionWordsK o) => o -> Int32 -> m ()-setCompletionWordsInteractiveDelay obj val = liftIO $ setObjectPropertyInt32 obj "interactive-delay" val--constructCompletionWordsInteractiveDelay :: Int32 -> IO ([Char], GValue)-constructCompletionWordsInteractiveDelay val = constructObjectPropertyInt32 "interactive-delay" val--data CompletionWordsInteractiveDelayPropertyInfo-instance AttrInfo CompletionWordsInteractiveDelayPropertyInfo where- type AttrAllowedOps CompletionWordsInteractiveDelayPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionWordsInteractiveDelayPropertyInfo = (~) Int32- type AttrBaseTypeConstraint CompletionWordsInteractiveDelayPropertyInfo = CompletionWordsK- type AttrGetType CompletionWordsInteractiveDelayPropertyInfo = Int32- type AttrLabel CompletionWordsInteractiveDelayPropertyInfo = "interactive-delay"- attrGet _ = getCompletionWordsInteractiveDelay- attrSet _ = setCompletionWordsInteractiveDelay- attrConstruct _ = constructCompletionWordsInteractiveDelay- attrClear _ = undefined---- VVV Prop "minimum-word-size"- -- Type: TBasicType TUInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionWordsMinimumWordSize :: (MonadIO m, CompletionWordsK o) => o -> m Word32-getCompletionWordsMinimumWordSize obj = liftIO $ getObjectPropertyUInt32 obj "minimum-word-size"--setCompletionWordsMinimumWordSize :: (MonadIO m, CompletionWordsK o) => o -> Word32 -> m ()-setCompletionWordsMinimumWordSize obj val = liftIO $ setObjectPropertyUInt32 obj "minimum-word-size" val--constructCompletionWordsMinimumWordSize :: Word32 -> IO ([Char], GValue)-constructCompletionWordsMinimumWordSize val = constructObjectPropertyUInt32 "minimum-word-size" val--data CompletionWordsMinimumWordSizePropertyInfo-instance AttrInfo CompletionWordsMinimumWordSizePropertyInfo where- type AttrAllowedOps CompletionWordsMinimumWordSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionWordsMinimumWordSizePropertyInfo = (~) Word32- type AttrBaseTypeConstraint CompletionWordsMinimumWordSizePropertyInfo = CompletionWordsK- type AttrGetType CompletionWordsMinimumWordSizePropertyInfo = Word32- type AttrLabel CompletionWordsMinimumWordSizePropertyInfo = "minimum-word-size"- attrGet _ = getCompletionWordsMinimumWordSize- attrSet _ = setCompletionWordsMinimumWordSize- attrConstruct _ = constructCompletionWordsMinimumWordSize- attrClear _ = undefined---- VVV Prop "name"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionWordsName :: (MonadIO m, CompletionWordsK o) => o -> m (Maybe T.Text)-getCompletionWordsName obj = liftIO $ getObjectPropertyString obj "name"--setCompletionWordsName :: (MonadIO m, CompletionWordsK o) => o -> T.Text -> m ()-setCompletionWordsName obj val = liftIO $ setObjectPropertyString obj "name" (Just val)--constructCompletionWordsName :: T.Text -> IO ([Char], GValue)-constructCompletionWordsName val = constructObjectPropertyString "name" (Just val)--clearCompletionWordsName :: (MonadIO m, CompletionWordsK o) => o -> m ()-clearCompletionWordsName obj = liftIO $ setObjectPropertyString obj "name" (Nothing :: Maybe T.Text)--data CompletionWordsNamePropertyInfo-instance AttrInfo CompletionWordsNamePropertyInfo where- type AttrAllowedOps CompletionWordsNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint CompletionWordsNamePropertyInfo = (~) T.Text- type AttrBaseTypeConstraint CompletionWordsNamePropertyInfo = CompletionWordsK- type AttrGetType CompletionWordsNamePropertyInfo = (Maybe T.Text)- type AttrLabel CompletionWordsNamePropertyInfo = "name"- attrGet _ = getCompletionWordsName- attrSet _ = setCompletionWordsName- attrConstruct _ = constructCompletionWordsName- attrClear _ = clearCompletionWordsName---- VVV Prop "priority"- -- Type: TBasicType TInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionWordsPriority :: (MonadIO m, CompletionWordsK o) => o -> m Int32-getCompletionWordsPriority obj = liftIO $ getObjectPropertyInt32 obj "priority"--setCompletionWordsPriority :: (MonadIO m, CompletionWordsK o) => o -> Int32 -> m ()-setCompletionWordsPriority obj val = liftIO $ setObjectPropertyInt32 obj "priority" val--constructCompletionWordsPriority :: Int32 -> IO ([Char], GValue)-constructCompletionWordsPriority val = constructObjectPropertyInt32 "priority" val--data CompletionWordsPriorityPropertyInfo-instance AttrInfo CompletionWordsPriorityPropertyInfo where- type AttrAllowedOps CompletionWordsPriorityPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionWordsPriorityPropertyInfo = (~) Int32- type AttrBaseTypeConstraint CompletionWordsPriorityPropertyInfo = CompletionWordsK- type AttrGetType CompletionWordsPriorityPropertyInfo = Int32- type AttrLabel CompletionWordsPriorityPropertyInfo = "priority"- attrGet _ = getCompletionWordsPriority- attrSet _ = setCompletionWordsPriority- attrConstruct _ = constructCompletionWordsPriority- attrClear _ = undefined---- VVV Prop "proposals-batch-size"- -- Type: TBasicType TUInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionWordsProposalsBatchSize :: (MonadIO m, CompletionWordsK o) => o -> m Word32-getCompletionWordsProposalsBatchSize obj = liftIO $ getObjectPropertyUInt32 obj "proposals-batch-size"--setCompletionWordsProposalsBatchSize :: (MonadIO m, CompletionWordsK o) => o -> Word32 -> m ()-setCompletionWordsProposalsBatchSize obj val = liftIO $ setObjectPropertyUInt32 obj "proposals-batch-size" val--constructCompletionWordsProposalsBatchSize :: Word32 -> IO ([Char], GValue)-constructCompletionWordsProposalsBatchSize val = constructObjectPropertyUInt32 "proposals-batch-size" val--data CompletionWordsProposalsBatchSizePropertyInfo-instance AttrInfo CompletionWordsProposalsBatchSizePropertyInfo where- type AttrAllowedOps CompletionWordsProposalsBatchSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionWordsProposalsBatchSizePropertyInfo = (~) Word32- type AttrBaseTypeConstraint CompletionWordsProposalsBatchSizePropertyInfo = CompletionWordsK- type AttrGetType CompletionWordsProposalsBatchSizePropertyInfo = Word32- type AttrLabel CompletionWordsProposalsBatchSizePropertyInfo = "proposals-batch-size"- attrGet _ = getCompletionWordsProposalsBatchSize- attrSet _ = setCompletionWordsProposalsBatchSize- attrConstruct _ = constructCompletionWordsProposalsBatchSize- attrClear _ = undefined---- VVV Prop "scan-batch-size"- -- Type: TBasicType TUInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getCompletionWordsScanBatchSize :: (MonadIO m, CompletionWordsK o) => o -> m Word32-getCompletionWordsScanBatchSize obj = liftIO $ getObjectPropertyUInt32 obj "scan-batch-size"--setCompletionWordsScanBatchSize :: (MonadIO m, CompletionWordsK o) => o -> Word32 -> m ()-setCompletionWordsScanBatchSize obj val = liftIO $ setObjectPropertyUInt32 obj "scan-batch-size" val--constructCompletionWordsScanBatchSize :: Word32 -> IO ([Char], GValue)-constructCompletionWordsScanBatchSize val = constructObjectPropertyUInt32 "scan-batch-size" val--data CompletionWordsScanBatchSizePropertyInfo-instance AttrInfo CompletionWordsScanBatchSizePropertyInfo where- type AttrAllowedOps CompletionWordsScanBatchSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint CompletionWordsScanBatchSizePropertyInfo = (~) Word32- type AttrBaseTypeConstraint CompletionWordsScanBatchSizePropertyInfo = CompletionWordsK- type AttrGetType CompletionWordsScanBatchSizePropertyInfo = Word32- type AttrLabel CompletionWordsScanBatchSizePropertyInfo = "scan-batch-size"- attrGet _ = getCompletionWordsScanBatchSize- attrSet _ = setCompletionWordsScanBatchSize- attrConstruct _ = constructCompletionWordsScanBatchSize- attrClear _ = undefined--type instance AttributeList CompletionWords = CompletionWordsAttributeList-type CompletionWordsAttributeList = ('[ '("activation", CompletionWordsActivationPropertyInfo), '("icon", CompletionWordsIconPropertyInfo), '("interactiveDelay", CompletionWordsInteractiveDelayPropertyInfo), '("minimumWordSize", CompletionWordsMinimumWordSizePropertyInfo), '("name", CompletionWordsNamePropertyInfo), '("priority", CompletionWordsPriorityPropertyInfo), '("proposalsBatchSize", CompletionWordsProposalsBatchSizePropertyInfo), '("scanBatchSize", CompletionWordsScanBatchSizePropertyInfo)] :: [(Symbol, *)])--completionWordsActivation :: AttrLabelProxy "activation"-completionWordsActivation = AttrLabelProxy--completionWordsIcon :: AttrLabelProxy "icon"-completionWordsIcon = AttrLabelProxy--completionWordsInteractiveDelay :: AttrLabelProxy "interactiveDelay"-completionWordsInteractiveDelay = AttrLabelProxy--completionWordsMinimumWordSize :: AttrLabelProxy "minimumWordSize"-completionWordsMinimumWordSize = AttrLabelProxy--completionWordsName :: AttrLabelProxy "name"-completionWordsName = AttrLabelProxy--completionWordsPriority :: AttrLabelProxy "priority"-completionWordsPriority = AttrLabelProxy--completionWordsProposalsBatchSize :: AttrLabelProxy "proposalsBatchSize"-completionWordsProposalsBatchSize = AttrLabelProxy--completionWordsScanBatchSize :: AttrLabelProxy "scanBatchSize"-completionWordsScanBatchSize = AttrLabelProxy--type instance SignalList CompletionWords = CompletionWordsSignalList-type CompletionWordsSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method CompletionWords::new--- method type : Constructor--- Args : [Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon", argType = TInterface "GdkPixbuf" "Pixbuf", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompletionWords")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_words_new" gtk_source_completion_words_new :: - CString -> -- name : TBasicType TUTF8- Ptr GdkPixbuf.Pixbuf -> -- icon : TInterface "GdkPixbuf" "Pixbuf"- IO (Ptr CompletionWords)---completionWordsNew ::- (MonadIO m, GdkPixbuf.PixbufK a) =>- Maybe (T.Text) -- name- -> Maybe (a) -- icon- -> m CompletionWords -- result-completionWordsNew name icon = liftIO $ do- maybeName <- case name of- Nothing -> return nullPtr- Just jName -> do- jName' <- textToCString jName- return jName'- maybeIcon <- case icon of- Nothing -> return nullPtr- Just jIcon -> do- let jIcon' = unsafeManagedPtrCastPtr jIcon- return jIcon'- result <- gtk_source_completion_words_new maybeName maybeIcon- checkUnexpectedReturnNULL "gtk_source_completion_words_new" result- result' <- (wrapObject CompletionWords) result- whenJust icon touchManagedPtr- freeMem maybeName- return result'---- method CompletionWords::register--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionWords", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "buffer", argType = TInterface "Gtk" "TextBuffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_words_register" gtk_source_completion_words_register :: - Ptr CompletionWords -> -- _obj : TInterface "GtkSource" "CompletionWords"- Ptr Gtk.TextBuffer -> -- buffer : TInterface "Gtk" "TextBuffer"- IO ()---completionWordsRegister ::- (MonadIO m, CompletionWordsK a, Gtk.TextBufferK b) =>- a -- _obj- -> b -- buffer- -> m () -- result-completionWordsRegister _obj buffer = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let buffer' = unsafeManagedPtrCastPtr buffer- gtk_source_completion_words_register _obj' buffer'- touchManagedPtr _obj- touchManagedPtr buffer- return ()--data CompletionWordsRegisterMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, CompletionWordsK a, Gtk.TextBufferK b) => MethodInfo CompletionWordsRegisterMethodInfo a signature where- overloadedMethod _ = completionWordsRegister---- method CompletionWords::unregister--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "CompletionWords", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "buffer", argType = TInterface "Gtk" "TextBuffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_completion_words_unregister" gtk_source_completion_words_unregister :: - Ptr CompletionWords -> -- _obj : TInterface "GtkSource" "CompletionWords"- Ptr Gtk.TextBuffer -> -- buffer : TInterface "Gtk" "TextBuffer"- IO ()---completionWordsUnregister ::- (MonadIO m, CompletionWordsK a, Gtk.TextBufferK b) =>- a -- _obj- -> b -- buffer- -> m () -- result-completionWordsUnregister _obj buffer = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let buffer' = unsafeManagedPtrCastPtr buffer- gtk_source_completion_words_unregister _obj' buffer'- touchManagedPtr _obj- touchManagedPtr buffer- return ()--data CompletionWordsUnregisterMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, CompletionWordsK a, Gtk.TextBufferK b) => MethodInfo CompletionWordsUnregisterMethodInfo a signature where- overloadedMethod _ = completionWordsUnregister--
− GI/GtkSource/Objects/CompletionWords.hs-boot
@@ -1,23 +0,0 @@-module GI.GtkSource.Objects.CompletionWords where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype CompletionWords = CompletionWords (ForeignPtr CompletionWords)-instance GObject CompletionWords where-class GObject o => CompletionWordsK o-instance (GObject o, IsDescendantOf CompletionWords o) => CompletionWordsK o-data CompletionWordsActivationPropertyInfo-data CompletionWordsIconPropertyInfo-data CompletionWordsInteractiveDelayPropertyInfo-data CompletionWordsMinimumWordSizePropertyInfo-data CompletionWordsNamePropertyInfo-data CompletionWordsPriorityPropertyInfo-data CompletionWordsProposalsBatchSizePropertyInfo-data CompletionWordsScanBatchSizePropertyInfo-data CompletionWordsRegisterMethodInfo-data CompletionWordsUnregisterMethodInfo
− GI/GtkSource/Objects/File.hs
@@ -1,629 +0,0 @@---{- |-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.GtkSource.Objects.File- ( ---- * Exported types- File(..) ,- FileK ,- toFile ,- noFile ,--- -- * Methods--- ** fileCheckFileOnDisk- FileCheckFileOnDiskMethodInfo ,- fileCheckFileOnDisk ,----- ** fileGetCompressionType- FileGetCompressionTypeMethodInfo ,- fileGetCompressionType ,----- ** fileGetEncoding- FileGetEncodingMethodInfo ,- fileGetEncoding ,----- ** fileGetLocation- FileGetLocationMethodInfo ,- fileGetLocation ,----- ** fileGetNewlineType- FileGetNewlineTypeMethodInfo ,- fileGetNewlineType ,----- ** fileIsDeleted- FileIsDeletedMethodInfo ,- fileIsDeleted ,----- ** fileIsExternallyModified- FileIsExternallyModifiedMethodInfo ,- fileIsExternallyModified ,----- ** fileIsLocal- FileIsLocalMethodInfo ,- fileIsLocal ,----- ** fileIsReadonly- FileIsReadonlyMethodInfo ,- fileIsReadonly ,----- ** fileNew- fileNew ,----- ** fileSetLocation- FileSetLocationMethodInfo ,- fileSetLocation ,----- -- * Properties--- ** CompressionType- FileCompressionTypePropertyInfo ,- fileCompressionType ,- getFileCompressionType ,----- ** Encoding- FileEncodingPropertyInfo ,- fileEncoding ,- getFileEncoding ,----- ** Location- FileLocationPropertyInfo ,- clearFileLocation ,- constructFileLocation ,- fileLocation ,- getFileLocation ,- setFileLocation ,----- ** NewlineType- FileNewlineTypePropertyInfo ,- fileNewlineType ,- getFileNewlineType ,----- ** ReadOnly- FileReadOnlyPropertyInfo ,- fileReadOnly ,- getFileReadOnly ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.Gio as Gio--newtype File = File (ForeignPtr File)-foreign import ccall "gtk_source_file_get_type"- c_gtk_source_file_get_type :: IO GType--type instance ParentTypes File = FileParentTypes-type FileParentTypes = '[GObject.Object]--instance GObject File where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_file_get_type- --class GObject o => FileK o-instance (GObject o, IsDescendantOf File o) => FileK o--toFile :: FileK o => o -> IO File-toFile = unsafeCastTo File--noFile :: Maybe File-noFile = Nothing--type family ResolveFileMethod (t :: Symbol) (o :: *) :: * where- ResolveFileMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveFileMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveFileMethod "checkFileOnDisk" o = FileCheckFileOnDiskMethodInfo- ResolveFileMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveFileMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveFileMethod "isDeleted" o = FileIsDeletedMethodInfo- ResolveFileMethod "isExternallyModified" o = FileIsExternallyModifiedMethodInfo- ResolveFileMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveFileMethod "isLocal" o = FileIsLocalMethodInfo- ResolveFileMethod "isReadonly" o = FileIsReadonlyMethodInfo- ResolveFileMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveFileMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveFileMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveFileMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveFileMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveFileMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveFileMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveFileMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveFileMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveFileMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveFileMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveFileMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveFileMethod "getCompressionType" o = FileGetCompressionTypeMethodInfo- ResolveFileMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveFileMethod "getEncoding" o = FileGetEncodingMethodInfo- ResolveFileMethod "getLocation" o = FileGetLocationMethodInfo- ResolveFileMethod "getNewlineType" o = FileGetNewlineTypeMethodInfo- ResolveFileMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveFileMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveFileMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveFileMethod "setLocation" o = FileSetLocationMethodInfo- ResolveFileMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveFileMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveFileMethod t File, MethodInfo info File p) => IsLabelProxy t (File -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveFileMethod t File, MethodInfo info File p) => IsLabel t (File -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "compression-type"- -- Type: TInterface "GtkSource" "CompressionType"- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getFileCompressionType :: (MonadIO m, FileK o) => o -> m CompressionType-getFileCompressionType obj = liftIO $ getObjectPropertyEnum obj "compression-type"--data FileCompressionTypePropertyInfo-instance AttrInfo FileCompressionTypePropertyInfo where- type AttrAllowedOps FileCompressionTypePropertyInfo = '[ 'AttrGet]- type AttrSetTypeConstraint FileCompressionTypePropertyInfo = (~) ()- type AttrBaseTypeConstraint FileCompressionTypePropertyInfo = FileK- type AttrGetType FileCompressionTypePropertyInfo = CompressionType- type AttrLabel FileCompressionTypePropertyInfo = "compression-type"- attrGet _ = getFileCompressionType- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "encoding"- -- Type: TInterface "GtkSource" "Encoding"- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getFileEncoding :: (MonadIO m, FileK o) => o -> m Encoding-getFileEncoding obj = liftIO $ checkUnexpectedNothing "getFileEncoding" $ getObjectPropertyBoxed obj "encoding" Encoding--data FileEncodingPropertyInfo-instance AttrInfo FileEncodingPropertyInfo where- type AttrAllowedOps FileEncodingPropertyInfo = '[ 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint FileEncodingPropertyInfo = (~) ()- type AttrBaseTypeConstraint FileEncodingPropertyInfo = FileK- type AttrGetType FileEncodingPropertyInfo = Encoding- type AttrLabel FileEncodingPropertyInfo = "encoding"- attrGet _ = getFileEncoding- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "location"- -- Type: TInterface "Gio" "File"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just True)--getFileLocation :: (MonadIO m, FileK o) => o -> m Gio.File-getFileLocation obj = liftIO $ checkUnexpectedNothing "getFileLocation" $ getObjectPropertyObject obj "location" Gio.File--setFileLocation :: (MonadIO m, FileK o, Gio.FileK a) => o -> a -> m ()-setFileLocation obj val = liftIO $ setObjectPropertyObject obj "location" (Just val)--constructFileLocation :: (Gio.FileK a) => a -> IO ([Char], GValue)-constructFileLocation val = constructObjectPropertyObject "location" (Just val)--clearFileLocation :: (MonadIO m, FileK o) => o -> m ()-clearFileLocation obj = liftIO $ setObjectPropertyObject obj "location" (Nothing :: Maybe Gio.File)--data FileLocationPropertyInfo-instance AttrInfo FileLocationPropertyInfo where- type AttrAllowedOps FileLocationPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint FileLocationPropertyInfo = Gio.FileK- type AttrBaseTypeConstraint FileLocationPropertyInfo = FileK- type AttrGetType FileLocationPropertyInfo = Gio.File- type AttrLabel FileLocationPropertyInfo = "location"- attrGet _ = getFileLocation- attrSet _ = setFileLocation- attrConstruct _ = constructFileLocation- attrClear _ = clearFileLocation---- VVV Prop "newline-type"- -- Type: TInterface "GtkSource" "NewlineType"- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getFileNewlineType :: (MonadIO m, FileK o) => o -> m NewlineType-getFileNewlineType obj = liftIO $ getObjectPropertyEnum obj "newline-type"--data FileNewlineTypePropertyInfo-instance AttrInfo FileNewlineTypePropertyInfo where- type AttrAllowedOps FileNewlineTypePropertyInfo = '[ 'AttrGet]- type AttrSetTypeConstraint FileNewlineTypePropertyInfo = (~) ()- type AttrBaseTypeConstraint FileNewlineTypePropertyInfo = FileK- type AttrGetType FileNewlineTypePropertyInfo = NewlineType- type AttrLabel FileNewlineTypePropertyInfo = "newline-type"- attrGet _ = getFileNewlineType- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "read-only"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable]- -- Nullable: (Nothing,Nothing)--getFileReadOnly :: (MonadIO m, FileK o) => o -> m Bool-getFileReadOnly obj = liftIO $ getObjectPropertyBool obj "read-only"--data FileReadOnlyPropertyInfo-instance AttrInfo FileReadOnlyPropertyInfo where- type AttrAllowedOps FileReadOnlyPropertyInfo = '[ 'AttrGet]- type AttrSetTypeConstraint FileReadOnlyPropertyInfo = (~) ()- type AttrBaseTypeConstraint FileReadOnlyPropertyInfo = FileK- type AttrGetType FileReadOnlyPropertyInfo = Bool- type AttrLabel FileReadOnlyPropertyInfo = "read-only"- attrGet _ = getFileReadOnly- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined--type instance AttributeList File = FileAttributeList-type FileAttributeList = ('[ '("compressionType", FileCompressionTypePropertyInfo), '("encoding", FileEncodingPropertyInfo), '("location", FileLocationPropertyInfo), '("newlineType", FileNewlineTypePropertyInfo), '("readOnly", FileReadOnlyPropertyInfo)] :: [(Symbol, *)])--fileCompressionType :: AttrLabelProxy "compressionType"-fileCompressionType = AttrLabelProxy--fileEncoding :: AttrLabelProxy "encoding"-fileEncoding = AttrLabelProxy--fileLocation :: AttrLabelProxy "location"-fileLocation = AttrLabelProxy--fileNewlineType :: AttrLabelProxy "newlineType"-fileNewlineType = AttrLabelProxy--fileReadOnly :: AttrLabelProxy "readOnly"-fileReadOnly = AttrLabelProxy--type instance SignalList File = FileSignalList-type FileSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method File::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "File")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_new" gtk_source_file_new :: - IO (Ptr File)---fileNew ::- (MonadIO m) =>- m File -- result-fileNew = liftIO $ do- result <- gtk_source_file_new- checkUnexpectedReturnNULL "gtk_source_file_new" result- result' <- (wrapObject File) result- return result'---- method File::check_file_on_disk--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_check_file_on_disk" gtk_source_file_check_file_on_disk :: - Ptr File -> -- _obj : TInterface "GtkSource" "File"- IO ()---fileCheckFileOnDisk ::- (MonadIO m, FileK a) =>- a -- _obj- -> m () -- result-fileCheckFileOnDisk _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_file_check_file_on_disk _obj'- touchManagedPtr _obj- return ()--data FileCheckFileOnDiskMethodInfo-instance (signature ~ (m ()), MonadIO m, FileK a) => MethodInfo FileCheckFileOnDiskMethodInfo a signature where- overloadedMethod _ = fileCheckFileOnDisk---- method File::get_compression_type--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompressionType")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_get_compression_type" gtk_source_file_get_compression_type :: - Ptr File -> -- _obj : TInterface "GtkSource" "File"- IO CUInt---fileGetCompressionType ::- (MonadIO m, FileK a) =>- a -- _obj- -> m CompressionType -- result-fileGetCompressionType _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_get_compression_type _obj'- let result' = (toEnum . fromIntegral) result- touchManagedPtr _obj- return result'--data FileGetCompressionTypeMethodInfo-instance (signature ~ (m CompressionType), MonadIO m, FileK a) => MethodInfo FileGetCompressionTypeMethodInfo a signature where- overloadedMethod _ = fileGetCompressionType---- method File::get_encoding--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Encoding")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_get_encoding" gtk_source_file_get_encoding :: - Ptr File -> -- _obj : TInterface "GtkSource" "File"- IO (Ptr Encoding)---fileGetEncoding ::- (MonadIO m, FileK a) =>- a -- _obj- -> m Encoding -- result-fileGetEncoding _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_get_encoding _obj'- checkUnexpectedReturnNULL "gtk_source_file_get_encoding" result- result' <- (newBoxed Encoding) result- touchManagedPtr _obj- return result'--data FileGetEncodingMethodInfo-instance (signature ~ (m Encoding), MonadIO m, FileK a) => MethodInfo FileGetEncodingMethodInfo a signature where- overloadedMethod _ = fileGetEncoding---- method File::get_location--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gio" "File")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_get_location" gtk_source_file_get_location :: - Ptr File -> -- _obj : TInterface "GtkSource" "File"- IO (Ptr Gio.File)---fileGetLocation ::- (MonadIO m, FileK a) =>- a -- _obj- -> m Gio.File -- result-fileGetLocation _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_get_location _obj'- checkUnexpectedReturnNULL "gtk_source_file_get_location" result- result' <- (newObject Gio.File) result- touchManagedPtr _obj- return result'--data FileGetLocationMethodInfo-instance (signature ~ (m Gio.File), MonadIO m, FileK a) => MethodInfo FileGetLocationMethodInfo a signature where- overloadedMethod _ = fileGetLocation---- method File::get_newline_type--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "NewlineType")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_get_newline_type" gtk_source_file_get_newline_type :: - Ptr File -> -- _obj : TInterface "GtkSource" "File"- IO CUInt---fileGetNewlineType ::- (MonadIO m, FileK a) =>- a -- _obj- -> m NewlineType -- result-fileGetNewlineType _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_get_newline_type _obj'- let result' = (toEnum . fromIntegral) result- touchManagedPtr _obj- return result'--data FileGetNewlineTypeMethodInfo-instance (signature ~ (m NewlineType), MonadIO m, FileK a) => MethodInfo FileGetNewlineTypeMethodInfo a signature where- overloadedMethod _ = fileGetNewlineType---- method File::is_deleted--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_is_deleted" gtk_source_file_is_deleted :: - Ptr File -> -- _obj : TInterface "GtkSource" "File"- IO CInt---fileIsDeleted ::- (MonadIO m, FileK a) =>- a -- _obj- -> m Bool -- result-fileIsDeleted _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_is_deleted _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data FileIsDeletedMethodInfo-instance (signature ~ (m Bool), MonadIO m, FileK a) => MethodInfo FileIsDeletedMethodInfo a signature where- overloadedMethod _ = fileIsDeleted---- method File::is_externally_modified--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_is_externally_modified" gtk_source_file_is_externally_modified :: - Ptr File -> -- _obj : TInterface "GtkSource" "File"- IO CInt---fileIsExternallyModified ::- (MonadIO m, FileK a) =>- a -- _obj- -> m Bool -- result-fileIsExternallyModified _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_is_externally_modified _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data FileIsExternallyModifiedMethodInfo-instance (signature ~ (m Bool), MonadIO m, FileK a) => MethodInfo FileIsExternallyModifiedMethodInfo a signature where- overloadedMethod _ = fileIsExternallyModified---- method File::is_local--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_is_local" gtk_source_file_is_local :: - Ptr File -> -- _obj : TInterface "GtkSource" "File"- IO CInt---fileIsLocal ::- (MonadIO m, FileK a) =>- a -- _obj- -> m Bool -- result-fileIsLocal _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_is_local _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data FileIsLocalMethodInfo-instance (signature ~ (m Bool), MonadIO m, FileK a) => MethodInfo FileIsLocalMethodInfo a signature where- overloadedMethod _ = fileIsLocal---- method File::is_readonly--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_is_readonly" gtk_source_file_is_readonly :: - Ptr File -> -- _obj : TInterface "GtkSource" "File"- IO CInt---fileIsReadonly ::- (MonadIO m, FileK a) =>- a -- _obj- -> m Bool -- result-fileIsReadonly _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_is_readonly _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data FileIsReadonlyMethodInfo-instance (signature ~ (m Bool), MonadIO m, FileK a) => MethodInfo FileIsReadonlyMethodInfo a signature where- overloadedMethod _ = fileIsReadonly---- method File::set_location--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "location", argType = TInterface "Gio" "File", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_set_location" gtk_source_file_set_location :: - Ptr File -> -- _obj : TInterface "GtkSource" "File"- Ptr Gio.File -> -- location : TInterface "Gio" "File"- IO ()---fileSetLocation ::- (MonadIO m, FileK a, Gio.FileK b) =>- a -- _obj- -> Maybe (b) -- location- -> m () -- result-fileSetLocation _obj location = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeLocation <- case location of- Nothing -> return nullPtr- Just jLocation -> do- let jLocation' = unsafeManagedPtrCastPtr jLocation- return jLocation'- gtk_source_file_set_location _obj' maybeLocation- touchManagedPtr _obj- whenJust location touchManagedPtr- return ()--data FileSetLocationMethodInfo-instance (signature ~ (Maybe (b) -> m ()), MonadIO m, FileK a, Gio.FileK b) => MethodInfo FileSetLocationMethodInfo a signature where- overloadedMethod _ = fileSetLocation--
− GI/GtkSource/Objects/File.hs-boot
@@ -1,28 +0,0 @@-module GI.GtkSource.Objects.File where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype File = File (ForeignPtr File)-instance GObject File where-class GObject o => FileK o-instance (GObject o, IsDescendantOf File o) => FileK o-data FileCompressionTypePropertyInfo-data FileEncodingPropertyInfo-data FileLocationPropertyInfo-data FileNewlineTypePropertyInfo-data FileReadOnlyPropertyInfo-data FileCheckFileOnDiskMethodInfo-data FileGetCompressionTypeMethodInfo-data FileGetEncodingMethodInfo-data FileGetLocationMethodInfo-data FileGetNewlineTypeMethodInfo-data FileIsDeletedMethodInfo-data FileIsExternallyModifiedMethodInfo-data FileIsLocalMethodInfo-data FileIsReadonlyMethodInfo-data FileSetLocationMethodInfo
− GI/GtkSource/Objects/FileLoader.hs
@@ -1,693 +0,0 @@---{- |-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.GtkSource.Objects.FileLoader- ( ---- * Exported types- FileLoader(..) ,- FileLoaderK ,- toFileLoader ,- noFileLoader ,--- -- * Methods--- ** fileLoaderGetBuffer- FileLoaderGetBufferMethodInfo ,- fileLoaderGetBuffer ,----- ** fileLoaderGetCompressionType- FileLoaderGetCompressionTypeMethodInfo ,- fileLoaderGetCompressionType ,----- ** fileLoaderGetEncoding- FileLoaderGetEncodingMethodInfo ,- fileLoaderGetEncoding ,----- ** fileLoaderGetFile- FileLoaderGetFileMethodInfo ,- fileLoaderGetFile ,----- ** fileLoaderGetInputStream- FileLoaderGetInputStreamMethodInfo ,- fileLoaderGetInputStream ,----- ** fileLoaderGetLocation- FileLoaderGetLocationMethodInfo ,- fileLoaderGetLocation ,----- ** fileLoaderGetNewlineType- FileLoaderGetNewlineTypeMethodInfo ,- fileLoaderGetNewlineType ,----- ** fileLoaderLoadAsync- FileLoaderLoadAsyncMethodInfo ,- fileLoaderLoadAsync ,----- ** fileLoaderLoadFinish- FileLoaderLoadFinishMethodInfo ,- fileLoaderLoadFinish ,----- ** fileLoaderNew- fileLoaderNew ,----- ** fileLoaderNewFromStream- fileLoaderNewFromStream ,----- ** fileLoaderSetCandidateEncodings- FileLoaderSetCandidateEncodingsMethodInfo,- fileLoaderSetCandidateEncodings ,----- -- * Properties--- ** Buffer- FileLoaderBufferPropertyInfo ,- constructFileLoaderBuffer ,- fileLoaderBuffer ,- getFileLoaderBuffer ,----- ** File- FileLoaderFilePropertyInfo ,- constructFileLoaderFile ,- fileLoaderFile ,- getFileLoaderFile ,----- ** InputStream- FileLoaderInputStreamPropertyInfo ,- constructFileLoaderInputStream ,- fileLoaderInputStream ,- getFileLoaderInputStream ,----- ** Location- FileLoaderLocationPropertyInfo ,- constructFileLoaderLocation ,- fileLoaderLocation ,- getFileLoaderLocation ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GLib as GLib-import qualified GI.GObject as GObject-import qualified GI.Gio as Gio--newtype FileLoader = FileLoader (ForeignPtr FileLoader)-foreign import ccall "gtk_source_file_loader_get_type"- c_gtk_source_file_loader_get_type :: IO GType--type instance ParentTypes FileLoader = FileLoaderParentTypes-type FileLoaderParentTypes = '[GObject.Object]--instance GObject FileLoader where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_file_loader_get_type- --class GObject o => FileLoaderK o-instance (GObject o, IsDescendantOf FileLoader o) => FileLoaderK o--toFileLoader :: FileLoaderK o => o -> IO FileLoader-toFileLoader = unsafeCastTo FileLoader--noFileLoader :: Maybe FileLoader-noFileLoader = Nothing--type family ResolveFileLoaderMethod (t :: Symbol) (o :: *) :: * where- ResolveFileLoaderMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveFileLoaderMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveFileLoaderMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveFileLoaderMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveFileLoaderMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveFileLoaderMethod "loadAsync" o = FileLoaderLoadAsyncMethodInfo- ResolveFileLoaderMethod "loadFinish" o = FileLoaderLoadFinishMethodInfo- ResolveFileLoaderMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveFileLoaderMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveFileLoaderMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveFileLoaderMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveFileLoaderMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveFileLoaderMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveFileLoaderMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveFileLoaderMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveFileLoaderMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveFileLoaderMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveFileLoaderMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveFileLoaderMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveFileLoaderMethod "getBuffer" o = FileLoaderGetBufferMethodInfo- ResolveFileLoaderMethod "getCompressionType" o = FileLoaderGetCompressionTypeMethodInfo- ResolveFileLoaderMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveFileLoaderMethod "getEncoding" o = FileLoaderGetEncodingMethodInfo- ResolveFileLoaderMethod "getFile" o = FileLoaderGetFileMethodInfo- ResolveFileLoaderMethod "getInputStream" o = FileLoaderGetInputStreamMethodInfo- ResolveFileLoaderMethod "getLocation" o = FileLoaderGetLocationMethodInfo- ResolveFileLoaderMethod "getNewlineType" o = FileLoaderGetNewlineTypeMethodInfo- ResolveFileLoaderMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveFileLoaderMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveFileLoaderMethod "setCandidateEncodings" o = FileLoaderSetCandidateEncodingsMethodInfo- ResolveFileLoaderMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveFileLoaderMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveFileLoaderMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveFileLoaderMethod t FileLoader, MethodInfo info FileLoader p) => IsLabelProxy t (FileLoader -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveFileLoaderMethod t FileLoader, MethodInfo info FileLoader p) => IsLabel t (FileLoader -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "buffer"- -- Type: TInterface "GtkSource" "Buffer"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just False,Nothing)--getFileLoaderBuffer :: (MonadIO m, FileLoaderK o) => o -> m Buffer-getFileLoaderBuffer obj = liftIO $ checkUnexpectedNothing "getFileLoaderBuffer" $ getObjectPropertyObject obj "buffer" Buffer--constructFileLoaderBuffer :: (BufferK a) => a -> IO ([Char], GValue)-constructFileLoaderBuffer val = constructObjectPropertyObject "buffer" (Just val)--data FileLoaderBufferPropertyInfo-instance AttrInfo FileLoaderBufferPropertyInfo where- type AttrAllowedOps FileLoaderBufferPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint FileLoaderBufferPropertyInfo = BufferK- type AttrBaseTypeConstraint FileLoaderBufferPropertyInfo = FileLoaderK- type AttrGetType FileLoaderBufferPropertyInfo = Buffer- type AttrLabel FileLoaderBufferPropertyInfo = "buffer"- attrGet _ = getFileLoaderBuffer- attrSet _ = undefined- attrConstruct _ = constructFileLoaderBuffer- attrClear _ = undefined---- VVV Prop "file"- -- Type: TInterface "GtkSource" "File"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just False,Nothing)--getFileLoaderFile :: (MonadIO m, FileLoaderK o) => o -> m File-getFileLoaderFile obj = liftIO $ checkUnexpectedNothing "getFileLoaderFile" $ getObjectPropertyObject obj "file" File--constructFileLoaderFile :: (FileK a) => a -> IO ([Char], GValue)-constructFileLoaderFile val = constructObjectPropertyObject "file" (Just val)--data FileLoaderFilePropertyInfo-instance AttrInfo FileLoaderFilePropertyInfo where- type AttrAllowedOps FileLoaderFilePropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint FileLoaderFilePropertyInfo = FileK- type AttrBaseTypeConstraint FileLoaderFilePropertyInfo = FileLoaderK- type AttrGetType FileLoaderFilePropertyInfo = File- type AttrLabel FileLoaderFilePropertyInfo = "file"- attrGet _ = getFileLoaderFile- attrSet _ = undefined- attrConstruct _ = constructFileLoaderFile- attrClear _ = undefined---- VVV Prop "input-stream"- -- Type: TInterface "Gio" "InputStream"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just True,Nothing)--getFileLoaderInputStream :: (MonadIO m, FileLoaderK o) => o -> m (Maybe Gio.InputStream)-getFileLoaderInputStream obj = liftIO $ getObjectPropertyObject obj "input-stream" Gio.InputStream--constructFileLoaderInputStream :: (Gio.InputStreamK a) => a -> IO ([Char], GValue)-constructFileLoaderInputStream val = constructObjectPropertyObject "input-stream" (Just val)--data FileLoaderInputStreamPropertyInfo-instance AttrInfo FileLoaderInputStreamPropertyInfo where- type AttrAllowedOps FileLoaderInputStreamPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint FileLoaderInputStreamPropertyInfo = Gio.InputStreamK- type AttrBaseTypeConstraint FileLoaderInputStreamPropertyInfo = FileLoaderK- type AttrGetType FileLoaderInputStreamPropertyInfo = (Maybe Gio.InputStream)- type AttrLabel FileLoaderInputStreamPropertyInfo = "input-stream"- attrGet _ = getFileLoaderInputStream- attrSet _ = undefined- attrConstruct _ = constructFileLoaderInputStream- attrClear _ = undefined---- VVV Prop "location"- -- Type: TInterface "Gio" "File"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just True,Nothing)--getFileLoaderLocation :: (MonadIO m, FileLoaderK o) => o -> m (Maybe Gio.File)-getFileLoaderLocation obj = liftIO $ getObjectPropertyObject obj "location" Gio.File--constructFileLoaderLocation :: (Gio.FileK a) => a -> IO ([Char], GValue)-constructFileLoaderLocation val = constructObjectPropertyObject "location" (Just val)--data FileLoaderLocationPropertyInfo-instance AttrInfo FileLoaderLocationPropertyInfo where- type AttrAllowedOps FileLoaderLocationPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint FileLoaderLocationPropertyInfo = Gio.FileK- type AttrBaseTypeConstraint FileLoaderLocationPropertyInfo = FileLoaderK- type AttrGetType FileLoaderLocationPropertyInfo = (Maybe Gio.File)- type AttrLabel FileLoaderLocationPropertyInfo = "location"- attrGet _ = getFileLoaderLocation- attrSet _ = undefined- attrConstruct _ = constructFileLoaderLocation- attrClear _ = undefined--type instance AttributeList FileLoader = FileLoaderAttributeList-type FileLoaderAttributeList = ('[ '("buffer", FileLoaderBufferPropertyInfo), '("file", FileLoaderFilePropertyInfo), '("inputStream", FileLoaderInputStreamPropertyInfo), '("location", FileLoaderLocationPropertyInfo)] :: [(Symbol, *)])--fileLoaderBuffer :: AttrLabelProxy "buffer"-fileLoaderBuffer = AttrLabelProxy--fileLoaderFile :: AttrLabelProxy "file"-fileLoaderFile = AttrLabelProxy--fileLoaderInputStream :: AttrLabelProxy "inputStream"-fileLoaderInputStream = AttrLabelProxy--fileLoaderLocation :: AttrLabelProxy "location"-fileLoaderLocation = AttrLabelProxy--type instance SignalList FileLoader = FileLoaderSignalList-type FileLoaderSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method FileLoader::new--- method type : Constructor--- Args : [Arg {argCName = "buffer", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "file", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "FileLoader")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_loader_new" gtk_source_file_loader_new :: - Ptr Buffer -> -- buffer : TInterface "GtkSource" "Buffer"- Ptr File -> -- file : TInterface "GtkSource" "File"- IO (Ptr FileLoader)---fileLoaderNew ::- (MonadIO m, BufferK a, FileK b) =>- a -- buffer- -> b -- file- -> m FileLoader -- result-fileLoaderNew buffer file = liftIO $ do- let buffer' = unsafeManagedPtrCastPtr buffer- let file' = unsafeManagedPtrCastPtr file- result <- gtk_source_file_loader_new buffer' file'- checkUnexpectedReturnNULL "gtk_source_file_loader_new" result- result' <- (wrapObject FileLoader) result- touchManagedPtr buffer- touchManagedPtr file- return result'---- method FileLoader::new_from_stream--- method type : Constructor--- Args : [Arg {argCName = "buffer", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "file", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "stream", argType = TInterface "Gio" "InputStream", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "FileLoader")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_loader_new_from_stream" gtk_source_file_loader_new_from_stream :: - Ptr Buffer -> -- buffer : TInterface "GtkSource" "Buffer"- Ptr File -> -- file : TInterface "GtkSource" "File"- Ptr Gio.InputStream -> -- stream : TInterface "Gio" "InputStream"- IO (Ptr FileLoader)---fileLoaderNewFromStream ::- (MonadIO m, BufferK a, FileK b, Gio.InputStreamK c) =>- a -- buffer- -> b -- file- -> c -- stream- -> m FileLoader -- result-fileLoaderNewFromStream buffer file stream = liftIO $ do- let buffer' = unsafeManagedPtrCastPtr buffer- let file' = unsafeManagedPtrCastPtr file- let stream' = unsafeManagedPtrCastPtr stream- result <- gtk_source_file_loader_new_from_stream buffer' file' stream'- checkUnexpectedReturnNULL "gtk_source_file_loader_new_from_stream" result- result' <- (wrapObject FileLoader) result- touchManagedPtr buffer- touchManagedPtr file- touchManagedPtr stream- return result'---- method FileLoader::get_buffer--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileLoader", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Buffer")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_loader_get_buffer" gtk_source_file_loader_get_buffer :: - Ptr FileLoader -> -- _obj : TInterface "GtkSource" "FileLoader"- IO (Ptr Buffer)---fileLoaderGetBuffer ::- (MonadIO m, FileLoaderK a) =>- a -- _obj- -> m Buffer -- result-fileLoaderGetBuffer _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_loader_get_buffer _obj'- checkUnexpectedReturnNULL "gtk_source_file_loader_get_buffer" result- result' <- (newObject Buffer) result- touchManagedPtr _obj- return result'--data FileLoaderGetBufferMethodInfo-instance (signature ~ (m Buffer), MonadIO m, FileLoaderK a) => MethodInfo FileLoaderGetBufferMethodInfo a signature where- overloadedMethod _ = fileLoaderGetBuffer---- method FileLoader::get_compression_type--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileLoader", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompressionType")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_loader_get_compression_type" gtk_source_file_loader_get_compression_type :: - Ptr FileLoader -> -- _obj : TInterface "GtkSource" "FileLoader"- IO CUInt---fileLoaderGetCompressionType ::- (MonadIO m, FileLoaderK a) =>- a -- _obj- -> m CompressionType -- result-fileLoaderGetCompressionType _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_loader_get_compression_type _obj'- let result' = (toEnum . fromIntegral) result- touchManagedPtr _obj- return result'--data FileLoaderGetCompressionTypeMethodInfo-instance (signature ~ (m CompressionType), MonadIO m, FileLoaderK a) => MethodInfo FileLoaderGetCompressionTypeMethodInfo a signature where- overloadedMethod _ = fileLoaderGetCompressionType---- method FileLoader::get_encoding--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileLoader", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Encoding")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_loader_get_encoding" gtk_source_file_loader_get_encoding :: - Ptr FileLoader -> -- _obj : TInterface "GtkSource" "FileLoader"- IO (Ptr Encoding)---fileLoaderGetEncoding ::- (MonadIO m, FileLoaderK a) =>- a -- _obj- -> m Encoding -- result-fileLoaderGetEncoding _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_loader_get_encoding _obj'- checkUnexpectedReturnNULL "gtk_source_file_loader_get_encoding" result- result' <- (newBoxed Encoding) result- touchManagedPtr _obj- return result'--data FileLoaderGetEncodingMethodInfo-instance (signature ~ (m Encoding), MonadIO m, FileLoaderK a) => MethodInfo FileLoaderGetEncodingMethodInfo a signature where- overloadedMethod _ = fileLoaderGetEncoding---- method FileLoader::get_file--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileLoader", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "File")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_loader_get_file" gtk_source_file_loader_get_file :: - Ptr FileLoader -> -- _obj : TInterface "GtkSource" "FileLoader"- IO (Ptr File)---fileLoaderGetFile ::- (MonadIO m, FileLoaderK a) =>- a -- _obj- -> m File -- result-fileLoaderGetFile _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_loader_get_file _obj'- checkUnexpectedReturnNULL "gtk_source_file_loader_get_file" result- result' <- (newObject File) result- touchManagedPtr _obj- return result'--data FileLoaderGetFileMethodInfo-instance (signature ~ (m File), MonadIO m, FileLoaderK a) => MethodInfo FileLoaderGetFileMethodInfo a signature where- overloadedMethod _ = fileLoaderGetFile---- method FileLoader::get_input_stream--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileLoader", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gio" "InputStream")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_loader_get_input_stream" gtk_source_file_loader_get_input_stream :: - Ptr FileLoader -> -- _obj : TInterface "GtkSource" "FileLoader"- IO (Ptr Gio.InputStream)---fileLoaderGetInputStream ::- (MonadIO m, FileLoaderK a) =>- a -- _obj- -> m (Maybe Gio.InputStream) -- result-fileLoaderGetInputStream _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_loader_get_input_stream _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject Gio.InputStream) result'- return result''- touchManagedPtr _obj- return maybeResult--data FileLoaderGetInputStreamMethodInfo-instance (signature ~ (m (Maybe Gio.InputStream)), MonadIO m, FileLoaderK a) => MethodInfo FileLoaderGetInputStreamMethodInfo a signature where- overloadedMethod _ = fileLoaderGetInputStream---- method FileLoader::get_location--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileLoader", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gio" "File")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_loader_get_location" gtk_source_file_loader_get_location :: - Ptr FileLoader -> -- _obj : TInterface "GtkSource" "FileLoader"- IO (Ptr Gio.File)---fileLoaderGetLocation ::- (MonadIO m, FileLoaderK a) =>- a -- _obj- -> m (Maybe Gio.File) -- result-fileLoaderGetLocation _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_loader_get_location _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject Gio.File) result'- return result''- touchManagedPtr _obj- return maybeResult--data FileLoaderGetLocationMethodInfo-instance (signature ~ (m (Maybe Gio.File)), MonadIO m, FileLoaderK a) => MethodInfo FileLoaderGetLocationMethodInfo a signature where- overloadedMethod _ = fileLoaderGetLocation---- method FileLoader::get_newline_type--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileLoader", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "NewlineType")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_loader_get_newline_type" gtk_source_file_loader_get_newline_type :: - Ptr FileLoader -> -- _obj : TInterface "GtkSource" "FileLoader"- IO CUInt---fileLoaderGetNewlineType ::- (MonadIO m, FileLoaderK a) =>- a -- _obj- -> m NewlineType -- result-fileLoaderGetNewlineType _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_loader_get_newline_type _obj'- let result' = (toEnum . fromIntegral) result- touchManagedPtr _obj- return result'--data FileLoaderGetNewlineTypeMethodInfo-instance (signature ~ (m NewlineType), MonadIO m, FileLoaderK a) => MethodInfo FileLoaderGetNewlineTypeMethodInfo a signature where- overloadedMethod _ = fileLoaderGetNewlineType---- method FileLoader::load_async--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileLoader", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "io_priority", argType = TBasicType TInt, 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 = "progress_callback", argType = TInterface "Gio" "FileProgressCallback", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeNotified, argClosure = 4, argDestroy = 5, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "progress_callback_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "progress_callback_notify", argType = TInterface "GLib" "DestroyNotify", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeAsync, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "callback", argType = TInterface "Gio" "AsyncReadyCallback", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeAsync, argClosure = 7, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "user_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_loader_load_async" gtk_source_file_loader_load_async :: - Ptr FileLoader -> -- _obj : TInterface "GtkSource" "FileLoader"- Int32 -> -- io_priority : TBasicType TInt- Ptr Gio.Cancellable -> -- cancellable : TInterface "Gio" "Cancellable"- FunPtr Gio.FileProgressCallbackC -> -- progress_callback : TInterface "Gio" "FileProgressCallback"- Ptr () -> -- progress_callback_data : TBasicType TPtr- FunPtr GLib.DestroyNotifyC -> -- progress_callback_notify : TInterface "GLib" "DestroyNotify"- FunPtr Gio.AsyncReadyCallbackC -> -- callback : TInterface "Gio" "AsyncReadyCallback"- Ptr () -> -- user_data : TBasicType TPtr- IO ()---fileLoaderLoadAsync ::- (MonadIO m, FileLoaderK a, Gio.CancellableK b) =>- a -- _obj- -> Int32 -- ioPriority- -> Maybe (b) -- cancellable- -> Maybe (Gio.FileProgressCallback) -- progressCallback- -> Maybe (Gio.AsyncReadyCallback) -- callback- -> m () -- result-fileLoaderLoadAsync _obj ioPriority cancellable progressCallback callback = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeCancellable <- case cancellable of- Nothing -> return nullPtr- Just jCancellable -> do- let jCancellable' = unsafeManagedPtrCastPtr jCancellable- return jCancellable'- maybeProgressCallback <- case progressCallback of- Nothing -> return (castPtrToFunPtr nullPtr)- Just jProgressCallback -> do- jProgressCallback' <- Gio.mkFileProgressCallback (Gio.fileProgressCallbackWrapper Nothing jProgressCallback)- return jProgressCallback'- ptrcallback <- callocMem :: IO (Ptr (FunPtr Gio.AsyncReadyCallbackC))- maybeCallback <- case callback of- Nothing -> return (castPtrToFunPtr nullPtr)- Just jCallback -> do- jCallback' <- Gio.mkAsyncReadyCallback (Gio.asyncReadyCallbackWrapper (Just ptrcallback) jCallback)- poke ptrcallback jCallback'- return jCallback'- let progressCallbackData = castFunPtrToPtr maybeProgressCallback- let progressCallbackNotify = safeFreeFunPtrPtr- let userData = nullPtr- gtk_source_file_loader_load_async _obj' ioPriority maybeCancellable maybeProgressCallback progressCallbackData progressCallbackNotify maybeCallback userData- touchManagedPtr _obj- whenJust cancellable touchManagedPtr- return ()--data FileLoaderLoadAsyncMethodInfo-instance (signature ~ (Int32 -> Maybe (b) -> Maybe (Gio.FileProgressCallback) -> Maybe (Gio.AsyncReadyCallback) -> m ()), MonadIO m, FileLoaderK a, Gio.CancellableK b) => MethodInfo FileLoaderLoadAsyncMethodInfo a signature where- overloadedMethod _ = fileLoaderLoadAsync---- method FileLoader::load_finish--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileLoader", 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 : []--- returnType : Just (TBasicType TBoolean)--- throws : True--- Skip return : False--foreign import ccall "gtk_source_file_loader_load_finish" gtk_source_file_loader_load_finish :: - Ptr FileLoader -> -- _obj : TInterface "GtkSource" "FileLoader"- Ptr Gio.AsyncResult -> -- result : TInterface "Gio" "AsyncResult"- Ptr (Ptr GError) -> -- error- IO CInt---fileLoaderLoadFinish ::- (MonadIO m, FileLoaderK a, Gio.AsyncResultK b) =>- a -- _obj- -> b -- result_- -> m () -- result-fileLoaderLoadFinish _obj result_ = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let result_' = unsafeManagedPtrCastPtr result_- onException (do- _ <- propagateGError $ gtk_source_file_loader_load_finish _obj' result_'- touchManagedPtr _obj- touchManagedPtr result_- return ()- ) (do- return ()- )--data FileLoaderLoadFinishMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, FileLoaderK a, Gio.AsyncResultK b) => MethodInfo FileLoaderLoadFinishMethodInfo a signature where- overloadedMethod _ = fileLoaderLoadFinish---- method FileLoader::set_candidate_encodings--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileLoader", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "candidate_encodings", argType = TGSList (TInterface "GtkSource" "Encoding"), direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_loader_set_candidate_encodings" gtk_source_file_loader_set_candidate_encodings :: - Ptr FileLoader -> -- _obj : TInterface "GtkSource" "FileLoader"- Ptr (GSList (Ptr Encoding)) -> -- candidate_encodings : TGSList (TInterface "GtkSource" "Encoding")- IO ()---fileLoaderSetCandidateEncodings ::- (MonadIO m, FileLoaderK a) =>- a -- _obj- -> [Encoding] -- candidateEncodings- -> m () -- result-fileLoaderSetCandidateEncodings _obj candidateEncodings = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let candidateEncodings' = map unsafeManagedPtrGetPtr candidateEncodings- candidateEncodings'' <- packGSList candidateEncodings'- gtk_source_file_loader_set_candidate_encodings _obj' candidateEncodings''- touchManagedPtr _obj- mapM_ touchManagedPtr candidateEncodings- g_slist_free candidateEncodings''- return ()--data FileLoaderSetCandidateEncodingsMethodInfo-instance (signature ~ ([Encoding] -> m ()), MonadIO m, FileLoaderK a) => MethodInfo FileLoaderSetCandidateEncodingsMethodInfo a signature where- overloadedMethod _ = fileLoaderSetCandidateEncodings--
− GI/GtkSource/Objects/FileLoader.hs-boot
@@ -1,27 +0,0 @@-module GI.GtkSource.Objects.FileLoader where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype FileLoader = FileLoader (ForeignPtr FileLoader)-instance GObject FileLoader where-class GObject o => FileLoaderK o-instance (GObject o, IsDescendantOf FileLoader o) => FileLoaderK o-data FileLoaderBufferPropertyInfo-data FileLoaderFilePropertyInfo-data FileLoaderInputStreamPropertyInfo-data FileLoaderLocationPropertyInfo-data FileLoaderGetBufferMethodInfo-data FileLoaderGetCompressionTypeMethodInfo-data FileLoaderGetEncodingMethodInfo-data FileLoaderGetFileMethodInfo-data FileLoaderGetInputStreamMethodInfo-data FileLoaderGetLocationMethodInfo-data FileLoaderGetNewlineTypeMethodInfo-data FileLoaderLoadAsyncMethodInfo-data FileLoaderLoadFinishMethodInfo-data FileLoaderSetCandidateEncodingsMethodInfo
− GI/GtkSource/Objects/FileSaver.hs
@@ -1,919 +0,0 @@---{- |-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.GtkSource.Objects.FileSaver- ( ---- * Exported types- FileSaver(..) ,- FileSaverK ,- toFileSaver ,- noFileSaver ,--- -- * Methods--- ** fileSaverGetBuffer- FileSaverGetBufferMethodInfo ,- fileSaverGetBuffer ,----- ** fileSaverGetCompressionType- FileSaverGetCompressionTypeMethodInfo ,- fileSaverGetCompressionType ,----- ** fileSaverGetEncoding- FileSaverGetEncodingMethodInfo ,- fileSaverGetEncoding ,----- ** fileSaverGetFile- FileSaverGetFileMethodInfo ,- fileSaverGetFile ,----- ** fileSaverGetFlags- FileSaverGetFlagsMethodInfo ,- fileSaverGetFlags ,----- ** fileSaverGetLocation- FileSaverGetLocationMethodInfo ,- fileSaverGetLocation ,----- ** fileSaverGetNewlineType- FileSaverGetNewlineTypeMethodInfo ,- fileSaverGetNewlineType ,----- ** fileSaverNew- fileSaverNew ,----- ** fileSaverNewWithTarget- fileSaverNewWithTarget ,----- ** fileSaverSaveAsync- FileSaverSaveAsyncMethodInfo ,- fileSaverSaveAsync ,----- ** fileSaverSaveFinish- FileSaverSaveFinishMethodInfo ,- fileSaverSaveFinish ,----- ** fileSaverSetCompressionType- FileSaverSetCompressionTypeMethodInfo ,- fileSaverSetCompressionType ,----- ** fileSaverSetEncoding- FileSaverSetEncodingMethodInfo ,- fileSaverSetEncoding ,----- ** fileSaverSetFlags- FileSaverSetFlagsMethodInfo ,- fileSaverSetFlags ,----- ** fileSaverSetNewlineType- FileSaverSetNewlineTypeMethodInfo ,- fileSaverSetNewlineType ,----- -- * Properties--- ** Buffer- FileSaverBufferPropertyInfo ,- constructFileSaverBuffer ,- fileSaverBuffer ,- getFileSaverBuffer ,----- ** CompressionType- FileSaverCompressionTypePropertyInfo ,- constructFileSaverCompressionType ,- fileSaverCompressionType ,- getFileSaverCompressionType ,- setFileSaverCompressionType ,----- ** Encoding- FileSaverEncodingPropertyInfo ,- clearFileSaverEncoding ,- constructFileSaverEncoding ,- fileSaverEncoding ,- getFileSaverEncoding ,- setFileSaverEncoding ,----- ** File- FileSaverFilePropertyInfo ,- constructFileSaverFile ,- fileSaverFile ,- getFileSaverFile ,----- ** Flags- FileSaverFlagsPropertyInfo ,- constructFileSaverFlags ,- fileSaverFlags ,- getFileSaverFlags ,- setFileSaverFlags ,----- ** Location- FileSaverLocationPropertyInfo ,- constructFileSaverLocation ,- fileSaverLocation ,- getFileSaverLocation ,----- ** NewlineType- FileSaverNewlineTypePropertyInfo ,- constructFileSaverNewlineType ,- fileSaverNewlineType ,- getFileSaverNewlineType ,- setFileSaverNewlineType ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GLib as GLib-import qualified GI.GObject as GObject-import qualified GI.Gio as Gio--newtype FileSaver = FileSaver (ForeignPtr FileSaver)-foreign import ccall "gtk_source_file_saver_get_type"- c_gtk_source_file_saver_get_type :: IO GType--type instance ParentTypes FileSaver = FileSaverParentTypes-type FileSaverParentTypes = '[GObject.Object]--instance GObject FileSaver where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_file_saver_get_type- --class GObject o => FileSaverK o-instance (GObject o, IsDescendantOf FileSaver o) => FileSaverK o--toFileSaver :: FileSaverK o => o -> IO FileSaver-toFileSaver = unsafeCastTo FileSaver--noFileSaver :: Maybe FileSaver-noFileSaver = Nothing--type family ResolveFileSaverMethod (t :: Symbol) (o :: *) :: * where- ResolveFileSaverMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveFileSaverMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveFileSaverMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveFileSaverMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveFileSaverMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveFileSaverMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveFileSaverMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveFileSaverMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveFileSaverMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveFileSaverMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveFileSaverMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveFileSaverMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveFileSaverMethod "saveAsync" o = FileSaverSaveAsyncMethodInfo- ResolveFileSaverMethod "saveFinish" o = FileSaverSaveFinishMethodInfo- ResolveFileSaverMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveFileSaverMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveFileSaverMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveFileSaverMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveFileSaverMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveFileSaverMethod "getBuffer" o = FileSaverGetBufferMethodInfo- ResolveFileSaverMethod "getCompressionType" o = FileSaverGetCompressionTypeMethodInfo- ResolveFileSaverMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveFileSaverMethod "getEncoding" o = FileSaverGetEncodingMethodInfo- ResolveFileSaverMethod "getFile" o = FileSaverGetFileMethodInfo- ResolveFileSaverMethod "getFlags" o = FileSaverGetFlagsMethodInfo- ResolveFileSaverMethod "getLocation" o = FileSaverGetLocationMethodInfo- ResolveFileSaverMethod "getNewlineType" o = FileSaverGetNewlineTypeMethodInfo- ResolveFileSaverMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveFileSaverMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveFileSaverMethod "setCompressionType" o = FileSaverSetCompressionTypeMethodInfo- ResolveFileSaverMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveFileSaverMethod "setEncoding" o = FileSaverSetEncodingMethodInfo- ResolveFileSaverMethod "setFlags" o = FileSaverSetFlagsMethodInfo- ResolveFileSaverMethod "setNewlineType" o = FileSaverSetNewlineTypeMethodInfo- ResolveFileSaverMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveFileSaverMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveFileSaverMethod t FileSaver, MethodInfo info FileSaver p) => IsLabelProxy t (FileSaver -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveFileSaverMethod t FileSaver, MethodInfo info FileSaver p) => IsLabel t (FileSaver -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "buffer"- -- Type: TInterface "GtkSource" "Buffer"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just False,Nothing)--getFileSaverBuffer :: (MonadIO m, FileSaverK o) => o -> m Buffer-getFileSaverBuffer obj = liftIO $ checkUnexpectedNothing "getFileSaverBuffer" $ getObjectPropertyObject obj "buffer" Buffer--constructFileSaverBuffer :: (BufferK a) => a -> IO ([Char], GValue)-constructFileSaverBuffer val = constructObjectPropertyObject "buffer" (Just val)--data FileSaverBufferPropertyInfo-instance AttrInfo FileSaverBufferPropertyInfo where- type AttrAllowedOps FileSaverBufferPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint FileSaverBufferPropertyInfo = BufferK- type AttrBaseTypeConstraint FileSaverBufferPropertyInfo = FileSaverK- type AttrGetType FileSaverBufferPropertyInfo = Buffer- type AttrLabel FileSaverBufferPropertyInfo = "buffer"- attrGet _ = getFileSaverBuffer- attrSet _ = undefined- attrConstruct _ = constructFileSaverBuffer- attrClear _ = undefined---- VVV Prop "compression-type"- -- Type: TInterface "GtkSource" "CompressionType"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getFileSaverCompressionType :: (MonadIO m, FileSaverK o) => o -> m CompressionType-getFileSaverCompressionType obj = liftIO $ getObjectPropertyEnum obj "compression-type"--setFileSaverCompressionType :: (MonadIO m, FileSaverK o) => o -> CompressionType -> m ()-setFileSaverCompressionType obj val = liftIO $ setObjectPropertyEnum obj "compression-type" val--constructFileSaverCompressionType :: CompressionType -> IO ([Char], GValue)-constructFileSaverCompressionType val = constructObjectPropertyEnum "compression-type" val--data FileSaverCompressionTypePropertyInfo-instance AttrInfo FileSaverCompressionTypePropertyInfo where- type AttrAllowedOps FileSaverCompressionTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint FileSaverCompressionTypePropertyInfo = (~) CompressionType- type AttrBaseTypeConstraint FileSaverCompressionTypePropertyInfo = FileSaverK- type AttrGetType FileSaverCompressionTypePropertyInfo = CompressionType- type AttrLabel FileSaverCompressionTypePropertyInfo = "compression-type"- attrGet _ = getFileSaverCompressionType- attrSet _ = setFileSaverCompressionType- attrConstruct _ = constructFileSaverCompressionType- attrClear _ = undefined---- VVV Prop "encoding"- -- Type: TInterface "GtkSource" "Encoding"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just True)--getFileSaverEncoding :: (MonadIO m, FileSaverK o) => o -> m Encoding-getFileSaverEncoding obj = liftIO $ checkUnexpectedNothing "getFileSaverEncoding" $ getObjectPropertyBoxed obj "encoding" Encoding--setFileSaverEncoding :: (MonadIO m, FileSaverK o) => o -> Encoding -> m ()-setFileSaverEncoding obj val = liftIO $ setObjectPropertyBoxed obj "encoding" (Just val)--constructFileSaverEncoding :: Encoding -> IO ([Char], GValue)-constructFileSaverEncoding val = constructObjectPropertyBoxed "encoding" (Just val)--clearFileSaverEncoding :: (MonadIO m, FileSaverK o) => o -> m ()-clearFileSaverEncoding obj = liftIO $ setObjectPropertyBoxed obj "encoding" (Nothing :: Maybe Encoding)--data FileSaverEncodingPropertyInfo-instance AttrInfo FileSaverEncodingPropertyInfo where- type AttrAllowedOps FileSaverEncodingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint FileSaverEncodingPropertyInfo = (~) Encoding- type AttrBaseTypeConstraint FileSaverEncodingPropertyInfo = FileSaverK- type AttrGetType FileSaverEncodingPropertyInfo = Encoding- type AttrLabel FileSaverEncodingPropertyInfo = "encoding"- attrGet _ = getFileSaverEncoding- attrSet _ = setFileSaverEncoding- attrConstruct _ = constructFileSaverEncoding- attrClear _ = clearFileSaverEncoding---- VVV Prop "file"- -- Type: TInterface "GtkSource" "File"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just False,Nothing)--getFileSaverFile :: (MonadIO m, FileSaverK o) => o -> m File-getFileSaverFile obj = liftIO $ checkUnexpectedNothing "getFileSaverFile" $ getObjectPropertyObject obj "file" File--constructFileSaverFile :: (FileK a) => a -> IO ([Char], GValue)-constructFileSaverFile val = constructObjectPropertyObject "file" (Just val)--data FileSaverFilePropertyInfo-instance AttrInfo FileSaverFilePropertyInfo where- type AttrAllowedOps FileSaverFilePropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint FileSaverFilePropertyInfo = FileK- type AttrBaseTypeConstraint FileSaverFilePropertyInfo = FileSaverK- type AttrGetType FileSaverFilePropertyInfo = File- type AttrLabel FileSaverFilePropertyInfo = "file"- attrGet _ = getFileSaverFile- attrSet _ = undefined- attrConstruct _ = constructFileSaverFile- attrClear _ = undefined---- VVV Prop "flags"- -- Type: TInterface "GtkSource" "FileSaverFlags"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getFileSaverFlags :: (MonadIO m, FileSaverK o) => o -> m [FileSaverFlags]-getFileSaverFlags obj = liftIO $ getObjectPropertyFlags obj "flags"--setFileSaverFlags :: (MonadIO m, FileSaverK o) => o -> [FileSaverFlags] -> m ()-setFileSaverFlags obj val = liftIO $ setObjectPropertyFlags obj "flags" val--constructFileSaverFlags :: [FileSaverFlags] -> IO ([Char], GValue)-constructFileSaverFlags val = constructObjectPropertyFlags "flags" val--data FileSaverFlagsPropertyInfo-instance AttrInfo FileSaverFlagsPropertyInfo where- type AttrAllowedOps FileSaverFlagsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint FileSaverFlagsPropertyInfo = (~) [FileSaverFlags]- type AttrBaseTypeConstraint FileSaverFlagsPropertyInfo = FileSaverK- type AttrGetType FileSaverFlagsPropertyInfo = [FileSaverFlags]- type AttrLabel FileSaverFlagsPropertyInfo = "flags"- attrGet _ = getFileSaverFlags- attrSet _ = setFileSaverFlags- attrConstruct _ = constructFileSaverFlags- attrClear _ = undefined---- VVV Prop "location"- -- Type: TInterface "Gio" "File"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just False,Nothing)--getFileSaverLocation :: (MonadIO m, FileSaverK o) => o -> m Gio.File-getFileSaverLocation obj = liftIO $ checkUnexpectedNothing "getFileSaverLocation" $ getObjectPropertyObject obj "location" Gio.File--constructFileSaverLocation :: (Gio.FileK a) => a -> IO ([Char], GValue)-constructFileSaverLocation val = constructObjectPropertyObject "location" (Just val)--data FileSaverLocationPropertyInfo-instance AttrInfo FileSaverLocationPropertyInfo where- type AttrAllowedOps FileSaverLocationPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint FileSaverLocationPropertyInfo = Gio.FileK- type AttrBaseTypeConstraint FileSaverLocationPropertyInfo = FileSaverK- type AttrGetType FileSaverLocationPropertyInfo = Gio.File- type AttrLabel FileSaverLocationPropertyInfo = "location"- attrGet _ = getFileSaverLocation- attrSet _ = undefined- attrConstruct _ = constructFileSaverLocation- attrClear _ = undefined---- VVV Prop "newline-type"- -- Type: TInterface "GtkSource" "NewlineType"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getFileSaverNewlineType :: (MonadIO m, FileSaverK o) => o -> m NewlineType-getFileSaverNewlineType obj = liftIO $ getObjectPropertyEnum obj "newline-type"--setFileSaverNewlineType :: (MonadIO m, FileSaverK o) => o -> NewlineType -> m ()-setFileSaverNewlineType obj val = liftIO $ setObjectPropertyEnum obj "newline-type" val--constructFileSaverNewlineType :: NewlineType -> IO ([Char], GValue)-constructFileSaverNewlineType val = constructObjectPropertyEnum "newline-type" val--data FileSaverNewlineTypePropertyInfo-instance AttrInfo FileSaverNewlineTypePropertyInfo where- type AttrAllowedOps FileSaverNewlineTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint FileSaverNewlineTypePropertyInfo = (~) NewlineType- type AttrBaseTypeConstraint FileSaverNewlineTypePropertyInfo = FileSaverK- type AttrGetType FileSaverNewlineTypePropertyInfo = NewlineType- type AttrLabel FileSaverNewlineTypePropertyInfo = "newline-type"- attrGet _ = getFileSaverNewlineType- attrSet _ = setFileSaverNewlineType- attrConstruct _ = constructFileSaverNewlineType- attrClear _ = undefined--type instance AttributeList FileSaver = FileSaverAttributeList-type FileSaverAttributeList = ('[ '("buffer", FileSaverBufferPropertyInfo), '("compressionType", FileSaverCompressionTypePropertyInfo), '("encoding", FileSaverEncodingPropertyInfo), '("file", FileSaverFilePropertyInfo), '("flags", FileSaverFlagsPropertyInfo), '("location", FileSaverLocationPropertyInfo), '("newlineType", FileSaverNewlineTypePropertyInfo)] :: [(Symbol, *)])--fileSaverBuffer :: AttrLabelProxy "buffer"-fileSaverBuffer = AttrLabelProxy--fileSaverCompressionType :: AttrLabelProxy "compressionType"-fileSaverCompressionType = AttrLabelProxy--fileSaverEncoding :: AttrLabelProxy "encoding"-fileSaverEncoding = AttrLabelProxy--fileSaverFile :: AttrLabelProxy "file"-fileSaverFile = AttrLabelProxy--fileSaverFlags :: AttrLabelProxy "flags"-fileSaverFlags = AttrLabelProxy--fileSaverLocation :: AttrLabelProxy "location"-fileSaverLocation = AttrLabelProxy--fileSaverNewlineType :: AttrLabelProxy "newlineType"-fileSaverNewlineType = AttrLabelProxy--type instance SignalList FileSaver = FileSaverSignalList-type FileSaverSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method FileSaver::new--- method type : Constructor--- Args : [Arg {argCName = "buffer", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "file", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "FileSaver")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_new" gtk_source_file_saver_new :: - Ptr Buffer -> -- buffer : TInterface "GtkSource" "Buffer"- Ptr File -> -- file : TInterface "GtkSource" "File"- IO (Ptr FileSaver)---fileSaverNew ::- (MonadIO m, BufferK a, FileK b) =>- a -- buffer- -> b -- file- -> m FileSaver -- result-fileSaverNew buffer file = liftIO $ do- let buffer' = unsafeManagedPtrCastPtr buffer- let file' = unsafeManagedPtrCastPtr file- result <- gtk_source_file_saver_new buffer' file'- checkUnexpectedReturnNULL "gtk_source_file_saver_new" result- result' <- (wrapObject FileSaver) result- touchManagedPtr buffer- touchManagedPtr file- return result'---- method FileSaver::new_with_target--- method type : Constructor--- Args : [Arg {argCName = "buffer", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "file", argType = TInterface "GtkSource" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "target_location", argType = TInterface "Gio" "File", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "FileSaver")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_new_with_target" gtk_source_file_saver_new_with_target :: - Ptr Buffer -> -- buffer : TInterface "GtkSource" "Buffer"- Ptr File -> -- file : TInterface "GtkSource" "File"- Ptr Gio.File -> -- target_location : TInterface "Gio" "File"- IO (Ptr FileSaver)---fileSaverNewWithTarget ::- (MonadIO m, BufferK a, FileK b, Gio.FileK c) =>- a -- buffer- -> b -- file- -> c -- targetLocation- -> m FileSaver -- result-fileSaverNewWithTarget buffer file targetLocation = liftIO $ do- let buffer' = unsafeManagedPtrCastPtr buffer- let file' = unsafeManagedPtrCastPtr file- let targetLocation' = unsafeManagedPtrCastPtr targetLocation- result <- gtk_source_file_saver_new_with_target buffer' file' targetLocation'- checkUnexpectedReturnNULL "gtk_source_file_saver_new_with_target" result- result' <- (wrapObject FileSaver) result- touchManagedPtr buffer- touchManagedPtr file- touchManagedPtr targetLocation- return result'---- method FileSaver::get_buffer--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Buffer")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_get_buffer" gtk_source_file_saver_get_buffer :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- IO (Ptr Buffer)---fileSaverGetBuffer ::- (MonadIO m, FileSaverK a) =>- a -- _obj- -> m Buffer -- result-fileSaverGetBuffer _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_saver_get_buffer _obj'- checkUnexpectedReturnNULL "gtk_source_file_saver_get_buffer" result- result' <- (newObject Buffer) result- touchManagedPtr _obj- return result'--data FileSaverGetBufferMethodInfo-instance (signature ~ (m Buffer), MonadIO m, FileSaverK a) => MethodInfo FileSaverGetBufferMethodInfo a signature where- overloadedMethod _ = fileSaverGetBuffer---- method FileSaver::get_compression_type--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "CompressionType")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_get_compression_type" gtk_source_file_saver_get_compression_type :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- IO CUInt---fileSaverGetCompressionType ::- (MonadIO m, FileSaverK a) =>- a -- _obj- -> m CompressionType -- result-fileSaverGetCompressionType _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_saver_get_compression_type _obj'- let result' = (toEnum . fromIntegral) result- touchManagedPtr _obj- return result'--data FileSaverGetCompressionTypeMethodInfo-instance (signature ~ (m CompressionType), MonadIO m, FileSaverK a) => MethodInfo FileSaverGetCompressionTypeMethodInfo a signature where- overloadedMethod _ = fileSaverGetCompressionType---- method FileSaver::get_encoding--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Encoding")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_get_encoding" gtk_source_file_saver_get_encoding :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- IO (Ptr Encoding)---fileSaverGetEncoding ::- (MonadIO m, FileSaverK a) =>- a -- _obj- -> m Encoding -- result-fileSaverGetEncoding _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_saver_get_encoding _obj'- checkUnexpectedReturnNULL "gtk_source_file_saver_get_encoding" result- result' <- (newBoxed Encoding) result- touchManagedPtr _obj- return result'--data FileSaverGetEncodingMethodInfo-instance (signature ~ (m Encoding), MonadIO m, FileSaverK a) => MethodInfo FileSaverGetEncodingMethodInfo a signature where- overloadedMethod _ = fileSaverGetEncoding---- method FileSaver::get_file--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "File")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_get_file" gtk_source_file_saver_get_file :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- IO (Ptr File)---fileSaverGetFile ::- (MonadIO m, FileSaverK a) =>- a -- _obj- -> m File -- result-fileSaverGetFile _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_saver_get_file _obj'- checkUnexpectedReturnNULL "gtk_source_file_saver_get_file" result- result' <- (newObject File) result- touchManagedPtr _obj- return result'--data FileSaverGetFileMethodInfo-instance (signature ~ (m File), MonadIO m, FileSaverK a) => MethodInfo FileSaverGetFileMethodInfo a signature where- overloadedMethod _ = fileSaverGetFile---- method FileSaver::get_flags--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "FileSaverFlags")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_get_flags" gtk_source_file_saver_get_flags :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- IO CUInt---fileSaverGetFlags ::- (MonadIO m, FileSaverK a) =>- a -- _obj- -> m [FileSaverFlags] -- result-fileSaverGetFlags _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_saver_get_flags _obj'- let result' = wordToGFlags result- touchManagedPtr _obj- return result'--data FileSaverGetFlagsMethodInfo-instance (signature ~ (m [FileSaverFlags]), MonadIO m, FileSaverK a) => MethodInfo FileSaverGetFlagsMethodInfo a signature where- overloadedMethod _ = fileSaverGetFlags---- method FileSaver::get_location--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gio" "File")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_get_location" gtk_source_file_saver_get_location :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- IO (Ptr Gio.File)---fileSaverGetLocation ::- (MonadIO m, FileSaverK a) =>- a -- _obj- -> m Gio.File -- result-fileSaverGetLocation _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_saver_get_location _obj'- checkUnexpectedReturnNULL "gtk_source_file_saver_get_location" result- result' <- (newObject Gio.File) result- touchManagedPtr _obj- return result'--data FileSaverGetLocationMethodInfo-instance (signature ~ (m Gio.File), MonadIO m, FileSaverK a) => MethodInfo FileSaverGetLocationMethodInfo a signature where- overloadedMethod _ = fileSaverGetLocation---- method FileSaver::get_newline_type--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "NewlineType")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_get_newline_type" gtk_source_file_saver_get_newline_type :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- IO CUInt---fileSaverGetNewlineType ::- (MonadIO m, FileSaverK a) =>- a -- _obj- -> m NewlineType -- result-fileSaverGetNewlineType _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_file_saver_get_newline_type _obj'- let result' = (toEnum . fromIntegral) result- touchManagedPtr _obj- return result'--data FileSaverGetNewlineTypeMethodInfo-instance (signature ~ (m NewlineType), MonadIO m, FileSaverK a) => MethodInfo FileSaverGetNewlineTypeMethodInfo a signature where- overloadedMethod _ = fileSaverGetNewlineType---- method FileSaver::save_async--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "io_priority", argType = TBasicType TInt, 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 = "progress_callback", argType = TInterface "Gio" "FileProgressCallback", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeNotified, argClosure = 4, argDestroy = 5, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "progress_callback_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "progress_callback_notify", argType = TInterface "GLib" "DestroyNotify", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeAsync, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "callback", argType = TInterface "Gio" "AsyncReadyCallback", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeAsync, argClosure = 7, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "user_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_save_async" gtk_source_file_saver_save_async :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- Int32 -> -- io_priority : TBasicType TInt- Ptr Gio.Cancellable -> -- cancellable : TInterface "Gio" "Cancellable"- FunPtr Gio.FileProgressCallbackC -> -- progress_callback : TInterface "Gio" "FileProgressCallback"- Ptr () -> -- progress_callback_data : TBasicType TPtr- FunPtr GLib.DestroyNotifyC -> -- progress_callback_notify : TInterface "GLib" "DestroyNotify"- FunPtr Gio.AsyncReadyCallbackC -> -- callback : TInterface "Gio" "AsyncReadyCallback"- Ptr () -> -- user_data : TBasicType TPtr- IO ()---fileSaverSaveAsync ::- (MonadIO m, FileSaverK a, Gio.CancellableK b) =>- a -- _obj- -> Int32 -- ioPriority- -> Maybe (b) -- cancellable- -> Maybe (Gio.FileProgressCallback) -- progressCallback- -> Maybe (Gio.AsyncReadyCallback) -- callback- -> m () -- result-fileSaverSaveAsync _obj ioPriority cancellable progressCallback callback = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeCancellable <- case cancellable of- Nothing -> return nullPtr- Just jCancellable -> do- let jCancellable' = unsafeManagedPtrCastPtr jCancellable- return jCancellable'- maybeProgressCallback <- case progressCallback of- Nothing -> return (castPtrToFunPtr nullPtr)- Just jProgressCallback -> do- jProgressCallback' <- Gio.mkFileProgressCallback (Gio.fileProgressCallbackWrapper Nothing jProgressCallback)- return jProgressCallback'- ptrcallback <- callocMem :: IO (Ptr (FunPtr Gio.AsyncReadyCallbackC))- maybeCallback <- case callback of- Nothing -> return (castPtrToFunPtr nullPtr)- Just jCallback -> do- jCallback' <- Gio.mkAsyncReadyCallback (Gio.asyncReadyCallbackWrapper (Just ptrcallback) jCallback)- poke ptrcallback jCallback'- return jCallback'- let progressCallbackData = castFunPtrToPtr maybeProgressCallback- let progressCallbackNotify = safeFreeFunPtrPtr- let userData = nullPtr- gtk_source_file_saver_save_async _obj' ioPriority maybeCancellable maybeProgressCallback progressCallbackData progressCallbackNotify maybeCallback userData- touchManagedPtr _obj- whenJust cancellable touchManagedPtr- return ()--data FileSaverSaveAsyncMethodInfo-instance (signature ~ (Int32 -> Maybe (b) -> Maybe (Gio.FileProgressCallback) -> Maybe (Gio.AsyncReadyCallback) -> m ()), MonadIO m, FileSaverK a, Gio.CancellableK b) => MethodInfo FileSaverSaveAsyncMethodInfo a signature where- overloadedMethod _ = fileSaverSaveAsync---- method FileSaver::save_finish--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", 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 : []--- returnType : Just (TBasicType TBoolean)--- throws : True--- Skip return : False--foreign import ccall "gtk_source_file_saver_save_finish" gtk_source_file_saver_save_finish :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- Ptr Gio.AsyncResult -> -- result : TInterface "Gio" "AsyncResult"- Ptr (Ptr GError) -> -- error- IO CInt---fileSaverSaveFinish ::- (MonadIO m, FileSaverK a, Gio.AsyncResultK b) =>- a -- _obj- -> b -- result_- -> m () -- result-fileSaverSaveFinish _obj result_ = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let result_' = unsafeManagedPtrCastPtr result_- onException (do- _ <- propagateGError $ gtk_source_file_saver_save_finish _obj' result_'- touchManagedPtr _obj- touchManagedPtr result_- return ()- ) (do- return ()- )--data FileSaverSaveFinishMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, FileSaverK a, Gio.AsyncResultK b) => MethodInfo FileSaverSaveFinishMethodInfo a signature where- overloadedMethod _ = fileSaverSaveFinish---- method FileSaver::set_compression_type--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "compression_type", argType = TInterface "GtkSource" "CompressionType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_set_compression_type" gtk_source_file_saver_set_compression_type :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- CUInt -> -- compression_type : TInterface "GtkSource" "CompressionType"- IO ()---fileSaverSetCompressionType ::- (MonadIO m, FileSaverK a) =>- a -- _obj- -> CompressionType -- compressionType- -> m () -- result-fileSaverSetCompressionType _obj compressionType = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let compressionType' = (fromIntegral . fromEnum) compressionType- gtk_source_file_saver_set_compression_type _obj' compressionType'- touchManagedPtr _obj- return ()--data FileSaverSetCompressionTypeMethodInfo-instance (signature ~ (CompressionType -> m ()), MonadIO m, FileSaverK a) => MethodInfo FileSaverSetCompressionTypeMethodInfo a signature where- overloadedMethod _ = fileSaverSetCompressionType---- method FileSaver::set_encoding--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "encoding", argType = TInterface "GtkSource" "Encoding", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_set_encoding" gtk_source_file_saver_set_encoding :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- Ptr Encoding -> -- encoding : TInterface "GtkSource" "Encoding"- IO ()---fileSaverSetEncoding ::- (MonadIO m, FileSaverK a) =>- a -- _obj- -> Maybe (Encoding) -- encoding- -> m () -- result-fileSaverSetEncoding _obj encoding = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeEncoding <- case encoding of- Nothing -> return nullPtr- Just jEncoding -> do- let jEncoding' = unsafeManagedPtrGetPtr jEncoding- return jEncoding'- gtk_source_file_saver_set_encoding _obj' maybeEncoding- touchManagedPtr _obj- whenJust encoding touchManagedPtr- return ()--data FileSaverSetEncodingMethodInfo-instance (signature ~ (Maybe (Encoding) -> m ()), MonadIO m, FileSaverK a) => MethodInfo FileSaverSetEncodingMethodInfo a signature where- overloadedMethod _ = fileSaverSetEncoding---- method FileSaver::set_flags--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flags", argType = TInterface "GtkSource" "FileSaverFlags", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_set_flags" gtk_source_file_saver_set_flags :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- CUInt -> -- flags : TInterface "GtkSource" "FileSaverFlags"- IO ()---fileSaverSetFlags ::- (MonadIO m, FileSaverK a) =>- a -- _obj- -> [FileSaverFlags] -- flags- -> m () -- result-fileSaverSetFlags _obj flags = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let flags' = gflagsToWord flags- gtk_source_file_saver_set_flags _obj' flags'- touchManagedPtr _obj- return ()--data FileSaverSetFlagsMethodInfo-instance (signature ~ ([FileSaverFlags] -> m ()), MonadIO m, FileSaverK a) => MethodInfo FileSaverSetFlagsMethodInfo a signature where- overloadedMethod _ = fileSaverSetFlags---- method FileSaver::set_newline_type--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "FileSaver", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "newline_type", argType = TInterface "GtkSource" "NewlineType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_file_saver_set_newline_type" gtk_source_file_saver_set_newline_type :: - Ptr FileSaver -> -- _obj : TInterface "GtkSource" "FileSaver"- CUInt -> -- newline_type : TInterface "GtkSource" "NewlineType"- IO ()---fileSaverSetNewlineType ::- (MonadIO m, FileSaverK a) =>- a -- _obj- -> NewlineType -- newlineType- -> m () -- result-fileSaverSetNewlineType _obj newlineType = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let newlineType' = (fromIntegral . fromEnum) newlineType- gtk_source_file_saver_set_newline_type _obj' newlineType'- touchManagedPtr _obj- return ()--data FileSaverSetNewlineTypeMethodInfo-instance (signature ~ (NewlineType -> m ()), MonadIO m, FileSaverK a) => MethodInfo FileSaverSetNewlineTypeMethodInfo a signature where- overloadedMethod _ = fileSaverSetNewlineType--
− GI/GtkSource/Objects/FileSaver.hs-boot
@@ -1,33 +0,0 @@-module GI.GtkSource.Objects.FileSaver where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype FileSaver = FileSaver (ForeignPtr FileSaver)-instance GObject FileSaver where-class GObject o => FileSaverK o-instance (GObject o, IsDescendantOf FileSaver o) => FileSaverK o-data FileSaverBufferPropertyInfo-data FileSaverCompressionTypePropertyInfo-data FileSaverEncodingPropertyInfo-data FileSaverFilePropertyInfo-data FileSaverFlagsPropertyInfo-data FileSaverLocationPropertyInfo-data FileSaverNewlineTypePropertyInfo-data FileSaverGetBufferMethodInfo-data FileSaverGetCompressionTypeMethodInfo-data FileSaverGetEncodingMethodInfo-data FileSaverGetFileMethodInfo-data FileSaverGetFlagsMethodInfo-data FileSaverGetLocationMethodInfo-data FileSaverGetNewlineTypeMethodInfo-data FileSaverSaveAsyncMethodInfo-data FileSaverSaveFinishMethodInfo-data FileSaverSetCompressionTypeMethodInfo-data FileSaverSetEncodingMethodInfo-data FileSaverSetFlagsMethodInfo-data FileSaverSetNewlineTypeMethodInfo
− GI/GtkSource/Objects/Gutter.hs
@@ -1,538 +0,0 @@---{- |-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.GtkSource.Objects.Gutter- ( ---- * Exported types- Gutter(..) ,- GutterK ,- toGutter ,- noGutter ,--- -- * Methods--- ** gutterGetPadding- GutterGetPaddingMethodInfo ,- gutterGetPadding ,----- ** gutterGetRendererAtPos- GutterGetRendererAtPosMethodInfo ,- gutterGetRendererAtPos ,----- ** gutterGetWindow- GutterGetWindowMethodInfo ,- gutterGetWindow ,----- ** gutterInsert- GutterInsertMethodInfo ,- gutterInsert ,----- ** gutterQueueDraw- GutterQueueDrawMethodInfo ,- gutterQueueDraw ,----- ** gutterRemove- GutterRemoveMethodInfo ,- gutterRemove ,----- ** gutterReorder- GutterReorderMethodInfo ,- gutterReorder ,----- ** gutterSetPadding- GutterSetPaddingMethodInfo ,- gutterSetPadding ,----- -- * Properties--- ** View- GutterViewPropertyInfo ,- constructGutterView ,- getGutterView ,- gutterView ,----- ** WindowType- GutterWindowTypePropertyInfo ,- constructGutterWindowType ,- getGutterWindowType ,- gutterWindowType ,----- ** Xpad- GutterXpadPropertyInfo ,- constructGutterXpad ,- getGutterXpad ,- gutterXpad ,- setGutterXpad ,----- ** Ypad- GutterYpadPropertyInfo ,- constructGutterYpad ,- getGutterYpad ,- gutterYpad ,- setGutterYpad ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.Gdk as Gdk-import qualified GI.Gtk as Gtk--newtype Gutter = Gutter (ForeignPtr Gutter)-foreign import ccall "gtk_source_gutter_get_type"- c_gtk_source_gutter_get_type :: IO GType--type instance ParentTypes Gutter = GutterParentTypes-type GutterParentTypes = '[GObject.Object]--instance GObject Gutter where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_gutter_get_type- --class GObject o => GutterK o-instance (GObject o, IsDescendantOf Gutter o) => GutterK o--toGutter :: GutterK o => o -> IO Gutter-toGutter = unsafeCastTo Gutter--noGutter :: Maybe Gutter-noGutter = Nothing--type family ResolveGutterMethod (t :: Symbol) (o :: *) :: * where- ResolveGutterMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveGutterMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveGutterMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveGutterMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveGutterMethod "insert" o = GutterInsertMethodInfo- ResolveGutterMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveGutterMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveGutterMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveGutterMethod "queueDraw" o = GutterQueueDrawMethodInfo- ResolveGutterMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveGutterMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveGutterMethod "remove" o = GutterRemoveMethodInfo- ResolveGutterMethod "reorder" o = GutterReorderMethodInfo- ResolveGutterMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveGutterMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveGutterMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveGutterMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveGutterMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveGutterMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveGutterMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveGutterMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveGutterMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveGutterMethod "getPadding" o = GutterGetPaddingMethodInfo- ResolveGutterMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveGutterMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveGutterMethod "getRendererAtPos" o = GutterGetRendererAtPosMethodInfo- ResolveGutterMethod "getWindow" o = GutterGetWindowMethodInfo- ResolveGutterMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveGutterMethod "setPadding" o = GutterSetPaddingMethodInfo- ResolveGutterMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveGutterMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveGutterMethod t Gutter, MethodInfo info Gutter p) => IsLabelProxy t (Gutter -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveGutterMethod t Gutter, MethodInfo info Gutter p) => IsLabel t (Gutter -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "view"- -- Type: TInterface "GtkSource" "View"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getGutterView :: (MonadIO m, GutterK o) => o -> m (Maybe View)-getGutterView obj = liftIO $ getObjectPropertyObject obj "view" View--constructGutterView :: (ViewK a) => a -> IO ([Char], GValue)-constructGutterView val = constructObjectPropertyObject "view" (Just val)--data GutterViewPropertyInfo-instance AttrInfo GutterViewPropertyInfo where- type AttrAllowedOps GutterViewPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint GutterViewPropertyInfo = ViewK- type AttrBaseTypeConstraint GutterViewPropertyInfo = GutterK- type AttrGetType GutterViewPropertyInfo = (Maybe View)- type AttrLabel GutterViewPropertyInfo = "view"- attrGet _ = getGutterView- attrSet _ = undefined- attrConstruct _ = constructGutterView- attrClear _ = undefined---- VVV Prop "window-type"- -- Type: TInterface "Gtk" "TextWindowType"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getGutterWindowType :: (MonadIO m, GutterK o) => o -> m Gtk.TextWindowType-getGutterWindowType obj = liftIO $ getObjectPropertyEnum obj "window-type"--constructGutterWindowType :: Gtk.TextWindowType -> IO ([Char], GValue)-constructGutterWindowType val = constructObjectPropertyEnum "window-type" val--data GutterWindowTypePropertyInfo-instance AttrInfo GutterWindowTypePropertyInfo where- type AttrAllowedOps GutterWindowTypePropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint GutterWindowTypePropertyInfo = (~) Gtk.TextWindowType- type AttrBaseTypeConstraint GutterWindowTypePropertyInfo = GutterK- type AttrGetType GutterWindowTypePropertyInfo = Gtk.TextWindowType- type AttrLabel GutterWindowTypePropertyInfo = "window-type"- attrGet _ = getGutterWindowType- attrSet _ = undefined- attrConstruct _ = constructGutterWindowType- attrClear _ = undefined---- VVV Prop "xpad"- -- Type: TBasicType TInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getGutterXpad :: (MonadIO m, GutterK o) => o -> m Int32-getGutterXpad obj = liftIO $ getObjectPropertyInt32 obj "xpad"--setGutterXpad :: (MonadIO m, GutterK o) => o -> Int32 -> m ()-setGutterXpad obj val = liftIO $ setObjectPropertyInt32 obj "xpad" val--constructGutterXpad :: Int32 -> IO ([Char], GValue)-constructGutterXpad val = constructObjectPropertyInt32 "xpad" val--data GutterXpadPropertyInfo-instance AttrInfo GutterXpadPropertyInfo where- type AttrAllowedOps GutterXpadPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint GutterXpadPropertyInfo = (~) Int32- type AttrBaseTypeConstraint GutterXpadPropertyInfo = GutterK- type AttrGetType GutterXpadPropertyInfo = Int32- type AttrLabel GutterXpadPropertyInfo = "xpad"- attrGet _ = getGutterXpad- attrSet _ = setGutterXpad- attrConstruct _ = constructGutterXpad- attrClear _ = undefined---- VVV Prop "ypad"- -- Type: TBasicType TInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getGutterYpad :: (MonadIO m, GutterK o) => o -> m Int32-getGutterYpad obj = liftIO $ getObjectPropertyInt32 obj "ypad"--setGutterYpad :: (MonadIO m, GutterK o) => o -> Int32 -> m ()-setGutterYpad obj val = liftIO $ setObjectPropertyInt32 obj "ypad" val--constructGutterYpad :: Int32 -> IO ([Char], GValue)-constructGutterYpad val = constructObjectPropertyInt32 "ypad" val--data GutterYpadPropertyInfo-instance AttrInfo GutterYpadPropertyInfo where- type AttrAllowedOps GutterYpadPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint GutterYpadPropertyInfo = (~) Int32- type AttrBaseTypeConstraint GutterYpadPropertyInfo = GutterK- type AttrGetType GutterYpadPropertyInfo = Int32- type AttrLabel GutterYpadPropertyInfo = "ypad"- attrGet _ = getGutterYpad- attrSet _ = setGutterYpad- attrConstruct _ = constructGutterYpad- attrClear _ = undefined--type instance AttributeList Gutter = GutterAttributeList-type GutterAttributeList = ('[ '("view", GutterViewPropertyInfo), '("windowType", GutterWindowTypePropertyInfo), '("xpad", GutterXpadPropertyInfo), '("ypad", GutterYpadPropertyInfo)] :: [(Symbol, *)])--gutterView :: AttrLabelProxy "view"-gutterView = AttrLabelProxy--gutterWindowType :: AttrLabelProxy "windowType"-gutterWindowType = AttrLabelProxy--gutterXpad :: AttrLabelProxy "xpad"-gutterXpad = AttrLabelProxy--gutterYpad :: AttrLabelProxy "ypad"-gutterYpad = AttrLabelProxy--type instance SignalList Gutter = GutterSignalList-type GutterSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method Gutter::get_padding--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Gutter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "xpad", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "ypad", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_get_padding" gtk_source_gutter_get_padding :: - Ptr Gutter -> -- _obj : TInterface "GtkSource" "Gutter"- Int32 -> -- xpad : TBasicType TInt- Int32 -> -- ypad : TBasicType TInt- IO ()--{-# DEPRECATED gutterGetPadding ["(Since version 3.12)","Use gtk_source_gutter_renderer_get_padding() instead."]#-}-gutterGetPadding ::- (MonadIO m, GutterK a) =>- a -- _obj- -> Int32 -- xpad- -> Int32 -- ypad- -> m () -- result-gutterGetPadding _obj xpad ypad = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_gutter_get_padding _obj' xpad ypad- touchManagedPtr _obj- return ()--data GutterGetPaddingMethodInfo-instance (signature ~ (Int32 -> Int32 -> m ()), MonadIO m, GutterK a) => MethodInfo GutterGetPaddingMethodInfo a signature where- overloadedMethod _ = gutterGetPadding---- method Gutter::get_renderer_at_pos--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Gutter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "GutterRenderer")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_get_renderer_at_pos" gtk_source_gutter_get_renderer_at_pos :: - Ptr Gutter -> -- _obj : TInterface "GtkSource" "Gutter"- Int32 -> -- x : TBasicType TInt- Int32 -> -- y : TBasicType TInt- IO (Ptr GutterRenderer)---gutterGetRendererAtPos ::- (MonadIO m, GutterK a) =>- a -- _obj- -> Int32 -- x- -> Int32 -- y- -> m (Maybe GutterRenderer) -- result-gutterGetRendererAtPos _obj x y = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_gutter_get_renderer_at_pos _obj' x y- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject GutterRenderer) result'- return result''- touchManagedPtr _obj- return maybeResult--data GutterGetRendererAtPosMethodInfo-instance (signature ~ (Int32 -> Int32 -> m (Maybe GutterRenderer)), MonadIO m, GutterK a) => MethodInfo GutterGetRendererAtPosMethodInfo a signature where- overloadedMethod _ = gutterGetRendererAtPos---- method Gutter::get_window--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Gutter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gdk" "Window")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_get_window" gtk_source_gutter_get_window :: - Ptr Gutter -> -- _obj : TInterface "GtkSource" "Gutter"- IO (Ptr Gdk.Window)--{-# DEPRECATED gutterGetWindow ["(Since version 3.12)","Use gtk_text_view_get_window() instead."]#-}-gutterGetWindow ::- (MonadIO m, GutterK a) =>- a -- _obj- -> m Gdk.Window -- result-gutterGetWindow _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_gutter_get_window _obj'- checkUnexpectedReturnNULL "gtk_source_gutter_get_window" result- result' <- (newObject Gdk.Window) result- touchManagedPtr _obj- return result'--data GutterGetWindowMethodInfo-instance (signature ~ (m Gdk.Window), MonadIO m, GutterK a) => MethodInfo GutterGetWindowMethodInfo a signature where- overloadedMethod _ = gutterGetWindow---- method Gutter::insert--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Gutter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "renderer", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "position", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_insert" gtk_source_gutter_insert :: - Ptr Gutter -> -- _obj : TInterface "GtkSource" "Gutter"- Ptr GutterRenderer -> -- renderer : TInterface "GtkSource" "GutterRenderer"- Int32 -> -- position : TBasicType TInt- IO CInt---gutterInsert ::- (MonadIO m, GutterK a, GutterRendererK b) =>- a -- _obj- -> b -- renderer- -> Int32 -- position- -> m Bool -- result-gutterInsert _obj renderer position = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let renderer' = unsafeManagedPtrCastPtr renderer- result <- gtk_source_gutter_insert _obj' renderer' position- let result' = (/= 0) result- touchManagedPtr _obj- touchManagedPtr renderer- return result'--data GutterInsertMethodInfo-instance (signature ~ (b -> Int32 -> m Bool), MonadIO m, GutterK a, GutterRendererK b) => MethodInfo GutterInsertMethodInfo a signature where- overloadedMethod _ = gutterInsert---- method Gutter::queue_draw--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Gutter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_queue_draw" gtk_source_gutter_queue_draw :: - Ptr Gutter -> -- _obj : TInterface "GtkSource" "Gutter"- IO ()---gutterQueueDraw ::- (MonadIO m, GutterK a) =>- a -- _obj- -> m () -- result-gutterQueueDraw _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_gutter_queue_draw _obj'- touchManagedPtr _obj- return ()--data GutterQueueDrawMethodInfo-instance (signature ~ (m ()), MonadIO m, GutterK a) => MethodInfo GutterQueueDrawMethodInfo a signature where- overloadedMethod _ = gutterQueueDraw---- method Gutter::remove--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Gutter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "renderer", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_remove" gtk_source_gutter_remove :: - Ptr Gutter -> -- _obj : TInterface "GtkSource" "Gutter"- Ptr GutterRenderer -> -- renderer : TInterface "GtkSource" "GutterRenderer"- IO ()---gutterRemove ::- (MonadIO m, GutterK a, GutterRendererK b) =>- a -- _obj- -> b -- renderer- -> m () -- result-gutterRemove _obj renderer = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let renderer' = unsafeManagedPtrCastPtr renderer- gtk_source_gutter_remove _obj' renderer'- touchManagedPtr _obj- touchManagedPtr renderer- return ()--data GutterRemoveMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, GutterK a, GutterRendererK b) => MethodInfo GutterRemoveMethodInfo a signature where- overloadedMethod _ = gutterRemove---- method Gutter::reorder--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Gutter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "renderer", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "position", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_reorder" gtk_source_gutter_reorder :: - Ptr Gutter -> -- _obj : TInterface "GtkSource" "Gutter"- Ptr GutterRenderer -> -- renderer : TInterface "GtkSource" "GutterRenderer"- Int32 -> -- position : TBasicType TInt- IO ()---gutterReorder ::- (MonadIO m, GutterK a, GutterRendererK b) =>- a -- _obj- -> b -- renderer- -> Int32 -- position- -> m () -- result-gutterReorder _obj renderer position = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let renderer' = unsafeManagedPtrCastPtr renderer- gtk_source_gutter_reorder _obj' renderer' position- touchManagedPtr _obj- touchManagedPtr renderer- return ()--data GutterReorderMethodInfo-instance (signature ~ (b -> Int32 -> m ()), MonadIO m, GutterK a, GutterRendererK b) => MethodInfo GutterReorderMethodInfo a signature where- overloadedMethod _ = gutterReorder---- method Gutter::set_padding--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Gutter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "xpad", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "ypad", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_set_padding" gtk_source_gutter_set_padding :: - Ptr Gutter -> -- _obj : TInterface "GtkSource" "Gutter"- Int32 -> -- xpad : TBasicType TInt- Int32 -> -- ypad : TBasicType TInt- IO ()--{-# DEPRECATED gutterSetPadding ["(Since version 3.12)","Use gtk_source_gutter_renderer_set_padding() instead."]#-}-gutterSetPadding ::- (MonadIO m, GutterK a) =>- a -- _obj- -> Int32 -- xpad- -> Int32 -- ypad- -> m () -- result-gutterSetPadding _obj xpad ypad = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_gutter_set_padding _obj' xpad ypad- touchManagedPtr _obj- return ()--data GutterSetPaddingMethodInfo-instance (signature ~ (Int32 -> Int32 -> m ()), MonadIO m, GutterK a) => MethodInfo GutterSetPaddingMethodInfo a signature where- overloadedMethod _ = gutterSetPadding--
− GI/GtkSource/Objects/Gutter.hs-boot
@@ -1,25 +0,0 @@-module GI.GtkSource.Objects.Gutter where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype Gutter = Gutter (ForeignPtr Gutter)-instance GObject Gutter where-class GObject o => GutterK o-instance (GObject o, IsDescendantOf Gutter o) => GutterK o-data GutterViewPropertyInfo-data GutterWindowTypePropertyInfo-data GutterXpadPropertyInfo-data GutterYpadPropertyInfo-data GutterGetPaddingMethodInfo-data GutterGetRendererAtPosMethodInfo-data GutterGetWindowMethodInfo-data GutterInsertMethodInfo-data GutterQueueDrawMethodInfo-data GutterRemoveMethodInfo-data GutterReorderMethodInfo-data GutterSetPaddingMethodInfo
− GI/GtkSource/Objects/GutterRenderer.hs
@@ -1,1707 +0,0 @@---{- |-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.GtkSource.Objects.GutterRenderer- ( ---- * Exported types- GutterRenderer(..) ,- GutterRendererK ,- toGutterRenderer ,- noGutterRenderer ,--- -- * Methods--- ** gutterRendererActivate- GutterRendererActivateMethodInfo ,- gutterRendererActivate ,----- ** gutterRendererBegin- GutterRendererBeginMethodInfo ,- gutterRendererBegin ,----- ** gutterRendererDraw- GutterRendererDrawMethodInfo ,- gutterRendererDraw ,----- ** gutterRendererEnd- GutterRendererEndMethodInfo ,- gutterRendererEnd ,----- ** gutterRendererGetAlignment- GutterRendererGetAlignmentMethodInfo ,- gutterRendererGetAlignment ,----- ** gutterRendererGetAlignmentMode- GutterRendererGetAlignmentModeMethodInfo,- gutterRendererGetAlignmentMode ,----- ** gutterRendererGetBackground- GutterRendererGetBackgroundMethodInfo ,- gutterRendererGetBackground ,----- ** gutterRendererGetPadding- GutterRendererGetPaddingMethodInfo ,- gutterRendererGetPadding ,----- ** gutterRendererGetSize- GutterRendererGetSizeMethodInfo ,- gutterRendererGetSize ,----- ** gutterRendererGetView- GutterRendererGetViewMethodInfo ,- gutterRendererGetView ,----- ** gutterRendererGetVisible- GutterRendererGetVisibleMethodInfo ,- gutterRendererGetVisible ,----- ** gutterRendererGetWindowType- GutterRendererGetWindowTypeMethodInfo ,- gutterRendererGetWindowType ,----- ** gutterRendererQueryActivatable- GutterRendererQueryActivatableMethodInfo,- gutterRendererQueryActivatable ,----- ** gutterRendererQueryData- GutterRendererQueryDataMethodInfo ,- gutterRendererQueryData ,----- ** gutterRendererQueryTooltip- GutterRendererQueryTooltipMethodInfo ,- gutterRendererQueryTooltip ,----- ** gutterRendererQueueDraw- GutterRendererQueueDrawMethodInfo ,- gutterRendererQueueDraw ,----- ** gutterRendererSetAlignment- GutterRendererSetAlignmentMethodInfo ,- gutterRendererSetAlignment ,----- ** gutterRendererSetAlignmentMode- GutterRendererSetAlignmentModeMethodInfo,- gutterRendererSetAlignmentMode ,----- ** gutterRendererSetBackground- GutterRendererSetBackgroundMethodInfo ,- gutterRendererSetBackground ,----- ** gutterRendererSetPadding- GutterRendererSetPaddingMethodInfo ,- gutterRendererSetPadding ,----- ** gutterRendererSetSize- GutterRendererSetSizeMethodInfo ,- gutterRendererSetSize ,----- ** gutterRendererSetVisible- GutterRendererSetVisibleMethodInfo ,- gutterRendererSetVisible ,----- -- * Properties--- ** AlignmentMode- GutterRendererAlignmentModePropertyInfo ,- constructGutterRendererAlignmentMode ,- getGutterRendererAlignmentMode ,- gutterRendererAlignmentMode ,- setGutterRendererAlignmentMode ,----- ** BackgroundRgba- GutterRendererBackgroundRgbaPropertyInfo,- clearGutterRendererBackgroundRgba ,- constructGutterRendererBackgroundRgba ,- getGutterRendererBackgroundRgba ,- gutterRendererBackgroundRgba ,- setGutterRendererBackgroundRgba ,----- ** BackgroundSet- GutterRendererBackgroundSetPropertyInfo ,- constructGutterRendererBackgroundSet ,- getGutterRendererBackgroundSet ,- gutterRendererBackgroundSet ,- setGutterRendererBackgroundSet ,----- ** Size- GutterRendererSizePropertyInfo ,- constructGutterRendererSize ,- getGutterRendererSize ,- gutterRendererSize ,- setGutterRendererSize ,----- ** View- GutterRendererViewPropertyInfo ,- getGutterRendererView ,- gutterRendererView ,----- ** Visible- GutterRendererVisiblePropertyInfo ,- constructGutterRendererVisible ,- getGutterRendererVisible ,- gutterRendererVisible ,- setGutterRendererVisible ,----- ** WindowType- GutterRendererWindowTypePropertyInfo ,- getGutterRendererWindowType ,- gutterRendererWindowType ,----- ** Xalign- GutterRendererXalignPropertyInfo ,- constructGutterRendererXalign ,- getGutterRendererXalign ,- gutterRendererXalign ,- setGutterRendererXalign ,----- ** Xpad- GutterRendererXpadPropertyInfo ,- constructGutterRendererXpad ,- getGutterRendererXpad ,- gutterRendererXpad ,- setGutterRendererXpad ,----- ** Yalign- GutterRendererYalignPropertyInfo ,- constructGutterRendererYalign ,- getGutterRendererYalign ,- gutterRendererYalign ,- setGutterRendererYalign ,----- ** Ypad- GutterRendererYpadPropertyInfo ,- constructGutterRendererYpad ,- getGutterRendererYpad ,- gutterRendererYpad ,- setGutterRendererYpad ,----- -- * Signals--- ** Activate- GutterRendererActivateCallback ,- GutterRendererActivateCallbackC ,- GutterRendererActivateSignalInfo ,- afterGutterRendererActivate ,- gutterRendererActivateCallbackWrapper ,- gutterRendererActivateClosure ,- mkGutterRendererActivateCallback ,- noGutterRendererActivateCallback ,- onGutterRendererActivate ,----- ** QueryActivatable- GutterRendererQueryActivatableCallback ,- GutterRendererQueryActivatableCallbackC ,- GutterRendererQueryActivatableSignalInfo,- afterGutterRendererQueryActivatable ,- gutterRendererQueryActivatableCallbackWrapper,- gutterRendererQueryActivatableClosure ,- mkGutterRendererQueryActivatableCallback,- noGutterRendererQueryActivatableCallback,- onGutterRendererQueryActivatable ,----- ** QueryData- GutterRendererQueryDataCallback ,- GutterRendererQueryDataCallbackC ,- GutterRendererQueryDataSignalInfo ,- afterGutterRendererQueryData ,- gutterRendererQueryDataCallbackWrapper ,- gutterRendererQueryDataClosure ,- mkGutterRendererQueryDataCallback ,- noGutterRendererQueryDataCallback ,- onGutterRendererQueryData ,----- ** QueryTooltip- GutterRendererQueryTooltipCallback ,- GutterRendererQueryTooltipCallbackC ,- GutterRendererQueryTooltipSignalInfo ,- afterGutterRendererQueryTooltip ,- gutterRendererQueryTooltipCallbackWrapper,- gutterRendererQueryTooltipClosure ,- mkGutterRendererQueryTooltipCallback ,- noGutterRendererQueryTooltipCallback ,- onGutterRendererQueryTooltip ,----- ** QueueDraw- GutterRendererQueueDrawCallback ,- GutterRendererQueueDrawCallbackC ,- GutterRendererQueueDrawSignalInfo ,- afterGutterRendererQueueDraw ,- gutterRendererQueueDrawCallbackWrapper ,- gutterRendererQueueDrawClosure ,- mkGutterRendererQueueDrawCallback ,- noGutterRendererQueueDrawCallback ,- onGutterRendererQueueDraw ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.Gdk as Gdk-import qualified GI.Gtk as Gtk-import qualified GI.Cairo as Cairo--newtype GutterRenderer = GutterRenderer (ForeignPtr GutterRenderer)-foreign import ccall "gtk_source_gutter_renderer_get_type"- c_gtk_source_gutter_renderer_get_type :: IO GType--type instance ParentTypes GutterRenderer = GutterRendererParentTypes-type GutterRendererParentTypes = '[GObject.Object]--instance GObject GutterRenderer where- gobjectIsInitiallyUnowned _ = True- gobjectType _ = c_gtk_source_gutter_renderer_get_type- --class GObject o => GutterRendererK o-instance (GObject o, IsDescendantOf GutterRenderer o) => GutterRendererK o--toGutterRenderer :: GutterRendererK o => o -> IO GutterRenderer-toGutterRenderer = unsafeCastTo GutterRenderer--noGutterRenderer :: Maybe GutterRenderer-noGutterRenderer = Nothing--type family ResolveGutterRendererMethod (t :: Symbol) (o :: *) :: * where- ResolveGutterRendererMethod "activate" o = GutterRendererActivateMethodInfo- ResolveGutterRendererMethod "begin" o = GutterRendererBeginMethodInfo- ResolveGutterRendererMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveGutterRendererMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveGutterRendererMethod "draw" o = GutterRendererDrawMethodInfo- ResolveGutterRendererMethod "end" o = GutterRendererEndMethodInfo- ResolveGutterRendererMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveGutterRendererMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveGutterRendererMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveGutterRendererMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveGutterRendererMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveGutterRendererMethod "queryActivatable" o = GutterRendererQueryActivatableMethodInfo- ResolveGutterRendererMethod "queryData" o = GutterRendererQueryDataMethodInfo- ResolveGutterRendererMethod "queryTooltip" o = GutterRendererQueryTooltipMethodInfo- ResolveGutterRendererMethod "queueDraw" o = GutterRendererQueueDrawMethodInfo- ResolveGutterRendererMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveGutterRendererMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveGutterRendererMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveGutterRendererMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveGutterRendererMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveGutterRendererMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveGutterRendererMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveGutterRendererMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveGutterRendererMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveGutterRendererMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveGutterRendererMethod "getAlignment" o = GutterRendererGetAlignmentMethodInfo- ResolveGutterRendererMethod "getAlignmentMode" o = GutterRendererGetAlignmentModeMethodInfo- ResolveGutterRendererMethod "getBackground" o = GutterRendererGetBackgroundMethodInfo- ResolveGutterRendererMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveGutterRendererMethod "getPadding" o = GutterRendererGetPaddingMethodInfo- ResolveGutterRendererMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveGutterRendererMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveGutterRendererMethod "getSize" o = GutterRendererGetSizeMethodInfo- ResolveGutterRendererMethod "getView" o = GutterRendererGetViewMethodInfo- ResolveGutterRendererMethod "getVisible" o = GutterRendererGetVisibleMethodInfo- ResolveGutterRendererMethod "getWindowType" o = GutterRendererGetWindowTypeMethodInfo- ResolveGutterRendererMethod "setAlignment" o = GutterRendererSetAlignmentMethodInfo- ResolveGutterRendererMethod "setAlignmentMode" o = GutterRendererSetAlignmentModeMethodInfo- ResolveGutterRendererMethod "setBackground" o = GutterRendererSetBackgroundMethodInfo- ResolveGutterRendererMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveGutterRendererMethod "setPadding" o = GutterRendererSetPaddingMethodInfo- ResolveGutterRendererMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveGutterRendererMethod "setSize" o = GutterRendererSetSizeMethodInfo- ResolveGutterRendererMethod "setVisible" o = GutterRendererSetVisibleMethodInfo- ResolveGutterRendererMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveGutterRendererMethod t GutterRenderer, MethodInfo info GutterRenderer p) => IsLabelProxy t (GutterRenderer -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveGutterRendererMethod t GutterRenderer, MethodInfo info GutterRenderer p) => IsLabel t (GutterRenderer -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- signal GutterRenderer::activate-type GutterRendererActivateCallback =- Gtk.TextIter ->- Gdk.Rectangle ->- Gdk.Event ->- IO ()--noGutterRendererActivateCallback :: Maybe GutterRendererActivateCallback-noGutterRendererActivateCallback = Nothing--type GutterRendererActivateCallbackC =- Ptr () -> -- object- Ptr Gtk.TextIter ->- Ptr Gdk.Rectangle ->- Ptr Gdk.Event ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkGutterRendererActivateCallback :: GutterRendererActivateCallbackC -> IO (FunPtr GutterRendererActivateCallbackC)--gutterRendererActivateClosure :: GutterRendererActivateCallback -> IO Closure-gutterRendererActivateClosure cb = newCClosure =<< mkGutterRendererActivateCallback wrapped- where wrapped = gutterRendererActivateCallbackWrapper cb--gutterRendererActivateCallbackWrapper ::- GutterRendererActivateCallback ->- Ptr () ->- Ptr Gtk.TextIter ->- Ptr Gdk.Rectangle ->- Ptr Gdk.Event ->- Ptr () ->- IO ()-gutterRendererActivateCallbackWrapper _cb _ iter area event _ = do- iter' <- (newBoxed Gtk.TextIter) iter- area' <- (newBoxed Gdk.Rectangle) area- event' <- (newBoxed Gdk.Event) event- _cb iter' area' event'--onGutterRendererActivate :: (GObject a, MonadIO m) => a -> GutterRendererActivateCallback -> m SignalHandlerId-onGutterRendererActivate obj cb = liftIO $ connectGutterRendererActivate obj cb SignalConnectBefore-afterGutterRendererActivate :: (GObject a, MonadIO m) => a -> GutterRendererActivateCallback -> m SignalHandlerId-afterGutterRendererActivate obj cb = connectGutterRendererActivate obj cb SignalConnectAfter--connectGutterRendererActivate :: (GObject a, MonadIO m) =>- a -> GutterRendererActivateCallback -> SignalConnectMode -> m SignalHandlerId-connectGutterRendererActivate obj cb after = liftIO $ do- cb' <- mkGutterRendererActivateCallback (gutterRendererActivateCallbackWrapper cb)- connectSignalFunPtr obj "activate" cb' after---- signal GutterRenderer::query-activatable-type GutterRendererQueryActivatableCallback =- Gtk.TextIter ->- Gdk.Rectangle ->- Gdk.Event ->- IO Bool--noGutterRendererQueryActivatableCallback :: Maybe GutterRendererQueryActivatableCallback-noGutterRendererQueryActivatableCallback = Nothing--type GutterRendererQueryActivatableCallbackC =- Ptr () -> -- object- Ptr Gtk.TextIter ->- Ptr Gdk.Rectangle ->- Ptr Gdk.Event ->- Ptr () -> -- user_data- IO CInt--foreign import ccall "wrapper"- mkGutterRendererQueryActivatableCallback :: GutterRendererQueryActivatableCallbackC -> IO (FunPtr GutterRendererQueryActivatableCallbackC)--gutterRendererQueryActivatableClosure :: GutterRendererQueryActivatableCallback -> IO Closure-gutterRendererQueryActivatableClosure cb = newCClosure =<< mkGutterRendererQueryActivatableCallback wrapped- where wrapped = gutterRendererQueryActivatableCallbackWrapper cb--gutterRendererQueryActivatableCallbackWrapper ::- GutterRendererQueryActivatableCallback ->- Ptr () ->- Ptr Gtk.TextIter ->- Ptr Gdk.Rectangle ->- Ptr Gdk.Event ->- Ptr () ->- IO CInt-gutterRendererQueryActivatableCallbackWrapper _cb _ iter area event _ = do- iter' <- (newBoxed Gtk.TextIter) iter- area' <- (newBoxed Gdk.Rectangle) area- event' <- (newBoxed Gdk.Event) event- result <- _cb iter' area' event'- let result' = (fromIntegral . fromEnum) result- return result'--onGutterRendererQueryActivatable :: (GObject a, MonadIO m) => a -> GutterRendererQueryActivatableCallback -> m SignalHandlerId-onGutterRendererQueryActivatable obj cb = liftIO $ connectGutterRendererQueryActivatable obj cb SignalConnectBefore-afterGutterRendererQueryActivatable :: (GObject a, MonadIO m) => a -> GutterRendererQueryActivatableCallback -> m SignalHandlerId-afterGutterRendererQueryActivatable obj cb = connectGutterRendererQueryActivatable obj cb SignalConnectAfter--connectGutterRendererQueryActivatable :: (GObject a, MonadIO m) =>- a -> GutterRendererQueryActivatableCallback -> SignalConnectMode -> m SignalHandlerId-connectGutterRendererQueryActivatable obj cb after = liftIO $ do- cb' <- mkGutterRendererQueryActivatableCallback (gutterRendererQueryActivatableCallbackWrapper cb)- connectSignalFunPtr obj "query-activatable" cb' after---- signal GutterRenderer::query-data-type GutterRendererQueryDataCallback =- Gtk.TextIter ->- Gtk.TextIter ->- [GutterRendererState] ->- IO ()--noGutterRendererQueryDataCallback :: Maybe GutterRendererQueryDataCallback-noGutterRendererQueryDataCallback = Nothing--type GutterRendererQueryDataCallbackC =- Ptr () -> -- object- Ptr Gtk.TextIter ->- Ptr Gtk.TextIter ->- CUInt ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkGutterRendererQueryDataCallback :: GutterRendererQueryDataCallbackC -> IO (FunPtr GutterRendererQueryDataCallbackC)--gutterRendererQueryDataClosure :: GutterRendererQueryDataCallback -> IO Closure-gutterRendererQueryDataClosure cb = newCClosure =<< mkGutterRendererQueryDataCallback wrapped- where wrapped = gutterRendererQueryDataCallbackWrapper cb--gutterRendererQueryDataCallbackWrapper ::- GutterRendererQueryDataCallback ->- Ptr () ->- Ptr Gtk.TextIter ->- Ptr Gtk.TextIter ->- CUInt ->- Ptr () ->- IO ()-gutterRendererQueryDataCallbackWrapper _cb _ start end state _ = do- start' <- (newBoxed Gtk.TextIter) start- end' <- (newBoxed Gtk.TextIter) end- let state' = wordToGFlags state- _cb start' end' state'--onGutterRendererQueryData :: (GObject a, MonadIO m) => a -> GutterRendererQueryDataCallback -> m SignalHandlerId-onGutterRendererQueryData obj cb = liftIO $ connectGutterRendererQueryData obj cb SignalConnectBefore-afterGutterRendererQueryData :: (GObject a, MonadIO m) => a -> GutterRendererQueryDataCallback -> m SignalHandlerId-afterGutterRendererQueryData obj cb = connectGutterRendererQueryData obj cb SignalConnectAfter--connectGutterRendererQueryData :: (GObject a, MonadIO m) =>- a -> GutterRendererQueryDataCallback -> SignalConnectMode -> m SignalHandlerId-connectGutterRendererQueryData obj cb after = liftIO $ do- cb' <- mkGutterRendererQueryDataCallback (gutterRendererQueryDataCallbackWrapper cb)- connectSignalFunPtr obj "query-data" cb' after---- signal GutterRenderer::query-tooltip-type GutterRendererQueryTooltipCallback =- Gtk.TextIter ->- Gdk.Rectangle ->- Int32 ->- Int32 ->- Gtk.Tooltip ->- IO Bool--noGutterRendererQueryTooltipCallback :: Maybe GutterRendererQueryTooltipCallback-noGutterRendererQueryTooltipCallback = Nothing--type GutterRendererQueryTooltipCallbackC =- Ptr () -> -- object- Ptr Gtk.TextIter ->- Ptr Gdk.Rectangle ->- Int32 ->- Int32 ->- Ptr Gtk.Tooltip ->- Ptr () -> -- user_data- IO CInt--foreign import ccall "wrapper"- mkGutterRendererQueryTooltipCallback :: GutterRendererQueryTooltipCallbackC -> IO (FunPtr GutterRendererQueryTooltipCallbackC)--gutterRendererQueryTooltipClosure :: GutterRendererQueryTooltipCallback -> IO Closure-gutterRendererQueryTooltipClosure cb = newCClosure =<< mkGutterRendererQueryTooltipCallback wrapped- where wrapped = gutterRendererQueryTooltipCallbackWrapper cb--gutterRendererQueryTooltipCallbackWrapper ::- GutterRendererQueryTooltipCallback ->- Ptr () ->- Ptr Gtk.TextIter ->- Ptr Gdk.Rectangle ->- Int32 ->- Int32 ->- Ptr Gtk.Tooltip ->- Ptr () ->- IO CInt-gutterRendererQueryTooltipCallbackWrapper _cb _ iter area x y tooltip _ = do- iter' <- (newBoxed Gtk.TextIter) iter- area' <- (newBoxed Gdk.Rectangle) area- tooltip' <- (newObject Gtk.Tooltip) tooltip- result <- _cb iter' area' x y tooltip'- let result' = (fromIntegral . fromEnum) result- return result'--onGutterRendererQueryTooltip :: (GObject a, MonadIO m) => a -> GutterRendererQueryTooltipCallback -> m SignalHandlerId-onGutterRendererQueryTooltip obj cb = liftIO $ connectGutterRendererQueryTooltip obj cb SignalConnectBefore-afterGutterRendererQueryTooltip :: (GObject a, MonadIO m) => a -> GutterRendererQueryTooltipCallback -> m SignalHandlerId-afterGutterRendererQueryTooltip obj cb = connectGutterRendererQueryTooltip obj cb SignalConnectAfter--connectGutterRendererQueryTooltip :: (GObject a, MonadIO m) =>- a -> GutterRendererQueryTooltipCallback -> SignalConnectMode -> m SignalHandlerId-connectGutterRendererQueryTooltip obj cb after = liftIO $ do- cb' <- mkGutterRendererQueryTooltipCallback (gutterRendererQueryTooltipCallbackWrapper cb)- connectSignalFunPtr obj "query-tooltip" cb' after---- signal GutterRenderer::queue-draw-type GutterRendererQueueDrawCallback =- IO ()--noGutterRendererQueueDrawCallback :: Maybe GutterRendererQueueDrawCallback-noGutterRendererQueueDrawCallback = Nothing--type GutterRendererQueueDrawCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkGutterRendererQueueDrawCallback :: GutterRendererQueueDrawCallbackC -> IO (FunPtr GutterRendererQueueDrawCallbackC)--gutterRendererQueueDrawClosure :: GutterRendererQueueDrawCallback -> IO Closure-gutterRendererQueueDrawClosure cb = newCClosure =<< mkGutterRendererQueueDrawCallback wrapped- where wrapped = gutterRendererQueueDrawCallbackWrapper cb--gutterRendererQueueDrawCallbackWrapper ::- GutterRendererQueueDrawCallback ->- Ptr () ->- Ptr () ->- IO ()-gutterRendererQueueDrawCallbackWrapper _cb _ _ = do- _cb --onGutterRendererQueueDraw :: (GObject a, MonadIO m) => a -> GutterRendererQueueDrawCallback -> m SignalHandlerId-onGutterRendererQueueDraw obj cb = liftIO $ connectGutterRendererQueueDraw obj cb SignalConnectBefore-afterGutterRendererQueueDraw :: (GObject a, MonadIO m) => a -> GutterRendererQueueDrawCallback -> m SignalHandlerId-afterGutterRendererQueueDraw obj cb = connectGutterRendererQueueDraw obj cb SignalConnectAfter--connectGutterRendererQueueDraw :: (GObject a, MonadIO m) =>- a -> GutterRendererQueueDrawCallback -> SignalConnectMode -> m SignalHandlerId-connectGutterRendererQueueDraw obj cb after = liftIO $ do- cb' <- mkGutterRendererQueueDrawCallback (gutterRendererQueueDrawCallbackWrapper cb)- connectSignalFunPtr obj "queue-draw" cb' after---- VVV Prop "alignment-mode"- -- Type: TInterface "GtkSource" "GutterRendererAlignmentMode"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getGutterRendererAlignmentMode :: (MonadIO m, GutterRendererK o) => o -> m GutterRendererAlignmentMode-getGutterRendererAlignmentMode obj = liftIO $ getObjectPropertyEnum obj "alignment-mode"--setGutterRendererAlignmentMode :: (MonadIO m, GutterRendererK o) => o -> GutterRendererAlignmentMode -> m ()-setGutterRendererAlignmentMode obj val = liftIO $ setObjectPropertyEnum obj "alignment-mode" val--constructGutterRendererAlignmentMode :: GutterRendererAlignmentMode -> IO ([Char], GValue)-constructGutterRendererAlignmentMode val = constructObjectPropertyEnum "alignment-mode" val--data GutterRendererAlignmentModePropertyInfo-instance AttrInfo GutterRendererAlignmentModePropertyInfo where- type AttrAllowedOps GutterRendererAlignmentModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint GutterRendererAlignmentModePropertyInfo = (~) GutterRendererAlignmentMode- type AttrBaseTypeConstraint GutterRendererAlignmentModePropertyInfo = GutterRendererK- type AttrGetType GutterRendererAlignmentModePropertyInfo = GutterRendererAlignmentMode- type AttrLabel GutterRendererAlignmentModePropertyInfo = "alignment-mode"- attrGet _ = getGutterRendererAlignmentMode- attrSet _ = setGutterRendererAlignmentMode- attrConstruct _ = constructGutterRendererAlignmentMode- attrClear _ = undefined---- VVV Prop "background-rgba"- -- Type: TInterface "Gdk" "RGBA"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Nothing)--getGutterRendererBackgroundRgba :: (MonadIO m, GutterRendererK o) => o -> m (Maybe Gdk.RGBA)-getGutterRendererBackgroundRgba obj = liftIO $ getObjectPropertyBoxed obj "background-rgba" Gdk.RGBA--setGutterRendererBackgroundRgba :: (MonadIO m, GutterRendererK o) => o -> Gdk.RGBA -> m ()-setGutterRendererBackgroundRgba obj val = liftIO $ setObjectPropertyBoxed obj "background-rgba" (Just val)--constructGutterRendererBackgroundRgba :: Gdk.RGBA -> IO ([Char], GValue)-constructGutterRendererBackgroundRgba val = constructObjectPropertyBoxed "background-rgba" (Just val)--clearGutterRendererBackgroundRgba :: (MonadIO m, GutterRendererK o) => o -> m ()-clearGutterRendererBackgroundRgba obj = liftIO $ setObjectPropertyBoxed obj "background-rgba" (Nothing :: Maybe Gdk.RGBA)--data GutterRendererBackgroundRgbaPropertyInfo-instance AttrInfo GutterRendererBackgroundRgbaPropertyInfo where- type AttrAllowedOps GutterRendererBackgroundRgbaPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint GutterRendererBackgroundRgbaPropertyInfo = (~) Gdk.RGBA- type AttrBaseTypeConstraint GutterRendererBackgroundRgbaPropertyInfo = GutterRendererK- type AttrGetType GutterRendererBackgroundRgbaPropertyInfo = (Maybe Gdk.RGBA)- type AttrLabel GutterRendererBackgroundRgbaPropertyInfo = "background-rgba"- attrGet _ = getGutterRendererBackgroundRgba- attrSet _ = setGutterRendererBackgroundRgba- attrConstruct _ = constructGutterRendererBackgroundRgba- attrClear _ = clearGutterRendererBackgroundRgba---- VVV Prop "background-set"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getGutterRendererBackgroundSet :: (MonadIO m, GutterRendererK o) => o -> m Bool-getGutterRendererBackgroundSet obj = liftIO $ getObjectPropertyBool obj "background-set"--setGutterRendererBackgroundSet :: (MonadIO m, GutterRendererK o) => o -> Bool -> m ()-setGutterRendererBackgroundSet obj val = liftIO $ setObjectPropertyBool obj "background-set" val--constructGutterRendererBackgroundSet :: Bool -> IO ([Char], GValue)-constructGutterRendererBackgroundSet val = constructObjectPropertyBool "background-set" val--data GutterRendererBackgroundSetPropertyInfo-instance AttrInfo GutterRendererBackgroundSetPropertyInfo where- type AttrAllowedOps GutterRendererBackgroundSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint GutterRendererBackgroundSetPropertyInfo = (~) Bool- type AttrBaseTypeConstraint GutterRendererBackgroundSetPropertyInfo = GutterRendererK- type AttrGetType GutterRendererBackgroundSetPropertyInfo = Bool- type AttrLabel GutterRendererBackgroundSetPropertyInfo = "background-set"- attrGet _ = getGutterRendererBackgroundSet- attrSet _ = setGutterRendererBackgroundSet- attrConstruct _ = constructGutterRendererBackgroundSet- attrClear _ = undefined---- VVV Prop "size"- -- Type: TBasicType TInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getGutterRendererSize :: (MonadIO m, GutterRendererK o) => o -> m Int32-getGutterRendererSize obj = liftIO $ getObjectPropertyInt32 obj "size"--setGutterRendererSize :: (MonadIO m, GutterRendererK o) => o -> Int32 -> m ()-setGutterRendererSize obj val = liftIO $ setObjectPropertyInt32 obj "size" val--constructGutterRendererSize :: Int32 -> IO ([Char], GValue)-constructGutterRendererSize val = constructObjectPropertyInt32 "size" val--data GutterRendererSizePropertyInfo-instance AttrInfo GutterRendererSizePropertyInfo where- type AttrAllowedOps GutterRendererSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint GutterRendererSizePropertyInfo = (~) Int32- type AttrBaseTypeConstraint GutterRendererSizePropertyInfo = GutterRendererK- type AttrGetType GutterRendererSizePropertyInfo = Int32- type AttrLabel GutterRendererSizePropertyInfo = "size"- attrGet _ = getGutterRendererSize- attrSet _ = setGutterRendererSize- attrConstruct _ = constructGutterRendererSize- attrClear _ = undefined---- VVV Prop "view"- -- Type: TInterface "Gtk" "TextView"- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getGutterRendererView :: (MonadIO m, GutterRendererK o) => o -> m Gtk.TextView-getGutterRendererView obj = liftIO $ checkUnexpectedNothing "getGutterRendererView" $ getObjectPropertyObject obj "view" Gtk.TextView--data GutterRendererViewPropertyInfo-instance AttrInfo GutterRendererViewPropertyInfo where- type AttrAllowedOps GutterRendererViewPropertyInfo = '[ 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint GutterRendererViewPropertyInfo = (~) ()- type AttrBaseTypeConstraint GutterRendererViewPropertyInfo = GutterRendererK- type AttrGetType GutterRendererViewPropertyInfo = Gtk.TextView- type AttrLabel GutterRendererViewPropertyInfo = "view"- attrGet _ = getGutterRendererView- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "visible"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getGutterRendererVisible :: (MonadIO m, GutterRendererK o) => o -> m Bool-getGutterRendererVisible obj = liftIO $ getObjectPropertyBool obj "visible"--setGutterRendererVisible :: (MonadIO m, GutterRendererK o) => o -> Bool -> m ()-setGutterRendererVisible obj val = liftIO $ setObjectPropertyBool obj "visible" val--constructGutterRendererVisible :: Bool -> IO ([Char], GValue)-constructGutterRendererVisible val = constructObjectPropertyBool "visible" val--data GutterRendererVisiblePropertyInfo-instance AttrInfo GutterRendererVisiblePropertyInfo where- type AttrAllowedOps GutterRendererVisiblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint GutterRendererVisiblePropertyInfo = (~) Bool- type AttrBaseTypeConstraint GutterRendererVisiblePropertyInfo = GutterRendererK- type AttrGetType GutterRendererVisiblePropertyInfo = Bool- type AttrLabel GutterRendererVisiblePropertyInfo = "visible"- attrGet _ = getGutterRendererVisible- attrSet _ = setGutterRendererVisible- attrConstruct _ = constructGutterRendererVisible- attrClear _ = undefined---- VVV Prop "window-type"- -- Type: TInterface "Gtk" "TextWindowType"- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getGutterRendererWindowType :: (MonadIO m, GutterRendererK o) => o -> m Gtk.TextWindowType-getGutterRendererWindowType obj = liftIO $ getObjectPropertyEnum obj "window-type"--data GutterRendererWindowTypePropertyInfo-instance AttrInfo GutterRendererWindowTypePropertyInfo where- type AttrAllowedOps GutterRendererWindowTypePropertyInfo = '[ 'AttrGet]- type AttrSetTypeConstraint GutterRendererWindowTypePropertyInfo = (~) ()- type AttrBaseTypeConstraint GutterRendererWindowTypePropertyInfo = GutterRendererK- type AttrGetType GutterRendererWindowTypePropertyInfo = Gtk.TextWindowType- type AttrLabel GutterRendererWindowTypePropertyInfo = "window-type"- attrGet _ = getGutterRendererWindowType- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "xalign"- -- Type: TBasicType TFloat- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getGutterRendererXalign :: (MonadIO m, GutterRendererK o) => o -> m Float-getGutterRendererXalign obj = liftIO $ getObjectPropertyFloat obj "xalign"--setGutterRendererXalign :: (MonadIO m, GutterRendererK o) => o -> Float -> m ()-setGutterRendererXalign obj val = liftIO $ setObjectPropertyFloat obj "xalign" val--constructGutterRendererXalign :: Float -> IO ([Char], GValue)-constructGutterRendererXalign val = constructObjectPropertyFloat "xalign" val--data GutterRendererXalignPropertyInfo-instance AttrInfo GutterRendererXalignPropertyInfo where- type AttrAllowedOps GutterRendererXalignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint GutterRendererXalignPropertyInfo = (~) Float- type AttrBaseTypeConstraint GutterRendererXalignPropertyInfo = GutterRendererK- type AttrGetType GutterRendererXalignPropertyInfo = Float- type AttrLabel GutterRendererXalignPropertyInfo = "xalign"- attrGet _ = getGutterRendererXalign- attrSet _ = setGutterRendererXalign- attrConstruct _ = constructGutterRendererXalign- attrClear _ = undefined---- VVV Prop "xpad"- -- Type: TBasicType TInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getGutterRendererXpad :: (MonadIO m, GutterRendererK o) => o -> m Int32-getGutterRendererXpad obj = liftIO $ getObjectPropertyInt32 obj "xpad"--setGutterRendererXpad :: (MonadIO m, GutterRendererK o) => o -> Int32 -> m ()-setGutterRendererXpad obj val = liftIO $ setObjectPropertyInt32 obj "xpad" val--constructGutterRendererXpad :: Int32 -> IO ([Char], GValue)-constructGutterRendererXpad val = constructObjectPropertyInt32 "xpad" val--data GutterRendererXpadPropertyInfo-instance AttrInfo GutterRendererXpadPropertyInfo where- type AttrAllowedOps GutterRendererXpadPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint GutterRendererXpadPropertyInfo = (~) Int32- type AttrBaseTypeConstraint GutterRendererXpadPropertyInfo = GutterRendererK- type AttrGetType GutterRendererXpadPropertyInfo = Int32- type AttrLabel GutterRendererXpadPropertyInfo = "xpad"- attrGet _ = getGutterRendererXpad- attrSet _ = setGutterRendererXpad- attrConstruct _ = constructGutterRendererXpad- attrClear _ = undefined---- VVV Prop "yalign"- -- Type: TBasicType TFloat- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getGutterRendererYalign :: (MonadIO m, GutterRendererK o) => o -> m Float-getGutterRendererYalign obj = liftIO $ getObjectPropertyFloat obj "yalign"--setGutterRendererYalign :: (MonadIO m, GutterRendererK o) => o -> Float -> m ()-setGutterRendererYalign obj val = liftIO $ setObjectPropertyFloat obj "yalign" val--constructGutterRendererYalign :: Float -> IO ([Char], GValue)-constructGutterRendererYalign val = constructObjectPropertyFloat "yalign" val--data GutterRendererYalignPropertyInfo-instance AttrInfo GutterRendererYalignPropertyInfo where- type AttrAllowedOps GutterRendererYalignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint GutterRendererYalignPropertyInfo = (~) Float- type AttrBaseTypeConstraint GutterRendererYalignPropertyInfo = GutterRendererK- type AttrGetType GutterRendererYalignPropertyInfo = Float- type AttrLabel GutterRendererYalignPropertyInfo = "yalign"- attrGet _ = getGutterRendererYalign- attrSet _ = setGutterRendererYalign- attrConstruct _ = constructGutterRendererYalign- attrClear _ = undefined---- VVV Prop "ypad"- -- Type: TBasicType TInt- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getGutterRendererYpad :: (MonadIO m, GutterRendererK o) => o -> m Int32-getGutterRendererYpad obj = liftIO $ getObjectPropertyInt32 obj "ypad"--setGutterRendererYpad :: (MonadIO m, GutterRendererK o) => o -> Int32 -> m ()-setGutterRendererYpad obj val = liftIO $ setObjectPropertyInt32 obj "ypad" val--constructGutterRendererYpad :: Int32 -> IO ([Char], GValue)-constructGutterRendererYpad val = constructObjectPropertyInt32 "ypad" val--data GutterRendererYpadPropertyInfo-instance AttrInfo GutterRendererYpadPropertyInfo where- type AttrAllowedOps GutterRendererYpadPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint GutterRendererYpadPropertyInfo = (~) Int32- type AttrBaseTypeConstraint GutterRendererYpadPropertyInfo = GutterRendererK- type AttrGetType GutterRendererYpadPropertyInfo = Int32- type AttrLabel GutterRendererYpadPropertyInfo = "ypad"- attrGet _ = getGutterRendererYpad- attrSet _ = setGutterRendererYpad- attrConstruct _ = constructGutterRendererYpad- attrClear _ = undefined--type instance AttributeList GutterRenderer = GutterRendererAttributeList-type GutterRendererAttributeList = ('[ '("alignmentMode", GutterRendererAlignmentModePropertyInfo), '("backgroundRgba", GutterRendererBackgroundRgbaPropertyInfo), '("backgroundSet", GutterRendererBackgroundSetPropertyInfo), '("size", GutterRendererSizePropertyInfo), '("view", GutterRendererViewPropertyInfo), '("visible", GutterRendererVisiblePropertyInfo), '("windowType", GutterRendererWindowTypePropertyInfo), '("xalign", GutterRendererXalignPropertyInfo), '("xpad", GutterRendererXpadPropertyInfo), '("yalign", GutterRendererYalignPropertyInfo), '("ypad", GutterRendererYpadPropertyInfo)] :: [(Symbol, *)])--gutterRendererAlignmentMode :: AttrLabelProxy "alignmentMode"-gutterRendererAlignmentMode = AttrLabelProxy--gutterRendererBackgroundRgba :: AttrLabelProxy "backgroundRgba"-gutterRendererBackgroundRgba = AttrLabelProxy--gutterRendererBackgroundSet :: AttrLabelProxy "backgroundSet"-gutterRendererBackgroundSet = AttrLabelProxy--gutterRendererSize :: AttrLabelProxy "size"-gutterRendererSize = AttrLabelProxy--gutterRendererView :: AttrLabelProxy "view"-gutterRendererView = AttrLabelProxy--gutterRendererVisible :: AttrLabelProxy "visible"-gutterRendererVisible = AttrLabelProxy--gutterRendererWindowType :: AttrLabelProxy "windowType"-gutterRendererWindowType = AttrLabelProxy--gutterRendererXalign :: AttrLabelProxy "xalign"-gutterRendererXalign = AttrLabelProxy--gutterRendererXpad :: AttrLabelProxy "xpad"-gutterRendererXpad = AttrLabelProxy--gutterRendererYalign :: AttrLabelProxy "yalign"-gutterRendererYalign = AttrLabelProxy--gutterRendererYpad :: AttrLabelProxy "ypad"-gutterRendererYpad = AttrLabelProxy--data GutterRendererActivateSignalInfo-instance SignalInfo GutterRendererActivateSignalInfo where- type HaskellCallbackType GutterRendererActivateSignalInfo = GutterRendererActivateCallback- connectSignal _ = connectGutterRendererActivate--data GutterRendererQueryActivatableSignalInfo-instance SignalInfo GutterRendererQueryActivatableSignalInfo where- type HaskellCallbackType GutterRendererQueryActivatableSignalInfo = GutterRendererQueryActivatableCallback- connectSignal _ = connectGutterRendererQueryActivatable--data GutterRendererQueryDataSignalInfo-instance SignalInfo GutterRendererQueryDataSignalInfo where- type HaskellCallbackType GutterRendererQueryDataSignalInfo = GutterRendererQueryDataCallback- connectSignal _ = connectGutterRendererQueryData--data GutterRendererQueryTooltipSignalInfo-instance SignalInfo GutterRendererQueryTooltipSignalInfo where- type HaskellCallbackType GutterRendererQueryTooltipSignalInfo = GutterRendererQueryTooltipCallback- connectSignal _ = connectGutterRendererQueryTooltip--data GutterRendererQueueDrawSignalInfo-instance SignalInfo GutterRendererQueueDrawSignalInfo where- type HaskellCallbackType GutterRendererQueueDrawSignalInfo = GutterRendererQueueDrawCallback- connectSignal _ = connectGutterRendererQueueDraw--type instance SignalList GutterRenderer = GutterRendererSignalList-type GutterRendererSignalList = ('[ '("activate", GutterRendererActivateSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("queryActivatable", GutterRendererQueryActivatableSignalInfo), '("queryData", GutterRendererQueryDataSignalInfo), '("queryTooltip", GutterRendererQueryTooltipSignalInfo), '("queueDraw", GutterRendererQueueDrawSignalInfo)] :: [(Symbol, *)])---- method GutterRenderer::activate--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "area", argType = TInterface "Gdk" "Rectangle", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "event", argType = TInterface "Gdk" "Event", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_activate" gtk_source_gutter_renderer_activate :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- Ptr Gdk.Rectangle -> -- area : TInterface "Gdk" "Rectangle"- Ptr Gdk.Event -> -- event : TInterface "Gdk" "Event"- IO ()---gutterRendererActivate ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> Gdk.Rectangle -- area- -> Gdk.Event -- event- -> m () -- result-gutterRendererActivate _obj iter area event = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- let area' = unsafeManagedPtrGetPtr area- let event' = unsafeManagedPtrGetPtr event- gtk_source_gutter_renderer_activate _obj' iter' area' event'- touchManagedPtr _obj- touchManagedPtr iter- touchManagedPtr area- touchManagedPtr event- return ()--data GutterRendererActivateMethodInfo-instance (signature ~ (Gtk.TextIter -> Gdk.Rectangle -> Gdk.Event -> m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererActivateMethodInfo a signature where- overloadedMethod _ = gutterRendererActivate---- method GutterRenderer::begin--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cr", argType = TInterface "cairo" "Context", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "background_area", argType = TInterface "Gdk" "Rectangle", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cell_area", argType = TInterface "Gdk" "Rectangle", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_begin" gtk_source_gutter_renderer_begin :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Ptr Cairo.Context -> -- cr : TInterface "cairo" "Context"- Ptr Gdk.Rectangle -> -- background_area : TInterface "Gdk" "Rectangle"- Ptr Gdk.Rectangle -> -- cell_area : TInterface "Gdk" "Rectangle"- Ptr Gtk.TextIter -> -- start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- end : TInterface "Gtk" "TextIter"- IO ()---gutterRendererBegin ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> Cairo.Context -- cr- -> Gdk.Rectangle -- backgroundArea- -> Gdk.Rectangle -- cellArea- -> Gtk.TextIter -- start- -> Gtk.TextIter -- end- -> m () -- result-gutterRendererBegin _obj cr backgroundArea cellArea start end = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let cr' = unsafeManagedPtrGetPtr cr- let backgroundArea' = unsafeManagedPtrGetPtr backgroundArea- let cellArea' = unsafeManagedPtrGetPtr cellArea- let start' = unsafeManagedPtrGetPtr start- let end' = unsafeManagedPtrGetPtr end- gtk_source_gutter_renderer_begin _obj' cr' backgroundArea' cellArea' start' end'- touchManagedPtr _obj- touchManagedPtr cr- touchManagedPtr backgroundArea- touchManagedPtr cellArea- touchManagedPtr start- touchManagedPtr end- return ()--data GutterRendererBeginMethodInfo-instance (signature ~ (Cairo.Context -> Gdk.Rectangle -> Gdk.Rectangle -> Gtk.TextIter -> Gtk.TextIter -> m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererBeginMethodInfo a signature where- overloadedMethod _ = gutterRendererBegin---- method GutterRenderer::draw--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cr", argType = TInterface "cairo" "Context", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "background_area", argType = TInterface "Gdk" "Rectangle", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "cell_area", argType = TInterface "Gdk" "Rectangle", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "state", argType = TInterface "GtkSource" "GutterRendererState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_draw" gtk_source_gutter_renderer_draw :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Ptr Cairo.Context -> -- cr : TInterface "cairo" "Context"- Ptr Gdk.Rectangle -> -- background_area : TInterface "Gdk" "Rectangle"- Ptr Gdk.Rectangle -> -- cell_area : TInterface "Gdk" "Rectangle"- Ptr Gtk.TextIter -> -- start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- end : TInterface "Gtk" "TextIter"- CUInt -> -- state : TInterface "GtkSource" "GutterRendererState"- IO ()---gutterRendererDraw ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> Cairo.Context -- cr- -> Gdk.Rectangle -- backgroundArea- -> Gdk.Rectangle -- cellArea- -> Gtk.TextIter -- start- -> Gtk.TextIter -- end- -> [GutterRendererState] -- state- -> m () -- result-gutterRendererDraw _obj cr backgroundArea cellArea start end state = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let cr' = unsafeManagedPtrGetPtr cr- let backgroundArea' = unsafeManagedPtrGetPtr backgroundArea- let cellArea' = unsafeManagedPtrGetPtr cellArea- let start' = unsafeManagedPtrGetPtr start- let end' = unsafeManagedPtrGetPtr end- let state' = gflagsToWord state- gtk_source_gutter_renderer_draw _obj' cr' backgroundArea' cellArea' start' end' state'- touchManagedPtr _obj- touchManagedPtr cr- touchManagedPtr backgroundArea- touchManagedPtr cellArea- touchManagedPtr start- touchManagedPtr end- return ()--data GutterRendererDrawMethodInfo-instance (signature ~ (Cairo.Context -> Gdk.Rectangle -> Gdk.Rectangle -> Gtk.TextIter -> Gtk.TextIter -> [GutterRendererState] -> m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererDrawMethodInfo a signature where- overloadedMethod _ = gutterRendererDraw---- method GutterRenderer::end--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_end" gtk_source_gutter_renderer_end :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- IO ()---gutterRendererEnd ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> m () -- result-gutterRendererEnd _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_gutter_renderer_end _obj'- touchManagedPtr _obj- return ()--data GutterRendererEndMethodInfo-instance (signature ~ (m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererEndMethodInfo a signature where- overloadedMethod _ = gutterRendererEnd---- method GutterRenderer::get_alignment--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "xalign", argType = TBasicType TFloat, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing},Arg {argCName = "yalign", argType = TBasicType TFloat, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_get_alignment" gtk_source_gutter_renderer_get_alignment :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Ptr CFloat -> -- xalign : TBasicType TFloat- Ptr CFloat -> -- yalign : TBasicType TFloat- IO ()---gutterRendererGetAlignment ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> m (Float,Float) -- result-gutterRendererGetAlignment _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- xalign <- allocMem :: IO (Ptr CFloat)- yalign <- allocMem :: IO (Ptr CFloat)- gtk_source_gutter_renderer_get_alignment _obj' xalign yalign- xalign' <- peek xalign- let xalign'' = realToFrac xalign'- yalign' <- peek yalign- let yalign'' = realToFrac yalign'- touchManagedPtr _obj- freeMem xalign- freeMem yalign- return (xalign'', yalign'')--data GutterRendererGetAlignmentMethodInfo-instance (signature ~ (m (Float,Float)), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererGetAlignmentMethodInfo a signature where- overloadedMethod _ = gutterRendererGetAlignment---- method GutterRenderer::get_alignment_mode--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "GutterRendererAlignmentMode")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_get_alignment_mode" gtk_source_gutter_renderer_get_alignment_mode :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- IO CUInt---gutterRendererGetAlignmentMode ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> m GutterRendererAlignmentMode -- result-gutterRendererGetAlignmentMode _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_gutter_renderer_get_alignment_mode _obj'- let result' = (toEnum . fromIntegral) result- touchManagedPtr _obj- return result'--data GutterRendererGetAlignmentModeMethodInfo-instance (signature ~ (m GutterRendererAlignmentMode), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererGetAlignmentModeMethodInfo a signature where- overloadedMethod _ = gutterRendererGetAlignmentMode---- method GutterRenderer::get_background--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "color", argType = TInterface "Gdk" "RGBA", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_get_background" gtk_source_gutter_renderer_get_background :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Ptr Gdk.RGBA -> -- color : TInterface "Gdk" "RGBA"- IO CInt---gutterRendererGetBackground ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> m (Bool,Gdk.RGBA) -- result-gutterRendererGetBackground _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- color <- callocBoxedBytes 32 :: IO (Ptr Gdk.RGBA)- result <- gtk_source_gutter_renderer_get_background _obj' color- let result' = (/= 0) result- color' <- (wrapBoxed Gdk.RGBA) color- touchManagedPtr _obj- return (result', color')--data GutterRendererGetBackgroundMethodInfo-instance (signature ~ (m (Bool,Gdk.RGBA)), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererGetBackgroundMethodInfo a signature where- overloadedMethod _ = gutterRendererGetBackground---- method GutterRenderer::get_padding--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "xpad", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing},Arg {argCName = "ypad", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_get_padding" gtk_source_gutter_renderer_get_padding :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Ptr Int32 -> -- xpad : TBasicType TInt- Ptr Int32 -> -- ypad : TBasicType TInt- IO ()---gutterRendererGetPadding ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> m (Int32,Int32) -- result-gutterRendererGetPadding _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- xpad <- allocMem :: IO (Ptr Int32)- ypad <- allocMem :: IO (Ptr Int32)- gtk_source_gutter_renderer_get_padding _obj' xpad ypad- xpad' <- peek xpad- ypad' <- peek ypad- touchManagedPtr _obj- freeMem xpad- freeMem ypad- return (xpad', ypad')--data GutterRendererGetPaddingMethodInfo-instance (signature ~ (m (Int32,Int32)), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererGetPaddingMethodInfo a signature where- overloadedMethod _ = gutterRendererGetPadding---- method GutterRenderer::get_size--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_get_size" gtk_source_gutter_renderer_get_size :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- IO Int32---gutterRendererGetSize ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> m Int32 -- result-gutterRendererGetSize _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_gutter_renderer_get_size _obj'- touchManagedPtr _obj- return result--data GutterRendererGetSizeMethodInfo-instance (signature ~ (m Int32), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererGetSizeMethodInfo a signature where- overloadedMethod _ = gutterRendererGetSize---- method GutterRenderer::get_view--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gtk" "TextView")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_get_view" gtk_source_gutter_renderer_get_view :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- IO (Ptr Gtk.TextView)---gutterRendererGetView ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> m Gtk.TextView -- result-gutterRendererGetView _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_gutter_renderer_get_view _obj'- checkUnexpectedReturnNULL "gtk_source_gutter_renderer_get_view" result- result' <- (newObject Gtk.TextView) result- touchManagedPtr _obj- return result'--data GutterRendererGetViewMethodInfo-instance (signature ~ (m Gtk.TextView), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererGetViewMethodInfo a signature where- overloadedMethod _ = gutterRendererGetView---- method GutterRenderer::get_visible--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_get_visible" gtk_source_gutter_renderer_get_visible :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- IO CInt---gutterRendererGetVisible ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> m Bool -- result-gutterRendererGetVisible _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_gutter_renderer_get_visible _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data GutterRendererGetVisibleMethodInfo-instance (signature ~ (m Bool), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererGetVisibleMethodInfo a signature where- overloadedMethod _ = gutterRendererGetVisible---- method GutterRenderer::get_window_type--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gtk" "TextWindowType")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_get_window_type" gtk_source_gutter_renderer_get_window_type :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- IO CUInt---gutterRendererGetWindowType ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> m Gtk.TextWindowType -- result-gutterRendererGetWindowType _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_gutter_renderer_get_window_type _obj'- let result' = (toEnum . fromIntegral) result- touchManagedPtr _obj- return result'--data GutterRendererGetWindowTypeMethodInfo-instance (signature ~ (m Gtk.TextWindowType), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererGetWindowTypeMethodInfo a signature where- overloadedMethod _ = gutterRendererGetWindowType---- method GutterRenderer::query_activatable--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "area", argType = TInterface "Gdk" "Rectangle", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "event", argType = TInterface "Gdk" "Event", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_query_activatable" gtk_source_gutter_renderer_query_activatable :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- Ptr Gdk.Rectangle -> -- area : TInterface "Gdk" "Rectangle"- Ptr Gdk.Event -> -- event : TInterface "Gdk" "Event"- IO CInt---gutterRendererQueryActivatable ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> Gdk.Rectangle -- area- -> Gdk.Event -- event- -> m Bool -- result-gutterRendererQueryActivatable _obj iter area event = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- let area' = unsafeManagedPtrGetPtr area- let event' = unsafeManagedPtrGetPtr event- result <- gtk_source_gutter_renderer_query_activatable _obj' iter' area' event'- let result' = (/= 0) result- touchManagedPtr _obj- touchManagedPtr iter- touchManagedPtr area- touchManagedPtr event- return result'--data GutterRendererQueryActivatableMethodInfo-instance (signature ~ (Gtk.TextIter -> Gdk.Rectangle -> Gdk.Event -> m Bool), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererQueryActivatableMethodInfo a signature where- overloadedMethod _ = gutterRendererQueryActivatable---- method GutterRenderer::query_data--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "state", argType = TInterface "GtkSource" "GutterRendererState", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_query_data" gtk_source_gutter_renderer_query_data :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Ptr Gtk.TextIter -> -- start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- end : TInterface "Gtk" "TextIter"- CUInt -> -- state : TInterface "GtkSource" "GutterRendererState"- IO ()---gutterRendererQueryData ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> Gtk.TextIter -- start- -> Gtk.TextIter -- end- -> [GutterRendererState] -- state- -> m () -- result-gutterRendererQueryData _obj start end state = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let start' = unsafeManagedPtrGetPtr start- let end' = unsafeManagedPtrGetPtr end- let state' = gflagsToWord state- gtk_source_gutter_renderer_query_data _obj' start' end' state'- touchManagedPtr _obj- touchManagedPtr start- touchManagedPtr end- return ()--data GutterRendererQueryDataMethodInfo-instance (signature ~ (Gtk.TextIter -> Gtk.TextIter -> [GutterRendererState] -> m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererQueryDataMethodInfo a signature where- overloadedMethod _ = gutterRendererQueryData---- method GutterRenderer::query_tooltip--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "area", argType = TInterface "Gdk" "Rectangle", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "x", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "y", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "tooltip", argType = TInterface "Gtk" "Tooltip", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_query_tooltip" gtk_source_gutter_renderer_query_tooltip :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- Ptr Gdk.Rectangle -> -- area : TInterface "Gdk" "Rectangle"- Int32 -> -- x : TBasicType TInt- Int32 -> -- y : TBasicType TInt- Ptr Gtk.Tooltip -> -- tooltip : TInterface "Gtk" "Tooltip"- IO CInt---gutterRendererQueryTooltip ::- (MonadIO m, GutterRendererK a, Gtk.TooltipK b) =>- a -- _obj- -> Gtk.TextIter -- iter- -> Gdk.Rectangle -- area- -> Int32 -- x- -> Int32 -- y- -> b -- tooltip- -> m Bool -- result-gutterRendererQueryTooltip _obj iter area x y tooltip = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- let area' = unsafeManagedPtrGetPtr area- let tooltip' = unsafeManagedPtrCastPtr tooltip- result <- gtk_source_gutter_renderer_query_tooltip _obj' iter' area' x y tooltip'- let result' = (/= 0) result- touchManagedPtr _obj- touchManagedPtr iter- touchManagedPtr area- touchManagedPtr tooltip- return result'--data GutterRendererQueryTooltipMethodInfo-instance (signature ~ (Gtk.TextIter -> Gdk.Rectangle -> Int32 -> Int32 -> b -> m Bool), MonadIO m, GutterRendererK a, Gtk.TooltipK b) => MethodInfo GutterRendererQueryTooltipMethodInfo a signature where- overloadedMethod _ = gutterRendererQueryTooltip---- method GutterRenderer::queue_draw--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_queue_draw" gtk_source_gutter_renderer_queue_draw :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- IO ()---gutterRendererQueueDraw ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> m () -- result-gutterRendererQueueDraw _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_gutter_renderer_queue_draw _obj'- touchManagedPtr _obj- return ()--data GutterRendererQueueDrawMethodInfo-instance (signature ~ (m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererQueueDrawMethodInfo a signature where- overloadedMethod _ = gutterRendererQueueDraw---- method GutterRenderer::set_alignment--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "xalign", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "yalign", argType = TBasicType TFloat, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_set_alignment" gtk_source_gutter_renderer_set_alignment :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- CFloat -> -- xalign : TBasicType TFloat- CFloat -> -- yalign : TBasicType TFloat- IO ()---gutterRendererSetAlignment ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> Float -- xalign- -> Float -- yalign- -> m () -- result-gutterRendererSetAlignment _obj xalign yalign = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let xalign' = realToFrac xalign- let yalign' = realToFrac yalign- gtk_source_gutter_renderer_set_alignment _obj' xalign' yalign'- touchManagedPtr _obj- return ()--data GutterRendererSetAlignmentMethodInfo-instance (signature ~ (Float -> Float -> m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererSetAlignmentMethodInfo a signature where- overloadedMethod _ = gutterRendererSetAlignment---- method GutterRenderer::set_alignment_mode--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "mode", argType = TInterface "GtkSource" "GutterRendererAlignmentMode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_set_alignment_mode" gtk_source_gutter_renderer_set_alignment_mode :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- CUInt -> -- mode : TInterface "GtkSource" "GutterRendererAlignmentMode"- IO ()---gutterRendererSetAlignmentMode ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> GutterRendererAlignmentMode -- mode- -> m () -- result-gutterRendererSetAlignmentMode _obj mode = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let mode' = (fromIntegral . fromEnum) mode- gtk_source_gutter_renderer_set_alignment_mode _obj' mode'- touchManagedPtr _obj- return ()--data GutterRendererSetAlignmentModeMethodInfo-instance (signature ~ (GutterRendererAlignmentMode -> m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererSetAlignmentModeMethodInfo a signature where- overloadedMethod _ = gutterRendererSetAlignmentMode---- method GutterRenderer::set_background--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "color", argType = TInterface "Gdk" "RGBA", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_set_background" gtk_source_gutter_renderer_set_background :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Ptr Gdk.RGBA -> -- color : TInterface "Gdk" "RGBA"- IO ()---gutterRendererSetBackground ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> Maybe (Gdk.RGBA) -- color- -> m () -- result-gutterRendererSetBackground _obj color = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeColor <- case color of- Nothing -> return nullPtr- Just jColor -> do- let jColor' = unsafeManagedPtrGetPtr jColor- return jColor'- gtk_source_gutter_renderer_set_background _obj' maybeColor- touchManagedPtr _obj- whenJust color touchManagedPtr- return ()--data GutterRendererSetBackgroundMethodInfo-instance (signature ~ (Maybe (Gdk.RGBA) -> m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererSetBackgroundMethodInfo a signature where- overloadedMethod _ = gutterRendererSetBackground---- method GutterRenderer::set_padding--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "xpad", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "ypad", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_set_padding" gtk_source_gutter_renderer_set_padding :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Int32 -> -- xpad : TBasicType TInt- Int32 -> -- ypad : TBasicType TInt- IO ()---gutterRendererSetPadding ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> Int32 -- xpad- -> Int32 -- ypad- -> m () -- result-gutterRendererSetPadding _obj xpad ypad = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_gutter_renderer_set_padding _obj' xpad ypad- touchManagedPtr _obj- return ()--data GutterRendererSetPaddingMethodInfo-instance (signature ~ (Int32 -> Int32 -> m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererSetPaddingMethodInfo a signature where- overloadedMethod _ = gutterRendererSetPadding---- method GutterRenderer::set_size--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "size", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_set_size" gtk_source_gutter_renderer_set_size :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- Int32 -> -- size : TBasicType TInt- IO ()---gutterRendererSetSize ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> Int32 -- size- -> m () -- result-gutterRendererSetSize _obj size = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_gutter_renderer_set_size _obj' size- touchManagedPtr _obj- return ()--data GutterRendererSetSizeMethodInfo-instance (signature ~ (Int32 -> m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererSetSizeMethodInfo a signature where- overloadedMethod _ = gutterRendererSetSize---- method GutterRenderer::set_visible--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRenderer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "visible", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_set_visible" gtk_source_gutter_renderer_set_visible :: - Ptr GutterRenderer -> -- _obj : TInterface "GtkSource" "GutterRenderer"- CInt -> -- visible : TBasicType TBoolean- IO ()---gutterRendererSetVisible ::- (MonadIO m, GutterRendererK a) =>- a -- _obj- -> Bool -- visible- -> m () -- result-gutterRendererSetVisible _obj visible = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let visible' = (fromIntegral . fromEnum) visible- gtk_source_gutter_renderer_set_visible _obj' visible'- touchManagedPtr _obj- return ()--data GutterRendererSetVisibleMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, GutterRendererK a) => MethodInfo GutterRendererSetVisibleMethodInfo a signature where- overloadedMethod _ = gutterRendererSetVisible--
− GI/GtkSource/Objects/GutterRenderer.hs-boot
@@ -1,51 +0,0 @@-module GI.GtkSource.Objects.GutterRenderer where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype GutterRenderer = GutterRenderer (ForeignPtr GutterRenderer)-instance GObject GutterRenderer where-class GObject o => GutterRendererK o-instance (GObject o, IsDescendantOf GutterRenderer o) => GutterRendererK o-data GutterRendererAlignmentModePropertyInfo-data GutterRendererBackgroundRgbaPropertyInfo-data GutterRendererBackgroundSetPropertyInfo-data GutterRendererSizePropertyInfo-data GutterRendererViewPropertyInfo-data GutterRendererVisiblePropertyInfo-data GutterRendererWindowTypePropertyInfo-data GutterRendererXalignPropertyInfo-data GutterRendererXpadPropertyInfo-data GutterRendererYalignPropertyInfo-data GutterRendererYpadPropertyInfo-data GutterRendererActivateSignalInfo-data GutterRendererQueryActivatableSignalInfo-data GutterRendererQueryDataSignalInfo-data GutterRendererQueryTooltipSignalInfo-data GutterRendererQueueDrawSignalInfo-data GutterRendererActivateMethodInfo-data GutterRendererBeginMethodInfo-data GutterRendererDrawMethodInfo-data GutterRendererEndMethodInfo-data GutterRendererGetAlignmentMethodInfo-data GutterRendererGetAlignmentModeMethodInfo-data GutterRendererGetBackgroundMethodInfo-data GutterRendererGetPaddingMethodInfo-data GutterRendererGetSizeMethodInfo-data GutterRendererGetViewMethodInfo-data GutterRendererGetVisibleMethodInfo-data GutterRendererGetWindowTypeMethodInfo-data GutterRendererQueryActivatableMethodInfo-data GutterRendererQueryDataMethodInfo-data GutterRendererQueryTooltipMethodInfo-data GutterRendererQueueDrawMethodInfo-data GutterRendererSetAlignmentMethodInfo-data GutterRendererSetAlignmentModeMethodInfo-data GutterRendererSetBackgroundMethodInfo-data GutterRendererSetPaddingMethodInfo-data GutterRendererSetSizeMethodInfo-data GutterRendererSetVisibleMethodInfo
− GI/GtkSource/Objects/GutterRendererPixbuf.hs
@@ -1,615 +0,0 @@---{- |-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.GtkSource.Objects.GutterRendererPixbuf- ( ---- * Exported types- GutterRendererPixbuf(..) ,- GutterRendererPixbufK ,- toGutterRendererPixbuf ,- noGutterRendererPixbuf ,--- -- * Methods--- ** gutterRendererPixbufGetGicon- GutterRendererPixbufGetGiconMethodInfo ,- gutterRendererPixbufGetGicon ,----- ** gutterRendererPixbufGetIconName- GutterRendererPixbufGetIconNameMethodInfo,- gutterRendererPixbufGetIconName ,----- ** gutterRendererPixbufGetPixbuf- GutterRendererPixbufGetPixbufMethodInfo ,- gutterRendererPixbufGetPixbuf ,----- ** gutterRendererPixbufGetStockId- GutterRendererPixbufGetStockIdMethodInfo,- gutterRendererPixbufGetStockId ,----- ** gutterRendererPixbufNew- gutterRendererPixbufNew ,----- ** gutterRendererPixbufSetGicon- GutterRendererPixbufSetGiconMethodInfo ,- gutterRendererPixbufSetGicon ,----- ** gutterRendererPixbufSetIconName- GutterRendererPixbufSetIconNameMethodInfo,- gutterRendererPixbufSetIconName ,----- ** gutterRendererPixbufSetPixbuf- GutterRendererPixbufSetPixbufMethodInfo ,- gutterRendererPixbufSetPixbuf ,----- ** gutterRendererPixbufSetStockId- GutterRendererPixbufSetStockIdMethodInfo,- gutterRendererPixbufSetStockId ,----- -- * Properties--- ** Gicon- GutterRendererPixbufGiconPropertyInfo ,- clearGutterRendererPixbufGicon ,- constructGutterRendererPixbufGicon ,- getGutterRendererPixbufGicon ,- gutterRendererPixbufGicon ,- setGutterRendererPixbufGicon ,----- ** IconName- GutterRendererPixbufIconNamePropertyInfo,- clearGutterRendererPixbufIconName ,- constructGutterRendererPixbufIconName ,- getGutterRendererPixbufIconName ,- gutterRendererPixbufIconName ,- setGutterRendererPixbufIconName ,----- ** Pixbuf- GutterRendererPixbufPixbufPropertyInfo ,- clearGutterRendererPixbufPixbuf ,- constructGutterRendererPixbufPixbuf ,- getGutterRendererPixbufPixbuf ,- gutterRendererPixbufPixbuf ,- setGutterRendererPixbufPixbuf ,----- ** StockId- GutterRendererPixbufStockIdPropertyInfo ,- clearGutterRendererPixbufStockId ,- constructGutterRendererPixbufStockId ,- getGutterRendererPixbufStockId ,- gutterRendererPixbufStockId ,- setGutterRendererPixbufStockId ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.GdkPixbuf as GdkPixbuf-import qualified GI.Gio as Gio--newtype GutterRendererPixbuf = GutterRendererPixbuf (ForeignPtr GutterRendererPixbuf)-foreign import ccall "gtk_source_gutter_renderer_pixbuf_get_type"- c_gtk_source_gutter_renderer_pixbuf_get_type :: IO GType--type instance ParentTypes GutterRendererPixbuf = GutterRendererPixbufParentTypes-type GutterRendererPixbufParentTypes = '[GutterRenderer, GObject.Object]--instance GObject GutterRendererPixbuf where- gobjectIsInitiallyUnowned _ = True- gobjectType _ = c_gtk_source_gutter_renderer_pixbuf_get_type- --class GObject o => GutterRendererPixbufK o-instance (GObject o, IsDescendantOf GutterRendererPixbuf o) => GutterRendererPixbufK o--toGutterRendererPixbuf :: GutterRendererPixbufK o => o -> IO GutterRendererPixbuf-toGutterRendererPixbuf = unsafeCastTo GutterRendererPixbuf--noGutterRendererPixbuf :: Maybe GutterRendererPixbuf-noGutterRendererPixbuf = Nothing--type family ResolveGutterRendererPixbufMethod (t :: Symbol) (o :: *) :: * where- ResolveGutterRendererPixbufMethod "activate" o = GutterRendererActivateMethodInfo- ResolveGutterRendererPixbufMethod "begin" o = GutterRendererBeginMethodInfo- ResolveGutterRendererPixbufMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveGutterRendererPixbufMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveGutterRendererPixbufMethod "draw" o = GutterRendererDrawMethodInfo- ResolveGutterRendererPixbufMethod "end" o = GutterRendererEndMethodInfo- ResolveGutterRendererPixbufMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveGutterRendererPixbufMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveGutterRendererPixbufMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveGutterRendererPixbufMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveGutterRendererPixbufMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveGutterRendererPixbufMethod "queryActivatable" o = GutterRendererQueryActivatableMethodInfo- ResolveGutterRendererPixbufMethod "queryData" o = GutterRendererQueryDataMethodInfo- ResolveGutterRendererPixbufMethod "queryTooltip" o = GutterRendererQueryTooltipMethodInfo- ResolveGutterRendererPixbufMethod "queueDraw" o = GutterRendererQueueDrawMethodInfo- ResolveGutterRendererPixbufMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveGutterRendererPixbufMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveGutterRendererPixbufMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveGutterRendererPixbufMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveGutterRendererPixbufMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveGutterRendererPixbufMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveGutterRendererPixbufMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveGutterRendererPixbufMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveGutterRendererPixbufMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveGutterRendererPixbufMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveGutterRendererPixbufMethod "getAlignment" o = GutterRendererGetAlignmentMethodInfo- ResolveGutterRendererPixbufMethod "getAlignmentMode" o = GutterRendererGetAlignmentModeMethodInfo- ResolveGutterRendererPixbufMethod "getBackground" o = GutterRendererGetBackgroundMethodInfo- ResolveGutterRendererPixbufMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveGutterRendererPixbufMethod "getGicon" o = GutterRendererPixbufGetGiconMethodInfo- ResolveGutterRendererPixbufMethod "getIconName" o = GutterRendererPixbufGetIconNameMethodInfo- ResolveGutterRendererPixbufMethod "getPadding" o = GutterRendererGetPaddingMethodInfo- ResolveGutterRendererPixbufMethod "getPixbuf" o = GutterRendererPixbufGetPixbufMethodInfo- ResolveGutterRendererPixbufMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveGutterRendererPixbufMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveGutterRendererPixbufMethod "getSize" o = GutterRendererGetSizeMethodInfo- ResolveGutterRendererPixbufMethod "getStockId" o = GutterRendererPixbufGetStockIdMethodInfo- ResolveGutterRendererPixbufMethod "getView" o = GutterRendererGetViewMethodInfo- ResolveGutterRendererPixbufMethod "getVisible" o = GutterRendererGetVisibleMethodInfo- ResolveGutterRendererPixbufMethod "getWindowType" o = GutterRendererGetWindowTypeMethodInfo- ResolveGutterRendererPixbufMethod "setAlignment" o = GutterRendererSetAlignmentMethodInfo- ResolveGutterRendererPixbufMethod "setAlignmentMode" o = GutterRendererSetAlignmentModeMethodInfo- ResolveGutterRendererPixbufMethod "setBackground" o = GutterRendererSetBackgroundMethodInfo- ResolveGutterRendererPixbufMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveGutterRendererPixbufMethod "setGicon" o = GutterRendererPixbufSetGiconMethodInfo- ResolveGutterRendererPixbufMethod "setIconName" o = GutterRendererPixbufSetIconNameMethodInfo- ResolveGutterRendererPixbufMethod "setPadding" o = GutterRendererSetPaddingMethodInfo- ResolveGutterRendererPixbufMethod "setPixbuf" o = GutterRendererPixbufSetPixbufMethodInfo- ResolveGutterRendererPixbufMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveGutterRendererPixbufMethod "setSize" o = GutterRendererSetSizeMethodInfo- ResolveGutterRendererPixbufMethod "setStockId" o = GutterRendererPixbufSetStockIdMethodInfo- ResolveGutterRendererPixbufMethod "setVisible" o = GutterRendererSetVisibleMethodInfo- ResolveGutterRendererPixbufMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveGutterRendererPixbufMethod t GutterRendererPixbuf, MethodInfo info GutterRendererPixbuf p) => IsLabelProxy t (GutterRendererPixbuf -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveGutterRendererPixbufMethod t GutterRendererPixbuf, MethodInfo info GutterRendererPixbuf p) => IsLabel t (GutterRendererPixbuf -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "gicon"- -- Type: TInterface "Gio" "Icon"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just True)--getGutterRendererPixbufGicon :: (MonadIO m, GutterRendererPixbufK o) => o -> m Gio.Icon-getGutterRendererPixbufGicon obj = liftIO $ checkUnexpectedNothing "getGutterRendererPixbufGicon" $ getObjectPropertyObject obj "gicon" Gio.Icon--setGutterRendererPixbufGicon :: (MonadIO m, GutterRendererPixbufK o, Gio.IconK a) => o -> a -> m ()-setGutterRendererPixbufGicon obj val = liftIO $ setObjectPropertyObject obj "gicon" (Just val)--constructGutterRendererPixbufGicon :: (Gio.IconK a) => a -> IO ([Char], GValue)-constructGutterRendererPixbufGicon val = constructObjectPropertyObject "gicon" (Just val)--clearGutterRendererPixbufGicon :: (MonadIO m, GutterRendererPixbufK o) => o -> m ()-clearGutterRendererPixbufGicon obj = liftIO $ setObjectPropertyObject obj "gicon" (Nothing :: Maybe Gio.Icon)--data GutterRendererPixbufGiconPropertyInfo-instance AttrInfo GutterRendererPixbufGiconPropertyInfo where- type AttrAllowedOps GutterRendererPixbufGiconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint GutterRendererPixbufGiconPropertyInfo = Gio.IconK- type AttrBaseTypeConstraint GutterRendererPixbufGiconPropertyInfo = GutterRendererPixbufK- type AttrGetType GutterRendererPixbufGiconPropertyInfo = Gio.Icon- type AttrLabel GutterRendererPixbufGiconPropertyInfo = "gicon"- attrGet _ = getGutterRendererPixbufGicon- attrSet _ = setGutterRendererPixbufGicon- attrConstruct _ = constructGutterRendererPixbufGicon- attrClear _ = clearGutterRendererPixbufGicon---- VVV Prop "icon-name"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just True)--getGutterRendererPixbufIconName :: (MonadIO m, GutterRendererPixbufK o) => o -> m T.Text-getGutterRendererPixbufIconName obj = liftIO $ checkUnexpectedNothing "getGutterRendererPixbufIconName" $ getObjectPropertyString obj "icon-name"--setGutterRendererPixbufIconName :: (MonadIO m, GutterRendererPixbufK o) => o -> T.Text -> m ()-setGutterRendererPixbufIconName obj val = liftIO $ setObjectPropertyString obj "icon-name" (Just val)--constructGutterRendererPixbufIconName :: T.Text -> IO ([Char], GValue)-constructGutterRendererPixbufIconName val = constructObjectPropertyString "icon-name" (Just val)--clearGutterRendererPixbufIconName :: (MonadIO m, GutterRendererPixbufK o) => o -> m ()-clearGutterRendererPixbufIconName obj = liftIO $ setObjectPropertyString obj "icon-name" (Nothing :: Maybe T.Text)--data GutterRendererPixbufIconNamePropertyInfo-instance AttrInfo GutterRendererPixbufIconNamePropertyInfo where- type AttrAllowedOps GutterRendererPixbufIconNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint GutterRendererPixbufIconNamePropertyInfo = (~) T.Text- type AttrBaseTypeConstraint GutterRendererPixbufIconNamePropertyInfo = GutterRendererPixbufK- type AttrGetType GutterRendererPixbufIconNamePropertyInfo = T.Text- type AttrLabel GutterRendererPixbufIconNamePropertyInfo = "icon-name"- attrGet _ = getGutterRendererPixbufIconName- attrSet _ = setGutterRendererPixbufIconName- attrConstruct _ = constructGutterRendererPixbufIconName- attrClear _ = clearGutterRendererPixbufIconName---- VVV Prop "pixbuf"- -- Type: TInterface "GdkPixbuf" "Pixbuf"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just True)--getGutterRendererPixbufPixbuf :: (MonadIO m, GutterRendererPixbufK o) => o -> m GdkPixbuf.Pixbuf-getGutterRendererPixbufPixbuf obj = liftIO $ checkUnexpectedNothing "getGutterRendererPixbufPixbuf" $ getObjectPropertyObject obj "pixbuf" GdkPixbuf.Pixbuf--setGutterRendererPixbufPixbuf :: (MonadIO m, GutterRendererPixbufK o, GdkPixbuf.PixbufK a) => o -> a -> m ()-setGutterRendererPixbufPixbuf obj val = liftIO $ setObjectPropertyObject obj "pixbuf" (Just val)--constructGutterRendererPixbufPixbuf :: (GdkPixbuf.PixbufK a) => a -> IO ([Char], GValue)-constructGutterRendererPixbufPixbuf val = constructObjectPropertyObject "pixbuf" (Just val)--clearGutterRendererPixbufPixbuf :: (MonadIO m, GutterRendererPixbufK o) => o -> m ()-clearGutterRendererPixbufPixbuf obj = liftIO $ setObjectPropertyObject obj "pixbuf" (Nothing :: Maybe GdkPixbuf.Pixbuf)--data GutterRendererPixbufPixbufPropertyInfo-instance AttrInfo GutterRendererPixbufPixbufPropertyInfo where- type AttrAllowedOps GutterRendererPixbufPixbufPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint GutterRendererPixbufPixbufPropertyInfo = GdkPixbuf.PixbufK- type AttrBaseTypeConstraint GutterRendererPixbufPixbufPropertyInfo = GutterRendererPixbufK- type AttrGetType GutterRendererPixbufPixbufPropertyInfo = GdkPixbuf.Pixbuf- type AttrLabel GutterRendererPixbufPixbufPropertyInfo = "pixbuf"- attrGet _ = getGutterRendererPixbufPixbuf- attrSet _ = setGutterRendererPixbufPixbuf- attrConstruct _ = constructGutterRendererPixbufPixbuf- attrClear _ = clearGutterRendererPixbufPixbuf---- VVV Prop "stock-id"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just True)--getGutterRendererPixbufStockId :: (MonadIO m, GutterRendererPixbufK o) => o -> m T.Text-getGutterRendererPixbufStockId obj = liftIO $ checkUnexpectedNothing "getGutterRendererPixbufStockId" $ getObjectPropertyString obj "stock-id"--setGutterRendererPixbufStockId :: (MonadIO m, GutterRendererPixbufK o) => o -> T.Text -> m ()-setGutterRendererPixbufStockId obj val = liftIO $ setObjectPropertyString obj "stock-id" (Just val)--constructGutterRendererPixbufStockId :: T.Text -> IO ([Char], GValue)-constructGutterRendererPixbufStockId val = constructObjectPropertyString "stock-id" (Just val)--clearGutterRendererPixbufStockId :: (MonadIO m, GutterRendererPixbufK o) => o -> m ()-clearGutterRendererPixbufStockId obj = liftIO $ setObjectPropertyString obj "stock-id" (Nothing :: Maybe T.Text)--data GutterRendererPixbufStockIdPropertyInfo-instance AttrInfo GutterRendererPixbufStockIdPropertyInfo where- type AttrAllowedOps GutterRendererPixbufStockIdPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint GutterRendererPixbufStockIdPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint GutterRendererPixbufStockIdPropertyInfo = GutterRendererPixbufK- type AttrGetType GutterRendererPixbufStockIdPropertyInfo = T.Text- type AttrLabel GutterRendererPixbufStockIdPropertyInfo = "stock-id"- attrGet _ = getGutterRendererPixbufStockId- attrSet _ = setGutterRendererPixbufStockId- attrConstruct _ = constructGutterRendererPixbufStockId- attrClear _ = clearGutterRendererPixbufStockId--type instance AttributeList GutterRendererPixbuf = GutterRendererPixbufAttributeList-type GutterRendererPixbufAttributeList = ('[ '("alignmentMode", GutterRendererAlignmentModePropertyInfo), '("backgroundRgba", GutterRendererBackgroundRgbaPropertyInfo), '("backgroundSet", GutterRendererBackgroundSetPropertyInfo), '("gicon", GutterRendererPixbufGiconPropertyInfo), '("iconName", GutterRendererPixbufIconNamePropertyInfo), '("pixbuf", GutterRendererPixbufPixbufPropertyInfo), '("size", GutterRendererSizePropertyInfo), '("stockId", GutterRendererPixbufStockIdPropertyInfo), '("view", GutterRendererViewPropertyInfo), '("visible", GutterRendererVisiblePropertyInfo), '("windowType", GutterRendererWindowTypePropertyInfo), '("xalign", GutterRendererXalignPropertyInfo), '("xpad", GutterRendererXpadPropertyInfo), '("yalign", GutterRendererYalignPropertyInfo), '("ypad", GutterRendererYpadPropertyInfo)] :: [(Symbol, *)])--gutterRendererPixbufGicon :: AttrLabelProxy "gicon"-gutterRendererPixbufGicon = AttrLabelProxy--gutterRendererPixbufIconName :: AttrLabelProxy "iconName"-gutterRendererPixbufIconName = AttrLabelProxy--gutterRendererPixbufPixbuf :: AttrLabelProxy "pixbuf"-gutterRendererPixbufPixbuf = AttrLabelProxy--gutterRendererPixbufStockId :: AttrLabelProxy "stockId"-gutterRendererPixbufStockId = AttrLabelProxy--type instance SignalList GutterRendererPixbuf = GutterRendererPixbufSignalList-type GutterRendererPixbufSignalList = ('[ '("activate", GutterRendererActivateSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("queryActivatable", GutterRendererQueryActivatableSignalInfo), '("queryData", GutterRendererQueryDataSignalInfo), '("queryTooltip", GutterRendererQueryTooltipSignalInfo), '("queueDraw", GutterRendererQueueDrawSignalInfo)] :: [(Symbol, *)])---- method GutterRendererPixbuf::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "GutterRendererPixbuf")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_pixbuf_new" gtk_source_gutter_renderer_pixbuf_new :: - IO (Ptr GutterRendererPixbuf)---gutterRendererPixbufNew ::- (MonadIO m) =>- m GutterRendererPixbuf -- result-gutterRendererPixbufNew = liftIO $ do- result <- gtk_source_gutter_renderer_pixbuf_new- checkUnexpectedReturnNULL "gtk_source_gutter_renderer_pixbuf_new" result- result' <- (wrapObject GutterRendererPixbuf) result- return result'---- method GutterRendererPixbuf::get_gicon--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererPixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gio" "Icon")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_pixbuf_get_gicon" gtk_source_gutter_renderer_pixbuf_get_gicon :: - Ptr GutterRendererPixbuf -> -- _obj : TInterface "GtkSource" "GutterRendererPixbuf"- IO (Ptr Gio.Icon)---gutterRendererPixbufGetGicon ::- (MonadIO m, GutterRendererPixbufK a) =>- a -- _obj- -> m Gio.Icon -- result-gutterRendererPixbufGetGicon _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_gutter_renderer_pixbuf_get_gicon _obj'- checkUnexpectedReturnNULL "gtk_source_gutter_renderer_pixbuf_get_gicon" result- result' <- (newObject Gio.Icon) result- touchManagedPtr _obj- return result'--data GutterRendererPixbufGetGiconMethodInfo-instance (signature ~ (m Gio.Icon), MonadIO m, GutterRendererPixbufK a) => MethodInfo GutterRendererPixbufGetGiconMethodInfo a signature where- overloadedMethod _ = gutterRendererPixbufGetGicon---- method GutterRendererPixbuf::get_icon_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererPixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_pixbuf_get_icon_name" gtk_source_gutter_renderer_pixbuf_get_icon_name :: - Ptr GutterRendererPixbuf -> -- _obj : TInterface "GtkSource" "GutterRendererPixbuf"- IO CString---gutterRendererPixbufGetIconName ::- (MonadIO m, GutterRendererPixbufK a) =>- a -- _obj- -> m T.Text -- result-gutterRendererPixbufGetIconName _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_gutter_renderer_pixbuf_get_icon_name _obj'- checkUnexpectedReturnNULL "gtk_source_gutter_renderer_pixbuf_get_icon_name" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data GutterRendererPixbufGetIconNameMethodInfo-instance (signature ~ (m T.Text), MonadIO m, GutterRendererPixbufK a) => MethodInfo GutterRendererPixbufGetIconNameMethodInfo a signature where- overloadedMethod _ = gutterRendererPixbufGetIconName---- method GutterRendererPixbuf::get_pixbuf--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererPixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GdkPixbuf" "Pixbuf")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_pixbuf_get_pixbuf" gtk_source_gutter_renderer_pixbuf_get_pixbuf :: - Ptr GutterRendererPixbuf -> -- _obj : TInterface "GtkSource" "GutterRendererPixbuf"- IO (Ptr GdkPixbuf.Pixbuf)---gutterRendererPixbufGetPixbuf ::- (MonadIO m, GutterRendererPixbufK a) =>- a -- _obj- -> m GdkPixbuf.Pixbuf -- result-gutterRendererPixbufGetPixbuf _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_gutter_renderer_pixbuf_get_pixbuf _obj'- checkUnexpectedReturnNULL "gtk_source_gutter_renderer_pixbuf_get_pixbuf" result- result' <- (newObject GdkPixbuf.Pixbuf) result- touchManagedPtr _obj- return result'--data GutterRendererPixbufGetPixbufMethodInfo-instance (signature ~ (m GdkPixbuf.Pixbuf), MonadIO m, GutterRendererPixbufK a) => MethodInfo GutterRendererPixbufGetPixbufMethodInfo a signature where- overloadedMethod _ = gutterRendererPixbufGetPixbuf---- method GutterRendererPixbuf::get_stock_id--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererPixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_pixbuf_get_stock_id" gtk_source_gutter_renderer_pixbuf_get_stock_id :: - Ptr GutterRendererPixbuf -> -- _obj : TInterface "GtkSource" "GutterRendererPixbuf"- IO CString--{-# DEPRECATED gutterRendererPixbufGetStockId ["(Since version 3.10)","Don't use this function."]#-}-gutterRendererPixbufGetStockId ::- (MonadIO m, GutterRendererPixbufK a) =>- a -- _obj- -> m T.Text -- result-gutterRendererPixbufGetStockId _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_gutter_renderer_pixbuf_get_stock_id _obj'- checkUnexpectedReturnNULL "gtk_source_gutter_renderer_pixbuf_get_stock_id" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data GutterRendererPixbufGetStockIdMethodInfo-instance (signature ~ (m T.Text), MonadIO m, GutterRendererPixbufK a) => MethodInfo GutterRendererPixbufGetStockIdMethodInfo a signature where- overloadedMethod _ = gutterRendererPixbufGetStockId---- method GutterRendererPixbuf::set_gicon--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererPixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon", argType = TInterface "Gio" "Icon", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_pixbuf_set_gicon" gtk_source_gutter_renderer_pixbuf_set_gicon :: - Ptr GutterRendererPixbuf -> -- _obj : TInterface "GtkSource" "GutterRendererPixbuf"- Ptr Gio.Icon -> -- icon : TInterface "Gio" "Icon"- IO ()---gutterRendererPixbufSetGicon ::- (MonadIO m, GutterRendererPixbufK a, Gio.IconK b) =>- a -- _obj- -> Maybe (b) -- icon- -> m () -- result-gutterRendererPixbufSetGicon _obj icon = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeIcon <- case icon of- Nothing -> return nullPtr- Just jIcon -> do- let jIcon' = unsafeManagedPtrCastPtr jIcon- return jIcon'- gtk_source_gutter_renderer_pixbuf_set_gicon _obj' maybeIcon- touchManagedPtr _obj- whenJust icon touchManagedPtr- return ()--data GutterRendererPixbufSetGiconMethodInfo-instance (signature ~ (Maybe (b) -> m ()), MonadIO m, GutterRendererPixbufK a, Gio.IconK b) => MethodInfo GutterRendererPixbufSetGiconMethodInfo a signature where- overloadedMethod _ = gutterRendererPixbufSetGicon---- method GutterRendererPixbuf::set_icon_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererPixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_pixbuf_set_icon_name" gtk_source_gutter_renderer_pixbuf_set_icon_name :: - Ptr GutterRendererPixbuf -> -- _obj : TInterface "GtkSource" "GutterRendererPixbuf"- CString -> -- icon_name : TBasicType TUTF8- IO ()---gutterRendererPixbufSetIconName ::- (MonadIO m, GutterRendererPixbufK a) =>- a -- _obj- -> Maybe (T.Text) -- iconName- -> m () -- result-gutterRendererPixbufSetIconName _obj iconName = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeIconName <- case iconName of- Nothing -> return nullPtr- Just jIconName -> do- jIconName' <- textToCString jIconName- return jIconName'- gtk_source_gutter_renderer_pixbuf_set_icon_name _obj' maybeIconName- touchManagedPtr _obj- freeMem maybeIconName- return ()--data GutterRendererPixbufSetIconNameMethodInfo-instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, GutterRendererPixbufK a) => MethodInfo GutterRendererPixbufSetIconNameMethodInfo a signature where- overloadedMethod _ = gutterRendererPixbufSetIconName---- method GutterRendererPixbuf::set_pixbuf--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererPixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pixbuf", argType = TInterface "GdkPixbuf" "Pixbuf", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_pixbuf_set_pixbuf" gtk_source_gutter_renderer_pixbuf_set_pixbuf :: - Ptr GutterRendererPixbuf -> -- _obj : TInterface "GtkSource" "GutterRendererPixbuf"- Ptr GdkPixbuf.Pixbuf -> -- pixbuf : TInterface "GdkPixbuf" "Pixbuf"- IO ()---gutterRendererPixbufSetPixbuf ::- (MonadIO m, GutterRendererPixbufK a, GdkPixbuf.PixbufK b) =>- a -- _obj- -> Maybe (b) -- pixbuf- -> m () -- result-gutterRendererPixbufSetPixbuf _obj pixbuf = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybePixbuf <- case pixbuf of- Nothing -> return nullPtr- Just jPixbuf -> do- let jPixbuf' = unsafeManagedPtrCastPtr jPixbuf- return jPixbuf'- gtk_source_gutter_renderer_pixbuf_set_pixbuf _obj' maybePixbuf- touchManagedPtr _obj- whenJust pixbuf touchManagedPtr- return ()--data GutterRendererPixbufSetPixbufMethodInfo-instance (signature ~ (Maybe (b) -> m ()), MonadIO m, GutterRendererPixbufK a, GdkPixbuf.PixbufK b) => MethodInfo GutterRendererPixbufSetPixbufMethodInfo a signature where- overloadedMethod _ = gutterRendererPixbufSetPixbuf---- method GutterRendererPixbuf::set_stock_id--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererPixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "stock_id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_pixbuf_set_stock_id" gtk_source_gutter_renderer_pixbuf_set_stock_id :: - Ptr GutterRendererPixbuf -> -- _obj : TInterface "GtkSource" "GutterRendererPixbuf"- CString -> -- stock_id : TBasicType TUTF8- IO ()--{-# DEPRECATED gutterRendererPixbufSetStockId ["(Since version 3.10)","Don't use this function."]#-}-gutterRendererPixbufSetStockId ::- (MonadIO m, GutterRendererPixbufK a) =>- a -- _obj- -> Maybe (T.Text) -- stockId- -> m () -- result-gutterRendererPixbufSetStockId _obj stockId = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeStockId <- case stockId of- Nothing -> return nullPtr- Just jStockId -> do- jStockId' <- textToCString jStockId- return jStockId'- gtk_source_gutter_renderer_pixbuf_set_stock_id _obj' maybeStockId- touchManagedPtr _obj- freeMem maybeStockId- return ()--data GutterRendererPixbufSetStockIdMethodInfo-instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, GutterRendererPixbufK a) => MethodInfo GutterRendererPixbufSetStockIdMethodInfo a signature where- overloadedMethod _ = gutterRendererPixbufSetStockId--
− GI/GtkSource/Objects/GutterRendererPixbuf.hs-boot
@@ -1,25 +0,0 @@-module GI.GtkSource.Objects.GutterRendererPixbuf where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype GutterRendererPixbuf = GutterRendererPixbuf (ForeignPtr GutterRendererPixbuf)-instance GObject GutterRendererPixbuf where-class GObject o => GutterRendererPixbufK o-instance (GObject o, IsDescendantOf GutterRendererPixbuf o) => GutterRendererPixbufK o-data GutterRendererPixbufGiconPropertyInfo-data GutterRendererPixbufIconNamePropertyInfo-data GutterRendererPixbufPixbufPropertyInfo-data GutterRendererPixbufStockIdPropertyInfo-data GutterRendererPixbufGetGiconMethodInfo-data GutterRendererPixbufGetIconNameMethodInfo-data GutterRendererPixbufGetPixbufMethodInfo-data GutterRendererPixbufGetStockIdMethodInfo-data GutterRendererPixbufSetGiconMethodInfo-data GutterRendererPixbufSetIconNameMethodInfo-data GutterRendererPixbufSetPixbufMethodInfo-data GutterRendererPixbufSetStockIdMethodInfo
− GI/GtkSource/Objects/GutterRendererText.hs
@@ -1,395 +0,0 @@---{- |-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.GtkSource.Objects.GutterRendererText- ( ---- * Exported types- GutterRendererText(..) ,- GutterRendererTextK ,- toGutterRendererText ,- noGutterRendererText ,--- -- * Methods--- ** gutterRendererTextMeasure- GutterRendererTextMeasureMethodInfo ,- gutterRendererTextMeasure ,----- ** gutterRendererTextMeasureMarkup- GutterRendererTextMeasureMarkupMethodInfo,- gutterRendererTextMeasureMarkup ,----- ** gutterRendererTextNew- gutterRendererTextNew ,----- ** gutterRendererTextSetMarkup- GutterRendererTextSetMarkupMethodInfo ,- gutterRendererTextSetMarkup ,----- ** gutterRendererTextSetText- GutterRendererTextSetTextMethodInfo ,- gutterRendererTextSetText ,----- -- * Properties--- ** Markup- GutterRendererTextMarkupPropertyInfo ,- clearGutterRendererTextMarkup ,- constructGutterRendererTextMarkup ,- getGutterRendererTextMarkup ,- gutterRendererTextMarkup ,- setGutterRendererTextMarkup ,----- ** Text- GutterRendererTextTextPropertyInfo ,- clearGutterRendererTextText ,- constructGutterRendererTextText ,- getGutterRendererTextText ,- gutterRendererTextText ,- setGutterRendererTextText ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject--newtype GutterRendererText = GutterRendererText (ForeignPtr GutterRendererText)-foreign import ccall "gtk_source_gutter_renderer_text_get_type"- c_gtk_source_gutter_renderer_text_get_type :: IO GType--type instance ParentTypes GutterRendererText = GutterRendererTextParentTypes-type GutterRendererTextParentTypes = '[GutterRenderer, GObject.Object]--instance GObject GutterRendererText where- gobjectIsInitiallyUnowned _ = True- gobjectType _ = c_gtk_source_gutter_renderer_text_get_type- --class GObject o => GutterRendererTextK o-instance (GObject o, IsDescendantOf GutterRendererText o) => GutterRendererTextK o--toGutterRendererText :: GutterRendererTextK o => o -> IO GutterRendererText-toGutterRendererText = unsafeCastTo GutterRendererText--noGutterRendererText :: Maybe GutterRendererText-noGutterRendererText = Nothing--type family ResolveGutterRendererTextMethod (t :: Symbol) (o :: *) :: * where- ResolveGutterRendererTextMethod "activate" o = GutterRendererActivateMethodInfo- ResolveGutterRendererTextMethod "begin" o = GutterRendererBeginMethodInfo- ResolveGutterRendererTextMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveGutterRendererTextMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveGutterRendererTextMethod "draw" o = GutterRendererDrawMethodInfo- ResolveGutterRendererTextMethod "end" o = GutterRendererEndMethodInfo- ResolveGutterRendererTextMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveGutterRendererTextMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveGutterRendererTextMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveGutterRendererTextMethod "measure" o = GutterRendererTextMeasureMethodInfo- ResolveGutterRendererTextMethod "measureMarkup" o = GutterRendererTextMeasureMarkupMethodInfo- ResolveGutterRendererTextMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveGutterRendererTextMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveGutterRendererTextMethod "queryActivatable" o = GutterRendererQueryActivatableMethodInfo- ResolveGutterRendererTextMethod "queryData" o = GutterRendererQueryDataMethodInfo- ResolveGutterRendererTextMethod "queryTooltip" o = GutterRendererQueryTooltipMethodInfo- ResolveGutterRendererTextMethod "queueDraw" o = GutterRendererQueueDrawMethodInfo- ResolveGutterRendererTextMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveGutterRendererTextMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveGutterRendererTextMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveGutterRendererTextMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveGutterRendererTextMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveGutterRendererTextMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveGutterRendererTextMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveGutterRendererTextMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveGutterRendererTextMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveGutterRendererTextMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveGutterRendererTextMethod "getAlignment" o = GutterRendererGetAlignmentMethodInfo- ResolveGutterRendererTextMethod "getAlignmentMode" o = GutterRendererGetAlignmentModeMethodInfo- ResolveGutterRendererTextMethod "getBackground" o = GutterRendererGetBackgroundMethodInfo- ResolveGutterRendererTextMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveGutterRendererTextMethod "getPadding" o = GutterRendererGetPaddingMethodInfo- ResolveGutterRendererTextMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveGutterRendererTextMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveGutterRendererTextMethod "getSize" o = GutterRendererGetSizeMethodInfo- ResolveGutterRendererTextMethod "getView" o = GutterRendererGetViewMethodInfo- ResolveGutterRendererTextMethod "getVisible" o = GutterRendererGetVisibleMethodInfo- ResolveGutterRendererTextMethod "getWindowType" o = GutterRendererGetWindowTypeMethodInfo- ResolveGutterRendererTextMethod "setAlignment" o = GutterRendererSetAlignmentMethodInfo- ResolveGutterRendererTextMethod "setAlignmentMode" o = GutterRendererSetAlignmentModeMethodInfo- ResolveGutterRendererTextMethod "setBackground" o = GutterRendererSetBackgroundMethodInfo- ResolveGutterRendererTextMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveGutterRendererTextMethod "setMarkup" o = GutterRendererTextSetMarkupMethodInfo- ResolveGutterRendererTextMethod "setPadding" o = GutterRendererSetPaddingMethodInfo- ResolveGutterRendererTextMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveGutterRendererTextMethod "setSize" o = GutterRendererSetSizeMethodInfo- ResolveGutterRendererTextMethod "setText" o = GutterRendererTextSetTextMethodInfo- ResolveGutterRendererTextMethod "setVisible" o = GutterRendererSetVisibleMethodInfo- ResolveGutterRendererTextMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveGutterRendererTextMethod t GutterRendererText, MethodInfo info GutterRendererText p) => IsLabelProxy t (GutterRendererText -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveGutterRendererTextMethod t GutterRendererText, MethodInfo info GutterRendererText p) => IsLabel t (GutterRendererText -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "markup"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getGutterRendererTextMarkup :: (MonadIO m, GutterRendererTextK o) => o -> m (Maybe T.Text)-getGutterRendererTextMarkup obj = liftIO $ getObjectPropertyString obj "markup"--setGutterRendererTextMarkup :: (MonadIO m, GutterRendererTextK o) => o -> T.Text -> m ()-setGutterRendererTextMarkup obj val = liftIO $ setObjectPropertyString obj "markup" (Just val)--constructGutterRendererTextMarkup :: T.Text -> IO ([Char], GValue)-constructGutterRendererTextMarkup val = constructObjectPropertyString "markup" (Just val)--clearGutterRendererTextMarkup :: (MonadIO m, GutterRendererTextK o) => o -> m ()-clearGutterRendererTextMarkup obj = liftIO $ setObjectPropertyString obj "markup" (Nothing :: Maybe T.Text)--data GutterRendererTextMarkupPropertyInfo-instance AttrInfo GutterRendererTextMarkupPropertyInfo where- type AttrAllowedOps GutterRendererTextMarkupPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint GutterRendererTextMarkupPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint GutterRendererTextMarkupPropertyInfo = GutterRendererTextK- type AttrGetType GutterRendererTextMarkupPropertyInfo = (Maybe T.Text)- type AttrLabel GutterRendererTextMarkupPropertyInfo = "markup"- attrGet _ = getGutterRendererTextMarkup- attrSet _ = setGutterRendererTextMarkup- attrConstruct _ = constructGutterRendererTextMarkup- attrClear _ = clearGutterRendererTextMarkup---- VVV Prop "text"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Nothing,Nothing)--getGutterRendererTextText :: (MonadIO m, GutterRendererTextK o) => o -> m (Maybe T.Text)-getGutterRendererTextText obj = liftIO $ getObjectPropertyString obj "text"--setGutterRendererTextText :: (MonadIO m, GutterRendererTextK o) => o -> T.Text -> m ()-setGutterRendererTextText obj val = liftIO $ setObjectPropertyString obj "text" (Just val)--constructGutterRendererTextText :: T.Text -> IO ([Char], GValue)-constructGutterRendererTextText val = constructObjectPropertyString "text" (Just val)--clearGutterRendererTextText :: (MonadIO m, GutterRendererTextK o) => o -> m ()-clearGutterRendererTextText obj = liftIO $ setObjectPropertyString obj "text" (Nothing :: Maybe T.Text)--data GutterRendererTextTextPropertyInfo-instance AttrInfo GutterRendererTextTextPropertyInfo where- type AttrAllowedOps GutterRendererTextTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint GutterRendererTextTextPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint GutterRendererTextTextPropertyInfo = GutterRendererTextK- type AttrGetType GutterRendererTextTextPropertyInfo = (Maybe T.Text)- type AttrLabel GutterRendererTextTextPropertyInfo = "text"- attrGet _ = getGutterRendererTextText- attrSet _ = setGutterRendererTextText- attrConstruct _ = constructGutterRendererTextText- attrClear _ = clearGutterRendererTextText--type instance AttributeList GutterRendererText = GutterRendererTextAttributeList-type GutterRendererTextAttributeList = ('[ '("alignmentMode", GutterRendererAlignmentModePropertyInfo), '("backgroundRgba", GutterRendererBackgroundRgbaPropertyInfo), '("backgroundSet", GutterRendererBackgroundSetPropertyInfo), '("markup", GutterRendererTextMarkupPropertyInfo), '("size", GutterRendererSizePropertyInfo), '("text", GutterRendererTextTextPropertyInfo), '("view", GutterRendererViewPropertyInfo), '("visible", GutterRendererVisiblePropertyInfo), '("windowType", GutterRendererWindowTypePropertyInfo), '("xalign", GutterRendererXalignPropertyInfo), '("xpad", GutterRendererXpadPropertyInfo), '("yalign", GutterRendererYalignPropertyInfo), '("ypad", GutterRendererYpadPropertyInfo)] :: [(Symbol, *)])--gutterRendererTextMarkup :: AttrLabelProxy "markup"-gutterRendererTextMarkup = AttrLabelProxy--gutterRendererTextText :: AttrLabelProxy "text"-gutterRendererTextText = AttrLabelProxy--type instance SignalList GutterRendererText = GutterRendererTextSignalList-type GutterRendererTextSignalList = ('[ '("activate", GutterRendererActivateSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("queryActivatable", GutterRendererQueryActivatableSignalInfo), '("queryData", GutterRendererQueryDataSignalInfo), '("queryTooltip", GutterRendererQueryTooltipSignalInfo), '("queueDraw", GutterRendererQueueDrawSignalInfo)] :: [(Symbol, *)])---- method GutterRendererText::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "GutterRendererText")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_text_new" gtk_source_gutter_renderer_text_new :: - IO (Ptr GutterRendererText)---gutterRendererTextNew ::- (MonadIO m) =>- m GutterRendererText -- result-gutterRendererTextNew = liftIO $ do- result <- gtk_source_gutter_renderer_text_new- checkUnexpectedReturnNULL "gtk_source_gutter_renderer_text_new" result- result' <- (wrapObject GutterRendererText) result- return result'---- method GutterRendererText::measure--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererText", 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 = "width", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "height", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_text_measure" gtk_source_gutter_renderer_text_measure :: - Ptr GutterRendererText -> -- _obj : TInterface "GtkSource" "GutterRendererText"- CString -> -- text : TBasicType TUTF8- Ptr Int32 -> -- width : TBasicType TInt- Ptr Int32 -> -- height : TBasicType TInt- IO ()---gutterRendererTextMeasure ::- (MonadIO m, GutterRendererTextK a) =>- a -- _obj- -> T.Text -- text- -> m (Int32,Int32) -- result-gutterRendererTextMeasure _obj text = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- text' <- textToCString text- width <- allocMem :: IO (Ptr Int32)- height <- allocMem :: IO (Ptr Int32)- gtk_source_gutter_renderer_text_measure _obj' text' width height- width' <- peek width- height' <- peek height- touchManagedPtr _obj- freeMem text'- freeMem width- freeMem height- return (width', height')--data GutterRendererTextMeasureMethodInfo-instance (signature ~ (T.Text -> m (Int32,Int32)), MonadIO m, GutterRendererTextK a) => MethodInfo GutterRendererTextMeasureMethodInfo a signature where- overloadedMethod _ = gutterRendererTextMeasure---- method GutterRendererText::measure_markup--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererText", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "markup", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "width", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything},Arg {argCName = "height", argType = TBasicType TInt, direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferEverything}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_text_measure_markup" gtk_source_gutter_renderer_text_measure_markup :: - Ptr GutterRendererText -> -- _obj : TInterface "GtkSource" "GutterRendererText"- CString -> -- markup : TBasicType TUTF8- Ptr Int32 -> -- width : TBasicType TInt- Ptr Int32 -> -- height : TBasicType TInt- IO ()---gutterRendererTextMeasureMarkup ::- (MonadIO m, GutterRendererTextK a) =>- a -- _obj- -> T.Text -- markup- -> m (Int32,Int32) -- result-gutterRendererTextMeasureMarkup _obj markup = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- markup' <- textToCString markup- width <- allocMem :: IO (Ptr Int32)- height <- allocMem :: IO (Ptr Int32)- gtk_source_gutter_renderer_text_measure_markup _obj' markup' width height- width' <- peek width- height' <- peek height- touchManagedPtr _obj- freeMem markup'- freeMem width- freeMem height- return (width', height')--data GutterRendererTextMeasureMarkupMethodInfo-instance (signature ~ (T.Text -> m (Int32,Int32)), MonadIO m, GutterRendererTextK a) => MethodInfo GutterRendererTextMeasureMarkupMethodInfo a signature where- overloadedMethod _ = gutterRendererTextMeasureMarkup---- method GutterRendererText::set_markup--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererText", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "markup", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "length", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_text_set_markup" gtk_source_gutter_renderer_text_set_markup :: - Ptr GutterRendererText -> -- _obj : TInterface "GtkSource" "GutterRendererText"- CString -> -- markup : TBasicType TUTF8- Int32 -> -- length : TBasicType TInt- IO ()---gutterRendererTextSetMarkup ::- (MonadIO m, GutterRendererTextK a) =>- a -- _obj- -> T.Text -- markup- -> Int32 -- length_- -> m () -- result-gutterRendererTextSetMarkup _obj markup length_ = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- markup' <- textToCString markup- gtk_source_gutter_renderer_text_set_markup _obj' markup' length_- touchManagedPtr _obj- freeMem markup'- return ()--data GutterRendererTextSetMarkupMethodInfo-instance (signature ~ (T.Text -> Int32 -> m ()), MonadIO m, GutterRendererTextK a) => MethodInfo GutterRendererTextSetMarkupMethodInfo a signature where- overloadedMethod _ = gutterRendererTextSetMarkup---- method GutterRendererText::set_text--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "GutterRendererText", 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 = "length", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_gutter_renderer_text_set_text" gtk_source_gutter_renderer_text_set_text :: - Ptr GutterRendererText -> -- _obj : TInterface "GtkSource" "GutterRendererText"- CString -> -- text : TBasicType TUTF8- Int32 -> -- length : TBasicType TInt- IO ()---gutterRendererTextSetText ::- (MonadIO m, GutterRendererTextK a) =>- a -- _obj- -> T.Text -- text- -> Int32 -- length_- -> m () -- result-gutterRendererTextSetText _obj text length_ = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- text' <- textToCString text- gtk_source_gutter_renderer_text_set_text _obj' text' length_- touchManagedPtr _obj- freeMem text'- return ()--data GutterRendererTextSetTextMethodInfo-instance (signature ~ (T.Text -> Int32 -> m ()), MonadIO m, GutterRendererTextK a) => MethodInfo GutterRendererTextSetTextMethodInfo a signature where- overloadedMethod _ = gutterRendererTextSetText--
− GI/GtkSource/Objects/GutterRendererText.hs-boot
@@ -1,19 +0,0 @@-module GI.GtkSource.Objects.GutterRendererText where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype GutterRendererText = GutterRendererText (ForeignPtr GutterRendererText)-instance GObject GutterRendererText where-class GObject o => GutterRendererTextK o-instance (GObject o, IsDescendantOf GutterRendererText o) => GutterRendererTextK o-data GutterRendererTextMarkupPropertyInfo-data GutterRendererTextTextPropertyInfo-data GutterRendererTextMeasureMethodInfo-data GutterRendererTextMeasureMarkupMethodInfo-data GutterRendererTextSetMarkupMethodInfo-data GutterRendererTextSetTextMethodInfo
− GI/GtkSource/Objects/Language.hs
@@ -1,587 +0,0 @@---{- |-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.GtkSource.Objects.Language- ( ---- * Exported types- Language(..) ,- LanguageK ,- toLanguage ,- noLanguage ,--- -- * Methods--- ** languageGetGlobs- LanguageGetGlobsMethodInfo ,- languageGetGlobs ,----- ** languageGetHidden- LanguageGetHiddenMethodInfo ,- languageGetHidden ,----- ** languageGetId- LanguageGetIdMethodInfo ,- languageGetId ,----- ** languageGetMetadata- LanguageGetMetadataMethodInfo ,- languageGetMetadata ,----- ** languageGetMimeTypes- LanguageGetMimeTypesMethodInfo ,- languageGetMimeTypes ,----- ** languageGetName- LanguageGetNameMethodInfo ,- languageGetName ,----- ** languageGetSection- LanguageGetSectionMethodInfo ,- languageGetSection ,----- ** languageGetStyleFallback- LanguageGetStyleFallbackMethodInfo ,- languageGetStyleFallback ,----- ** languageGetStyleIds- LanguageGetStyleIdsMethodInfo ,- languageGetStyleIds ,----- ** languageGetStyleName- LanguageGetStyleNameMethodInfo ,- languageGetStyleName ,----- -- * Properties--- ** Hidden- LanguageHiddenPropertyInfo ,- getLanguageHidden ,- languageHidden ,----- ** Id- LanguageIdPropertyInfo ,- getLanguageId ,- languageId ,----- ** Name- LanguageNamePropertyInfo ,- getLanguageName ,- languageName ,----- ** Section- LanguageSectionPropertyInfo ,- getLanguageSection ,- languageSection ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject--newtype Language = Language (ForeignPtr Language)-foreign import ccall "gtk_source_language_get_type"- c_gtk_source_language_get_type :: IO GType--type instance ParentTypes Language = LanguageParentTypes-type LanguageParentTypes = '[GObject.Object]--instance GObject Language where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_language_get_type- --class GObject o => LanguageK o-instance (GObject o, IsDescendantOf Language o) => LanguageK o--toLanguage :: LanguageK o => o -> IO Language-toLanguage = unsafeCastTo Language--noLanguage :: Maybe Language-noLanguage = Nothing--type family ResolveLanguageMethod (t :: Symbol) (o :: *) :: * where- ResolveLanguageMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveLanguageMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveLanguageMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveLanguageMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveLanguageMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveLanguageMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveLanguageMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveLanguageMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveLanguageMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveLanguageMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveLanguageMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveLanguageMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveLanguageMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveLanguageMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveLanguageMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveLanguageMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveLanguageMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveLanguageMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveLanguageMethod "getGlobs" o = LanguageGetGlobsMethodInfo- ResolveLanguageMethod "getHidden" o = LanguageGetHiddenMethodInfo- ResolveLanguageMethod "getId" o = LanguageGetIdMethodInfo- ResolveLanguageMethod "getMetadata" o = LanguageGetMetadataMethodInfo- ResolveLanguageMethod "getMimeTypes" o = LanguageGetMimeTypesMethodInfo- ResolveLanguageMethod "getName" o = LanguageGetNameMethodInfo- ResolveLanguageMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveLanguageMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveLanguageMethod "getSection" o = LanguageGetSectionMethodInfo- ResolveLanguageMethod "getStyleFallback" o = LanguageGetStyleFallbackMethodInfo- ResolveLanguageMethod "getStyleIds" o = LanguageGetStyleIdsMethodInfo- ResolveLanguageMethod "getStyleName" o = LanguageGetStyleNameMethodInfo- ResolveLanguageMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveLanguageMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveLanguageMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveLanguageMethod t Language, MethodInfo info Language p) => IsLabelProxy t (Language -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveLanguageMethod t Language, MethodInfo info Language p) => IsLabel t (Language -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "hidden"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getLanguageHidden :: (MonadIO m, LanguageK o) => o -> m Bool-getLanguageHidden obj = liftIO $ getObjectPropertyBool obj "hidden"--data LanguageHiddenPropertyInfo-instance AttrInfo LanguageHiddenPropertyInfo where- type AttrAllowedOps LanguageHiddenPropertyInfo = '[ 'AttrGet]- type AttrSetTypeConstraint LanguageHiddenPropertyInfo = (~) ()- type AttrBaseTypeConstraint LanguageHiddenPropertyInfo = LanguageK- type AttrGetType LanguageHiddenPropertyInfo = Bool- type AttrLabel LanguageHiddenPropertyInfo = "hidden"- attrGet _ = getLanguageHidden- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "id"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getLanguageId :: (MonadIO m, LanguageK o) => o -> m T.Text-getLanguageId obj = liftIO $ checkUnexpectedNothing "getLanguageId" $ getObjectPropertyString obj "id"--data LanguageIdPropertyInfo-instance AttrInfo LanguageIdPropertyInfo where- type AttrAllowedOps LanguageIdPropertyInfo = '[ 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint LanguageIdPropertyInfo = (~) ()- type AttrBaseTypeConstraint LanguageIdPropertyInfo = LanguageK- type AttrGetType LanguageIdPropertyInfo = T.Text- type AttrLabel LanguageIdPropertyInfo = "id"- attrGet _ = getLanguageId- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "name"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getLanguageName :: (MonadIO m, LanguageK o) => o -> m T.Text-getLanguageName obj = liftIO $ checkUnexpectedNothing "getLanguageName" $ getObjectPropertyString obj "name"--data LanguageNamePropertyInfo-instance AttrInfo LanguageNamePropertyInfo where- type AttrAllowedOps LanguageNamePropertyInfo = '[ 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint LanguageNamePropertyInfo = (~) ()- type AttrBaseTypeConstraint LanguageNamePropertyInfo = LanguageK- type AttrGetType LanguageNamePropertyInfo = T.Text- type AttrLabel LanguageNamePropertyInfo = "name"- attrGet _ = getLanguageName- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "section"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getLanguageSection :: (MonadIO m, LanguageK o) => o -> m T.Text-getLanguageSection obj = liftIO $ checkUnexpectedNothing "getLanguageSection" $ getObjectPropertyString obj "section"--data LanguageSectionPropertyInfo-instance AttrInfo LanguageSectionPropertyInfo where- type AttrAllowedOps LanguageSectionPropertyInfo = '[ 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint LanguageSectionPropertyInfo = (~) ()- type AttrBaseTypeConstraint LanguageSectionPropertyInfo = LanguageK- type AttrGetType LanguageSectionPropertyInfo = T.Text- type AttrLabel LanguageSectionPropertyInfo = "section"- attrGet _ = getLanguageSection- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined--type instance AttributeList Language = LanguageAttributeList-type LanguageAttributeList = ('[ '("hidden", LanguageHiddenPropertyInfo), '("id", LanguageIdPropertyInfo), '("name", LanguageNamePropertyInfo), '("section", LanguageSectionPropertyInfo)] :: [(Symbol, *)])--languageHidden :: AttrLabelProxy "hidden"-languageHidden = AttrLabelProxy--languageId :: AttrLabelProxy "id"-languageId = AttrLabelProxy--languageName :: AttrLabelProxy "name"-languageName = AttrLabelProxy--languageSection :: AttrLabelProxy "section"-languageSection = AttrLabelProxy--type instance SignalList Language = LanguageSignalList-type LanguageSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method Language::get_globs--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Language", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TCArray True (-1) (-1) (TBasicType TUTF8))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_get_globs" gtk_source_language_get_globs :: - Ptr Language -> -- _obj : TInterface "GtkSource" "Language"- IO (Ptr CString)---languageGetGlobs ::- (MonadIO m, LanguageK a) =>- a -- _obj- -> m (Maybe [T.Text]) -- result-languageGetGlobs _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_language_get_globs _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- unpackZeroTerminatedUTF8CArray result'- mapZeroTerminatedCArray freeMem result'- freeMem result'- return result''- touchManagedPtr _obj- return maybeResult--data LanguageGetGlobsMethodInfo-instance (signature ~ (m (Maybe [T.Text])), MonadIO m, LanguageK a) => MethodInfo LanguageGetGlobsMethodInfo a signature where- overloadedMethod _ = languageGetGlobs---- method Language::get_hidden--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Language", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_get_hidden" gtk_source_language_get_hidden :: - Ptr Language -> -- _obj : TInterface "GtkSource" "Language"- IO CInt---languageGetHidden ::- (MonadIO m, LanguageK a) =>- a -- _obj- -> m Bool -- result-languageGetHidden _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_language_get_hidden _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data LanguageGetHiddenMethodInfo-instance (signature ~ (m Bool), MonadIO m, LanguageK a) => MethodInfo LanguageGetHiddenMethodInfo a signature where- overloadedMethod _ = languageGetHidden---- method Language::get_id--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Language", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_get_id" gtk_source_language_get_id :: - Ptr Language -> -- _obj : TInterface "GtkSource" "Language"- IO CString---languageGetId ::- (MonadIO m, LanguageK a) =>- a -- _obj- -> m T.Text -- result-languageGetId _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_language_get_id _obj'- checkUnexpectedReturnNULL "gtk_source_language_get_id" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data LanguageGetIdMethodInfo-instance (signature ~ (m T.Text), MonadIO m, LanguageK a) => MethodInfo LanguageGetIdMethodInfo a signature where- overloadedMethod _ = languageGetId---- method Language::get_metadata--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Language", 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 : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_get_metadata" gtk_source_language_get_metadata :: - Ptr Language -> -- _obj : TInterface "GtkSource" "Language"- CString -> -- name : TBasicType TUTF8- IO CString---languageGetMetadata ::- (MonadIO m, LanguageK a) =>- a -- _obj- -> T.Text -- name- -> m (Maybe T.Text) -- result-languageGetMetadata _obj name = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- name' <- textToCString name- result <- gtk_source_language_get_metadata _obj' name'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- cstringToText result'- return result''- touchManagedPtr _obj- freeMem name'- return maybeResult--data LanguageGetMetadataMethodInfo-instance (signature ~ (T.Text -> m (Maybe T.Text)), MonadIO m, LanguageK a) => MethodInfo LanguageGetMetadataMethodInfo a signature where- overloadedMethod _ = languageGetMetadata---- method Language::get_mime_types--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Language", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TCArray True (-1) (-1) (TBasicType TUTF8))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_get_mime_types" gtk_source_language_get_mime_types :: - Ptr Language -> -- _obj : TInterface "GtkSource" "Language"- IO (Ptr CString)---languageGetMimeTypes ::- (MonadIO m, LanguageK a) =>- a -- _obj- -> m (Maybe [T.Text]) -- result-languageGetMimeTypes _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_language_get_mime_types _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- unpackZeroTerminatedUTF8CArray result'- mapZeroTerminatedCArray freeMem result'- freeMem result'- return result''- touchManagedPtr _obj- return maybeResult--data LanguageGetMimeTypesMethodInfo-instance (signature ~ (m (Maybe [T.Text])), MonadIO m, LanguageK a) => MethodInfo LanguageGetMimeTypesMethodInfo a signature where- overloadedMethod _ = languageGetMimeTypes---- method Language::get_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Language", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_get_name" gtk_source_language_get_name :: - Ptr Language -> -- _obj : TInterface "GtkSource" "Language"- IO CString---languageGetName ::- (MonadIO m, LanguageK a) =>- a -- _obj- -> m T.Text -- result-languageGetName _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_language_get_name _obj'- checkUnexpectedReturnNULL "gtk_source_language_get_name" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data LanguageGetNameMethodInfo-instance (signature ~ (m T.Text), MonadIO m, LanguageK a) => MethodInfo LanguageGetNameMethodInfo a signature where- overloadedMethod _ = languageGetName---- method Language::get_section--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Language", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_get_section" gtk_source_language_get_section :: - Ptr Language -> -- _obj : TInterface "GtkSource" "Language"- IO CString---languageGetSection ::- (MonadIO m, LanguageK a) =>- a -- _obj- -> m T.Text -- result-languageGetSection _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_language_get_section _obj'- checkUnexpectedReturnNULL "gtk_source_language_get_section" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data LanguageGetSectionMethodInfo-instance (signature ~ (m T.Text), MonadIO m, LanguageK a) => MethodInfo LanguageGetSectionMethodInfo a signature where- overloadedMethod _ = languageGetSection---- method Language::get_style_fallback--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Language", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "style_id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_get_style_fallback" gtk_source_language_get_style_fallback :: - Ptr Language -> -- _obj : TInterface "GtkSource" "Language"- CString -> -- style_id : TBasicType TUTF8- IO CString---languageGetStyleFallback ::- (MonadIO m, LanguageK a) =>- a -- _obj- -> T.Text -- styleId- -> m (Maybe T.Text) -- result-languageGetStyleFallback _obj styleId = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- styleId' <- textToCString styleId- result <- gtk_source_language_get_style_fallback _obj' styleId'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- cstringToText result'- return result''- touchManagedPtr _obj- freeMem styleId'- return maybeResult--data LanguageGetStyleFallbackMethodInfo-instance (signature ~ (T.Text -> m (Maybe T.Text)), MonadIO m, LanguageK a) => MethodInfo LanguageGetStyleFallbackMethodInfo a signature where- overloadedMethod _ = languageGetStyleFallback---- method Language::get_style_ids--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Language", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TCArray True (-1) (-1) (TBasicType TUTF8))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_get_style_ids" gtk_source_language_get_style_ids :: - Ptr Language -> -- _obj : TInterface "GtkSource" "Language"- IO (Ptr CString)---languageGetStyleIds ::- (MonadIO m, LanguageK a) =>- a -- _obj- -> m (Maybe [T.Text]) -- result-languageGetStyleIds _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_language_get_style_ids _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- unpackZeroTerminatedUTF8CArray result'- mapZeroTerminatedCArray freeMem result'- freeMem result'- return result''- touchManagedPtr _obj- return maybeResult--data LanguageGetStyleIdsMethodInfo-instance (signature ~ (m (Maybe [T.Text])), MonadIO m, LanguageK a) => MethodInfo LanguageGetStyleIdsMethodInfo a signature where- overloadedMethod _ = languageGetStyleIds---- method Language::get_style_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Language", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "style_id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_get_style_name" gtk_source_language_get_style_name :: - Ptr Language -> -- _obj : TInterface "GtkSource" "Language"- CString -> -- style_id : TBasicType TUTF8- IO CString---languageGetStyleName ::- (MonadIO m, LanguageK a) =>- a -- _obj- -> T.Text -- styleId- -> m (Maybe T.Text) -- result-languageGetStyleName _obj styleId = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- styleId' <- textToCString styleId- result <- gtk_source_language_get_style_name _obj' styleId'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- cstringToText result'- return result''- touchManagedPtr _obj- freeMem styleId'- return maybeResult--data LanguageGetStyleNameMethodInfo-instance (signature ~ (T.Text -> m (Maybe T.Text)), MonadIO m, LanguageK a) => MethodInfo LanguageGetStyleNameMethodInfo a signature where- overloadedMethod _ = languageGetStyleName--
− GI/GtkSource/Objects/Language.hs-boot
@@ -1,27 +0,0 @@-module GI.GtkSource.Objects.Language where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype Language = Language (ForeignPtr Language)-instance GObject Language where-class GObject o => LanguageK o-instance (GObject o, IsDescendantOf Language o) => LanguageK o-data LanguageHiddenPropertyInfo-data LanguageIdPropertyInfo-data LanguageNamePropertyInfo-data LanguageSectionPropertyInfo-data LanguageGetGlobsMethodInfo-data LanguageGetHiddenMethodInfo-data LanguageGetIdMethodInfo-data LanguageGetMetadataMethodInfo-data LanguageGetMimeTypesMethodInfo-data LanguageGetNameMethodInfo-data LanguageGetSectionMethodInfo-data LanguageGetStyleFallbackMethodInfo-data LanguageGetStyleIdsMethodInfo-data LanguageGetStyleNameMethodInfo
− GI/GtkSource/Objects/LanguageManager.hs
@@ -1,423 +0,0 @@---{- |-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.GtkSource.Objects.LanguageManager- ( ---- * Exported types- LanguageManager(..) ,- LanguageManagerK ,- toLanguageManager ,- noLanguageManager ,--- -- * Methods--- ** languageManagerGetDefault- languageManagerGetDefault ,----- ** languageManagerGetLanguage- LanguageManagerGetLanguageMethodInfo ,- languageManagerGetLanguage ,----- ** languageManagerGetLanguageIds- LanguageManagerGetLanguageIdsMethodInfo ,- languageManagerGetLanguageIds ,----- ** languageManagerGetSearchPath- LanguageManagerGetSearchPathMethodInfo ,- languageManagerGetSearchPath ,----- ** languageManagerGuessLanguage- LanguageManagerGuessLanguageMethodInfo ,- languageManagerGuessLanguage ,----- ** languageManagerNew- languageManagerNew ,----- ** languageManagerSetSearchPath- LanguageManagerSetSearchPathMethodInfo ,- languageManagerSetSearchPath ,----- -- * Properties--- ** LanguageIds- LanguageManagerLanguageIdsPropertyInfo ,- getLanguageManagerLanguageIds ,- languageManagerLanguageIds ,----- ** SearchPath- LanguageManagerSearchPathPropertyInfo ,- clearLanguageManagerSearchPath ,- constructLanguageManagerSearchPath ,- getLanguageManagerSearchPath ,- languageManagerSearchPath ,- setLanguageManagerSearchPath ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject--newtype LanguageManager = LanguageManager (ForeignPtr LanguageManager)-foreign import ccall "gtk_source_language_manager_get_type"- c_gtk_source_language_manager_get_type :: IO GType--type instance ParentTypes LanguageManager = LanguageManagerParentTypes-type LanguageManagerParentTypes = '[GObject.Object]--instance GObject LanguageManager where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_language_manager_get_type- --class GObject o => LanguageManagerK o-instance (GObject o, IsDescendantOf LanguageManager o) => LanguageManagerK o--toLanguageManager :: LanguageManagerK o => o -> IO LanguageManager-toLanguageManager = unsafeCastTo LanguageManager--noLanguageManager :: Maybe LanguageManager-noLanguageManager = Nothing--type family ResolveLanguageManagerMethod (t :: Symbol) (o :: *) :: * where- ResolveLanguageManagerMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveLanguageManagerMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveLanguageManagerMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveLanguageManagerMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveLanguageManagerMethod "guessLanguage" o = LanguageManagerGuessLanguageMethodInfo- ResolveLanguageManagerMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveLanguageManagerMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveLanguageManagerMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveLanguageManagerMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveLanguageManagerMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveLanguageManagerMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveLanguageManagerMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveLanguageManagerMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveLanguageManagerMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveLanguageManagerMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveLanguageManagerMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveLanguageManagerMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveLanguageManagerMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveLanguageManagerMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveLanguageManagerMethod "getLanguage" o = LanguageManagerGetLanguageMethodInfo- ResolveLanguageManagerMethod "getLanguageIds" o = LanguageManagerGetLanguageIdsMethodInfo- ResolveLanguageManagerMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveLanguageManagerMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveLanguageManagerMethod "getSearchPath" o = LanguageManagerGetSearchPathMethodInfo- ResolveLanguageManagerMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveLanguageManagerMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveLanguageManagerMethod "setSearchPath" o = LanguageManagerSetSearchPathMethodInfo- ResolveLanguageManagerMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveLanguageManagerMethod t LanguageManager, MethodInfo info LanguageManager p) => IsLabelProxy t (LanguageManager -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveLanguageManagerMethod t LanguageManager, MethodInfo info LanguageManager p) => IsLabel t (LanguageManager -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "language-ids"- -- Type: TCArray True (-1) (-1) (TBasicType TUTF8)- -- Flags: [PropertyReadable]- -- Nullable: (Just True,Nothing)--getLanguageManagerLanguageIds :: (MonadIO m, LanguageManagerK o) => o -> m (Maybe [T.Text])-getLanguageManagerLanguageIds obj = liftIO $ getObjectPropertyStringArray obj "language-ids"--data LanguageManagerLanguageIdsPropertyInfo-instance AttrInfo LanguageManagerLanguageIdsPropertyInfo where- type AttrAllowedOps LanguageManagerLanguageIdsPropertyInfo = '[ 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint LanguageManagerLanguageIdsPropertyInfo = (~) ()- type AttrBaseTypeConstraint LanguageManagerLanguageIdsPropertyInfo = LanguageManagerK- type AttrGetType LanguageManagerLanguageIdsPropertyInfo = (Maybe [T.Text])- type AttrLabel LanguageManagerLanguageIdsPropertyInfo = "language-ids"- attrGet _ = getLanguageManagerLanguageIds- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "search-path"- -- Type: TCArray True (-1) (-1) (TBasicType TUTF8)- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just True)--getLanguageManagerSearchPath :: (MonadIO m, LanguageManagerK o) => o -> m [T.Text]-getLanguageManagerSearchPath obj = liftIO $ checkUnexpectedNothing "getLanguageManagerSearchPath" $ getObjectPropertyStringArray obj "search-path"--setLanguageManagerSearchPath :: (MonadIO m, LanguageManagerK o) => o -> [T.Text] -> m ()-setLanguageManagerSearchPath obj val = liftIO $ setObjectPropertyStringArray obj "search-path" (Just val)--constructLanguageManagerSearchPath :: [T.Text] -> IO ([Char], GValue)-constructLanguageManagerSearchPath val = constructObjectPropertyStringArray "search-path" (Just val)--clearLanguageManagerSearchPath :: (MonadIO m, LanguageManagerK o) => o -> m ()-clearLanguageManagerSearchPath obj = liftIO $ setObjectPropertyStringArray obj "search-path" (Nothing :: Maybe [T.Text])--data LanguageManagerSearchPathPropertyInfo-instance AttrInfo LanguageManagerSearchPathPropertyInfo where- type AttrAllowedOps LanguageManagerSearchPathPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint LanguageManagerSearchPathPropertyInfo = (~) [T.Text]- type AttrBaseTypeConstraint LanguageManagerSearchPathPropertyInfo = LanguageManagerK- type AttrGetType LanguageManagerSearchPathPropertyInfo = [T.Text]- type AttrLabel LanguageManagerSearchPathPropertyInfo = "search-path"- attrGet _ = getLanguageManagerSearchPath- attrSet _ = setLanguageManagerSearchPath- attrConstruct _ = constructLanguageManagerSearchPath- attrClear _ = clearLanguageManagerSearchPath--type instance AttributeList LanguageManager = LanguageManagerAttributeList-type LanguageManagerAttributeList = ('[ '("languageIds", LanguageManagerLanguageIdsPropertyInfo), '("searchPath", LanguageManagerSearchPathPropertyInfo)] :: [(Symbol, *)])--languageManagerLanguageIds :: AttrLabelProxy "languageIds"-languageManagerLanguageIds = AttrLabelProxy--languageManagerSearchPath :: AttrLabelProxy "searchPath"-languageManagerSearchPath = AttrLabelProxy--type instance SignalList LanguageManager = LanguageManagerSignalList-type LanguageManagerSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method LanguageManager::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "LanguageManager")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_manager_new" gtk_source_language_manager_new :: - IO (Ptr LanguageManager)---languageManagerNew ::- (MonadIO m) =>- m LanguageManager -- result-languageManagerNew = liftIO $ do- result <- gtk_source_language_manager_new- checkUnexpectedReturnNULL "gtk_source_language_manager_new" result- result' <- (wrapObject LanguageManager) result- return result'---- method LanguageManager::get_language--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "LanguageManager", 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 : []--- returnType : Just (TInterface "GtkSource" "Language")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_manager_get_language" gtk_source_language_manager_get_language :: - Ptr LanguageManager -> -- _obj : TInterface "GtkSource" "LanguageManager"- CString -> -- id : TBasicType TUTF8- IO (Ptr Language)---languageManagerGetLanguage ::- (MonadIO m, LanguageManagerK a) =>- a -- _obj- -> T.Text -- id- -> m (Maybe Language) -- result-languageManagerGetLanguage _obj id = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- id' <- textToCString id- result <- gtk_source_language_manager_get_language _obj' id'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject Language) result'- return result''- touchManagedPtr _obj- freeMem id'- return maybeResult--data LanguageManagerGetLanguageMethodInfo-instance (signature ~ (T.Text -> m (Maybe Language)), MonadIO m, LanguageManagerK a) => MethodInfo LanguageManagerGetLanguageMethodInfo a signature where- overloadedMethod _ = languageManagerGetLanguage---- method LanguageManager::get_language_ids--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "LanguageManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TCArray True (-1) (-1) (TBasicType TUTF8))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_manager_get_language_ids" gtk_source_language_manager_get_language_ids :: - Ptr LanguageManager -> -- _obj : TInterface "GtkSource" "LanguageManager"- IO (Ptr CString)---languageManagerGetLanguageIds ::- (MonadIO m, LanguageManagerK a) =>- a -- _obj- -> m (Maybe [T.Text]) -- result-languageManagerGetLanguageIds _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_language_manager_get_language_ids _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- unpackZeroTerminatedUTF8CArray result'- return result''- touchManagedPtr _obj- return maybeResult--data LanguageManagerGetLanguageIdsMethodInfo-instance (signature ~ (m (Maybe [T.Text])), MonadIO m, LanguageManagerK a) => MethodInfo LanguageManagerGetLanguageIdsMethodInfo a signature where- overloadedMethod _ = languageManagerGetLanguageIds---- method LanguageManager::get_search_path--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "LanguageManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TCArray True (-1) (-1) (TBasicType TUTF8))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_manager_get_search_path" gtk_source_language_manager_get_search_path :: - Ptr LanguageManager -> -- _obj : TInterface "GtkSource" "LanguageManager"- IO (Ptr CString)---languageManagerGetSearchPath ::- (MonadIO m, LanguageManagerK a) =>- a -- _obj- -> m [T.Text] -- result-languageManagerGetSearchPath _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_language_manager_get_search_path _obj'- checkUnexpectedReturnNULL "gtk_source_language_manager_get_search_path" result- result' <- unpackZeroTerminatedUTF8CArray result- touchManagedPtr _obj- return result'--data LanguageManagerGetSearchPathMethodInfo-instance (signature ~ (m [T.Text]), MonadIO m, LanguageManagerK a) => MethodInfo LanguageManagerGetSearchPathMethodInfo a signature where- overloadedMethod _ = languageManagerGetSearchPath---- method LanguageManager::guess_language--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "LanguageManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "filename", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "content_type", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Language")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_manager_guess_language" gtk_source_language_manager_guess_language :: - Ptr LanguageManager -> -- _obj : TInterface "GtkSource" "LanguageManager"- CString -> -- filename : TBasicType TUTF8- CString -> -- content_type : TBasicType TUTF8- IO (Ptr Language)---languageManagerGuessLanguage ::- (MonadIO m, LanguageManagerK a) =>- a -- _obj- -> Maybe (T.Text) -- filename- -> Maybe (T.Text) -- contentType- -> m (Maybe Language) -- result-languageManagerGuessLanguage _obj filename contentType = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeFilename <- case filename of- Nothing -> return nullPtr- Just jFilename -> do- jFilename' <- textToCString jFilename- return jFilename'- maybeContentType <- case contentType of- Nothing -> return nullPtr- Just jContentType -> do- jContentType' <- textToCString jContentType- return jContentType'- result <- gtk_source_language_manager_guess_language _obj' maybeFilename maybeContentType- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject Language) result'- return result''- touchManagedPtr _obj- freeMem maybeFilename- freeMem maybeContentType- return maybeResult--data LanguageManagerGuessLanguageMethodInfo-instance (signature ~ (Maybe (T.Text) -> Maybe (T.Text) -> m (Maybe Language)), MonadIO m, LanguageManagerK a) => MethodInfo LanguageManagerGuessLanguageMethodInfo a signature where- overloadedMethod _ = languageManagerGuessLanguage---- method LanguageManager::set_search_path--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "LanguageManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "dirs", argType = TCArray True (-1) (-1) (TBasicType TUTF8), direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_manager_set_search_path" gtk_source_language_manager_set_search_path :: - Ptr LanguageManager -> -- _obj : TInterface "GtkSource" "LanguageManager"- Ptr CString -> -- dirs : TCArray True (-1) (-1) (TBasicType TUTF8)- IO ()---languageManagerSetSearchPath ::- (MonadIO m, LanguageManagerK a) =>- a -- _obj- -> Maybe ([T.Text]) -- dirs- -> m () -- result-languageManagerSetSearchPath _obj dirs = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeDirs <- case dirs of- Nothing -> return nullPtr- Just jDirs -> do- jDirs' <- packZeroTerminatedUTF8CArray jDirs- return jDirs'- gtk_source_language_manager_set_search_path _obj' maybeDirs- touchManagedPtr _obj- mapZeroTerminatedCArray freeMem maybeDirs- freeMem maybeDirs- return ()--data LanguageManagerSetSearchPathMethodInfo-instance (signature ~ (Maybe ([T.Text]) -> m ()), MonadIO m, LanguageManagerK a) => MethodInfo LanguageManagerSetSearchPathMethodInfo a signature where- overloadedMethod _ = languageManagerSetSearchPath---- method LanguageManager::get_default--- method type : MemberFunction--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "LanguageManager")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_language_manager_get_default" gtk_source_language_manager_get_default :: - IO (Ptr LanguageManager)---languageManagerGetDefault ::- (MonadIO m) =>- m LanguageManager -- result-languageManagerGetDefault = liftIO $ do- result <- gtk_source_language_manager_get_default- checkUnexpectedReturnNULL "gtk_source_language_manager_get_default" result- result' <- (newObject LanguageManager) result- return result'--
− GI/GtkSource/Objects/LanguageManager.hs-boot
@@ -1,20 +0,0 @@-module GI.GtkSource.Objects.LanguageManager where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype LanguageManager = LanguageManager (ForeignPtr LanguageManager)-instance GObject LanguageManager where-class GObject o => LanguageManagerK o-instance (GObject o, IsDescendantOf LanguageManager o) => LanguageManagerK o-data LanguageManagerLanguageIdsPropertyInfo-data LanguageManagerSearchPathPropertyInfo-data LanguageManagerGetLanguageMethodInfo-data LanguageManagerGetLanguageIdsMethodInfo-data LanguageManagerGetSearchPathMethodInfo-data LanguageManagerGuessLanguageMethodInfo-data LanguageManagerSetSearchPathMethodInfo
− GI/GtkSource/Objects/Map.hs
@@ -1,674 +0,0 @@---{- |-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.GtkSource.Objects.Map- ( ---- * Exported types- Map(..) ,- MapK ,- toMap ,- noMap ,--- -- * Methods--- ** mapGetView- MapGetViewMethodInfo ,- mapGetView ,----- ** mapNew- mapNew ,----- ** mapSetView- MapSetViewMethodInfo ,- mapSetView ,----- -- * Properties--- ** FontDesc- MapFontDescPropertyInfo ,- clearMapFontDesc ,- constructMapFontDesc ,- getMapFontDesc ,- mapFontDesc ,- setMapFontDesc ,----- ** View- MapViewPropertyInfo ,- constructMapView ,- getMapView ,- mapView ,- setMapView ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.Atk as Atk-import qualified GI.GObject as GObject-import qualified GI.Gtk as Gtk-import qualified GI.Pango as Pango--newtype Map = Map (ForeignPtr Map)-foreign import ccall "gtk_source_map_get_type"- c_gtk_source_map_get_type :: IO GType--type instance ParentTypes Map = MapParentTypes-type MapParentTypes = '[View, Gtk.TextView, Gtk.Container, Gtk.Widget, GObject.Object, Atk.ImplementorIface, Gtk.Buildable, Gtk.Scrollable]--instance GObject Map where- gobjectIsInitiallyUnowned _ = True- gobjectType _ = c_gtk_source_map_get_type- --class GObject o => MapK o-instance (GObject o, IsDescendantOf Map o) => MapK o--toMap :: MapK o => o -> IO Map-toMap = unsafeCastTo Map--noMap :: Maybe Map-noMap = Nothing--type family ResolveMapMethod (t :: Symbol) (o :: *) :: * where- ResolveMapMethod "activate" o = Gtk.WidgetActivateMethodInfo- ResolveMapMethod "add" o = Gtk.ContainerAddMethodInfo- ResolveMapMethod "addAccelerator" o = Gtk.WidgetAddAcceleratorMethodInfo- ResolveMapMethod "addChild" o = Gtk.BuildableAddChildMethodInfo- ResolveMapMethod "addChildAtAnchor" o = Gtk.TextViewAddChildAtAnchorMethodInfo- ResolveMapMethod "addChildInWindow" o = Gtk.TextViewAddChildInWindowMethodInfo- ResolveMapMethod "addDeviceEvents" o = Gtk.WidgetAddDeviceEventsMethodInfo- ResolveMapMethod "addEvents" o = Gtk.WidgetAddEventsMethodInfo- ResolveMapMethod "addMnemonicLabel" o = Gtk.WidgetAddMnemonicLabelMethodInfo- ResolveMapMethod "addTickCallback" o = Gtk.WidgetAddTickCallbackMethodInfo- ResolveMapMethod "backwardDisplayLine" o = Gtk.TextViewBackwardDisplayLineMethodInfo- ResolveMapMethod "backwardDisplayLineStart" o = Gtk.TextViewBackwardDisplayLineStartMethodInfo- ResolveMapMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveMapMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveMapMethod "bufferToWindowCoords" o = Gtk.TextViewBufferToWindowCoordsMethodInfo- ResolveMapMethod "canActivateAccel" o = Gtk.WidgetCanActivateAccelMethodInfo- ResolveMapMethod "checkResize" o = Gtk.ContainerCheckResizeMethodInfo- ResolveMapMethod "childFocus" o = Gtk.WidgetChildFocusMethodInfo- ResolveMapMethod "childGetProperty" o = Gtk.ContainerChildGetPropertyMethodInfo- ResolveMapMethod "childNotifyByPspec" o = Gtk.ContainerChildNotifyByPspecMethodInfo- ResolveMapMethod "childSetProperty" o = Gtk.ContainerChildSetPropertyMethodInfo- ResolveMapMethod "childType" o = Gtk.ContainerChildTypeMethodInfo- ResolveMapMethod "classPath" o = Gtk.WidgetClassPathMethodInfo- ResolveMapMethod "computeExpand" o = Gtk.WidgetComputeExpandMethodInfo- ResolveMapMethod "constructChild" o = Gtk.BuildableConstructChildMethodInfo- ResolveMapMethod "createPangoContext" o = Gtk.WidgetCreatePangoContextMethodInfo- ResolveMapMethod "createPangoLayout" o = Gtk.WidgetCreatePangoLayoutMethodInfo- ResolveMapMethod "customFinished" o = Gtk.BuildableCustomFinishedMethodInfo- ResolveMapMethod "customTagEnd" o = Gtk.BuildableCustomTagEndMethodInfo- ResolveMapMethod "customTagStart" o = Gtk.BuildableCustomTagStartMethodInfo- ResolveMapMethod "destroy" o = Gtk.WidgetDestroyMethodInfo- ResolveMapMethod "destroyed" o = Gtk.WidgetDestroyedMethodInfo- ResolveMapMethod "deviceIsShadowed" o = Gtk.WidgetDeviceIsShadowedMethodInfo- ResolveMapMethod "dragBegin" o = Gtk.WidgetDragBeginMethodInfo- ResolveMapMethod "dragBeginWithCoordinates" o = Gtk.WidgetDragBeginWithCoordinatesMethodInfo- ResolveMapMethod "dragCheckThreshold" o = Gtk.WidgetDragCheckThresholdMethodInfo- ResolveMapMethod "dragDestAddImageTargets" o = Gtk.WidgetDragDestAddImageTargetsMethodInfo- ResolveMapMethod "dragDestAddTextTargets" o = Gtk.WidgetDragDestAddTextTargetsMethodInfo- ResolveMapMethod "dragDestAddUriTargets" o = Gtk.WidgetDragDestAddUriTargetsMethodInfo- ResolveMapMethod "dragDestFindTarget" o = Gtk.WidgetDragDestFindTargetMethodInfo- ResolveMapMethod "dragDestGetTargetList" o = Gtk.WidgetDragDestGetTargetListMethodInfo- ResolveMapMethod "dragDestGetTrackMotion" o = Gtk.WidgetDragDestGetTrackMotionMethodInfo- ResolveMapMethod "dragDestSet" o = Gtk.WidgetDragDestSetMethodInfo- ResolveMapMethod "dragDestSetProxy" o = Gtk.WidgetDragDestSetProxyMethodInfo- ResolveMapMethod "dragDestSetTargetList" o = Gtk.WidgetDragDestSetTargetListMethodInfo- ResolveMapMethod "dragDestSetTrackMotion" o = Gtk.WidgetDragDestSetTrackMotionMethodInfo- ResolveMapMethod "dragDestUnset" o = Gtk.WidgetDragDestUnsetMethodInfo- ResolveMapMethod "dragGetData" o = Gtk.WidgetDragGetDataMethodInfo- ResolveMapMethod "dragHighlight" o = Gtk.WidgetDragHighlightMethodInfo- ResolveMapMethod "dragSourceAddImageTargets" o = Gtk.WidgetDragSourceAddImageTargetsMethodInfo- ResolveMapMethod "dragSourceAddTextTargets" o = Gtk.WidgetDragSourceAddTextTargetsMethodInfo- ResolveMapMethod "dragSourceAddUriTargets" o = Gtk.WidgetDragSourceAddUriTargetsMethodInfo- ResolveMapMethod "dragSourceGetTargetList" o = Gtk.WidgetDragSourceGetTargetListMethodInfo- ResolveMapMethod "dragSourceSet" o = Gtk.WidgetDragSourceSetMethodInfo- ResolveMapMethod "dragSourceSetIconGicon" o = Gtk.WidgetDragSourceSetIconGiconMethodInfo- ResolveMapMethod "dragSourceSetIconName" o = Gtk.WidgetDragSourceSetIconNameMethodInfo- ResolveMapMethod "dragSourceSetIconPixbuf" o = Gtk.WidgetDragSourceSetIconPixbufMethodInfo- ResolveMapMethod "dragSourceSetIconStock" o = Gtk.WidgetDragSourceSetIconStockMethodInfo- ResolveMapMethod "dragSourceSetTargetList" o = Gtk.WidgetDragSourceSetTargetListMethodInfo- ResolveMapMethod "dragSourceUnset" o = Gtk.WidgetDragSourceUnsetMethodInfo- ResolveMapMethod "dragUnhighlight" o = Gtk.WidgetDragUnhighlightMethodInfo- ResolveMapMethod "draw" o = Gtk.WidgetDrawMethodInfo- ResolveMapMethod "ensureStyle" o = Gtk.WidgetEnsureStyleMethodInfo- ResolveMapMethod "errorBell" o = Gtk.WidgetErrorBellMethodInfo- ResolveMapMethod "event" o = Gtk.WidgetEventMethodInfo- ResolveMapMethod "forall" o = Gtk.ContainerForallMethodInfo- ResolveMapMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveMapMethod "foreach" o = Gtk.ContainerForeachMethodInfo- ResolveMapMethod "forwardDisplayLine" o = Gtk.TextViewForwardDisplayLineMethodInfo- ResolveMapMethod "forwardDisplayLineEnd" o = Gtk.TextViewForwardDisplayLineEndMethodInfo- ResolveMapMethod "freezeChildNotify" o = Gtk.WidgetFreezeChildNotifyMethodInfo- ResolveMapMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveMapMethod "grabAdd" o = Gtk.WidgetGrabAddMethodInfo- ResolveMapMethod "grabDefault" o = Gtk.WidgetGrabDefaultMethodInfo- ResolveMapMethod "grabFocus" o = Gtk.WidgetGrabFocusMethodInfo- ResolveMapMethod "grabRemove" o = Gtk.WidgetGrabRemoveMethodInfo- ResolveMapMethod "hasDefault" o = Gtk.WidgetHasDefaultMethodInfo- ResolveMapMethod "hasFocus" o = Gtk.WidgetHasFocusMethodInfo- ResolveMapMethod "hasGrab" o = Gtk.WidgetHasGrabMethodInfo- ResolveMapMethod "hasRcStyle" o = Gtk.WidgetHasRcStyleMethodInfo- ResolveMapMethod "hasScreen" o = Gtk.WidgetHasScreenMethodInfo- ResolveMapMethod "hasVisibleFocus" o = Gtk.WidgetHasVisibleFocusMethodInfo- ResolveMapMethod "hide" o = Gtk.WidgetHideMethodInfo- ResolveMapMethod "hideOnDelete" o = Gtk.WidgetHideOnDeleteMethodInfo- ResolveMapMethod "imContextFilterKeypress" o = Gtk.TextViewImContextFilterKeypressMethodInfo- ResolveMapMethod "inDestruction" o = Gtk.WidgetInDestructionMethodInfo- ResolveMapMethod "indentLines" o = ViewIndentLinesMethodInfo- ResolveMapMethod "initTemplate" o = Gtk.WidgetInitTemplateMethodInfo- ResolveMapMethod "inputShapeCombineRegion" o = Gtk.WidgetInputShapeCombineRegionMethodInfo- ResolveMapMethod "insertActionGroup" o = Gtk.WidgetInsertActionGroupMethodInfo- ResolveMapMethod "intersect" o = Gtk.WidgetIntersectMethodInfo- ResolveMapMethod "isAncestor" o = Gtk.WidgetIsAncestorMethodInfo- ResolveMapMethod "isComposited" o = Gtk.WidgetIsCompositedMethodInfo- ResolveMapMethod "isDrawable" o = Gtk.WidgetIsDrawableMethodInfo- ResolveMapMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveMapMethod "isFocus" o = Gtk.WidgetIsFocusMethodInfo- ResolveMapMethod "isSensitive" o = Gtk.WidgetIsSensitiveMethodInfo- ResolveMapMethod "isToplevel" o = Gtk.WidgetIsToplevelMethodInfo- ResolveMapMethod "isVisible" o = Gtk.WidgetIsVisibleMethodInfo- ResolveMapMethod "keynavFailed" o = Gtk.WidgetKeynavFailedMethodInfo- ResolveMapMethod "listAccelClosures" o = Gtk.WidgetListAccelClosuresMethodInfo- ResolveMapMethod "listActionPrefixes" o = Gtk.WidgetListActionPrefixesMethodInfo- ResolveMapMethod "listMnemonicLabels" o = Gtk.WidgetListMnemonicLabelsMethodInfo- ResolveMapMethod "map" o = Gtk.WidgetMapMethodInfo- ResolveMapMethod "mnemonicActivate" o = Gtk.WidgetMnemonicActivateMethodInfo- ResolveMapMethod "modifyBase" o = Gtk.WidgetModifyBaseMethodInfo- ResolveMapMethod "modifyBg" o = Gtk.WidgetModifyBgMethodInfo- ResolveMapMethod "modifyCursor" o = Gtk.WidgetModifyCursorMethodInfo- ResolveMapMethod "modifyFg" o = Gtk.WidgetModifyFgMethodInfo- ResolveMapMethod "modifyFont" o = Gtk.WidgetModifyFontMethodInfo- ResolveMapMethod "modifyStyle" o = Gtk.WidgetModifyStyleMethodInfo- ResolveMapMethod "modifyText" o = Gtk.WidgetModifyTextMethodInfo- ResolveMapMethod "moveChild" o = Gtk.TextViewMoveChildMethodInfo- ResolveMapMethod "moveMarkOnscreen" o = Gtk.TextViewMoveMarkOnscreenMethodInfo- ResolveMapMethod "moveVisually" o = Gtk.TextViewMoveVisuallyMethodInfo- ResolveMapMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveMapMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveMapMethod "overrideBackgroundColor" o = Gtk.WidgetOverrideBackgroundColorMethodInfo- ResolveMapMethod "overrideColor" o = Gtk.WidgetOverrideColorMethodInfo- ResolveMapMethod "overrideCursor" o = Gtk.WidgetOverrideCursorMethodInfo- ResolveMapMethod "overrideFont" o = Gtk.WidgetOverrideFontMethodInfo- ResolveMapMethod "overrideSymbolicColor" o = Gtk.WidgetOverrideSymbolicColorMethodInfo- ResolveMapMethod "parserFinished" o = Gtk.BuildableParserFinishedMethodInfo- ResolveMapMethod "path" o = Gtk.WidgetPathMethodInfo- ResolveMapMethod "placeCursorOnscreen" o = Gtk.TextViewPlaceCursorOnscreenMethodInfo- ResolveMapMethod "propagateDraw" o = Gtk.ContainerPropagateDrawMethodInfo- ResolveMapMethod "queueComputeExpand" o = Gtk.WidgetQueueComputeExpandMethodInfo- ResolveMapMethod "queueDraw" o = Gtk.WidgetQueueDrawMethodInfo- ResolveMapMethod "queueDrawArea" o = Gtk.WidgetQueueDrawAreaMethodInfo- ResolveMapMethod "queueDrawRegion" o = Gtk.WidgetQueueDrawRegionMethodInfo- ResolveMapMethod "queueResize" o = Gtk.WidgetQueueResizeMethodInfo- ResolveMapMethod "queueResizeNoRedraw" o = Gtk.WidgetQueueResizeNoRedrawMethodInfo- ResolveMapMethod "realize" o = Gtk.WidgetRealizeMethodInfo- ResolveMapMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveMapMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveMapMethod "regionIntersect" o = Gtk.WidgetRegionIntersectMethodInfo- ResolveMapMethod "registerWindow" o = Gtk.WidgetRegisterWindowMethodInfo- ResolveMapMethod "remove" o = Gtk.ContainerRemoveMethodInfo- ResolveMapMethod "removeAccelerator" o = Gtk.WidgetRemoveAcceleratorMethodInfo- ResolveMapMethod "removeMnemonicLabel" o = Gtk.WidgetRemoveMnemonicLabelMethodInfo- ResolveMapMethod "removeTickCallback" o = Gtk.WidgetRemoveTickCallbackMethodInfo- ResolveMapMethod "renderIcon" o = Gtk.WidgetRenderIconMethodInfo- ResolveMapMethod "renderIconPixbuf" o = Gtk.WidgetRenderIconPixbufMethodInfo- ResolveMapMethod "reparent" o = Gtk.WidgetReparentMethodInfo- ResolveMapMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveMapMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveMapMethod "resetImContext" o = Gtk.TextViewResetImContextMethodInfo- ResolveMapMethod "resetRcStyles" o = Gtk.WidgetResetRcStylesMethodInfo- ResolveMapMethod "resetStyle" o = Gtk.WidgetResetStyleMethodInfo- ResolveMapMethod "resizeChildren" o = Gtk.ContainerResizeChildrenMethodInfo- ResolveMapMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveMapMethod "scrollMarkOnscreen" o = Gtk.TextViewScrollMarkOnscreenMethodInfo- ResolveMapMethod "scrollToIter" o = Gtk.TextViewScrollToIterMethodInfo- ResolveMapMethod "scrollToMark" o = Gtk.TextViewScrollToMarkMethodInfo- ResolveMapMethod "sendExpose" o = Gtk.WidgetSendExposeMethodInfo- ResolveMapMethod "sendFocusChange" o = Gtk.WidgetSendFocusChangeMethodInfo- ResolveMapMethod "shapeCombineRegion" o = Gtk.WidgetShapeCombineRegionMethodInfo- ResolveMapMethod "show" o = Gtk.WidgetShowMethodInfo- ResolveMapMethod "showAll" o = Gtk.WidgetShowAllMethodInfo- ResolveMapMethod "showNow" o = Gtk.WidgetShowNowMethodInfo- ResolveMapMethod "sizeAllocate" o = Gtk.WidgetSizeAllocateMethodInfo- ResolveMapMethod "sizeAllocateWithBaseline" o = Gtk.WidgetSizeAllocateWithBaselineMethodInfo- ResolveMapMethod "sizeRequest" o = Gtk.WidgetSizeRequestMethodInfo- ResolveMapMethod "startsDisplayLine" o = Gtk.TextViewStartsDisplayLineMethodInfo- ResolveMapMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveMapMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveMapMethod "styleAttach" o = Gtk.WidgetStyleAttachMethodInfo- ResolveMapMethod "styleGetProperty" o = Gtk.WidgetStyleGetPropertyMethodInfo- ResolveMapMethod "thawChildNotify" o = Gtk.WidgetThawChildNotifyMethodInfo- ResolveMapMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveMapMethod "translateCoordinates" o = Gtk.WidgetTranslateCoordinatesMethodInfo- ResolveMapMethod "triggerTooltipQuery" o = Gtk.WidgetTriggerTooltipQueryMethodInfo- ResolveMapMethod "unindentLines" o = ViewUnindentLinesMethodInfo- ResolveMapMethod "unmap" o = Gtk.WidgetUnmapMethodInfo- ResolveMapMethod "unparent" o = Gtk.WidgetUnparentMethodInfo- ResolveMapMethod "unrealize" o = Gtk.WidgetUnrealizeMethodInfo- ResolveMapMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveMapMethod "unregisterWindow" o = Gtk.WidgetUnregisterWindowMethodInfo- ResolveMapMethod "unsetFocusChain" o = Gtk.ContainerUnsetFocusChainMethodInfo- ResolveMapMethod "unsetStateFlags" o = Gtk.WidgetUnsetStateFlagsMethodInfo- ResolveMapMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveMapMethod "windowToBufferCoords" o = Gtk.TextViewWindowToBufferCoordsMethodInfo- ResolveMapMethod "getAcceptsTab" o = Gtk.TextViewGetAcceptsTabMethodInfo- ResolveMapMethod "getAccessible" o = Gtk.WidgetGetAccessibleMethodInfo- ResolveMapMethod "getActionGroup" o = Gtk.WidgetGetActionGroupMethodInfo- ResolveMapMethod "getAllocatedBaseline" o = Gtk.WidgetGetAllocatedBaselineMethodInfo- ResolveMapMethod "getAllocatedHeight" o = Gtk.WidgetGetAllocatedHeightMethodInfo- ResolveMapMethod "getAllocatedWidth" o = Gtk.WidgetGetAllocatedWidthMethodInfo- ResolveMapMethod "getAllocation" o = Gtk.WidgetGetAllocationMethodInfo- ResolveMapMethod "getAncestor" o = Gtk.WidgetGetAncestorMethodInfo- ResolveMapMethod "getAppPaintable" o = Gtk.WidgetGetAppPaintableMethodInfo- ResolveMapMethod "getAutoIndent" o = ViewGetAutoIndentMethodInfo- ResolveMapMethod "getBackgroundPattern" o = ViewGetBackgroundPatternMethodInfo- ResolveMapMethod "getBorder" o = Gtk.ScrollableGetBorderMethodInfo- ResolveMapMethod "getBorderWidth" o = Gtk.ContainerGetBorderWidthMethodInfo- ResolveMapMethod "getBorderWindowSize" o = Gtk.TextViewGetBorderWindowSizeMethodInfo- ResolveMapMethod "getBottomMargin" o = Gtk.TextViewGetBottomMarginMethodInfo- ResolveMapMethod "getBuffer" o = Gtk.TextViewGetBufferMethodInfo- ResolveMapMethod "getCanDefault" o = Gtk.WidgetGetCanDefaultMethodInfo- ResolveMapMethod "getCanFocus" o = Gtk.WidgetGetCanFocusMethodInfo- ResolveMapMethod "getChildRequisition" o = Gtk.WidgetGetChildRequisitionMethodInfo- ResolveMapMethod "getChildVisible" o = Gtk.WidgetGetChildVisibleMethodInfo- ResolveMapMethod "getChildren" o = Gtk.ContainerGetChildrenMethodInfo- ResolveMapMethod "getClip" o = Gtk.WidgetGetClipMethodInfo- ResolveMapMethod "getClipboard" o = Gtk.WidgetGetClipboardMethodInfo- ResolveMapMethod "getCompletion" o = ViewGetCompletionMethodInfo- ResolveMapMethod "getCompositeName" o = Gtk.WidgetGetCompositeNameMethodInfo- ResolveMapMethod "getCursorLocations" o = Gtk.TextViewGetCursorLocationsMethodInfo- ResolveMapMethod "getCursorVisible" o = Gtk.TextViewGetCursorVisibleMethodInfo- ResolveMapMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveMapMethod "getDefaultAttributes" o = Gtk.TextViewGetDefaultAttributesMethodInfo- ResolveMapMethod "getDeviceEnabled" o = Gtk.WidgetGetDeviceEnabledMethodInfo- ResolveMapMethod "getDeviceEvents" o = Gtk.WidgetGetDeviceEventsMethodInfo- ResolveMapMethod "getDirection" o = Gtk.WidgetGetDirectionMethodInfo- ResolveMapMethod "getDisplay" o = Gtk.WidgetGetDisplayMethodInfo- ResolveMapMethod "getDoubleBuffered" o = Gtk.WidgetGetDoubleBufferedMethodInfo- ResolveMapMethod "getDrawSpaces" o = ViewGetDrawSpacesMethodInfo- ResolveMapMethod "getEditable" o = Gtk.TextViewGetEditableMethodInfo- ResolveMapMethod "getEvents" o = Gtk.WidgetGetEventsMethodInfo- ResolveMapMethod "getFocusChain" o = Gtk.ContainerGetFocusChainMethodInfo- ResolveMapMethod "getFocusChild" o = Gtk.ContainerGetFocusChildMethodInfo- ResolveMapMethod "getFocusHadjustment" o = Gtk.ContainerGetFocusHadjustmentMethodInfo- ResolveMapMethod "getFocusVadjustment" o = Gtk.ContainerGetFocusVadjustmentMethodInfo- ResolveMapMethod "getFontMap" o = Gtk.WidgetGetFontMapMethodInfo- ResolveMapMethod "getFontOptions" o = Gtk.WidgetGetFontOptionsMethodInfo- ResolveMapMethod "getFrameClock" o = Gtk.WidgetGetFrameClockMethodInfo- ResolveMapMethod "getGutter" o = ViewGetGutterMethodInfo- ResolveMapMethod "getHalign" o = Gtk.WidgetGetHalignMethodInfo- ResolveMapMethod "getHasTooltip" o = Gtk.WidgetGetHasTooltipMethodInfo- ResolveMapMethod "getHasWindow" o = Gtk.WidgetGetHasWindowMethodInfo- ResolveMapMethod "getHexpand" o = Gtk.WidgetGetHexpandMethodInfo- ResolveMapMethod "getHexpandSet" o = Gtk.WidgetGetHexpandSetMethodInfo- ResolveMapMethod "getHighlightCurrentLine" o = ViewGetHighlightCurrentLineMethodInfo- ResolveMapMethod "getHscrollPolicy" o = Gtk.ScrollableGetHscrollPolicyMethodInfo- ResolveMapMethod "getIndent" o = Gtk.TextViewGetIndentMethodInfo- ResolveMapMethod "getIndentOnTab" o = ViewGetIndentOnTabMethodInfo- ResolveMapMethod "getIndentWidth" o = ViewGetIndentWidthMethodInfo- ResolveMapMethod "getInputHints" o = Gtk.TextViewGetInputHintsMethodInfo- ResolveMapMethod "getInputPurpose" o = Gtk.TextViewGetInputPurposeMethodInfo- ResolveMapMethod "getInsertSpacesInsteadOfTabs" o = ViewGetInsertSpacesInsteadOfTabsMethodInfo- ResolveMapMethod "getInternalChild" o = Gtk.BuildableGetInternalChildMethodInfo- ResolveMapMethod "getIterAtLocation" o = Gtk.TextViewGetIterAtLocationMethodInfo- ResolveMapMethod "getIterAtPosition" o = Gtk.TextViewGetIterAtPositionMethodInfo- ResolveMapMethod "getIterLocation" o = Gtk.TextViewGetIterLocationMethodInfo- ResolveMapMethod "getJustification" o = Gtk.TextViewGetJustificationMethodInfo- ResolveMapMethod "getLeftMargin" o = Gtk.TextViewGetLeftMarginMethodInfo- ResolveMapMethod "getLineAtY" o = Gtk.TextViewGetLineAtYMethodInfo- ResolveMapMethod "getLineYrange" o = Gtk.TextViewGetLineYrangeMethodInfo- ResolveMapMethod "getMapped" o = Gtk.WidgetGetMappedMethodInfo- ResolveMapMethod "getMarginBottom" o = Gtk.WidgetGetMarginBottomMethodInfo- ResolveMapMethod "getMarginEnd" o = Gtk.WidgetGetMarginEndMethodInfo- ResolveMapMethod "getMarginLeft" o = Gtk.WidgetGetMarginLeftMethodInfo- ResolveMapMethod "getMarginRight" o = Gtk.WidgetGetMarginRightMethodInfo- ResolveMapMethod "getMarginStart" o = Gtk.WidgetGetMarginStartMethodInfo- ResolveMapMethod "getMarginTop" o = Gtk.WidgetGetMarginTopMethodInfo- ResolveMapMethod "getMarkAttributes" o = ViewGetMarkAttributesMethodInfo- ResolveMapMethod "getModifierMask" o = Gtk.WidgetGetModifierMaskMethodInfo- ResolveMapMethod "getModifierStyle" o = Gtk.WidgetGetModifierStyleMethodInfo- ResolveMapMethod "getMonospace" o = Gtk.TextViewGetMonospaceMethodInfo- ResolveMapMethod "getNoShowAll" o = Gtk.WidgetGetNoShowAllMethodInfo- ResolveMapMethod "getOpacity" o = Gtk.WidgetGetOpacityMethodInfo- ResolveMapMethod "getOverwrite" o = Gtk.TextViewGetOverwriteMethodInfo- ResolveMapMethod "getPangoContext" o = Gtk.WidgetGetPangoContextMethodInfo- ResolveMapMethod "getParent" o = Gtk.WidgetGetParentMethodInfo- ResolveMapMethod "getParentWindow" o = Gtk.WidgetGetParentWindowMethodInfo- ResolveMapMethod "getPath" o = Gtk.WidgetGetPathMethodInfo- ResolveMapMethod "getPathForChild" o = Gtk.ContainerGetPathForChildMethodInfo- ResolveMapMethod "getPixelsAboveLines" o = Gtk.TextViewGetPixelsAboveLinesMethodInfo- ResolveMapMethod "getPixelsBelowLines" o = Gtk.TextViewGetPixelsBelowLinesMethodInfo- ResolveMapMethod "getPixelsInsideWrap" o = Gtk.TextViewGetPixelsInsideWrapMethodInfo- ResolveMapMethod "getPointer" o = Gtk.WidgetGetPointerMethodInfo- ResolveMapMethod "getPreferredHeight" o = Gtk.WidgetGetPreferredHeightMethodInfo- ResolveMapMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo- ResolveMapMethod "getPreferredHeightForWidth" o = Gtk.WidgetGetPreferredHeightForWidthMethodInfo- ResolveMapMethod "getPreferredSize" o = Gtk.WidgetGetPreferredSizeMethodInfo- ResolveMapMethod "getPreferredWidth" o = Gtk.WidgetGetPreferredWidthMethodInfo- ResolveMapMethod "getPreferredWidthForHeight" o = Gtk.WidgetGetPreferredWidthForHeightMethodInfo- ResolveMapMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveMapMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveMapMethod "getRealized" o = Gtk.WidgetGetRealizedMethodInfo- ResolveMapMethod "getReceivesDefault" o = Gtk.WidgetGetReceivesDefaultMethodInfo- ResolveMapMethod "getRequestMode" o = Gtk.WidgetGetRequestModeMethodInfo- ResolveMapMethod "getRequisition" o = Gtk.WidgetGetRequisitionMethodInfo- ResolveMapMethod "getResizeMode" o = Gtk.ContainerGetResizeModeMethodInfo- ResolveMapMethod "getRightMargin" o = Gtk.TextViewGetRightMarginMethodInfo- ResolveMapMethod "getRightMarginPosition" o = ViewGetRightMarginPositionMethodInfo- ResolveMapMethod "getRootWindow" o = Gtk.WidgetGetRootWindowMethodInfo- ResolveMapMethod "getScaleFactor" o = Gtk.WidgetGetScaleFactorMethodInfo- ResolveMapMethod "getScreen" o = Gtk.WidgetGetScreenMethodInfo- ResolveMapMethod "getSensitive" o = Gtk.WidgetGetSensitiveMethodInfo- ResolveMapMethod "getSettings" o = Gtk.WidgetGetSettingsMethodInfo- ResolveMapMethod "getShowLineMarks" o = ViewGetShowLineMarksMethodInfo- ResolveMapMethod "getShowLineNumbers" o = ViewGetShowLineNumbersMethodInfo- ResolveMapMethod "getShowRightMargin" o = ViewGetShowRightMarginMethodInfo- ResolveMapMethod "getSizeRequest" o = Gtk.WidgetGetSizeRequestMethodInfo- ResolveMapMethod "getSmartBackspace" o = ViewGetSmartBackspaceMethodInfo- ResolveMapMethod "getSmartHomeEnd" o = ViewGetSmartHomeEndMethodInfo- ResolveMapMethod "getState" o = Gtk.WidgetGetStateMethodInfo- ResolveMapMethod "getStateFlags" o = Gtk.WidgetGetStateFlagsMethodInfo- ResolveMapMethod "getStyle" o = Gtk.WidgetGetStyleMethodInfo- ResolveMapMethod "getStyleContext" o = Gtk.WidgetGetStyleContextMethodInfo- ResolveMapMethod "getSupportMultidevice" o = Gtk.WidgetGetSupportMultideviceMethodInfo- ResolveMapMethod "getTabWidth" o = ViewGetTabWidthMethodInfo- ResolveMapMethod "getTabs" o = Gtk.TextViewGetTabsMethodInfo- ResolveMapMethod "getTemplateChild" o = Gtk.WidgetGetTemplateChildMethodInfo- ResolveMapMethod "getTooltipMarkup" o = Gtk.WidgetGetTooltipMarkupMethodInfo- ResolveMapMethod "getTooltipText" o = Gtk.WidgetGetTooltipTextMethodInfo- ResolveMapMethod "getTooltipWindow" o = Gtk.WidgetGetTooltipWindowMethodInfo- ResolveMapMethod "getTopMargin" o = Gtk.TextViewGetTopMarginMethodInfo- ResolveMapMethod "getToplevel" o = Gtk.WidgetGetToplevelMethodInfo- ResolveMapMethod "getValign" o = Gtk.WidgetGetValignMethodInfo- ResolveMapMethod "getValignWithBaseline" o = Gtk.WidgetGetValignWithBaselineMethodInfo- ResolveMapMethod "getVexpand" o = Gtk.WidgetGetVexpandMethodInfo- ResolveMapMethod "getVexpandSet" o = Gtk.WidgetGetVexpandSetMethodInfo- ResolveMapMethod "getView" o = MapGetViewMethodInfo- ResolveMapMethod "getVisible" o = Gtk.WidgetGetVisibleMethodInfo- ResolveMapMethod "getVisibleRect" o = Gtk.TextViewGetVisibleRectMethodInfo- ResolveMapMethod "getVisual" o = Gtk.WidgetGetVisualMethodInfo- ResolveMapMethod "getVisualColumn" o = ViewGetVisualColumnMethodInfo- ResolveMapMethod "getVscrollPolicy" o = Gtk.ScrollableGetVscrollPolicyMethodInfo- ResolveMapMethod "getWindowType" o = Gtk.TextViewGetWindowTypeMethodInfo- ResolveMapMethod "getWrapMode" o = Gtk.TextViewGetWrapModeMethodInfo- ResolveMapMethod "setAccelPath" o = Gtk.WidgetSetAccelPathMethodInfo- ResolveMapMethod "setAcceptsTab" o = Gtk.TextViewSetAcceptsTabMethodInfo- ResolveMapMethod "setAllocation" o = Gtk.WidgetSetAllocationMethodInfo- ResolveMapMethod "setAppPaintable" o = Gtk.WidgetSetAppPaintableMethodInfo- ResolveMapMethod "setAutoIndent" o = ViewSetAutoIndentMethodInfo- ResolveMapMethod "setBackgroundPattern" o = ViewSetBackgroundPatternMethodInfo- ResolveMapMethod "setBorderWidth" o = Gtk.ContainerSetBorderWidthMethodInfo- ResolveMapMethod "setBorderWindowSize" o = Gtk.TextViewSetBorderWindowSizeMethodInfo- ResolveMapMethod "setBottomMargin" o = Gtk.TextViewSetBottomMarginMethodInfo- ResolveMapMethod "setBuffer" o = Gtk.TextViewSetBufferMethodInfo- ResolveMapMethod "setBuildableProperty" o = Gtk.BuildableSetBuildablePropertyMethodInfo- ResolveMapMethod "setCanDefault" o = Gtk.WidgetSetCanDefaultMethodInfo- ResolveMapMethod "setCanFocus" o = Gtk.WidgetSetCanFocusMethodInfo- ResolveMapMethod "setChildVisible" o = Gtk.WidgetSetChildVisibleMethodInfo- ResolveMapMethod "setClip" o = Gtk.WidgetSetClipMethodInfo- ResolveMapMethod "setCompositeName" o = Gtk.WidgetSetCompositeNameMethodInfo- ResolveMapMethod "setCursorVisible" o = Gtk.TextViewSetCursorVisibleMethodInfo- ResolveMapMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveMapMethod "setDeviceEnabled" o = Gtk.WidgetSetDeviceEnabledMethodInfo- ResolveMapMethod "setDeviceEvents" o = Gtk.WidgetSetDeviceEventsMethodInfo- ResolveMapMethod "setDirection" o = Gtk.WidgetSetDirectionMethodInfo- ResolveMapMethod "setDoubleBuffered" o = Gtk.WidgetSetDoubleBufferedMethodInfo- ResolveMapMethod "setDrawSpaces" o = ViewSetDrawSpacesMethodInfo- ResolveMapMethod "setEditable" o = Gtk.TextViewSetEditableMethodInfo- ResolveMapMethod "setEvents" o = Gtk.WidgetSetEventsMethodInfo- ResolveMapMethod "setFocusChain" o = Gtk.ContainerSetFocusChainMethodInfo- ResolveMapMethod "setFocusChild" o = Gtk.ContainerSetFocusChildMethodInfo- ResolveMapMethod "setFocusHadjustment" o = Gtk.ContainerSetFocusHadjustmentMethodInfo- ResolveMapMethod "setFocusVadjustment" o = Gtk.ContainerSetFocusVadjustmentMethodInfo- ResolveMapMethod "setFontMap" o = Gtk.WidgetSetFontMapMethodInfo- ResolveMapMethod "setFontOptions" o = Gtk.WidgetSetFontOptionsMethodInfo- ResolveMapMethod "setHadjustment" o = Gtk.ScrollableSetHadjustmentMethodInfo- ResolveMapMethod "setHalign" o = Gtk.WidgetSetHalignMethodInfo- ResolveMapMethod "setHasTooltip" o = Gtk.WidgetSetHasTooltipMethodInfo- ResolveMapMethod "setHasWindow" o = Gtk.WidgetSetHasWindowMethodInfo- ResolveMapMethod "setHexpand" o = Gtk.WidgetSetHexpandMethodInfo- ResolveMapMethod "setHexpandSet" o = Gtk.WidgetSetHexpandSetMethodInfo- ResolveMapMethod "setHighlightCurrentLine" o = ViewSetHighlightCurrentLineMethodInfo- ResolveMapMethod "setHscrollPolicy" o = Gtk.ScrollableSetHscrollPolicyMethodInfo- ResolveMapMethod "setIndent" o = Gtk.TextViewSetIndentMethodInfo- ResolveMapMethod "setIndentOnTab" o = ViewSetIndentOnTabMethodInfo- ResolveMapMethod "setIndentWidth" o = ViewSetIndentWidthMethodInfo- ResolveMapMethod "setInputHints" o = Gtk.TextViewSetInputHintsMethodInfo- ResolveMapMethod "setInputPurpose" o = Gtk.TextViewSetInputPurposeMethodInfo- ResolveMapMethod "setInsertSpacesInsteadOfTabs" o = ViewSetInsertSpacesInsteadOfTabsMethodInfo- ResolveMapMethod "setJustification" o = Gtk.TextViewSetJustificationMethodInfo- ResolveMapMethod "setLeftMargin" o = Gtk.TextViewSetLeftMarginMethodInfo- ResolveMapMethod "setMapped" o = Gtk.WidgetSetMappedMethodInfo- ResolveMapMethod "setMarginBottom" o = Gtk.WidgetSetMarginBottomMethodInfo- ResolveMapMethod "setMarginEnd" o = Gtk.WidgetSetMarginEndMethodInfo- ResolveMapMethod "setMarginLeft" o = Gtk.WidgetSetMarginLeftMethodInfo- ResolveMapMethod "setMarginRight" o = Gtk.WidgetSetMarginRightMethodInfo- ResolveMapMethod "setMarginStart" o = Gtk.WidgetSetMarginStartMethodInfo- ResolveMapMethod "setMarginTop" o = Gtk.WidgetSetMarginTopMethodInfo- ResolveMapMethod "setMarkAttributes" o = ViewSetMarkAttributesMethodInfo- ResolveMapMethod "setMonospace" o = Gtk.TextViewSetMonospaceMethodInfo- ResolveMapMethod "setNoShowAll" o = Gtk.WidgetSetNoShowAllMethodInfo- ResolveMapMethod "setOpacity" o = Gtk.WidgetSetOpacityMethodInfo- ResolveMapMethod "setOverwrite" o = Gtk.TextViewSetOverwriteMethodInfo- ResolveMapMethod "setParent" o = Gtk.WidgetSetParentMethodInfo- ResolveMapMethod "setParentWindow" o = Gtk.WidgetSetParentWindowMethodInfo- ResolveMapMethod "setPixelsAboveLines" o = Gtk.TextViewSetPixelsAboveLinesMethodInfo- ResolveMapMethod "setPixelsBelowLines" o = Gtk.TextViewSetPixelsBelowLinesMethodInfo- ResolveMapMethod "setPixelsInsideWrap" o = Gtk.TextViewSetPixelsInsideWrapMethodInfo- ResolveMapMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveMapMethod "setRealized" o = Gtk.WidgetSetRealizedMethodInfo- ResolveMapMethod "setReallocateRedraws" o = Gtk.ContainerSetReallocateRedrawsMethodInfo- ResolveMapMethod "setReceivesDefault" o = Gtk.WidgetSetReceivesDefaultMethodInfo- ResolveMapMethod "setRedrawOnAllocate" o = Gtk.WidgetSetRedrawOnAllocateMethodInfo- ResolveMapMethod "setResizeMode" o = Gtk.ContainerSetResizeModeMethodInfo- ResolveMapMethod "setRightMargin" o = Gtk.TextViewSetRightMarginMethodInfo- ResolveMapMethod "setRightMarginPosition" o = ViewSetRightMarginPositionMethodInfo- ResolveMapMethod "setSensitive" o = Gtk.WidgetSetSensitiveMethodInfo- ResolveMapMethod "setShowLineMarks" o = ViewSetShowLineMarksMethodInfo- ResolveMapMethod "setShowLineNumbers" o = ViewSetShowLineNumbersMethodInfo- ResolveMapMethod "setShowRightMargin" o = ViewSetShowRightMarginMethodInfo- ResolveMapMethod "setSizeRequest" o = Gtk.WidgetSetSizeRequestMethodInfo- ResolveMapMethod "setSmartBackspace" o = ViewSetSmartBackspaceMethodInfo- ResolveMapMethod "setSmartHomeEnd" o = ViewSetSmartHomeEndMethodInfo- ResolveMapMethod "setState" o = Gtk.WidgetSetStateMethodInfo- ResolveMapMethod "setStateFlags" o = Gtk.WidgetSetStateFlagsMethodInfo- ResolveMapMethod "setStyle" o = Gtk.WidgetSetStyleMethodInfo- ResolveMapMethod "setSupportMultidevice" o = Gtk.WidgetSetSupportMultideviceMethodInfo- ResolveMapMethod "setTabWidth" o = ViewSetTabWidthMethodInfo- ResolveMapMethod "setTabs" o = Gtk.TextViewSetTabsMethodInfo- ResolveMapMethod "setTooltipMarkup" o = Gtk.WidgetSetTooltipMarkupMethodInfo- ResolveMapMethod "setTooltipText" o = Gtk.WidgetSetTooltipTextMethodInfo- ResolveMapMethod "setTooltipWindow" o = Gtk.WidgetSetTooltipWindowMethodInfo- ResolveMapMethod "setTopMargin" o = Gtk.TextViewSetTopMarginMethodInfo- ResolveMapMethod "setVadjustment" o = Gtk.ScrollableSetVadjustmentMethodInfo- ResolveMapMethod "setValign" o = Gtk.WidgetSetValignMethodInfo- ResolveMapMethod "setVexpand" o = Gtk.WidgetSetVexpandMethodInfo- ResolveMapMethod "setVexpandSet" o = Gtk.WidgetSetVexpandSetMethodInfo- ResolveMapMethod "setView" o = MapSetViewMethodInfo- ResolveMapMethod "setVisible" o = Gtk.WidgetSetVisibleMethodInfo- ResolveMapMethod "setVisual" o = Gtk.WidgetSetVisualMethodInfo- ResolveMapMethod "setVscrollPolicy" o = Gtk.ScrollableSetVscrollPolicyMethodInfo- ResolveMapMethod "setWindow" o = Gtk.WidgetSetWindowMethodInfo- ResolveMapMethod "setWrapMode" o = Gtk.TextViewSetWrapModeMethodInfo- ResolveMapMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveMapMethod t Map, MethodInfo info Map p) => IsLabelProxy t (Map -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveMapMethod t Map, MethodInfo info Map p) => IsLabel t (Map -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "font-desc"- -- Type: TInterface "Pango" "FontDescription"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Nothing)--getMapFontDesc :: (MonadIO m, MapK o) => o -> m (Maybe Pango.FontDescription)-getMapFontDesc obj = liftIO $ getObjectPropertyBoxed obj "font-desc" Pango.FontDescription--setMapFontDesc :: (MonadIO m, MapK o) => o -> Pango.FontDescription -> m ()-setMapFontDesc obj val = liftIO $ setObjectPropertyBoxed obj "font-desc" (Just val)--constructMapFontDesc :: Pango.FontDescription -> IO ([Char], GValue)-constructMapFontDesc val = constructObjectPropertyBoxed "font-desc" (Just val)--clearMapFontDesc :: (MonadIO m, MapK o) => o -> m ()-clearMapFontDesc obj = liftIO $ setObjectPropertyBoxed obj "font-desc" (Nothing :: Maybe Pango.FontDescription)--data MapFontDescPropertyInfo-instance AttrInfo MapFontDescPropertyInfo where- type AttrAllowedOps MapFontDescPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint MapFontDescPropertyInfo = (~) Pango.FontDescription- type AttrBaseTypeConstraint MapFontDescPropertyInfo = MapK- type AttrGetType MapFontDescPropertyInfo = (Maybe Pango.FontDescription)- type AttrLabel MapFontDescPropertyInfo = "font-desc"- attrGet _ = getMapFontDesc- attrSet _ = setMapFontDesc- attrConstruct _ = constructMapFontDesc- attrClear _ = clearMapFontDesc---- VVV Prop "view"- -- Type: TInterface "GtkSource" "View"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just True,Just False)--getMapView :: (MonadIO m, MapK o) => o -> m (Maybe View)-getMapView obj = liftIO $ getObjectPropertyObject obj "view" View--setMapView :: (MonadIO m, MapK o, ViewK a) => o -> a -> m ()-setMapView obj val = liftIO $ setObjectPropertyObject obj "view" (Just val)--constructMapView :: (ViewK a) => a -> IO ([Char], GValue)-constructMapView val = constructObjectPropertyObject "view" (Just val)--data MapViewPropertyInfo-instance AttrInfo MapViewPropertyInfo where- type AttrAllowedOps MapViewPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint MapViewPropertyInfo = ViewK- type AttrBaseTypeConstraint MapViewPropertyInfo = MapK- type AttrGetType MapViewPropertyInfo = (Maybe View)- type AttrLabel MapViewPropertyInfo = "view"- attrGet _ = getMapView- attrSet _ = setMapView- attrConstruct _ = constructMapView- attrClear _ = undefined--type instance AttributeList Map = MapAttributeList-type MapAttributeList = ('[ '("acceptsTab", Gtk.TextViewAcceptsTabPropertyInfo), '("appPaintable", Gtk.WidgetAppPaintablePropertyInfo), '("autoIndent", ViewAutoIndentPropertyInfo), '("backgroundPattern", ViewBackgroundPatternPropertyInfo), '("borderWidth", Gtk.ContainerBorderWidthPropertyInfo), '("bottomMargin", Gtk.TextViewBottomMarginPropertyInfo), '("buffer", Gtk.TextViewBufferPropertyInfo), '("canDefault", Gtk.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.WidgetCanFocusPropertyInfo), '("child", Gtk.ContainerChildPropertyInfo), '("completion", ViewCompletionPropertyInfo), '("compositeChild", Gtk.WidgetCompositeChildPropertyInfo), '("cursorVisible", Gtk.TextViewCursorVisiblePropertyInfo), '("doubleBuffered", Gtk.WidgetDoubleBufferedPropertyInfo), '("drawSpaces", ViewDrawSpacesPropertyInfo), '("editable", Gtk.TextViewEditablePropertyInfo), '("events", Gtk.WidgetEventsPropertyInfo), '("expand", Gtk.WidgetExpandPropertyInfo), '("fontDesc", MapFontDescPropertyInfo), '("hadjustment", Gtk.ScrollableHadjustmentPropertyInfo), '("halign", Gtk.WidgetHalignPropertyInfo), '("hasDefault", Gtk.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.WidgetHexpandSetPropertyInfo), '("highlightCurrentLine", ViewHighlightCurrentLinePropertyInfo), '("hscrollPolicy", Gtk.ScrollableHscrollPolicyPropertyInfo), '("imModule", Gtk.TextViewImModulePropertyInfo), '("indent", Gtk.TextViewIndentPropertyInfo), '("indentOnTab", ViewIndentOnTabPropertyInfo), '("indentWidth", ViewIndentWidthPropertyInfo), '("inputHints", Gtk.TextViewInputHintsPropertyInfo), '("inputPurpose", Gtk.TextViewInputPurposePropertyInfo), '("insertSpacesInsteadOfTabs", ViewInsertSpacesInsteadOfTabsPropertyInfo), '("isFocus", Gtk.WidgetIsFocusPropertyInfo), '("justification", Gtk.TextViewJustificationPropertyInfo), '("leftMargin", Gtk.TextViewLeftMarginPropertyInfo), '("margin", Gtk.WidgetMarginPropertyInfo), '("marginBottom", Gtk.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.WidgetMarginTopPropertyInfo), '("monospace", Gtk.TextViewMonospacePropertyInfo), '("name", Gtk.WidgetNamePropertyInfo), '("noShowAll", Gtk.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.WidgetOpacityPropertyInfo), '("overwrite", Gtk.TextViewOverwritePropertyInfo), '("parent", Gtk.WidgetParentPropertyInfo), '("pixelsAboveLines", Gtk.TextViewPixelsAboveLinesPropertyInfo), '("pixelsBelowLines", Gtk.TextViewPixelsBelowLinesPropertyInfo), '("pixelsInsideWrap", Gtk.TextViewPixelsInsideWrapPropertyInfo), '("populateAll", Gtk.TextViewPopulateAllPropertyInfo), '("receivesDefault", Gtk.WidgetReceivesDefaultPropertyInfo), '("resizeMode", Gtk.ContainerResizeModePropertyInfo), '("rightMargin", Gtk.TextViewRightMarginPropertyInfo), '("rightMarginPosition", ViewRightMarginPositionPropertyInfo), '("scaleFactor", Gtk.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.WidgetSensitivePropertyInfo), '("showLineMarks", ViewShowLineMarksPropertyInfo), '("showLineNumbers", ViewShowLineNumbersPropertyInfo), '("showRightMargin", ViewShowRightMarginPropertyInfo), '("smartBackspace", ViewSmartBackspacePropertyInfo), '("smartHomeEnd", ViewSmartHomeEndPropertyInfo), '("style", Gtk.WidgetStylePropertyInfo), '("tabWidth", ViewTabWidthPropertyInfo), '("tabs", Gtk.TextViewTabsPropertyInfo), '("tooltipMarkup", Gtk.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.WidgetTooltipTextPropertyInfo), '("topMargin", Gtk.TextViewTopMarginPropertyInfo), '("vadjustment", Gtk.ScrollableVadjustmentPropertyInfo), '("valign", Gtk.WidgetValignPropertyInfo), '("vexpand", Gtk.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.WidgetVexpandSetPropertyInfo), '("view", MapViewPropertyInfo), '("visible", Gtk.WidgetVisiblePropertyInfo), '("vscrollPolicy", Gtk.ScrollableVscrollPolicyPropertyInfo), '("widthRequest", Gtk.WidgetWidthRequestPropertyInfo), '("window", Gtk.WidgetWindowPropertyInfo), '("wrapMode", Gtk.TextViewWrapModePropertyInfo)] :: [(Symbol, *)])--mapFontDesc :: AttrLabelProxy "fontDesc"-mapFontDesc = AttrLabelProxy--mapView :: AttrLabelProxy "view"-mapView = AttrLabelProxy--type instance SignalList Map = MapSignalList-type MapSignalList = ('[ '("accelClosuresChanged", Gtk.WidgetAccelClosuresChangedSignalInfo), '("add", Gtk.ContainerAddSignalInfo), '("backspace", Gtk.TextViewBackspaceSignalInfo), '("buttonPressEvent", Gtk.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.WidgetCanActivateAccelSignalInfo), '("changeCase", ViewChangeCaseSignalInfo), '("changeNumber", ViewChangeNumberSignalInfo), '("checkResize", Gtk.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.WidgetConfigureEventSignalInfo), '("copyClipboard", Gtk.TextViewCopyClipboardSignalInfo), '("cutClipboard", Gtk.TextViewCutClipboardSignalInfo), '("damageEvent", Gtk.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.WidgetDeleteEventSignalInfo), '("deleteFromCursor", Gtk.TextViewDeleteFromCursorSignalInfo), '("destroy", Gtk.WidgetDestroySignalInfo), '("destroyEvent", Gtk.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.WidgetDirectionChangedSignalInfo), '("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), '("enterNotifyEvent", Gtk.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.WidgetEventSignalInfo), '("eventAfter", Gtk.WidgetEventAfterSignalInfo), '("extendSelection", Gtk.TextViewExtendSelectionSignalInfo), '("focus", Gtk.WidgetFocusSignalInfo), '("focusInEvent", Gtk.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.WidgetGrabNotifySignalInfo), '("hide", Gtk.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.WidgetHierarchyChangedSignalInfo), '("insertAtCursor", Gtk.TextViewInsertAtCursorSignalInfo), '("joinLines", ViewJoinLinesSignalInfo), '("keyPressEvent", Gtk.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.WidgetLeaveNotifyEventSignalInfo), '("lineMarkActivated", ViewLineMarkActivatedSignalInfo), '("map", Gtk.WidgetMapSignalInfo), '("mapEvent", Gtk.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.WidgetMotionNotifyEventSignalInfo), '("moveCursor", Gtk.TextViewMoveCursorSignalInfo), '("moveFocus", Gtk.WidgetMoveFocusSignalInfo), '("moveLines", ViewMoveLinesSignalInfo), '("moveToMatchingBracket", ViewMoveToMatchingBracketSignalInfo), '("moveViewport", Gtk.TextViewMoveViewportSignalInfo), '("moveWords", ViewMoveWordsSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("parentSet", Gtk.WidgetParentSetSignalInfo), '("pasteClipboard", Gtk.TextViewPasteClipboardSignalInfo), '("populatePopup", Gtk.TextViewPopulatePopupSignalInfo), '("popupMenu", Gtk.WidgetPopupMenuSignalInfo), '("preeditChanged", Gtk.TextViewPreeditChangedSignalInfo), '("propertyNotifyEvent", Gtk.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.WidgetQueryTooltipSignalInfo), '("realize", Gtk.WidgetRealizeSignalInfo), '("redo", ViewRedoSignalInfo), '("remove", Gtk.ContainerRemoveSignalInfo), '("screenChanged", Gtk.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.WidgetScrollEventSignalInfo), '("selectAll", Gtk.TextViewSelectAllSignalInfo), '("selectionClearEvent", Gtk.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.WidgetSelectionRequestEventSignalInfo), '("setAnchor", Gtk.TextViewSetAnchorSignalInfo), '("setFocusChild", Gtk.ContainerSetFocusChildSignalInfo), '("show", Gtk.WidgetShowSignalInfo), '("showCompletion", ViewShowCompletionSignalInfo), '("showHelp", Gtk.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.WidgetSizeAllocateSignalInfo), '("smartHomeEnd", ViewSmartHomeEndSignalInfo), '("stateChanged", Gtk.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.WidgetStyleUpdatedSignalInfo), '("toggleCursorVisible", Gtk.TextViewToggleCursorVisibleSignalInfo), '("toggleOverwrite", Gtk.TextViewToggleOverwriteSignalInfo), '("touchEvent", Gtk.WidgetTouchEventSignalInfo), '("undo", ViewUndoSignalInfo), '("unmap", Gtk.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])---- method Map::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Map")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_map_new" gtk_source_map_new :: - IO (Ptr Map)---mapNew ::- (MonadIO m) =>- m Map -- result-mapNew = liftIO $ do- result <- gtk_source_map_new- checkUnexpectedReturnNULL "gtk_source_map_new" result- result' <- (newObject Map) result- return result'---- method Map::get_view--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Map", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "View")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_map_get_view" gtk_source_map_get_view :: - Ptr Map -> -- _obj : TInterface "GtkSource" "Map"- IO (Ptr View)---mapGetView ::- (MonadIO m, MapK a) =>- a -- _obj- -> m (Maybe View) -- result-mapGetView _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_map_get_view _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject View) result'- return result''- touchManagedPtr _obj- return maybeResult--data MapGetViewMethodInfo-instance (signature ~ (m (Maybe View)), MonadIO m, MapK a) => MethodInfo MapGetViewMethodInfo a signature where- overloadedMethod _ = mapGetView---- method Map::set_view--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Map", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "view", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_map_set_view" gtk_source_map_set_view :: - Ptr Map -> -- _obj : TInterface "GtkSource" "Map"- Ptr View -> -- view : TInterface "GtkSource" "View"- IO ()---mapSetView ::- (MonadIO m, MapK a, ViewK b) =>- a -- _obj- -> b -- view- -> m () -- result-mapSetView _obj view = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let view' = unsafeManagedPtrCastPtr view- gtk_source_map_set_view _obj' view'- touchManagedPtr _obj- touchManagedPtr view- return ()--data MapSetViewMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, MapK a, ViewK b) => MethodInfo MapSetViewMethodInfo a signature where- overloadedMethod _ = mapSetView--
− GI/GtkSource/Objects/Map.hs-boot
@@ -1,17 +0,0 @@-module GI.GtkSource.Objects.Map where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype Map = Map (ForeignPtr Map)-instance GObject Map where-class GObject o => MapK o-instance (GObject o, IsDescendantOf Map o) => MapK o-data MapFontDescPropertyInfo-data MapViewPropertyInfo-data MapGetViewMethodInfo-data MapSetViewMethodInfo
− GI/GtkSource/Objects/Mark.hs
@@ -1,290 +0,0 @@---{- |-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.GtkSource.Objects.Mark- ( ---- * Exported types- Mark(..) ,- MarkK ,- toMark ,- noMark ,--- -- * Methods--- ** markGetCategory- MarkGetCategoryMethodInfo ,- markGetCategory ,----- ** markNew- markNew ,----- ** markNext- MarkNextMethodInfo ,- markNext ,----- ** markPrev- MarkPrevMethodInfo ,- markPrev ,----- -- * Properties--- ** Category- MarkCategoryPropertyInfo ,- constructMarkCategory ,- getMarkCategory ,- markCategory ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.Gtk as Gtk--newtype Mark = Mark (ForeignPtr Mark)-foreign import ccall "gtk_source_mark_get_type"- c_gtk_source_mark_get_type :: IO GType--type instance ParentTypes Mark = MarkParentTypes-type MarkParentTypes = '[Gtk.TextMark, GObject.Object]--instance GObject Mark where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_mark_get_type- --class GObject o => MarkK o-instance (GObject o, IsDescendantOf Mark o) => MarkK o--toMark :: MarkK o => o -> IO Mark-toMark = unsafeCastTo Mark--noMark :: Maybe Mark-noMark = Nothing--type family ResolveMarkMethod (t :: Symbol) (o :: *) :: * where- ResolveMarkMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveMarkMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveMarkMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveMarkMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveMarkMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveMarkMethod "next" o = MarkNextMethodInfo- ResolveMarkMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveMarkMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveMarkMethod "prev" o = MarkPrevMethodInfo- ResolveMarkMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveMarkMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveMarkMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveMarkMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveMarkMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveMarkMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveMarkMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveMarkMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveMarkMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveMarkMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveMarkMethod "getBuffer" o = Gtk.TextMarkGetBufferMethodInfo- ResolveMarkMethod "getCategory" o = MarkGetCategoryMethodInfo- ResolveMarkMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveMarkMethod "getDeleted" o = Gtk.TextMarkGetDeletedMethodInfo- ResolveMarkMethod "getLeftGravity" o = Gtk.TextMarkGetLeftGravityMethodInfo- ResolveMarkMethod "getName" o = Gtk.TextMarkGetNameMethodInfo- ResolveMarkMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveMarkMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveMarkMethod "getVisible" o = Gtk.TextMarkGetVisibleMethodInfo- ResolveMarkMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveMarkMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveMarkMethod "setVisible" o = Gtk.TextMarkSetVisibleMethodInfo- ResolveMarkMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveMarkMethod t Mark, MethodInfo info Mark p) => IsLabelProxy t (Mark -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveMarkMethod t Mark, MethodInfo info Mark p) => IsLabel t (Mark -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "category"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just False,Nothing)--getMarkCategory :: (MonadIO m, MarkK o) => o -> m T.Text-getMarkCategory obj = liftIO $ checkUnexpectedNothing "getMarkCategory" $ getObjectPropertyString obj "category"--constructMarkCategory :: T.Text -> IO ([Char], GValue)-constructMarkCategory val = constructObjectPropertyString "category" (Just val)--data MarkCategoryPropertyInfo-instance AttrInfo MarkCategoryPropertyInfo where- type AttrAllowedOps MarkCategoryPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint MarkCategoryPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint MarkCategoryPropertyInfo = MarkK- type AttrGetType MarkCategoryPropertyInfo = T.Text- type AttrLabel MarkCategoryPropertyInfo = "category"- attrGet _ = getMarkCategory- attrSet _ = undefined- attrConstruct _ = constructMarkCategory- attrClear _ = undefined--type instance AttributeList Mark = MarkAttributeList-type MarkAttributeList = ('[ '("category", MarkCategoryPropertyInfo), '("leftGravity", Gtk.TextMarkLeftGravityPropertyInfo), '("name", Gtk.TextMarkNamePropertyInfo)] :: [(Symbol, *)])--markCategory :: AttrLabelProxy "category"-markCategory = AttrLabelProxy--type instance SignalList Mark = MarkSignalList-type MarkSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method Mark::new--- method type : Constructor--- Args : [Arg {argCName = "name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Mark")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_new" gtk_source_mark_new :: - CString -> -- name : TBasicType TUTF8- CString -> -- category : TBasicType TUTF8- IO (Ptr Mark)---markNew ::- (MonadIO m) =>- T.Text -- name- -> T.Text -- category- -> m Mark -- result-markNew name category = liftIO $ do- name' <- textToCString name- category' <- textToCString category- result <- gtk_source_mark_new name' category'- checkUnexpectedReturnNULL "gtk_source_mark_new" result- result' <- (wrapObject Mark) result- freeMem name'- freeMem category'- return result'---- method Mark::get_category--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Mark", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_get_category" gtk_source_mark_get_category :: - Ptr Mark -> -- _obj : TInterface "GtkSource" "Mark"- IO CString---markGetCategory ::- (MonadIO m, MarkK a) =>- a -- _obj- -> m T.Text -- result-markGetCategory _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_mark_get_category _obj'- checkUnexpectedReturnNULL "gtk_source_mark_get_category" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data MarkGetCategoryMethodInfo-instance (signature ~ (m T.Text), MonadIO m, MarkK a) => MethodInfo MarkGetCategoryMethodInfo a signature where- overloadedMethod _ = markGetCategory---- method Mark::next--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Mark", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Mark")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_next" gtk_source_mark_next :: - Ptr Mark -> -- _obj : TInterface "GtkSource" "Mark"- CString -> -- category : TBasicType TUTF8- IO (Ptr Mark)---markNext ::- (MonadIO m, MarkK a) =>- a -- _obj- -> Maybe (T.Text) -- category- -> m (Maybe Mark) -- result-markNext _obj category = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeCategory <- case category of- Nothing -> return nullPtr- Just jCategory -> do- jCategory' <- textToCString jCategory- return jCategory'- result <- gtk_source_mark_next _obj' maybeCategory- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject Mark) result'- return result''- touchManagedPtr _obj- freeMem maybeCategory- return maybeResult--data MarkNextMethodInfo-instance (signature ~ (Maybe (T.Text) -> m (Maybe Mark)), MonadIO m, MarkK a) => MethodInfo MarkNextMethodInfo a signature where- overloadedMethod _ = markNext---- method Mark::prev--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Mark", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Mark")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_prev" gtk_source_mark_prev :: - Ptr Mark -> -- _obj : TInterface "GtkSource" "Mark"- CString -> -- category : TBasicType TUTF8- IO (Ptr Mark)---markPrev ::- (MonadIO m, MarkK a) =>- a -- _obj- -> T.Text -- category- -> m (Maybe Mark) -- result-markPrev _obj category = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- category' <- textToCString category- result <- gtk_source_mark_prev _obj' category'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject Mark) result'- return result''- touchManagedPtr _obj- freeMem category'- return maybeResult--data MarkPrevMethodInfo-instance (signature ~ (T.Text -> m (Maybe Mark)), MonadIO m, MarkK a) => MethodInfo MarkPrevMethodInfo a signature where- overloadedMethod _ = markPrev--
− GI/GtkSource/Objects/Mark.hs-boot
@@ -1,17 +0,0 @@-module GI.GtkSource.Objects.Mark where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype Mark = Mark (ForeignPtr Mark)-instance GObject Mark where-class GObject o => MarkK o-instance (GObject o, IsDescendantOf Mark o) => MarkK o-data MarkCategoryPropertyInfo-data MarkGetCategoryMethodInfo-data MarkNextMethodInfo-data MarkPrevMethodInfo
− GI/GtkSource/Objects/MarkAttributes.hs
@@ -1,920 +0,0 @@---{- |-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.GtkSource.Objects.MarkAttributes- ( ---- * Exported types- MarkAttributes(..) ,- MarkAttributesK ,- toMarkAttributes ,- noMarkAttributes ,--- -- * Methods--- ** markAttributesGetBackground- MarkAttributesGetBackgroundMethodInfo ,- markAttributesGetBackground ,----- ** markAttributesGetGicon- MarkAttributesGetGiconMethodInfo ,- markAttributesGetGicon ,----- ** markAttributesGetIconName- MarkAttributesGetIconNameMethodInfo ,- markAttributesGetIconName ,----- ** markAttributesGetPixbuf- MarkAttributesGetPixbufMethodInfo ,- markAttributesGetPixbuf ,----- ** markAttributesGetStockId- MarkAttributesGetStockIdMethodInfo ,- markAttributesGetStockId ,----- ** markAttributesGetTooltipMarkup- MarkAttributesGetTooltipMarkupMethodInfo,- markAttributesGetTooltipMarkup ,----- ** markAttributesGetTooltipText- MarkAttributesGetTooltipTextMethodInfo ,- markAttributesGetTooltipText ,----- ** markAttributesNew- markAttributesNew ,----- ** markAttributesRenderIcon- MarkAttributesRenderIconMethodInfo ,- markAttributesRenderIcon ,----- ** markAttributesSetBackground- MarkAttributesSetBackgroundMethodInfo ,- markAttributesSetBackground ,----- ** markAttributesSetGicon- MarkAttributesSetGiconMethodInfo ,- markAttributesSetGicon ,----- ** markAttributesSetIconName- MarkAttributesSetIconNameMethodInfo ,- markAttributesSetIconName ,----- ** markAttributesSetPixbuf- MarkAttributesSetPixbufMethodInfo ,- markAttributesSetPixbuf ,----- ** markAttributesSetStockId- MarkAttributesSetStockIdMethodInfo ,- markAttributesSetStockId ,----- -- * Properties--- ** Background- MarkAttributesBackgroundPropertyInfo ,- constructMarkAttributesBackground ,- getMarkAttributesBackground ,- markAttributesBackground ,- setMarkAttributesBackground ,----- ** Gicon- MarkAttributesGiconPropertyInfo ,- constructMarkAttributesGicon ,- getMarkAttributesGicon ,- markAttributesGicon ,- setMarkAttributesGicon ,----- ** IconName- MarkAttributesIconNamePropertyInfo ,- constructMarkAttributesIconName ,- getMarkAttributesIconName ,- markAttributesIconName ,- setMarkAttributesIconName ,----- ** Pixbuf- MarkAttributesPixbufPropertyInfo ,- constructMarkAttributesPixbuf ,- getMarkAttributesPixbuf ,- markAttributesPixbuf ,- setMarkAttributesPixbuf ,----- ** StockId- MarkAttributesStockIdPropertyInfo ,- constructMarkAttributesStockId ,- getMarkAttributesStockId ,- markAttributesStockId ,- setMarkAttributesStockId ,----- -- * Signals--- ** QueryTooltipMarkup- MarkAttributesQueryTooltipMarkupCallback,- MarkAttributesQueryTooltipMarkupCallbackC,- MarkAttributesQueryTooltipMarkupSignalInfo,- afterMarkAttributesQueryTooltipMarkup ,- markAttributesQueryTooltipMarkupCallbackWrapper,- markAttributesQueryTooltipMarkupClosure ,- mkMarkAttributesQueryTooltipMarkupCallback,- noMarkAttributesQueryTooltipMarkupCallback,- onMarkAttributesQueryTooltipMarkup ,----- ** QueryTooltipText- MarkAttributesQueryTooltipTextCallback ,- MarkAttributesQueryTooltipTextCallbackC ,- MarkAttributesQueryTooltipTextSignalInfo,- afterMarkAttributesQueryTooltipText ,- markAttributesQueryTooltipTextCallbackWrapper,- markAttributesQueryTooltipTextClosure ,- mkMarkAttributesQueryTooltipTextCallback,- noMarkAttributesQueryTooltipTextCallback,- onMarkAttributesQueryTooltipText ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.Gdk as Gdk-import qualified GI.GdkPixbuf as GdkPixbuf-import qualified GI.Gio as Gio-import qualified GI.Gtk as Gtk--newtype MarkAttributes = MarkAttributes (ForeignPtr MarkAttributes)-foreign import ccall "gtk_source_mark_attributes_get_type"- c_gtk_source_mark_attributes_get_type :: IO GType--type instance ParentTypes MarkAttributes = MarkAttributesParentTypes-type MarkAttributesParentTypes = '[GObject.Object]--instance GObject MarkAttributes where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_mark_attributes_get_type- --class GObject o => MarkAttributesK o-instance (GObject o, IsDescendantOf MarkAttributes o) => MarkAttributesK o--toMarkAttributes :: MarkAttributesK o => o -> IO MarkAttributes-toMarkAttributes = unsafeCastTo MarkAttributes--noMarkAttributes :: Maybe MarkAttributes-noMarkAttributes = Nothing--type family ResolveMarkAttributesMethod (t :: Symbol) (o :: *) :: * where- ResolveMarkAttributesMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveMarkAttributesMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveMarkAttributesMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveMarkAttributesMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveMarkAttributesMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveMarkAttributesMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveMarkAttributesMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveMarkAttributesMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveMarkAttributesMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveMarkAttributesMethod "renderIcon" o = MarkAttributesRenderIconMethodInfo- ResolveMarkAttributesMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveMarkAttributesMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveMarkAttributesMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveMarkAttributesMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveMarkAttributesMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveMarkAttributesMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveMarkAttributesMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveMarkAttributesMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveMarkAttributesMethod "getBackground" o = MarkAttributesGetBackgroundMethodInfo- ResolveMarkAttributesMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveMarkAttributesMethod "getGicon" o = MarkAttributesGetGiconMethodInfo- ResolveMarkAttributesMethod "getIconName" o = MarkAttributesGetIconNameMethodInfo- ResolveMarkAttributesMethod "getPixbuf" o = MarkAttributesGetPixbufMethodInfo- ResolveMarkAttributesMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveMarkAttributesMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveMarkAttributesMethod "getStockId" o = MarkAttributesGetStockIdMethodInfo- ResolveMarkAttributesMethod "getTooltipMarkup" o = MarkAttributesGetTooltipMarkupMethodInfo- ResolveMarkAttributesMethod "getTooltipText" o = MarkAttributesGetTooltipTextMethodInfo- ResolveMarkAttributesMethod "setBackground" o = MarkAttributesSetBackgroundMethodInfo- ResolveMarkAttributesMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveMarkAttributesMethod "setGicon" o = MarkAttributesSetGiconMethodInfo- ResolveMarkAttributesMethod "setIconName" o = MarkAttributesSetIconNameMethodInfo- ResolveMarkAttributesMethod "setPixbuf" o = MarkAttributesSetPixbufMethodInfo- ResolveMarkAttributesMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveMarkAttributesMethod "setStockId" o = MarkAttributesSetStockIdMethodInfo- ResolveMarkAttributesMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveMarkAttributesMethod t MarkAttributes, MethodInfo info MarkAttributes p) => IsLabelProxy t (MarkAttributes -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveMarkAttributesMethod t MarkAttributes, MethodInfo info MarkAttributes p) => IsLabel t (MarkAttributes -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- signal MarkAttributes::query-tooltip-markup-type MarkAttributesQueryTooltipMarkupCallback =- Mark ->- IO T.Text--noMarkAttributesQueryTooltipMarkupCallback :: Maybe MarkAttributesQueryTooltipMarkupCallback-noMarkAttributesQueryTooltipMarkupCallback = Nothing--type MarkAttributesQueryTooltipMarkupCallbackC =- Ptr () -> -- object- Ptr Mark ->- Ptr () -> -- user_data- IO CString--foreign import ccall "wrapper"- mkMarkAttributesQueryTooltipMarkupCallback :: MarkAttributesQueryTooltipMarkupCallbackC -> IO (FunPtr MarkAttributesQueryTooltipMarkupCallbackC)--markAttributesQueryTooltipMarkupClosure :: MarkAttributesQueryTooltipMarkupCallback -> IO Closure-markAttributesQueryTooltipMarkupClosure cb = newCClosure =<< mkMarkAttributesQueryTooltipMarkupCallback wrapped- where wrapped = markAttributesQueryTooltipMarkupCallbackWrapper cb--markAttributesQueryTooltipMarkupCallbackWrapper ::- MarkAttributesQueryTooltipMarkupCallback ->- Ptr () ->- Ptr Mark ->- Ptr () ->- IO CString-markAttributesQueryTooltipMarkupCallbackWrapper _cb _ mark _ = do- mark' <- (newObject Mark) mark- result <- _cb mark'- result' <- textToCString result- return result'--onMarkAttributesQueryTooltipMarkup :: (GObject a, MonadIO m) => a -> MarkAttributesQueryTooltipMarkupCallback -> m SignalHandlerId-onMarkAttributesQueryTooltipMarkup obj cb = liftIO $ connectMarkAttributesQueryTooltipMarkup obj cb SignalConnectBefore-afterMarkAttributesQueryTooltipMarkup :: (GObject a, MonadIO m) => a -> MarkAttributesQueryTooltipMarkupCallback -> m SignalHandlerId-afterMarkAttributesQueryTooltipMarkup obj cb = connectMarkAttributesQueryTooltipMarkup obj cb SignalConnectAfter--connectMarkAttributesQueryTooltipMarkup :: (GObject a, MonadIO m) =>- a -> MarkAttributesQueryTooltipMarkupCallback -> SignalConnectMode -> m SignalHandlerId-connectMarkAttributesQueryTooltipMarkup obj cb after = liftIO $ do- cb' <- mkMarkAttributesQueryTooltipMarkupCallback (markAttributesQueryTooltipMarkupCallbackWrapper cb)- connectSignalFunPtr obj "query-tooltip-markup" cb' after---- signal MarkAttributes::query-tooltip-text-type MarkAttributesQueryTooltipTextCallback =- Mark ->- IO T.Text--noMarkAttributesQueryTooltipTextCallback :: Maybe MarkAttributesQueryTooltipTextCallback-noMarkAttributesQueryTooltipTextCallback = Nothing--type MarkAttributesQueryTooltipTextCallbackC =- Ptr () -> -- object- Ptr Mark ->- Ptr () -> -- user_data- IO CString--foreign import ccall "wrapper"- mkMarkAttributesQueryTooltipTextCallback :: MarkAttributesQueryTooltipTextCallbackC -> IO (FunPtr MarkAttributesQueryTooltipTextCallbackC)--markAttributesQueryTooltipTextClosure :: MarkAttributesQueryTooltipTextCallback -> IO Closure-markAttributesQueryTooltipTextClosure cb = newCClosure =<< mkMarkAttributesQueryTooltipTextCallback wrapped- where wrapped = markAttributesQueryTooltipTextCallbackWrapper cb--markAttributesQueryTooltipTextCallbackWrapper ::- MarkAttributesQueryTooltipTextCallback ->- Ptr () ->- Ptr Mark ->- Ptr () ->- IO CString-markAttributesQueryTooltipTextCallbackWrapper _cb _ mark _ = do- mark' <- (newObject Mark) mark- result <- _cb mark'- result' <- textToCString result- return result'--onMarkAttributesQueryTooltipText :: (GObject a, MonadIO m) => a -> MarkAttributesQueryTooltipTextCallback -> m SignalHandlerId-onMarkAttributesQueryTooltipText obj cb = liftIO $ connectMarkAttributesQueryTooltipText obj cb SignalConnectBefore-afterMarkAttributesQueryTooltipText :: (GObject a, MonadIO m) => a -> MarkAttributesQueryTooltipTextCallback -> m SignalHandlerId-afterMarkAttributesQueryTooltipText obj cb = connectMarkAttributesQueryTooltipText obj cb SignalConnectAfter--connectMarkAttributesQueryTooltipText :: (GObject a, MonadIO m) =>- a -> MarkAttributesQueryTooltipTextCallback -> SignalConnectMode -> m SignalHandlerId-connectMarkAttributesQueryTooltipText obj cb after = liftIO $ do- cb' <- mkMarkAttributesQueryTooltipTextCallback (markAttributesQueryTooltipTextCallbackWrapper cb)- connectSignalFunPtr obj "query-tooltip-text" cb' after---- VVV Prop "background"- -- Type: TInterface "Gdk" "RGBA"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Just False)--getMarkAttributesBackground :: (MonadIO m, MarkAttributesK o) => o -> m (Maybe Gdk.RGBA)-getMarkAttributesBackground obj = liftIO $ getObjectPropertyBoxed obj "background" Gdk.RGBA--setMarkAttributesBackground :: (MonadIO m, MarkAttributesK o) => o -> Gdk.RGBA -> m ()-setMarkAttributesBackground obj val = liftIO $ setObjectPropertyBoxed obj "background" (Just val)--constructMarkAttributesBackground :: Gdk.RGBA -> IO ([Char], GValue)-constructMarkAttributesBackground val = constructObjectPropertyBoxed "background" (Just val)--data MarkAttributesBackgroundPropertyInfo-instance AttrInfo MarkAttributesBackgroundPropertyInfo where- type AttrAllowedOps MarkAttributesBackgroundPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint MarkAttributesBackgroundPropertyInfo = (~) Gdk.RGBA- type AttrBaseTypeConstraint MarkAttributesBackgroundPropertyInfo = MarkAttributesK- type AttrGetType MarkAttributesBackgroundPropertyInfo = (Maybe Gdk.RGBA)- type AttrLabel MarkAttributesBackgroundPropertyInfo = "background"- attrGet _ = getMarkAttributesBackground- attrSet _ = setMarkAttributesBackground- attrConstruct _ = constructMarkAttributesBackground- attrClear _ = undefined---- VVV Prop "gicon"- -- Type: TInterface "Gio" "Icon"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getMarkAttributesGicon :: (MonadIO m, MarkAttributesK o) => o -> m Gio.Icon-getMarkAttributesGicon obj = liftIO $ checkUnexpectedNothing "getMarkAttributesGicon" $ getObjectPropertyObject obj "gicon" Gio.Icon--setMarkAttributesGicon :: (MonadIO m, MarkAttributesK o, Gio.IconK a) => o -> a -> m ()-setMarkAttributesGicon obj val = liftIO $ setObjectPropertyObject obj "gicon" (Just val)--constructMarkAttributesGicon :: (Gio.IconK a) => a -> IO ([Char], GValue)-constructMarkAttributesGicon val = constructObjectPropertyObject "gicon" (Just val)--data MarkAttributesGiconPropertyInfo-instance AttrInfo MarkAttributesGiconPropertyInfo where- type AttrAllowedOps MarkAttributesGiconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint MarkAttributesGiconPropertyInfo = Gio.IconK- type AttrBaseTypeConstraint MarkAttributesGiconPropertyInfo = MarkAttributesK- type AttrGetType MarkAttributesGiconPropertyInfo = Gio.Icon- type AttrLabel MarkAttributesGiconPropertyInfo = "gicon"- attrGet _ = getMarkAttributesGicon- attrSet _ = setMarkAttributesGicon- attrConstruct _ = constructMarkAttributesGicon- attrClear _ = undefined---- VVV Prop "icon-name"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getMarkAttributesIconName :: (MonadIO m, MarkAttributesK o) => o -> m T.Text-getMarkAttributesIconName obj = liftIO $ checkUnexpectedNothing "getMarkAttributesIconName" $ getObjectPropertyString obj "icon-name"--setMarkAttributesIconName :: (MonadIO m, MarkAttributesK o) => o -> T.Text -> m ()-setMarkAttributesIconName obj val = liftIO $ setObjectPropertyString obj "icon-name" (Just val)--constructMarkAttributesIconName :: T.Text -> IO ([Char], GValue)-constructMarkAttributesIconName val = constructObjectPropertyString "icon-name" (Just val)--data MarkAttributesIconNamePropertyInfo-instance AttrInfo MarkAttributesIconNamePropertyInfo where- type AttrAllowedOps MarkAttributesIconNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint MarkAttributesIconNamePropertyInfo = (~) T.Text- type AttrBaseTypeConstraint MarkAttributesIconNamePropertyInfo = MarkAttributesK- type AttrGetType MarkAttributesIconNamePropertyInfo = T.Text- type AttrLabel MarkAttributesIconNamePropertyInfo = "icon-name"- attrGet _ = getMarkAttributesIconName- attrSet _ = setMarkAttributesIconName- attrConstruct _ = constructMarkAttributesIconName- attrClear _ = undefined---- VVV Prop "pixbuf"- -- Type: TInterface "GdkPixbuf" "Pixbuf"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getMarkAttributesPixbuf :: (MonadIO m, MarkAttributesK o) => o -> m GdkPixbuf.Pixbuf-getMarkAttributesPixbuf obj = liftIO $ checkUnexpectedNothing "getMarkAttributesPixbuf" $ getObjectPropertyObject obj "pixbuf" GdkPixbuf.Pixbuf--setMarkAttributesPixbuf :: (MonadIO m, MarkAttributesK o, GdkPixbuf.PixbufK a) => o -> a -> m ()-setMarkAttributesPixbuf obj val = liftIO $ setObjectPropertyObject obj "pixbuf" (Just val)--constructMarkAttributesPixbuf :: (GdkPixbuf.PixbufK a) => a -> IO ([Char], GValue)-constructMarkAttributesPixbuf val = constructObjectPropertyObject "pixbuf" (Just val)--data MarkAttributesPixbufPropertyInfo-instance AttrInfo MarkAttributesPixbufPropertyInfo where- type AttrAllowedOps MarkAttributesPixbufPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint MarkAttributesPixbufPropertyInfo = GdkPixbuf.PixbufK- type AttrBaseTypeConstraint MarkAttributesPixbufPropertyInfo = MarkAttributesK- type AttrGetType MarkAttributesPixbufPropertyInfo = GdkPixbuf.Pixbuf- type AttrLabel MarkAttributesPixbufPropertyInfo = "pixbuf"- attrGet _ = getMarkAttributesPixbuf- attrSet _ = setMarkAttributesPixbuf- attrConstruct _ = constructMarkAttributesPixbuf- attrClear _ = undefined---- VVV Prop "stock-id"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getMarkAttributesStockId :: (MonadIO m, MarkAttributesK o) => o -> m T.Text-getMarkAttributesStockId obj = liftIO $ checkUnexpectedNothing "getMarkAttributesStockId" $ getObjectPropertyString obj "stock-id"--setMarkAttributesStockId :: (MonadIO m, MarkAttributesK o) => o -> T.Text -> m ()-setMarkAttributesStockId obj val = liftIO $ setObjectPropertyString obj "stock-id" (Just val)--constructMarkAttributesStockId :: T.Text -> IO ([Char], GValue)-constructMarkAttributesStockId val = constructObjectPropertyString "stock-id" (Just val)--data MarkAttributesStockIdPropertyInfo-instance AttrInfo MarkAttributesStockIdPropertyInfo where- type AttrAllowedOps MarkAttributesStockIdPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint MarkAttributesStockIdPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint MarkAttributesStockIdPropertyInfo = MarkAttributesK- type AttrGetType MarkAttributesStockIdPropertyInfo = T.Text- type AttrLabel MarkAttributesStockIdPropertyInfo = "stock-id"- attrGet _ = getMarkAttributesStockId- attrSet _ = setMarkAttributesStockId- attrConstruct _ = constructMarkAttributesStockId- attrClear _ = undefined--type instance AttributeList MarkAttributes = MarkAttributesAttributeList-type MarkAttributesAttributeList = ('[ '("background", MarkAttributesBackgroundPropertyInfo), '("gicon", MarkAttributesGiconPropertyInfo), '("iconName", MarkAttributesIconNamePropertyInfo), '("pixbuf", MarkAttributesPixbufPropertyInfo), '("stockId", MarkAttributesStockIdPropertyInfo)] :: [(Symbol, *)])--markAttributesBackground :: AttrLabelProxy "background"-markAttributesBackground = AttrLabelProxy--markAttributesGicon :: AttrLabelProxy "gicon"-markAttributesGicon = AttrLabelProxy--markAttributesIconName :: AttrLabelProxy "iconName"-markAttributesIconName = AttrLabelProxy--markAttributesPixbuf :: AttrLabelProxy "pixbuf"-markAttributesPixbuf = AttrLabelProxy--markAttributesStockId :: AttrLabelProxy "stockId"-markAttributesStockId = AttrLabelProxy--data MarkAttributesQueryTooltipMarkupSignalInfo-instance SignalInfo MarkAttributesQueryTooltipMarkupSignalInfo where- type HaskellCallbackType MarkAttributesQueryTooltipMarkupSignalInfo = MarkAttributesQueryTooltipMarkupCallback- connectSignal _ = connectMarkAttributesQueryTooltipMarkup--data MarkAttributesQueryTooltipTextSignalInfo-instance SignalInfo MarkAttributesQueryTooltipTextSignalInfo where- type HaskellCallbackType MarkAttributesQueryTooltipTextSignalInfo = MarkAttributesQueryTooltipTextCallback- connectSignal _ = connectMarkAttributesQueryTooltipText--type instance SignalList MarkAttributes = MarkAttributesSignalList-type MarkAttributesSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo), '("queryTooltipMarkup", MarkAttributesQueryTooltipMarkupSignalInfo), '("queryTooltipText", MarkAttributesQueryTooltipTextSignalInfo)] :: [(Symbol, *)])---- method MarkAttributes::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "MarkAttributes")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_new" gtk_source_mark_attributes_new :: - IO (Ptr MarkAttributes)---markAttributesNew ::- (MonadIO m) =>- m MarkAttributes -- result-markAttributesNew = liftIO $ do- result <- gtk_source_mark_attributes_new- checkUnexpectedReturnNULL "gtk_source_mark_attributes_new" result- result' <- (wrapObject MarkAttributes) result- return result'---- method MarkAttributes::get_background--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "background", argType = TInterface "Gdk" "RGBA", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_get_background" gtk_source_mark_attributes_get_background :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- Ptr Gdk.RGBA -> -- background : TInterface "Gdk" "RGBA"- IO CInt---markAttributesGetBackground ::- (MonadIO m, MarkAttributesK a) =>- a -- _obj- -> m (Bool,Gdk.RGBA) -- result-markAttributesGetBackground _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- background <- callocBoxedBytes 32 :: IO (Ptr Gdk.RGBA)- result <- gtk_source_mark_attributes_get_background _obj' background- let result' = (/= 0) result- background' <- (wrapBoxed Gdk.RGBA) background- touchManagedPtr _obj- return (result', background')--data MarkAttributesGetBackgroundMethodInfo-instance (signature ~ (m (Bool,Gdk.RGBA)), MonadIO m, MarkAttributesK a) => MethodInfo MarkAttributesGetBackgroundMethodInfo a signature where- overloadedMethod _ = markAttributesGetBackground---- method MarkAttributes::get_gicon--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gio" "Icon")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_get_gicon" gtk_source_mark_attributes_get_gicon :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- IO (Ptr Gio.Icon)---markAttributesGetGicon ::- (MonadIO m, MarkAttributesK a) =>- a -- _obj- -> m Gio.Icon -- result-markAttributesGetGicon _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_mark_attributes_get_gicon _obj'- checkUnexpectedReturnNULL "gtk_source_mark_attributes_get_gicon" result- result' <- (newObject Gio.Icon) result- touchManagedPtr _obj- return result'--data MarkAttributesGetGiconMethodInfo-instance (signature ~ (m Gio.Icon), MonadIO m, MarkAttributesK a) => MethodInfo MarkAttributesGetGiconMethodInfo a signature where- overloadedMethod _ = markAttributesGetGicon---- method MarkAttributes::get_icon_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_get_icon_name" gtk_source_mark_attributes_get_icon_name :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- IO CString---markAttributesGetIconName ::- (MonadIO m, MarkAttributesK a) =>- a -- _obj- -> m T.Text -- result-markAttributesGetIconName _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_mark_attributes_get_icon_name _obj'- checkUnexpectedReturnNULL "gtk_source_mark_attributes_get_icon_name" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data MarkAttributesGetIconNameMethodInfo-instance (signature ~ (m T.Text), MonadIO m, MarkAttributesK a) => MethodInfo MarkAttributesGetIconNameMethodInfo a signature where- overloadedMethod _ = markAttributesGetIconName---- method MarkAttributes::get_pixbuf--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GdkPixbuf" "Pixbuf")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_get_pixbuf" gtk_source_mark_attributes_get_pixbuf :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- IO (Ptr GdkPixbuf.Pixbuf)---markAttributesGetPixbuf ::- (MonadIO m, MarkAttributesK a) =>- a -- _obj- -> m GdkPixbuf.Pixbuf -- result-markAttributesGetPixbuf _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_mark_attributes_get_pixbuf _obj'- checkUnexpectedReturnNULL "gtk_source_mark_attributes_get_pixbuf" result- result' <- (newObject GdkPixbuf.Pixbuf) result- touchManagedPtr _obj- return result'--data MarkAttributesGetPixbufMethodInfo-instance (signature ~ (m GdkPixbuf.Pixbuf), MonadIO m, MarkAttributesK a) => MethodInfo MarkAttributesGetPixbufMethodInfo a signature where- overloadedMethod _ = markAttributesGetPixbuf---- method MarkAttributes::get_stock_id--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_get_stock_id" gtk_source_mark_attributes_get_stock_id :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- IO CString--{-# DEPRECATED markAttributesGetStockId ["(Since version 3.10)","Don't use this function."]#-}-markAttributesGetStockId ::- (MonadIO m, MarkAttributesK a) =>- a -- _obj- -> m T.Text -- result-markAttributesGetStockId _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_mark_attributes_get_stock_id _obj'- checkUnexpectedReturnNULL "gtk_source_mark_attributes_get_stock_id" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data MarkAttributesGetStockIdMethodInfo-instance (signature ~ (m T.Text), MonadIO m, MarkAttributesK a) => MethodInfo MarkAttributesGetStockIdMethodInfo a signature where- overloadedMethod _ = markAttributesGetStockId---- method MarkAttributes::get_tooltip_markup--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "mark", argType = TInterface "GtkSource" "Mark", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_get_tooltip_markup" gtk_source_mark_attributes_get_tooltip_markup :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- Ptr Mark -> -- mark : TInterface "GtkSource" "Mark"- IO CString---markAttributesGetTooltipMarkup ::- (MonadIO m, MarkAttributesK a, MarkK b) =>- a -- _obj- -> b -- mark- -> m T.Text -- result-markAttributesGetTooltipMarkup _obj mark = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let mark' = unsafeManagedPtrCastPtr mark- result <- gtk_source_mark_attributes_get_tooltip_markup _obj' mark'- checkUnexpectedReturnNULL "gtk_source_mark_attributes_get_tooltip_markup" result- result' <- cstringToText result- freeMem result- touchManagedPtr _obj- touchManagedPtr mark- return result'--data MarkAttributesGetTooltipMarkupMethodInfo-instance (signature ~ (b -> m T.Text), MonadIO m, MarkAttributesK a, MarkK b) => MethodInfo MarkAttributesGetTooltipMarkupMethodInfo a signature where- overloadedMethod _ = markAttributesGetTooltipMarkup---- method MarkAttributes::get_tooltip_text--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "mark", argType = TInterface "GtkSource" "Mark", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_get_tooltip_text" gtk_source_mark_attributes_get_tooltip_text :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- Ptr Mark -> -- mark : TInterface "GtkSource" "Mark"- IO CString---markAttributesGetTooltipText ::- (MonadIO m, MarkAttributesK a, MarkK b) =>- a -- _obj- -> b -- mark- -> m T.Text -- result-markAttributesGetTooltipText _obj mark = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let mark' = unsafeManagedPtrCastPtr mark- result <- gtk_source_mark_attributes_get_tooltip_text _obj' mark'- checkUnexpectedReturnNULL "gtk_source_mark_attributes_get_tooltip_text" result- result' <- cstringToText result- freeMem result- touchManagedPtr _obj- touchManagedPtr mark- return result'--data MarkAttributesGetTooltipTextMethodInfo-instance (signature ~ (b -> m T.Text), MonadIO m, MarkAttributesK a, MarkK b) => MethodInfo MarkAttributesGetTooltipTextMethodInfo a signature where- overloadedMethod _ = markAttributesGetTooltipText---- method MarkAttributes::render_icon--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "widget", argType = TInterface "Gtk" "Widget", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "size", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GdkPixbuf" "Pixbuf")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_render_icon" gtk_source_mark_attributes_render_icon :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- Ptr Gtk.Widget -> -- widget : TInterface "Gtk" "Widget"- Int32 -> -- size : TBasicType TInt- IO (Ptr GdkPixbuf.Pixbuf)---markAttributesRenderIcon ::- (MonadIO m, MarkAttributesK a, Gtk.WidgetK b) =>- a -- _obj- -> b -- widget- -> Int32 -- size- -> m GdkPixbuf.Pixbuf -- result-markAttributesRenderIcon _obj widget size = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let widget' = unsafeManagedPtrCastPtr widget- result <- gtk_source_mark_attributes_render_icon _obj' widget' size- checkUnexpectedReturnNULL "gtk_source_mark_attributes_render_icon" result- result' <- (newObject GdkPixbuf.Pixbuf) result- touchManagedPtr _obj- touchManagedPtr widget- return result'--data MarkAttributesRenderIconMethodInfo-instance (signature ~ (b -> Int32 -> m GdkPixbuf.Pixbuf), MonadIO m, MarkAttributesK a, Gtk.WidgetK b) => MethodInfo MarkAttributesRenderIconMethodInfo a signature where- overloadedMethod _ = markAttributesRenderIcon---- method MarkAttributes::set_background--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "background", argType = TInterface "Gdk" "RGBA", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_set_background" gtk_source_mark_attributes_set_background :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- Ptr Gdk.RGBA -> -- background : TInterface "Gdk" "RGBA"- IO ()---markAttributesSetBackground ::- (MonadIO m, MarkAttributesK a) =>- a -- _obj- -> Gdk.RGBA -- background- -> m () -- result-markAttributesSetBackground _obj background = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let background' = unsafeManagedPtrGetPtr background- gtk_source_mark_attributes_set_background _obj' background'- touchManagedPtr _obj- touchManagedPtr background- return ()--data MarkAttributesSetBackgroundMethodInfo-instance (signature ~ (Gdk.RGBA -> m ()), MonadIO m, MarkAttributesK a) => MethodInfo MarkAttributesSetBackgroundMethodInfo a signature where- overloadedMethod _ = markAttributesSetBackground---- method MarkAttributes::set_gicon--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "gicon", argType = TInterface "Gio" "Icon", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_set_gicon" gtk_source_mark_attributes_set_gicon :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- Ptr Gio.Icon -> -- gicon : TInterface "Gio" "Icon"- IO ()---markAttributesSetGicon ::- (MonadIO m, MarkAttributesK a, Gio.IconK b) =>- a -- _obj- -> b -- gicon- -> m () -- result-markAttributesSetGicon _obj gicon = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let gicon' = unsafeManagedPtrCastPtr gicon- gtk_source_mark_attributes_set_gicon _obj' gicon'- touchManagedPtr _obj- touchManagedPtr gicon- return ()--data MarkAttributesSetGiconMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, MarkAttributesK a, Gio.IconK b) => MethodInfo MarkAttributesSetGiconMethodInfo a signature where- overloadedMethod _ = markAttributesSetGicon---- method MarkAttributes::set_icon_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "icon_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_set_icon_name" gtk_source_mark_attributes_set_icon_name :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- CString -> -- icon_name : TBasicType TUTF8- IO ()---markAttributesSetIconName ::- (MonadIO m, MarkAttributesK a) =>- a -- _obj- -> T.Text -- iconName- -> m () -- result-markAttributesSetIconName _obj iconName = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- iconName' <- textToCString iconName- gtk_source_mark_attributes_set_icon_name _obj' iconName'- touchManagedPtr _obj- freeMem iconName'- return ()--data MarkAttributesSetIconNameMethodInfo-instance (signature ~ (T.Text -> m ()), MonadIO m, MarkAttributesK a) => MethodInfo MarkAttributesSetIconNameMethodInfo a signature where- overloadedMethod _ = markAttributesSetIconName---- method MarkAttributes::set_pixbuf--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pixbuf", argType = TInterface "GdkPixbuf" "Pixbuf", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_set_pixbuf" gtk_source_mark_attributes_set_pixbuf :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- Ptr GdkPixbuf.Pixbuf -> -- pixbuf : TInterface "GdkPixbuf" "Pixbuf"- IO ()---markAttributesSetPixbuf ::- (MonadIO m, MarkAttributesK a, GdkPixbuf.PixbufK b) =>- a -- _obj- -> b -- pixbuf- -> m () -- result-markAttributesSetPixbuf _obj pixbuf = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let pixbuf' = unsafeManagedPtrCastPtr pixbuf- gtk_source_mark_attributes_set_pixbuf _obj' pixbuf'- touchManagedPtr _obj- touchManagedPtr pixbuf- return ()--data MarkAttributesSetPixbufMethodInfo-instance (signature ~ (b -> m ()), MonadIO m, MarkAttributesK a, GdkPixbuf.PixbufK b) => MethodInfo MarkAttributesSetPixbufMethodInfo a signature where- overloadedMethod _ = markAttributesSetPixbuf---- method MarkAttributes::set_stock_id--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "stock_id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_mark_attributes_set_stock_id" gtk_source_mark_attributes_set_stock_id :: - Ptr MarkAttributes -> -- _obj : TInterface "GtkSource" "MarkAttributes"- CString -> -- stock_id : TBasicType TUTF8- IO ()--{-# DEPRECATED markAttributesSetStockId ["(Since version 3.10)","Don't use this function."]#-}-markAttributesSetStockId ::- (MonadIO m, MarkAttributesK a) =>- a -- _obj- -> T.Text -- stockId- -> m () -- result-markAttributesSetStockId _obj stockId = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- stockId' <- textToCString stockId- gtk_source_mark_attributes_set_stock_id _obj' stockId'- touchManagedPtr _obj- freeMem stockId'- return ()--data MarkAttributesSetStockIdMethodInfo-instance (signature ~ (T.Text -> m ()), MonadIO m, MarkAttributesK a) => MethodInfo MarkAttributesSetStockIdMethodInfo a signature where- overloadedMethod _ = markAttributesSetStockId--
− GI/GtkSource/Objects/MarkAttributes.hs-boot
@@ -1,33 +0,0 @@-module GI.GtkSource.Objects.MarkAttributes where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype MarkAttributes = MarkAttributes (ForeignPtr MarkAttributes)-instance GObject MarkAttributes where-class GObject o => MarkAttributesK o-instance (GObject o, IsDescendantOf MarkAttributes o) => MarkAttributesK o-data MarkAttributesBackgroundPropertyInfo-data MarkAttributesGiconPropertyInfo-data MarkAttributesIconNamePropertyInfo-data MarkAttributesPixbufPropertyInfo-data MarkAttributesStockIdPropertyInfo-data MarkAttributesQueryTooltipMarkupSignalInfo-data MarkAttributesQueryTooltipTextSignalInfo-data MarkAttributesGetBackgroundMethodInfo-data MarkAttributesGetGiconMethodInfo-data MarkAttributesGetIconNameMethodInfo-data MarkAttributesGetPixbufMethodInfo-data MarkAttributesGetStockIdMethodInfo-data MarkAttributesGetTooltipMarkupMethodInfo-data MarkAttributesGetTooltipTextMethodInfo-data MarkAttributesRenderIconMethodInfo-data MarkAttributesSetBackgroundMethodInfo-data MarkAttributesSetGiconMethodInfo-data MarkAttributesSetIconNameMethodInfo-data MarkAttributesSetPixbufMethodInfo-data MarkAttributesSetStockIdMethodInfo
− GI/GtkSource/Objects/PrintCompositor.hs
@@ -1,1924 +0,0 @@---{- |-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.GtkSource.Objects.PrintCompositor- ( ---- * Exported types- PrintCompositor(..) ,- PrintCompositorK ,- toPrintCompositor ,- noPrintCompositor ,--- -- * Methods--- ** printCompositorDrawPage- PrintCompositorDrawPageMethodInfo ,- printCompositorDrawPage ,----- ** printCompositorGetBodyFontName- PrintCompositorGetBodyFontNameMethodInfo,- printCompositorGetBodyFontName ,----- ** printCompositorGetBottomMargin- PrintCompositorGetBottomMarginMethodInfo,- printCompositorGetBottomMargin ,----- ** printCompositorGetBuffer- PrintCompositorGetBufferMethodInfo ,- printCompositorGetBuffer ,----- ** printCompositorGetFooterFontName- PrintCompositorGetFooterFontNameMethodInfo,- printCompositorGetFooterFontName ,----- ** printCompositorGetHeaderFontName- PrintCompositorGetHeaderFontNameMethodInfo,- printCompositorGetHeaderFontName ,----- ** printCompositorGetHighlightSyntax- PrintCompositorGetHighlightSyntaxMethodInfo,- printCompositorGetHighlightSyntax ,----- ** printCompositorGetLeftMargin- PrintCompositorGetLeftMarginMethodInfo ,- printCompositorGetLeftMargin ,----- ** printCompositorGetLineNumbersFontName- PrintCompositorGetLineNumbersFontNameMethodInfo,- printCompositorGetLineNumbersFontName ,----- ** printCompositorGetNPages- PrintCompositorGetNPagesMethodInfo ,- printCompositorGetNPages ,----- ** printCompositorGetPaginationProgress- PrintCompositorGetPaginationProgressMethodInfo,- printCompositorGetPaginationProgress ,----- ** printCompositorGetPrintFooter- PrintCompositorGetPrintFooterMethodInfo ,- printCompositorGetPrintFooter ,----- ** printCompositorGetPrintHeader- PrintCompositorGetPrintHeaderMethodInfo ,- printCompositorGetPrintHeader ,----- ** printCompositorGetPrintLineNumbers- PrintCompositorGetPrintLineNumbersMethodInfo,- printCompositorGetPrintLineNumbers ,----- ** printCompositorGetRightMargin- PrintCompositorGetRightMarginMethodInfo ,- printCompositorGetRightMargin ,----- ** printCompositorGetTabWidth- PrintCompositorGetTabWidthMethodInfo ,- printCompositorGetTabWidth ,----- ** printCompositorGetTopMargin- PrintCompositorGetTopMarginMethodInfo ,- printCompositorGetTopMargin ,----- ** printCompositorGetWrapMode- PrintCompositorGetWrapModeMethodInfo ,- printCompositorGetWrapMode ,----- ** printCompositorNew- printCompositorNew ,----- ** printCompositorNewFromView- printCompositorNewFromView ,----- ** printCompositorPaginate- PrintCompositorPaginateMethodInfo ,- printCompositorPaginate ,----- ** printCompositorSetBodyFontName- PrintCompositorSetBodyFontNameMethodInfo,- printCompositorSetBodyFontName ,----- ** printCompositorSetBottomMargin- PrintCompositorSetBottomMarginMethodInfo,- printCompositorSetBottomMargin ,----- ** printCompositorSetFooterFontName- PrintCompositorSetFooterFontNameMethodInfo,- printCompositorSetFooterFontName ,----- ** printCompositorSetFooterFormat- PrintCompositorSetFooterFormatMethodInfo,- printCompositorSetFooterFormat ,----- ** printCompositorSetHeaderFontName- PrintCompositorSetHeaderFontNameMethodInfo,- printCompositorSetHeaderFontName ,----- ** printCompositorSetHeaderFormat- PrintCompositorSetHeaderFormatMethodInfo,- printCompositorSetHeaderFormat ,----- ** printCompositorSetHighlightSyntax- PrintCompositorSetHighlightSyntaxMethodInfo,- printCompositorSetHighlightSyntax ,----- ** printCompositorSetLeftMargin- PrintCompositorSetLeftMarginMethodInfo ,- printCompositorSetLeftMargin ,----- ** printCompositorSetLineNumbersFontName- PrintCompositorSetLineNumbersFontNameMethodInfo,- printCompositorSetLineNumbersFontName ,----- ** printCompositorSetPrintFooter- PrintCompositorSetPrintFooterMethodInfo ,- printCompositorSetPrintFooter ,----- ** printCompositorSetPrintHeader- PrintCompositorSetPrintHeaderMethodInfo ,- printCompositorSetPrintHeader ,----- ** printCompositorSetPrintLineNumbers- PrintCompositorSetPrintLineNumbersMethodInfo,- printCompositorSetPrintLineNumbers ,----- ** printCompositorSetRightMargin- PrintCompositorSetRightMarginMethodInfo ,- printCompositorSetRightMargin ,----- ** printCompositorSetTabWidth- PrintCompositorSetTabWidthMethodInfo ,- printCompositorSetTabWidth ,----- ** printCompositorSetTopMargin- PrintCompositorSetTopMarginMethodInfo ,- printCompositorSetTopMargin ,----- ** printCompositorSetWrapMode- PrintCompositorSetWrapModeMethodInfo ,- printCompositorSetWrapMode ,----- -- * Properties--- ** BodyFontName- PrintCompositorBodyFontNamePropertyInfo ,- constructPrintCompositorBodyFontName ,- getPrintCompositorBodyFontName ,- printCompositorBodyFontName ,- setPrintCompositorBodyFontName ,----- ** Buffer- PrintCompositorBufferPropertyInfo ,- constructPrintCompositorBuffer ,- getPrintCompositorBuffer ,- printCompositorBuffer ,----- ** FooterFontName- PrintCompositorFooterFontNamePropertyInfo,- clearPrintCompositorFooterFontName ,- constructPrintCompositorFooterFontName ,- getPrintCompositorFooterFontName ,- printCompositorFooterFontName ,- setPrintCompositorFooterFontName ,----- ** HeaderFontName- PrintCompositorHeaderFontNamePropertyInfo,- clearPrintCompositorHeaderFontName ,- constructPrintCompositorHeaderFontName ,- getPrintCompositorHeaderFontName ,- printCompositorHeaderFontName ,- setPrintCompositorHeaderFontName ,----- ** HighlightSyntax- PrintCompositorHighlightSyntaxPropertyInfo,- constructPrintCompositorHighlightSyntax ,- getPrintCompositorHighlightSyntax ,- printCompositorHighlightSyntax ,- setPrintCompositorHighlightSyntax ,----- ** LineNumbersFontName- PrintCompositorLineNumbersFontNamePropertyInfo,- clearPrintCompositorLineNumbersFontName ,- constructPrintCompositorLineNumbersFontName,- getPrintCompositorLineNumbersFontName ,- printCompositorLineNumbersFontName ,- setPrintCompositorLineNumbersFontName ,----- ** NPages- PrintCompositorNPagesPropertyInfo ,- getPrintCompositorNPages ,- printCompositorNPages ,----- ** PrintFooter- PrintCompositorPrintFooterPropertyInfo ,- constructPrintCompositorPrintFooter ,- getPrintCompositorPrintFooter ,- printCompositorPrintFooter ,- setPrintCompositorPrintFooter ,----- ** PrintHeader- PrintCompositorPrintHeaderPropertyInfo ,- constructPrintCompositorPrintHeader ,- getPrintCompositorPrintHeader ,- printCompositorPrintHeader ,- setPrintCompositorPrintHeader ,----- ** PrintLineNumbers- PrintCompositorPrintLineNumbersPropertyInfo,- constructPrintCompositorPrintLineNumbers,- getPrintCompositorPrintLineNumbers ,- printCompositorPrintLineNumbers ,- setPrintCompositorPrintLineNumbers ,----- ** TabWidth- PrintCompositorTabWidthPropertyInfo ,- constructPrintCompositorTabWidth ,- getPrintCompositorTabWidth ,- printCompositorTabWidth ,- setPrintCompositorTabWidth ,----- ** WrapMode- PrintCompositorWrapModePropertyInfo ,- constructPrintCompositorWrapMode ,- getPrintCompositorWrapMode ,- printCompositorWrapMode ,- setPrintCompositorWrapMode ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.Gtk as Gtk--newtype PrintCompositor = PrintCompositor (ForeignPtr PrintCompositor)-foreign import ccall "gtk_source_print_compositor_get_type"- c_gtk_source_print_compositor_get_type :: IO GType--type instance ParentTypes PrintCompositor = PrintCompositorParentTypes-type PrintCompositorParentTypes = '[GObject.Object]--instance GObject PrintCompositor where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_print_compositor_get_type- --class GObject o => PrintCompositorK o-instance (GObject o, IsDescendantOf PrintCompositor o) => PrintCompositorK o--toPrintCompositor :: PrintCompositorK o => o -> IO PrintCompositor-toPrintCompositor = unsafeCastTo PrintCompositor--noPrintCompositor :: Maybe PrintCompositor-noPrintCompositor = Nothing--type family ResolvePrintCompositorMethod (t :: Symbol) (o :: *) :: * where- ResolvePrintCompositorMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolvePrintCompositorMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolvePrintCompositorMethod "drawPage" o = PrintCompositorDrawPageMethodInfo- ResolvePrintCompositorMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolvePrintCompositorMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolvePrintCompositorMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolvePrintCompositorMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolvePrintCompositorMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolvePrintCompositorMethod "paginate" o = PrintCompositorPaginateMethodInfo- ResolvePrintCompositorMethod "ref" o = GObject.ObjectRefMethodInfo- ResolvePrintCompositorMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolvePrintCompositorMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolvePrintCompositorMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolvePrintCompositorMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolvePrintCompositorMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolvePrintCompositorMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolvePrintCompositorMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolvePrintCompositorMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolvePrintCompositorMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolvePrintCompositorMethod "getBodyFontName" o = PrintCompositorGetBodyFontNameMethodInfo- ResolvePrintCompositorMethod "getBottomMargin" o = PrintCompositorGetBottomMarginMethodInfo- ResolvePrintCompositorMethod "getBuffer" o = PrintCompositorGetBufferMethodInfo- ResolvePrintCompositorMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolvePrintCompositorMethod "getFooterFontName" o = PrintCompositorGetFooterFontNameMethodInfo- ResolvePrintCompositorMethod "getHeaderFontName" o = PrintCompositorGetHeaderFontNameMethodInfo- ResolvePrintCompositorMethod "getHighlightSyntax" o = PrintCompositorGetHighlightSyntaxMethodInfo- ResolvePrintCompositorMethod "getLeftMargin" o = PrintCompositorGetLeftMarginMethodInfo- ResolvePrintCompositorMethod "getLineNumbersFontName" o = PrintCompositorGetLineNumbersFontNameMethodInfo- ResolvePrintCompositorMethod "getNPages" o = PrintCompositorGetNPagesMethodInfo- ResolvePrintCompositorMethod "getPaginationProgress" o = PrintCompositorGetPaginationProgressMethodInfo- ResolvePrintCompositorMethod "getPrintFooter" o = PrintCompositorGetPrintFooterMethodInfo- ResolvePrintCompositorMethod "getPrintHeader" o = PrintCompositorGetPrintHeaderMethodInfo- ResolvePrintCompositorMethod "getPrintLineNumbers" o = PrintCompositorGetPrintLineNumbersMethodInfo- ResolvePrintCompositorMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolvePrintCompositorMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolvePrintCompositorMethod "getRightMargin" o = PrintCompositorGetRightMarginMethodInfo- ResolvePrintCompositorMethod "getTabWidth" o = PrintCompositorGetTabWidthMethodInfo- ResolvePrintCompositorMethod "getTopMargin" o = PrintCompositorGetTopMarginMethodInfo- ResolvePrintCompositorMethod "getWrapMode" o = PrintCompositorGetWrapModeMethodInfo- ResolvePrintCompositorMethod "setBodyFontName" o = PrintCompositorSetBodyFontNameMethodInfo- ResolvePrintCompositorMethod "setBottomMargin" o = PrintCompositorSetBottomMarginMethodInfo- ResolvePrintCompositorMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolvePrintCompositorMethod "setFooterFontName" o = PrintCompositorSetFooterFontNameMethodInfo- ResolvePrintCompositorMethod "setFooterFormat" o = PrintCompositorSetFooterFormatMethodInfo- ResolvePrintCompositorMethod "setHeaderFontName" o = PrintCompositorSetHeaderFontNameMethodInfo- ResolvePrintCompositorMethod "setHeaderFormat" o = PrintCompositorSetHeaderFormatMethodInfo- ResolvePrintCompositorMethod "setHighlightSyntax" o = PrintCompositorSetHighlightSyntaxMethodInfo- ResolvePrintCompositorMethod "setLeftMargin" o = PrintCompositorSetLeftMarginMethodInfo- ResolvePrintCompositorMethod "setLineNumbersFontName" o = PrintCompositorSetLineNumbersFontNameMethodInfo- ResolvePrintCompositorMethod "setPrintFooter" o = PrintCompositorSetPrintFooterMethodInfo- ResolvePrintCompositorMethod "setPrintHeader" o = PrintCompositorSetPrintHeaderMethodInfo- ResolvePrintCompositorMethod "setPrintLineNumbers" o = PrintCompositorSetPrintLineNumbersMethodInfo- ResolvePrintCompositorMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolvePrintCompositorMethod "setRightMargin" o = PrintCompositorSetRightMarginMethodInfo- ResolvePrintCompositorMethod "setTabWidth" o = PrintCompositorSetTabWidthMethodInfo- ResolvePrintCompositorMethod "setTopMargin" o = PrintCompositorSetTopMarginMethodInfo- ResolvePrintCompositorMethod "setWrapMode" o = PrintCompositorSetWrapModeMethodInfo- ResolvePrintCompositorMethod l o = MethodResolutionFailed l o--instance (info ~ ResolvePrintCompositorMethod t PrintCompositor, MethodInfo info PrintCompositor p) => IsLabelProxy t (PrintCompositor -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolvePrintCompositorMethod t PrintCompositor, MethodInfo info PrintCompositor p) => IsLabel t (PrintCompositor -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "body-font-name"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Just False)--getPrintCompositorBodyFontName :: (MonadIO m, PrintCompositorK o) => o -> m (Maybe T.Text)-getPrintCompositorBodyFontName obj = liftIO $ getObjectPropertyString obj "body-font-name"--setPrintCompositorBodyFontName :: (MonadIO m, PrintCompositorK o) => o -> T.Text -> m ()-setPrintCompositorBodyFontName obj val = liftIO $ setObjectPropertyString obj "body-font-name" (Just val)--constructPrintCompositorBodyFontName :: T.Text -> IO ([Char], GValue)-constructPrintCompositorBodyFontName val = constructObjectPropertyString "body-font-name" (Just val)--data PrintCompositorBodyFontNamePropertyInfo-instance AttrInfo PrintCompositorBodyFontNamePropertyInfo where- type AttrAllowedOps PrintCompositorBodyFontNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint PrintCompositorBodyFontNamePropertyInfo = (~) T.Text- type AttrBaseTypeConstraint PrintCompositorBodyFontNamePropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorBodyFontNamePropertyInfo = (Maybe T.Text)- type AttrLabel PrintCompositorBodyFontNamePropertyInfo = "body-font-name"- attrGet _ = getPrintCompositorBodyFontName- attrSet _ = setPrintCompositorBodyFontName- attrConstruct _ = constructPrintCompositorBodyFontName- attrClear _ = undefined---- VVV Prop "buffer"- -- Type: TInterface "GtkSource" "Buffer"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just False,Nothing)--getPrintCompositorBuffer :: (MonadIO m, PrintCompositorK o) => o -> m Buffer-getPrintCompositorBuffer obj = liftIO $ checkUnexpectedNothing "getPrintCompositorBuffer" $ getObjectPropertyObject obj "buffer" Buffer--constructPrintCompositorBuffer :: (BufferK a) => a -> IO ([Char], GValue)-constructPrintCompositorBuffer val = constructObjectPropertyObject "buffer" (Just val)--data PrintCompositorBufferPropertyInfo-instance AttrInfo PrintCompositorBufferPropertyInfo where- type AttrAllowedOps PrintCompositorBufferPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint PrintCompositorBufferPropertyInfo = BufferK- type AttrBaseTypeConstraint PrintCompositorBufferPropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorBufferPropertyInfo = Buffer- type AttrLabel PrintCompositorBufferPropertyInfo = "buffer"- attrGet _ = getPrintCompositorBuffer- attrSet _ = undefined- attrConstruct _ = constructPrintCompositorBuffer- attrClear _ = undefined---- VVV Prop "footer-font-name"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Just True)--getPrintCompositorFooterFontName :: (MonadIO m, PrintCompositorK o) => o -> m (Maybe T.Text)-getPrintCompositorFooterFontName obj = liftIO $ getObjectPropertyString obj "footer-font-name"--setPrintCompositorFooterFontName :: (MonadIO m, PrintCompositorK o) => o -> T.Text -> m ()-setPrintCompositorFooterFontName obj val = liftIO $ setObjectPropertyString obj "footer-font-name" (Just val)--constructPrintCompositorFooterFontName :: T.Text -> IO ([Char], GValue)-constructPrintCompositorFooterFontName val = constructObjectPropertyString "footer-font-name" (Just val)--clearPrintCompositorFooterFontName :: (MonadIO m, PrintCompositorK o) => o -> m ()-clearPrintCompositorFooterFontName obj = liftIO $ setObjectPropertyString obj "footer-font-name" (Nothing :: Maybe T.Text)--data PrintCompositorFooterFontNamePropertyInfo-instance AttrInfo PrintCompositorFooterFontNamePropertyInfo where- type AttrAllowedOps PrintCompositorFooterFontNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint PrintCompositorFooterFontNamePropertyInfo = (~) T.Text- type AttrBaseTypeConstraint PrintCompositorFooterFontNamePropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorFooterFontNamePropertyInfo = (Maybe T.Text)- type AttrLabel PrintCompositorFooterFontNamePropertyInfo = "footer-font-name"- attrGet _ = getPrintCompositorFooterFontName- attrSet _ = setPrintCompositorFooterFontName- attrConstruct _ = constructPrintCompositorFooterFontName- attrClear _ = clearPrintCompositorFooterFontName---- VVV Prop "header-font-name"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Just True)--getPrintCompositorHeaderFontName :: (MonadIO m, PrintCompositorK o) => o -> m (Maybe T.Text)-getPrintCompositorHeaderFontName obj = liftIO $ getObjectPropertyString obj "header-font-name"--setPrintCompositorHeaderFontName :: (MonadIO m, PrintCompositorK o) => o -> T.Text -> m ()-setPrintCompositorHeaderFontName obj val = liftIO $ setObjectPropertyString obj "header-font-name" (Just val)--constructPrintCompositorHeaderFontName :: T.Text -> IO ([Char], GValue)-constructPrintCompositorHeaderFontName val = constructObjectPropertyString "header-font-name" (Just val)--clearPrintCompositorHeaderFontName :: (MonadIO m, PrintCompositorK o) => o -> m ()-clearPrintCompositorHeaderFontName obj = liftIO $ setObjectPropertyString obj "header-font-name" (Nothing :: Maybe T.Text)--data PrintCompositorHeaderFontNamePropertyInfo-instance AttrInfo PrintCompositorHeaderFontNamePropertyInfo where- type AttrAllowedOps PrintCompositorHeaderFontNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint PrintCompositorHeaderFontNamePropertyInfo = (~) T.Text- type AttrBaseTypeConstraint PrintCompositorHeaderFontNamePropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorHeaderFontNamePropertyInfo = (Maybe T.Text)- type AttrLabel PrintCompositorHeaderFontNamePropertyInfo = "header-font-name"- attrGet _ = getPrintCompositorHeaderFontName- attrSet _ = setPrintCompositorHeaderFontName- attrConstruct _ = constructPrintCompositorHeaderFontName- attrClear _ = clearPrintCompositorHeaderFontName---- VVV Prop "highlight-syntax"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getPrintCompositorHighlightSyntax :: (MonadIO m, PrintCompositorK o) => o -> m Bool-getPrintCompositorHighlightSyntax obj = liftIO $ getObjectPropertyBool obj "highlight-syntax"--setPrintCompositorHighlightSyntax :: (MonadIO m, PrintCompositorK o) => o -> Bool -> m ()-setPrintCompositorHighlightSyntax obj val = liftIO $ setObjectPropertyBool obj "highlight-syntax" val--constructPrintCompositorHighlightSyntax :: Bool -> IO ([Char], GValue)-constructPrintCompositorHighlightSyntax val = constructObjectPropertyBool "highlight-syntax" val--data PrintCompositorHighlightSyntaxPropertyInfo-instance AttrInfo PrintCompositorHighlightSyntaxPropertyInfo where- type AttrAllowedOps PrintCompositorHighlightSyntaxPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint PrintCompositorHighlightSyntaxPropertyInfo = (~) Bool- type AttrBaseTypeConstraint PrintCompositorHighlightSyntaxPropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorHighlightSyntaxPropertyInfo = Bool- type AttrLabel PrintCompositorHighlightSyntaxPropertyInfo = "highlight-syntax"- attrGet _ = getPrintCompositorHighlightSyntax- attrSet _ = setPrintCompositorHighlightSyntax- attrConstruct _ = constructPrintCompositorHighlightSyntax- attrClear _ = undefined---- VVV Prop "line-numbers-font-name"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Nothing,Just True)--getPrintCompositorLineNumbersFontName :: (MonadIO m, PrintCompositorK o) => o -> m (Maybe T.Text)-getPrintCompositorLineNumbersFontName obj = liftIO $ getObjectPropertyString obj "line-numbers-font-name"--setPrintCompositorLineNumbersFontName :: (MonadIO m, PrintCompositorK o) => o -> T.Text -> m ()-setPrintCompositorLineNumbersFontName obj val = liftIO $ setObjectPropertyString obj "line-numbers-font-name" (Just val)--constructPrintCompositorLineNumbersFontName :: T.Text -> IO ([Char], GValue)-constructPrintCompositorLineNumbersFontName val = constructObjectPropertyString "line-numbers-font-name" (Just val)--clearPrintCompositorLineNumbersFontName :: (MonadIO m, PrintCompositorK o) => o -> m ()-clearPrintCompositorLineNumbersFontName obj = liftIO $ setObjectPropertyString obj "line-numbers-font-name" (Nothing :: Maybe T.Text)--data PrintCompositorLineNumbersFontNamePropertyInfo-instance AttrInfo PrintCompositorLineNumbersFontNamePropertyInfo where- type AttrAllowedOps PrintCompositorLineNumbersFontNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint PrintCompositorLineNumbersFontNamePropertyInfo = (~) T.Text- type AttrBaseTypeConstraint PrintCompositorLineNumbersFontNamePropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorLineNumbersFontNamePropertyInfo = (Maybe T.Text)- type AttrLabel PrintCompositorLineNumbersFontNamePropertyInfo = "line-numbers-font-name"- attrGet _ = getPrintCompositorLineNumbersFontName- attrSet _ = setPrintCompositorLineNumbersFontName- attrConstruct _ = constructPrintCompositorLineNumbersFontName- attrClear _ = clearPrintCompositorLineNumbersFontName---- VVV Prop "n-pages"- -- Type: TBasicType TInt- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getPrintCompositorNPages :: (MonadIO m, PrintCompositorK o) => o -> m Int32-getPrintCompositorNPages obj = liftIO $ getObjectPropertyInt32 obj "n-pages"--data PrintCompositorNPagesPropertyInfo-instance AttrInfo PrintCompositorNPagesPropertyInfo where- type AttrAllowedOps PrintCompositorNPagesPropertyInfo = '[ 'AttrGet]- type AttrSetTypeConstraint PrintCompositorNPagesPropertyInfo = (~) ()- type AttrBaseTypeConstraint PrintCompositorNPagesPropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorNPagesPropertyInfo = Int32- type AttrLabel PrintCompositorNPagesPropertyInfo = "n-pages"- attrGet _ = getPrintCompositorNPages- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "print-footer"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getPrintCompositorPrintFooter :: (MonadIO m, PrintCompositorK o) => o -> m Bool-getPrintCompositorPrintFooter obj = liftIO $ getObjectPropertyBool obj "print-footer"--setPrintCompositorPrintFooter :: (MonadIO m, PrintCompositorK o) => o -> Bool -> m ()-setPrintCompositorPrintFooter obj val = liftIO $ setObjectPropertyBool obj "print-footer" val--constructPrintCompositorPrintFooter :: Bool -> IO ([Char], GValue)-constructPrintCompositorPrintFooter val = constructObjectPropertyBool "print-footer" val--data PrintCompositorPrintFooterPropertyInfo-instance AttrInfo PrintCompositorPrintFooterPropertyInfo where- type AttrAllowedOps PrintCompositorPrintFooterPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint PrintCompositorPrintFooterPropertyInfo = (~) Bool- type AttrBaseTypeConstraint PrintCompositorPrintFooterPropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorPrintFooterPropertyInfo = Bool- type AttrLabel PrintCompositorPrintFooterPropertyInfo = "print-footer"- attrGet _ = getPrintCompositorPrintFooter- attrSet _ = setPrintCompositorPrintFooter- attrConstruct _ = constructPrintCompositorPrintFooter- attrClear _ = undefined---- VVV Prop "print-header"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getPrintCompositorPrintHeader :: (MonadIO m, PrintCompositorK o) => o -> m Bool-getPrintCompositorPrintHeader obj = liftIO $ getObjectPropertyBool obj "print-header"--setPrintCompositorPrintHeader :: (MonadIO m, PrintCompositorK o) => o -> Bool -> m ()-setPrintCompositorPrintHeader obj val = liftIO $ setObjectPropertyBool obj "print-header" val--constructPrintCompositorPrintHeader :: Bool -> IO ([Char], GValue)-constructPrintCompositorPrintHeader val = constructObjectPropertyBool "print-header" val--data PrintCompositorPrintHeaderPropertyInfo-instance AttrInfo PrintCompositorPrintHeaderPropertyInfo where- type AttrAllowedOps PrintCompositorPrintHeaderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint PrintCompositorPrintHeaderPropertyInfo = (~) Bool- type AttrBaseTypeConstraint PrintCompositorPrintHeaderPropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorPrintHeaderPropertyInfo = Bool- type AttrLabel PrintCompositorPrintHeaderPropertyInfo = "print-header"- attrGet _ = getPrintCompositorPrintHeader- attrSet _ = setPrintCompositorPrintHeader- attrConstruct _ = constructPrintCompositorPrintHeader- attrClear _ = undefined---- VVV Prop "print-line-numbers"- -- Type: TBasicType TUInt- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getPrintCompositorPrintLineNumbers :: (MonadIO m, PrintCompositorK o) => o -> m Word32-getPrintCompositorPrintLineNumbers obj = liftIO $ getObjectPropertyUInt32 obj "print-line-numbers"--setPrintCompositorPrintLineNumbers :: (MonadIO m, PrintCompositorK o) => o -> Word32 -> m ()-setPrintCompositorPrintLineNumbers obj val = liftIO $ setObjectPropertyUInt32 obj "print-line-numbers" val--constructPrintCompositorPrintLineNumbers :: Word32 -> IO ([Char], GValue)-constructPrintCompositorPrintLineNumbers val = constructObjectPropertyUInt32 "print-line-numbers" val--data PrintCompositorPrintLineNumbersPropertyInfo-instance AttrInfo PrintCompositorPrintLineNumbersPropertyInfo where- type AttrAllowedOps PrintCompositorPrintLineNumbersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint PrintCompositorPrintLineNumbersPropertyInfo = (~) Word32- type AttrBaseTypeConstraint PrintCompositorPrintLineNumbersPropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorPrintLineNumbersPropertyInfo = Word32- type AttrLabel PrintCompositorPrintLineNumbersPropertyInfo = "print-line-numbers"- attrGet _ = getPrintCompositorPrintLineNumbers- attrSet _ = setPrintCompositorPrintLineNumbers- attrConstruct _ = constructPrintCompositorPrintLineNumbers- attrClear _ = undefined---- VVV Prop "tab-width"- -- Type: TBasicType TUInt- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getPrintCompositorTabWidth :: (MonadIO m, PrintCompositorK o) => o -> m Word32-getPrintCompositorTabWidth obj = liftIO $ getObjectPropertyUInt32 obj "tab-width"--setPrintCompositorTabWidth :: (MonadIO m, PrintCompositorK o) => o -> Word32 -> m ()-setPrintCompositorTabWidth obj val = liftIO $ setObjectPropertyUInt32 obj "tab-width" val--constructPrintCompositorTabWidth :: Word32 -> IO ([Char], GValue)-constructPrintCompositorTabWidth val = constructObjectPropertyUInt32 "tab-width" val--data PrintCompositorTabWidthPropertyInfo-instance AttrInfo PrintCompositorTabWidthPropertyInfo where- type AttrAllowedOps PrintCompositorTabWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint PrintCompositorTabWidthPropertyInfo = (~) Word32- type AttrBaseTypeConstraint PrintCompositorTabWidthPropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorTabWidthPropertyInfo = Word32- type AttrLabel PrintCompositorTabWidthPropertyInfo = "tab-width"- attrGet _ = getPrintCompositorTabWidth- attrSet _ = setPrintCompositorTabWidth- attrConstruct _ = constructPrintCompositorTabWidth- attrClear _ = undefined---- VVV Prop "wrap-mode"- -- Type: TInterface "Gtk" "WrapMode"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getPrintCompositorWrapMode :: (MonadIO m, PrintCompositorK o) => o -> m Gtk.WrapMode-getPrintCompositorWrapMode obj = liftIO $ getObjectPropertyEnum obj "wrap-mode"--setPrintCompositorWrapMode :: (MonadIO m, PrintCompositorK o) => o -> Gtk.WrapMode -> m ()-setPrintCompositorWrapMode obj val = liftIO $ setObjectPropertyEnum obj "wrap-mode" val--constructPrintCompositorWrapMode :: Gtk.WrapMode -> IO ([Char], GValue)-constructPrintCompositorWrapMode val = constructObjectPropertyEnum "wrap-mode" val--data PrintCompositorWrapModePropertyInfo-instance AttrInfo PrintCompositorWrapModePropertyInfo where- type AttrAllowedOps PrintCompositorWrapModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint PrintCompositorWrapModePropertyInfo = (~) Gtk.WrapMode- type AttrBaseTypeConstraint PrintCompositorWrapModePropertyInfo = PrintCompositorK- type AttrGetType PrintCompositorWrapModePropertyInfo = Gtk.WrapMode- type AttrLabel PrintCompositorWrapModePropertyInfo = "wrap-mode"- attrGet _ = getPrintCompositorWrapMode- attrSet _ = setPrintCompositorWrapMode- attrConstruct _ = constructPrintCompositorWrapMode- attrClear _ = undefined--type instance AttributeList PrintCompositor = PrintCompositorAttributeList-type PrintCompositorAttributeList = ('[ '("bodyFontName", PrintCompositorBodyFontNamePropertyInfo), '("buffer", PrintCompositorBufferPropertyInfo), '("footerFontName", PrintCompositorFooterFontNamePropertyInfo), '("headerFontName", PrintCompositorHeaderFontNamePropertyInfo), '("highlightSyntax", PrintCompositorHighlightSyntaxPropertyInfo), '("lineNumbersFontName", PrintCompositorLineNumbersFontNamePropertyInfo), '("nPages", PrintCompositorNPagesPropertyInfo), '("printFooter", PrintCompositorPrintFooterPropertyInfo), '("printHeader", PrintCompositorPrintHeaderPropertyInfo), '("printLineNumbers", PrintCompositorPrintLineNumbersPropertyInfo), '("tabWidth", PrintCompositorTabWidthPropertyInfo), '("wrapMode", PrintCompositorWrapModePropertyInfo)] :: [(Symbol, *)])--printCompositorBodyFontName :: AttrLabelProxy "bodyFontName"-printCompositorBodyFontName = AttrLabelProxy--printCompositorBuffer :: AttrLabelProxy "buffer"-printCompositorBuffer = AttrLabelProxy--printCompositorFooterFontName :: AttrLabelProxy "footerFontName"-printCompositorFooterFontName = AttrLabelProxy--printCompositorHeaderFontName :: AttrLabelProxy "headerFontName"-printCompositorHeaderFontName = AttrLabelProxy--printCompositorHighlightSyntax :: AttrLabelProxy "highlightSyntax"-printCompositorHighlightSyntax = AttrLabelProxy--printCompositorLineNumbersFontName :: AttrLabelProxy "lineNumbersFontName"-printCompositorLineNumbersFontName = AttrLabelProxy--printCompositorNPages :: AttrLabelProxy "nPages"-printCompositorNPages = AttrLabelProxy--printCompositorPrintFooter :: AttrLabelProxy "printFooter"-printCompositorPrintFooter = AttrLabelProxy--printCompositorPrintHeader :: AttrLabelProxy "printHeader"-printCompositorPrintHeader = AttrLabelProxy--printCompositorPrintLineNumbers :: AttrLabelProxy "printLineNumbers"-printCompositorPrintLineNumbers = AttrLabelProxy--printCompositorTabWidth :: AttrLabelProxy "tabWidth"-printCompositorTabWidth = AttrLabelProxy--printCompositorWrapMode :: AttrLabelProxy "wrapMode"-printCompositorWrapMode = AttrLabelProxy--type instance SignalList PrintCompositor = PrintCompositorSignalList-type PrintCompositorSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method PrintCompositor::new--- method type : Constructor--- Args : [Arg {argCName = "buffer", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "PrintCompositor")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_new" gtk_source_print_compositor_new :: - Ptr Buffer -> -- buffer : TInterface "GtkSource" "Buffer"- IO (Ptr PrintCompositor)---printCompositorNew ::- (MonadIO m, BufferK a) =>- a -- buffer- -> m PrintCompositor -- result-printCompositorNew buffer = liftIO $ do- let buffer' = unsafeManagedPtrCastPtr buffer- result <- gtk_source_print_compositor_new buffer'- checkUnexpectedReturnNULL "gtk_source_print_compositor_new" result- result' <- (wrapObject PrintCompositor) result- touchManagedPtr buffer- return result'---- method PrintCompositor::new_from_view--- method type : Constructor--- Args : [Arg {argCName = "view", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "PrintCompositor")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_new_from_view" gtk_source_print_compositor_new_from_view :: - Ptr View -> -- view : TInterface "GtkSource" "View"- IO (Ptr PrintCompositor)---printCompositorNewFromView ::- (MonadIO m, ViewK a) =>- a -- view- -> m PrintCompositor -- result-printCompositorNewFromView view = liftIO $ do- let view' = unsafeManagedPtrCastPtr view- result <- gtk_source_print_compositor_new_from_view view'- checkUnexpectedReturnNULL "gtk_source_print_compositor_new_from_view" result- result' <- (wrapObject PrintCompositor) result- touchManagedPtr view- return result'---- method PrintCompositor::draw_page--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "context", argType = TInterface "Gtk" "PrintContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "page_nr", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_draw_page" gtk_source_print_compositor_draw_page :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- Ptr Gtk.PrintContext -> -- context : TInterface "Gtk" "PrintContext"- Int32 -> -- page_nr : TBasicType TInt- IO ()---printCompositorDrawPage ::- (MonadIO m, PrintCompositorK a, Gtk.PrintContextK b) =>- a -- _obj- -> b -- context- -> Int32 -- pageNr- -> m () -- result-printCompositorDrawPage _obj context pageNr = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let context' = unsafeManagedPtrCastPtr context- gtk_source_print_compositor_draw_page _obj' context' pageNr- touchManagedPtr _obj- touchManagedPtr context- return ()--data PrintCompositorDrawPageMethodInfo-instance (signature ~ (b -> Int32 -> m ()), MonadIO m, PrintCompositorK a, Gtk.PrintContextK b) => MethodInfo PrintCompositorDrawPageMethodInfo a signature where- overloadedMethod _ = printCompositorDrawPage---- method PrintCompositor::get_body_font_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_body_font_name" gtk_source_print_compositor_get_body_font_name :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO CString---printCompositorGetBodyFontName ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m T.Text -- result-printCompositorGetBodyFontName _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_body_font_name _obj'- checkUnexpectedReturnNULL "gtk_source_print_compositor_get_body_font_name" result- result' <- cstringToText result- freeMem result- touchManagedPtr _obj- return result'--data PrintCompositorGetBodyFontNameMethodInfo-instance (signature ~ (m T.Text), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetBodyFontNameMethodInfo a signature where- overloadedMethod _ = printCompositorGetBodyFontName---- method PrintCompositor::get_bottom_margin--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface "Gtk" "Unit", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TDouble)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_bottom_margin" gtk_source_print_compositor_get_bottom_margin :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CUInt -> -- unit : TInterface "Gtk" "Unit"- IO CDouble---printCompositorGetBottomMargin ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Gtk.Unit -- unit- -> m Double -- result-printCompositorGetBottomMargin _obj unit = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let unit' = (fromIntegral . fromEnum) unit- result <- gtk_source_print_compositor_get_bottom_margin _obj' unit'- let result' = realToFrac result- touchManagedPtr _obj- return result'--data PrintCompositorGetBottomMarginMethodInfo-instance (signature ~ (Gtk.Unit -> m Double), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetBottomMarginMethodInfo a signature where- overloadedMethod _ = printCompositorGetBottomMargin---- method PrintCompositor::get_buffer--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Buffer")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_buffer" gtk_source_print_compositor_get_buffer :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO (Ptr Buffer)---printCompositorGetBuffer ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m Buffer -- result-printCompositorGetBuffer _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_buffer _obj'- checkUnexpectedReturnNULL "gtk_source_print_compositor_get_buffer" result- result' <- (newObject Buffer) result- touchManagedPtr _obj- return result'--data PrintCompositorGetBufferMethodInfo-instance (signature ~ (m Buffer), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetBufferMethodInfo a signature where- overloadedMethod _ = printCompositorGetBuffer---- method PrintCompositor::get_footer_font_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_footer_font_name" gtk_source_print_compositor_get_footer_font_name :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO CString---printCompositorGetFooterFontName ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m T.Text -- result-printCompositorGetFooterFontName _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_footer_font_name _obj'- checkUnexpectedReturnNULL "gtk_source_print_compositor_get_footer_font_name" result- result' <- cstringToText result- freeMem result- touchManagedPtr _obj- return result'--data PrintCompositorGetFooterFontNameMethodInfo-instance (signature ~ (m T.Text), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetFooterFontNameMethodInfo a signature where- overloadedMethod _ = printCompositorGetFooterFontName---- method PrintCompositor::get_header_font_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_header_font_name" gtk_source_print_compositor_get_header_font_name :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO CString---printCompositorGetHeaderFontName ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m T.Text -- result-printCompositorGetHeaderFontName _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_header_font_name _obj'- checkUnexpectedReturnNULL "gtk_source_print_compositor_get_header_font_name" result- result' <- cstringToText result- freeMem result- touchManagedPtr _obj- return result'--data PrintCompositorGetHeaderFontNameMethodInfo-instance (signature ~ (m T.Text), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetHeaderFontNameMethodInfo a signature where- overloadedMethod _ = printCompositorGetHeaderFontName---- method PrintCompositor::get_highlight_syntax--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_highlight_syntax" gtk_source_print_compositor_get_highlight_syntax :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO CInt---printCompositorGetHighlightSyntax ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m Bool -- result-printCompositorGetHighlightSyntax _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_highlight_syntax _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data PrintCompositorGetHighlightSyntaxMethodInfo-instance (signature ~ (m Bool), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetHighlightSyntaxMethodInfo a signature where- overloadedMethod _ = printCompositorGetHighlightSyntax---- method PrintCompositor::get_left_margin--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface "Gtk" "Unit", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TDouble)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_left_margin" gtk_source_print_compositor_get_left_margin :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CUInt -> -- unit : TInterface "Gtk" "Unit"- IO CDouble---printCompositorGetLeftMargin ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Gtk.Unit -- unit- -> m Double -- result-printCompositorGetLeftMargin _obj unit = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let unit' = (fromIntegral . fromEnum) unit- result <- gtk_source_print_compositor_get_left_margin _obj' unit'- let result' = realToFrac result- touchManagedPtr _obj- return result'--data PrintCompositorGetLeftMarginMethodInfo-instance (signature ~ (Gtk.Unit -> m Double), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetLeftMarginMethodInfo a signature where- overloadedMethod _ = printCompositorGetLeftMargin---- method PrintCompositor::get_line_numbers_font_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_line_numbers_font_name" gtk_source_print_compositor_get_line_numbers_font_name :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO CString---printCompositorGetLineNumbersFontName ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m T.Text -- result-printCompositorGetLineNumbersFontName _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_line_numbers_font_name _obj'- checkUnexpectedReturnNULL "gtk_source_print_compositor_get_line_numbers_font_name" result- result' <- cstringToText result- freeMem result- touchManagedPtr _obj- return result'--data PrintCompositorGetLineNumbersFontNameMethodInfo-instance (signature ~ (m T.Text), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetLineNumbersFontNameMethodInfo a signature where- overloadedMethod _ = printCompositorGetLineNumbersFontName---- method PrintCompositor::get_n_pages--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_n_pages" gtk_source_print_compositor_get_n_pages :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO Int32---printCompositorGetNPages ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m Int32 -- result-printCompositorGetNPages _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_n_pages _obj'- touchManagedPtr _obj- return result--data PrintCompositorGetNPagesMethodInfo-instance (signature ~ (m Int32), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetNPagesMethodInfo a signature where- overloadedMethod _ = printCompositorGetNPages---- method PrintCompositor::get_pagination_progress--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TDouble)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_pagination_progress" gtk_source_print_compositor_get_pagination_progress :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO CDouble---printCompositorGetPaginationProgress ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m Double -- result-printCompositorGetPaginationProgress _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_pagination_progress _obj'- let result' = realToFrac result- touchManagedPtr _obj- return result'--data PrintCompositorGetPaginationProgressMethodInfo-instance (signature ~ (m Double), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetPaginationProgressMethodInfo a signature where- overloadedMethod _ = printCompositorGetPaginationProgress---- method PrintCompositor::get_print_footer--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_print_footer" gtk_source_print_compositor_get_print_footer :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO CInt---printCompositorGetPrintFooter ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m Bool -- result-printCompositorGetPrintFooter _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_print_footer _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data PrintCompositorGetPrintFooterMethodInfo-instance (signature ~ (m Bool), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetPrintFooterMethodInfo a signature where- overloadedMethod _ = printCompositorGetPrintFooter---- method PrintCompositor::get_print_header--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_print_header" gtk_source_print_compositor_get_print_header :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO CInt---printCompositorGetPrintHeader ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m Bool -- result-printCompositorGetPrintHeader _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_print_header _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data PrintCompositorGetPrintHeaderMethodInfo-instance (signature ~ (m Bool), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetPrintHeaderMethodInfo a signature where- overloadedMethod _ = printCompositorGetPrintHeader---- method PrintCompositor::get_print_line_numbers--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_print_line_numbers" gtk_source_print_compositor_get_print_line_numbers :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO Word32---printCompositorGetPrintLineNumbers ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m Word32 -- result-printCompositorGetPrintLineNumbers _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_print_line_numbers _obj'- touchManagedPtr _obj- return result--data PrintCompositorGetPrintLineNumbersMethodInfo-instance (signature ~ (m Word32), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetPrintLineNumbersMethodInfo a signature where- overloadedMethod _ = printCompositorGetPrintLineNumbers---- method PrintCompositor::get_right_margin--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface "Gtk" "Unit", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TDouble)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_right_margin" gtk_source_print_compositor_get_right_margin :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CUInt -> -- unit : TInterface "Gtk" "Unit"- IO CDouble---printCompositorGetRightMargin ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Gtk.Unit -- unit- -> m Double -- result-printCompositorGetRightMargin _obj unit = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let unit' = (fromIntegral . fromEnum) unit- result <- gtk_source_print_compositor_get_right_margin _obj' unit'- let result' = realToFrac result- touchManagedPtr _obj- return result'--data PrintCompositorGetRightMarginMethodInfo-instance (signature ~ (Gtk.Unit -> m Double), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetRightMarginMethodInfo a signature where- overloadedMethod _ = printCompositorGetRightMargin---- method PrintCompositor::get_tab_width--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_tab_width" gtk_source_print_compositor_get_tab_width :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO Word32---printCompositorGetTabWidth ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m Word32 -- result-printCompositorGetTabWidth _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_tab_width _obj'- touchManagedPtr _obj- return result--data PrintCompositorGetTabWidthMethodInfo-instance (signature ~ (m Word32), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetTabWidthMethodInfo a signature where- overloadedMethod _ = printCompositorGetTabWidth---- method PrintCompositor::get_top_margin--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface "Gtk" "Unit", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TDouble)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_top_margin" gtk_source_print_compositor_get_top_margin :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CUInt -> -- unit : TInterface "Gtk" "Unit"- IO CDouble---printCompositorGetTopMargin ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Gtk.Unit -- unit- -> m Double -- result-printCompositorGetTopMargin _obj unit = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let unit' = (fromIntegral . fromEnum) unit- result <- gtk_source_print_compositor_get_top_margin _obj' unit'- let result' = realToFrac result- touchManagedPtr _obj- return result'--data PrintCompositorGetTopMarginMethodInfo-instance (signature ~ (Gtk.Unit -> m Double), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetTopMarginMethodInfo a signature where- overloadedMethod _ = printCompositorGetTopMargin---- method PrintCompositor::get_wrap_mode--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "Gtk" "WrapMode")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_get_wrap_mode" gtk_source_print_compositor_get_wrap_mode :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- IO CUInt---printCompositorGetWrapMode ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> m Gtk.WrapMode -- result-printCompositorGetWrapMode _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_print_compositor_get_wrap_mode _obj'- let result' = (toEnum . fromIntegral) result- touchManagedPtr _obj- return result'--data PrintCompositorGetWrapModeMethodInfo-instance (signature ~ (m Gtk.WrapMode), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorGetWrapModeMethodInfo a signature where- overloadedMethod _ = printCompositorGetWrapMode---- method PrintCompositor::paginate--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "context", argType = TInterface "Gtk" "PrintContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_paginate" gtk_source_print_compositor_paginate :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- Ptr Gtk.PrintContext -> -- context : TInterface "Gtk" "PrintContext"- IO CInt---printCompositorPaginate ::- (MonadIO m, PrintCompositorK a, Gtk.PrintContextK b) =>- a -- _obj- -> b -- context- -> m Bool -- result-printCompositorPaginate _obj context = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let context' = unsafeManagedPtrCastPtr context- result <- gtk_source_print_compositor_paginate _obj' context'- let result' = (/= 0) result- touchManagedPtr _obj- touchManagedPtr context- return result'--data PrintCompositorPaginateMethodInfo-instance (signature ~ (b -> m Bool), MonadIO m, PrintCompositorK a, Gtk.PrintContextK b) => MethodInfo PrintCompositorPaginateMethodInfo a signature where- overloadedMethod _ = printCompositorPaginate---- method PrintCompositor::set_body_font_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "font_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_body_font_name" gtk_source_print_compositor_set_body_font_name :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CString -> -- font_name : TBasicType TUTF8- IO ()---printCompositorSetBodyFontName ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> T.Text -- fontName- -> m () -- result-printCompositorSetBodyFontName _obj fontName = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- fontName' <- textToCString fontName- gtk_source_print_compositor_set_body_font_name _obj' fontName'- touchManagedPtr _obj- freeMem fontName'- return ()--data PrintCompositorSetBodyFontNameMethodInfo-instance (signature ~ (T.Text -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetBodyFontNameMethodInfo a signature where- overloadedMethod _ = printCompositorSetBodyFontName---- method PrintCompositor::set_bottom_margin--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "margin", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface "Gtk" "Unit", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_bottom_margin" gtk_source_print_compositor_set_bottom_margin :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CDouble -> -- margin : TBasicType TDouble- CUInt -> -- unit : TInterface "Gtk" "Unit"- IO ()---printCompositorSetBottomMargin ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Double -- margin- -> Gtk.Unit -- unit- -> m () -- result-printCompositorSetBottomMargin _obj margin unit = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let margin' = realToFrac margin- let unit' = (fromIntegral . fromEnum) unit- gtk_source_print_compositor_set_bottom_margin _obj' margin' unit'- touchManagedPtr _obj- return ()--data PrintCompositorSetBottomMarginMethodInfo-instance (signature ~ (Double -> Gtk.Unit -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetBottomMarginMethodInfo a signature where- overloadedMethod _ = printCompositorSetBottomMargin---- method PrintCompositor::set_footer_font_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "font_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_footer_font_name" gtk_source_print_compositor_set_footer_font_name :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CString -> -- font_name : TBasicType TUTF8- IO ()---printCompositorSetFooterFontName ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Maybe (T.Text) -- fontName- -> m () -- result-printCompositorSetFooterFontName _obj fontName = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeFontName <- case fontName of- Nothing -> return nullPtr- Just jFontName -> do- jFontName' <- textToCString jFontName- return jFontName'- gtk_source_print_compositor_set_footer_font_name _obj' maybeFontName- touchManagedPtr _obj- freeMem maybeFontName- return ()--data PrintCompositorSetFooterFontNameMethodInfo-instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetFooterFontNameMethodInfo a signature where- overloadedMethod _ = printCompositorSetFooterFontName---- method PrintCompositor::set_footer_format--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "separator", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "left", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "center", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "right", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_footer_format" gtk_source_print_compositor_set_footer_format :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CInt -> -- separator : TBasicType TBoolean- CString -> -- left : TBasicType TUTF8- CString -> -- center : TBasicType TUTF8- CString -> -- right : TBasicType TUTF8- IO ()---printCompositorSetFooterFormat ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Bool -- separator- -> Maybe (T.Text) -- left- -> Maybe (T.Text) -- center- -> Maybe (T.Text) -- right- -> m () -- result-printCompositorSetFooterFormat _obj separator left center right = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let separator' = (fromIntegral . fromEnum) separator- maybeLeft <- case left of- Nothing -> return nullPtr- Just jLeft -> do- jLeft' <- textToCString jLeft- return jLeft'- maybeCenter <- case center of- Nothing -> return nullPtr- Just jCenter -> do- jCenter' <- textToCString jCenter- return jCenter'- maybeRight <- case right of- Nothing -> return nullPtr- Just jRight -> do- jRight' <- textToCString jRight- return jRight'- gtk_source_print_compositor_set_footer_format _obj' separator' maybeLeft maybeCenter maybeRight- touchManagedPtr _obj- freeMem maybeLeft- freeMem maybeCenter- freeMem maybeRight- return ()--data PrintCompositorSetFooterFormatMethodInfo-instance (signature ~ (Bool -> Maybe (T.Text) -> Maybe (T.Text) -> Maybe (T.Text) -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetFooterFormatMethodInfo a signature where- overloadedMethod _ = printCompositorSetFooterFormat---- method PrintCompositor::set_header_font_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "font_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_header_font_name" gtk_source_print_compositor_set_header_font_name :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CString -> -- font_name : TBasicType TUTF8- IO ()---printCompositorSetHeaderFontName ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Maybe (T.Text) -- fontName- -> m () -- result-printCompositorSetHeaderFontName _obj fontName = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeFontName <- case fontName of- Nothing -> return nullPtr- Just jFontName -> do- jFontName' <- textToCString jFontName- return jFontName'- gtk_source_print_compositor_set_header_font_name _obj' maybeFontName- touchManagedPtr _obj- freeMem maybeFontName- return ()--data PrintCompositorSetHeaderFontNameMethodInfo-instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetHeaderFontNameMethodInfo a signature where- overloadedMethod _ = printCompositorSetHeaderFontName---- method PrintCompositor::set_header_format--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "separator", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "left", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "center", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "right", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_header_format" gtk_source_print_compositor_set_header_format :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CInt -> -- separator : TBasicType TBoolean- CString -> -- left : TBasicType TUTF8- CString -> -- center : TBasicType TUTF8- CString -> -- right : TBasicType TUTF8- IO ()---printCompositorSetHeaderFormat ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Bool -- separator- -> Maybe (T.Text) -- left- -> Maybe (T.Text) -- center- -> Maybe (T.Text) -- right- -> m () -- result-printCompositorSetHeaderFormat _obj separator left center right = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let separator' = (fromIntegral . fromEnum) separator- maybeLeft <- case left of- Nothing -> return nullPtr- Just jLeft -> do- jLeft' <- textToCString jLeft- return jLeft'- maybeCenter <- case center of- Nothing -> return nullPtr- Just jCenter -> do- jCenter' <- textToCString jCenter- return jCenter'- maybeRight <- case right of- Nothing -> return nullPtr- Just jRight -> do- jRight' <- textToCString jRight- return jRight'- gtk_source_print_compositor_set_header_format _obj' separator' maybeLeft maybeCenter maybeRight- touchManagedPtr _obj- freeMem maybeLeft- freeMem maybeCenter- freeMem maybeRight- return ()--data PrintCompositorSetHeaderFormatMethodInfo-instance (signature ~ (Bool -> Maybe (T.Text) -> Maybe (T.Text) -> Maybe (T.Text) -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetHeaderFormatMethodInfo a signature where- overloadedMethod _ = printCompositorSetHeaderFormat---- method PrintCompositor::set_highlight_syntax--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", 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 : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_highlight_syntax" gtk_source_print_compositor_set_highlight_syntax :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CInt -> -- highlight : TBasicType TBoolean- IO ()---printCompositorSetHighlightSyntax ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Bool -- highlight- -> m () -- result-printCompositorSetHighlightSyntax _obj highlight = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let highlight' = (fromIntegral . fromEnum) highlight- gtk_source_print_compositor_set_highlight_syntax _obj' highlight'- touchManagedPtr _obj- return ()--data PrintCompositorSetHighlightSyntaxMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetHighlightSyntaxMethodInfo a signature where- overloadedMethod _ = printCompositorSetHighlightSyntax---- method PrintCompositor::set_left_margin--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "margin", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface "Gtk" "Unit", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_left_margin" gtk_source_print_compositor_set_left_margin :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CDouble -> -- margin : TBasicType TDouble- CUInt -> -- unit : TInterface "Gtk" "Unit"- IO ()---printCompositorSetLeftMargin ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Double -- margin- -> Gtk.Unit -- unit- -> m () -- result-printCompositorSetLeftMargin _obj margin unit = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let margin' = realToFrac margin- let unit' = (fromIntegral . fromEnum) unit- gtk_source_print_compositor_set_left_margin _obj' margin' unit'- touchManagedPtr _obj- return ()--data PrintCompositorSetLeftMarginMethodInfo-instance (signature ~ (Double -> Gtk.Unit -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetLeftMarginMethodInfo a signature where- overloadedMethod _ = printCompositorSetLeftMargin---- method PrintCompositor::set_line_numbers_font_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "font_name", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_line_numbers_font_name" gtk_source_print_compositor_set_line_numbers_font_name :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CString -> -- font_name : TBasicType TUTF8- IO ()---printCompositorSetLineNumbersFontName ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Maybe (T.Text) -- fontName- -> m () -- result-printCompositorSetLineNumbersFontName _obj fontName = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeFontName <- case fontName of- Nothing -> return nullPtr- Just jFontName -> do- jFontName' <- textToCString jFontName- return jFontName'- gtk_source_print_compositor_set_line_numbers_font_name _obj' maybeFontName- touchManagedPtr _obj- freeMem maybeFontName- return ()--data PrintCompositorSetLineNumbersFontNameMethodInfo-instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetLineNumbersFontNameMethodInfo a signature where- overloadedMethod _ = printCompositorSetLineNumbersFontName---- method PrintCompositor::set_print_footer--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "print", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_print_footer" gtk_source_print_compositor_set_print_footer :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CInt -> -- print : TBasicType TBoolean- IO ()---printCompositorSetPrintFooter ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Bool -- print- -> m () -- result-printCompositorSetPrintFooter _obj print = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let print' = (fromIntegral . fromEnum) print- gtk_source_print_compositor_set_print_footer _obj' print'- touchManagedPtr _obj- return ()--data PrintCompositorSetPrintFooterMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetPrintFooterMethodInfo a signature where- overloadedMethod _ = printCompositorSetPrintFooter---- method PrintCompositor::set_print_header--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "print", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_print_header" gtk_source_print_compositor_set_print_header :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CInt -> -- print : TBasicType TBoolean- IO ()---printCompositorSetPrintHeader ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Bool -- print- -> m () -- result-printCompositorSetPrintHeader _obj print = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let print' = (fromIntegral . fromEnum) print- gtk_source_print_compositor_set_print_header _obj' print'- touchManagedPtr _obj- return ()--data PrintCompositorSetPrintHeaderMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetPrintHeaderMethodInfo a signature where- overloadedMethod _ = printCompositorSetPrintHeader---- method PrintCompositor::set_print_line_numbers--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "interval", argType = TBasicType TUInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_print_line_numbers" gtk_source_print_compositor_set_print_line_numbers :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- Word32 -> -- interval : TBasicType TUInt- IO ()---printCompositorSetPrintLineNumbers ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Word32 -- interval- -> m () -- result-printCompositorSetPrintLineNumbers _obj interval = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_print_compositor_set_print_line_numbers _obj' interval- touchManagedPtr _obj- return ()--data PrintCompositorSetPrintLineNumbersMethodInfo-instance (signature ~ (Word32 -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetPrintLineNumbersMethodInfo a signature where- overloadedMethod _ = printCompositorSetPrintLineNumbers---- method PrintCompositor::set_right_margin--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "margin", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface "Gtk" "Unit", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_right_margin" gtk_source_print_compositor_set_right_margin :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CDouble -> -- margin : TBasicType TDouble- CUInt -> -- unit : TInterface "Gtk" "Unit"- IO ()---printCompositorSetRightMargin ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Double -- margin- -> Gtk.Unit -- unit- -> m () -- result-printCompositorSetRightMargin _obj margin unit = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let margin' = realToFrac margin- let unit' = (fromIntegral . fromEnum) unit- gtk_source_print_compositor_set_right_margin _obj' margin' unit'- touchManagedPtr _obj- return ()--data PrintCompositorSetRightMarginMethodInfo-instance (signature ~ (Double -> Gtk.Unit -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetRightMarginMethodInfo a signature where- overloadedMethod _ = printCompositorSetRightMargin---- method PrintCompositor::set_tab_width--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "width", argType = TBasicType TUInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_tab_width" gtk_source_print_compositor_set_tab_width :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- Word32 -> -- width : TBasicType TUInt- IO ()---printCompositorSetTabWidth ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Word32 -- width- -> m () -- result-printCompositorSetTabWidth _obj width = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_print_compositor_set_tab_width _obj' width- touchManagedPtr _obj- return ()--data PrintCompositorSetTabWidthMethodInfo-instance (signature ~ (Word32 -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetTabWidthMethodInfo a signature where- overloadedMethod _ = printCompositorSetTabWidth---- method PrintCompositor::set_top_margin--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "margin", argType = TBasicType TDouble, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "unit", argType = TInterface "Gtk" "Unit", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_top_margin" gtk_source_print_compositor_set_top_margin :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CDouble -> -- margin : TBasicType TDouble- CUInt -> -- unit : TInterface "Gtk" "Unit"- IO ()---printCompositorSetTopMargin ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Double -- margin- -> Gtk.Unit -- unit- -> m () -- result-printCompositorSetTopMargin _obj margin unit = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let margin' = realToFrac margin- let unit' = (fromIntegral . fromEnum) unit- gtk_source_print_compositor_set_top_margin _obj' margin' unit'- touchManagedPtr _obj- return ()--data PrintCompositorSetTopMarginMethodInfo-instance (signature ~ (Double -> Gtk.Unit -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetTopMarginMethodInfo a signature where- overloadedMethod _ = printCompositorSetTopMargin---- method PrintCompositor::set_wrap_mode--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "PrintCompositor", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "wrap_mode", argType = TInterface "Gtk" "WrapMode", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_print_compositor_set_wrap_mode" gtk_source_print_compositor_set_wrap_mode :: - Ptr PrintCompositor -> -- _obj : TInterface "GtkSource" "PrintCompositor"- CUInt -> -- wrap_mode : TInterface "Gtk" "WrapMode"- IO ()---printCompositorSetWrapMode ::- (MonadIO m, PrintCompositorK a) =>- a -- _obj- -> Gtk.WrapMode -- wrapMode- -> m () -- result-printCompositorSetWrapMode _obj wrapMode = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let wrapMode' = (fromIntegral . fromEnum) wrapMode- gtk_source_print_compositor_set_wrap_mode _obj' wrapMode'- touchManagedPtr _obj- return ()--data PrintCompositorSetWrapModeMethodInfo-instance (signature ~ (Gtk.WrapMode -> m ()), MonadIO m, PrintCompositorK a) => MethodInfo PrintCompositorSetWrapModeMethodInfo a signature where- overloadedMethod _ = printCompositorSetWrapMode--
− GI/GtkSource/Objects/PrintCompositor.hs-boot
@@ -1,60 +0,0 @@-module GI.GtkSource.Objects.PrintCompositor where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype PrintCompositor = PrintCompositor (ForeignPtr PrintCompositor)-instance GObject PrintCompositor where-class GObject o => PrintCompositorK o-instance (GObject o, IsDescendantOf PrintCompositor o) => PrintCompositorK o-data PrintCompositorBodyFontNamePropertyInfo-data PrintCompositorBufferPropertyInfo-data PrintCompositorFooterFontNamePropertyInfo-data PrintCompositorHeaderFontNamePropertyInfo-data PrintCompositorHighlightSyntaxPropertyInfo-data PrintCompositorLineNumbersFontNamePropertyInfo-data PrintCompositorNPagesPropertyInfo-data PrintCompositorPrintFooterPropertyInfo-data PrintCompositorPrintHeaderPropertyInfo-data PrintCompositorPrintLineNumbersPropertyInfo-data PrintCompositorTabWidthPropertyInfo-data PrintCompositorWrapModePropertyInfo-data PrintCompositorDrawPageMethodInfo-data PrintCompositorGetBodyFontNameMethodInfo-data PrintCompositorGetBottomMarginMethodInfo-data PrintCompositorGetBufferMethodInfo-data PrintCompositorGetFooterFontNameMethodInfo-data PrintCompositorGetHeaderFontNameMethodInfo-data PrintCompositorGetHighlightSyntaxMethodInfo-data PrintCompositorGetLeftMarginMethodInfo-data PrintCompositorGetLineNumbersFontNameMethodInfo-data PrintCompositorGetNPagesMethodInfo-data PrintCompositorGetPaginationProgressMethodInfo-data PrintCompositorGetPrintFooterMethodInfo-data PrintCompositorGetPrintHeaderMethodInfo-data PrintCompositorGetPrintLineNumbersMethodInfo-data PrintCompositorGetRightMarginMethodInfo-data PrintCompositorGetTabWidthMethodInfo-data PrintCompositorGetTopMarginMethodInfo-data PrintCompositorGetWrapModeMethodInfo-data PrintCompositorPaginateMethodInfo-data PrintCompositorSetBodyFontNameMethodInfo-data PrintCompositorSetBottomMarginMethodInfo-data PrintCompositorSetFooterFontNameMethodInfo-data PrintCompositorSetFooterFormatMethodInfo-data PrintCompositorSetHeaderFontNameMethodInfo-data PrintCompositorSetHeaderFormatMethodInfo-data PrintCompositorSetHighlightSyntaxMethodInfo-data PrintCompositorSetLeftMarginMethodInfo-data PrintCompositorSetLineNumbersFontNameMethodInfo-data PrintCompositorSetPrintFooterMethodInfo-data PrintCompositorSetPrintHeaderMethodInfo-data PrintCompositorSetPrintLineNumbersMethodInfo-data PrintCompositorSetRightMarginMethodInfo-data PrintCompositorSetTabWidthMethodInfo-data PrintCompositorSetTopMarginMethodInfo-data PrintCompositorSetWrapModeMethodInfo
− GI/GtkSource/Objects/SearchContext.hs
@@ -1,1108 +0,0 @@---{- |-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.GtkSource.Objects.SearchContext- ( ---- * Exported types- SearchContext(..) ,- SearchContextK ,- toSearchContext ,- noSearchContext ,--- -- * Methods--- ** searchContextBackward- SearchContextBackwardMethodInfo ,- searchContextBackward ,----- ** searchContextBackwardAsync- SearchContextBackwardAsyncMethodInfo ,- searchContextBackwardAsync ,----- ** searchContextBackwardFinish- SearchContextBackwardFinishMethodInfo ,- searchContextBackwardFinish ,----- ** searchContextForward- SearchContextForwardMethodInfo ,- searchContextForward ,----- ** searchContextForwardAsync- SearchContextForwardAsyncMethodInfo ,- searchContextForwardAsync ,----- ** searchContextForwardFinish- SearchContextForwardFinishMethodInfo ,- searchContextForwardFinish ,----- ** searchContextGetBuffer- SearchContextGetBufferMethodInfo ,- searchContextGetBuffer ,----- ** searchContextGetHighlight- SearchContextGetHighlightMethodInfo ,- searchContextGetHighlight ,----- ** searchContextGetMatchStyle- SearchContextGetMatchStyleMethodInfo ,- searchContextGetMatchStyle ,----- ** searchContextGetOccurrencePosition- SearchContextGetOccurrencePositionMethodInfo,- searchContextGetOccurrencePosition ,----- ** searchContextGetOccurrencesCount- SearchContextGetOccurrencesCountMethodInfo,- searchContextGetOccurrencesCount ,----- ** searchContextGetRegexError- SearchContextGetRegexErrorMethodInfo ,- searchContextGetRegexError ,----- ** searchContextGetSettings- SearchContextGetSettingsMethodInfo ,- searchContextGetSettings ,----- ** searchContextNew- searchContextNew ,----- ** searchContextReplace- SearchContextReplaceMethodInfo ,- searchContextReplace ,----- ** searchContextReplaceAll- SearchContextReplaceAllMethodInfo ,- searchContextReplaceAll ,----- ** searchContextSetHighlight- SearchContextSetHighlightMethodInfo ,- searchContextSetHighlight ,----- ** searchContextSetMatchStyle- SearchContextSetMatchStyleMethodInfo ,- searchContextSetMatchStyle ,----- ** searchContextSetSettings- SearchContextSetSettingsMethodInfo ,- searchContextSetSettings ,----- -- * Properties--- ** Buffer- SearchContextBufferPropertyInfo ,- constructSearchContextBuffer ,- getSearchContextBuffer ,- searchContextBuffer ,----- ** Highlight- SearchContextHighlightPropertyInfo ,- constructSearchContextHighlight ,- getSearchContextHighlight ,- searchContextHighlight ,- setSearchContextHighlight ,----- ** MatchStyle- SearchContextMatchStylePropertyInfo ,- clearSearchContextMatchStyle ,- constructSearchContextMatchStyle ,- getSearchContextMatchStyle ,- searchContextMatchStyle ,- setSearchContextMatchStyle ,----- ** OccurrencesCount- SearchContextOccurrencesCountPropertyInfo,- getSearchContextOccurrencesCount ,- searchContextOccurrencesCount ,----- ** RegexError- SearchContextRegexErrorPropertyInfo ,- getSearchContextRegexError ,- searchContextRegexError ,----- ** Settings- SearchContextSettingsPropertyInfo ,- clearSearchContextSettings ,- constructSearchContextSettings ,- getSearchContextSettings ,- searchContextSettings ,- setSearchContextSettings ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.Gio as Gio-import qualified GI.Gtk as Gtk--newtype SearchContext = SearchContext (ForeignPtr SearchContext)-foreign import ccall "gtk_source_search_context_get_type"- c_gtk_source_search_context_get_type :: IO GType--type instance ParentTypes SearchContext = SearchContextParentTypes-type SearchContextParentTypes = '[GObject.Object]--instance GObject SearchContext where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_search_context_get_type- --class GObject o => SearchContextK o-instance (GObject o, IsDescendantOf SearchContext o) => SearchContextK o--toSearchContext :: SearchContextK o => o -> IO SearchContext-toSearchContext = unsafeCastTo SearchContext--noSearchContext :: Maybe SearchContext-noSearchContext = Nothing--type family ResolveSearchContextMethod (t :: Symbol) (o :: *) :: * where- ResolveSearchContextMethod "backward" o = SearchContextBackwardMethodInfo- ResolveSearchContextMethod "backwardAsync" o = SearchContextBackwardAsyncMethodInfo- ResolveSearchContextMethod "backwardFinish" o = SearchContextBackwardFinishMethodInfo- ResolveSearchContextMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveSearchContextMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveSearchContextMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveSearchContextMethod "forward" o = SearchContextForwardMethodInfo- ResolveSearchContextMethod "forwardAsync" o = SearchContextForwardAsyncMethodInfo- ResolveSearchContextMethod "forwardFinish" o = SearchContextForwardFinishMethodInfo- ResolveSearchContextMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveSearchContextMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveSearchContextMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveSearchContextMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveSearchContextMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveSearchContextMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveSearchContextMethod "replace" o = SearchContextReplaceMethodInfo- ResolveSearchContextMethod "replaceAll" o = SearchContextReplaceAllMethodInfo- ResolveSearchContextMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveSearchContextMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveSearchContextMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveSearchContextMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveSearchContextMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveSearchContextMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveSearchContextMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveSearchContextMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveSearchContextMethod "getBuffer" o = SearchContextGetBufferMethodInfo- ResolveSearchContextMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveSearchContextMethod "getHighlight" o = SearchContextGetHighlightMethodInfo- ResolveSearchContextMethod "getMatchStyle" o = SearchContextGetMatchStyleMethodInfo- ResolveSearchContextMethod "getOccurrencePosition" o = SearchContextGetOccurrencePositionMethodInfo- ResolveSearchContextMethod "getOccurrencesCount" o = SearchContextGetOccurrencesCountMethodInfo- ResolveSearchContextMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveSearchContextMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveSearchContextMethod "getRegexError" o = SearchContextGetRegexErrorMethodInfo- ResolveSearchContextMethod "getSettings" o = SearchContextGetSettingsMethodInfo- ResolveSearchContextMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveSearchContextMethod "setHighlight" o = SearchContextSetHighlightMethodInfo- ResolveSearchContextMethod "setMatchStyle" o = SearchContextSetMatchStyleMethodInfo- ResolveSearchContextMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveSearchContextMethod "setSettings" o = SearchContextSetSettingsMethodInfo- ResolveSearchContextMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveSearchContextMethod t SearchContext, MethodInfo info SearchContext p) => IsLabelProxy t (SearchContext -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveSearchContextMethod t SearchContext, MethodInfo info SearchContext p) => IsLabel t (SearchContext -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "buffer"- -- Type: TInterface "GtkSource" "Buffer"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just False,Nothing)--getSearchContextBuffer :: (MonadIO m, SearchContextK o) => o -> m Buffer-getSearchContextBuffer obj = liftIO $ checkUnexpectedNothing "getSearchContextBuffer" $ getObjectPropertyObject obj "buffer" Buffer--constructSearchContextBuffer :: (BufferK a) => a -> IO ([Char], GValue)-constructSearchContextBuffer val = constructObjectPropertyObject "buffer" (Just val)--data SearchContextBufferPropertyInfo-instance AttrInfo SearchContextBufferPropertyInfo where- type AttrAllowedOps SearchContextBufferPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint SearchContextBufferPropertyInfo = BufferK- type AttrBaseTypeConstraint SearchContextBufferPropertyInfo = SearchContextK- type AttrGetType SearchContextBufferPropertyInfo = Buffer- type AttrLabel SearchContextBufferPropertyInfo = "buffer"- attrGet _ = getSearchContextBuffer- attrSet _ = undefined- attrConstruct _ = constructSearchContextBuffer- attrClear _ = undefined---- VVV Prop "highlight"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getSearchContextHighlight :: (MonadIO m, SearchContextK o) => o -> m Bool-getSearchContextHighlight obj = liftIO $ getObjectPropertyBool obj "highlight"--setSearchContextHighlight :: (MonadIO m, SearchContextK o) => o -> Bool -> m ()-setSearchContextHighlight obj val = liftIO $ setObjectPropertyBool obj "highlight" val--constructSearchContextHighlight :: Bool -> IO ([Char], GValue)-constructSearchContextHighlight val = constructObjectPropertyBool "highlight" val--data SearchContextHighlightPropertyInfo-instance AttrInfo SearchContextHighlightPropertyInfo where- type AttrAllowedOps SearchContextHighlightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint SearchContextHighlightPropertyInfo = (~) Bool- type AttrBaseTypeConstraint SearchContextHighlightPropertyInfo = SearchContextK- type AttrGetType SearchContextHighlightPropertyInfo = Bool- type AttrLabel SearchContextHighlightPropertyInfo = "highlight"- attrGet _ = getSearchContextHighlight- attrSet _ = setSearchContextHighlight- attrConstruct _ = constructSearchContextHighlight- attrClear _ = undefined---- VVV Prop "match-style"- -- Type: TInterface "GtkSource" "Style"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just True)--getSearchContextMatchStyle :: (MonadIO m, SearchContextK o) => o -> m Style-getSearchContextMatchStyle obj = liftIO $ checkUnexpectedNothing "getSearchContextMatchStyle" $ getObjectPropertyObject obj "match-style" Style--setSearchContextMatchStyle :: (MonadIO m, SearchContextK o, StyleK a) => o -> a -> m ()-setSearchContextMatchStyle obj val = liftIO $ setObjectPropertyObject obj "match-style" (Just val)--constructSearchContextMatchStyle :: (StyleK a) => a -> IO ([Char], GValue)-constructSearchContextMatchStyle val = constructObjectPropertyObject "match-style" (Just val)--clearSearchContextMatchStyle :: (MonadIO m, SearchContextK o) => o -> m ()-clearSearchContextMatchStyle obj = liftIO $ setObjectPropertyObject obj "match-style" (Nothing :: Maybe Style)--data SearchContextMatchStylePropertyInfo-instance AttrInfo SearchContextMatchStylePropertyInfo where- type AttrAllowedOps SearchContextMatchStylePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint SearchContextMatchStylePropertyInfo = StyleK- type AttrBaseTypeConstraint SearchContextMatchStylePropertyInfo = SearchContextK- type AttrGetType SearchContextMatchStylePropertyInfo = Style- type AttrLabel SearchContextMatchStylePropertyInfo = "match-style"- attrGet _ = getSearchContextMatchStyle- attrSet _ = setSearchContextMatchStyle- attrConstruct _ = constructSearchContextMatchStyle- attrClear _ = clearSearchContextMatchStyle---- VVV Prop "occurrences-count"- -- Type: TBasicType TInt- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getSearchContextOccurrencesCount :: (MonadIO m, SearchContextK o) => o -> m Int32-getSearchContextOccurrencesCount obj = liftIO $ getObjectPropertyInt32 obj "occurrences-count"--data SearchContextOccurrencesCountPropertyInfo-instance AttrInfo SearchContextOccurrencesCountPropertyInfo where- type AttrAllowedOps SearchContextOccurrencesCountPropertyInfo = '[ 'AttrGet]- type AttrSetTypeConstraint SearchContextOccurrencesCountPropertyInfo = (~) ()- type AttrBaseTypeConstraint SearchContextOccurrencesCountPropertyInfo = SearchContextK- type AttrGetType SearchContextOccurrencesCountPropertyInfo = Int32- type AttrLabel SearchContextOccurrencesCountPropertyInfo = "occurrences-count"- attrGet _ = getSearchContextOccurrencesCount- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "regex-error"- -- Type: TBasicType TPtr- -- Flags: [PropertyReadable]- -- Nullable: (Nothing,Nothing)--getSearchContextRegexError :: (MonadIO m, SearchContextK o) => o -> m (Ptr ())-getSearchContextRegexError obj = liftIO $ getObjectPropertyPtr obj "regex-error"--data SearchContextRegexErrorPropertyInfo-instance AttrInfo SearchContextRegexErrorPropertyInfo where- type AttrAllowedOps SearchContextRegexErrorPropertyInfo = '[ 'AttrGet]- type AttrSetTypeConstraint SearchContextRegexErrorPropertyInfo = (~) ()- type AttrBaseTypeConstraint SearchContextRegexErrorPropertyInfo = SearchContextK- type AttrGetType SearchContextRegexErrorPropertyInfo = (Ptr ())- type AttrLabel SearchContextRegexErrorPropertyInfo = "regex-error"- attrGet _ = getSearchContextRegexError- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "settings"- -- Type: TInterface "GtkSource" "SearchSettings"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just True)--getSearchContextSettings :: (MonadIO m, SearchContextK o) => o -> m SearchSettings-getSearchContextSettings obj = liftIO $ checkUnexpectedNothing "getSearchContextSettings" $ getObjectPropertyObject obj "settings" SearchSettings--setSearchContextSettings :: (MonadIO m, SearchContextK o, SearchSettingsK a) => o -> a -> m ()-setSearchContextSettings obj val = liftIO $ setObjectPropertyObject obj "settings" (Just val)--constructSearchContextSettings :: (SearchSettingsK a) => a -> IO ([Char], GValue)-constructSearchContextSettings val = constructObjectPropertyObject "settings" (Just val)--clearSearchContextSettings :: (MonadIO m, SearchContextK o) => o -> m ()-clearSearchContextSettings obj = liftIO $ setObjectPropertyObject obj "settings" (Nothing :: Maybe SearchSettings)--data SearchContextSettingsPropertyInfo-instance AttrInfo SearchContextSettingsPropertyInfo where- type AttrAllowedOps SearchContextSettingsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint SearchContextSettingsPropertyInfo = SearchSettingsK- type AttrBaseTypeConstraint SearchContextSettingsPropertyInfo = SearchContextK- type AttrGetType SearchContextSettingsPropertyInfo = SearchSettings- type AttrLabel SearchContextSettingsPropertyInfo = "settings"- attrGet _ = getSearchContextSettings- attrSet _ = setSearchContextSettings- attrConstruct _ = constructSearchContextSettings- attrClear _ = clearSearchContextSettings--type instance AttributeList SearchContext = SearchContextAttributeList-type SearchContextAttributeList = ('[ '("buffer", SearchContextBufferPropertyInfo), '("highlight", SearchContextHighlightPropertyInfo), '("matchStyle", SearchContextMatchStylePropertyInfo), '("occurrencesCount", SearchContextOccurrencesCountPropertyInfo), '("regexError", SearchContextRegexErrorPropertyInfo), '("settings", SearchContextSettingsPropertyInfo)] :: [(Symbol, *)])--searchContextBuffer :: AttrLabelProxy "buffer"-searchContextBuffer = AttrLabelProxy--searchContextHighlight :: AttrLabelProxy "highlight"-searchContextHighlight = AttrLabelProxy--searchContextMatchStyle :: AttrLabelProxy "matchStyle"-searchContextMatchStyle = AttrLabelProxy--searchContextOccurrencesCount :: AttrLabelProxy "occurrencesCount"-searchContextOccurrencesCount = AttrLabelProxy--searchContextRegexError :: AttrLabelProxy "regexError"-searchContextRegexError = AttrLabelProxy--searchContextSettings :: AttrLabelProxy "settings"-searchContextSettings = AttrLabelProxy--type instance SignalList SearchContext = SearchContextSignalList-type SearchContextSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method SearchContext::new--- method type : Constructor--- Args : [Arg {argCName = "buffer", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "settings", argType = TInterface "GtkSource" "SearchSettings", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "SearchContext")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_new" gtk_source_search_context_new :: - Ptr Buffer -> -- buffer : TInterface "GtkSource" "Buffer"- Ptr SearchSettings -> -- settings : TInterface "GtkSource" "SearchSettings"- IO (Ptr SearchContext)---searchContextNew ::- (MonadIO m, BufferK a, SearchSettingsK b) =>- a -- buffer- -> Maybe (b) -- settings- -> m SearchContext -- result-searchContextNew buffer settings = liftIO $ do- let buffer' = unsafeManagedPtrCastPtr buffer- maybeSettings <- case settings of- Nothing -> return nullPtr- Just jSettings -> do- let jSettings' = unsafeManagedPtrCastPtr jSettings- return jSettings'- result <- gtk_source_search_context_new buffer' maybeSettings- checkUnexpectedReturnNULL "gtk_source_search_context_new" result- result' <- (wrapObject SearchContext) result- touchManagedPtr buffer- whenJust settings touchManagedPtr- return result'---- method SearchContext::backward--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "match_start", argType = TInterface "Gtk" "TextIter", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing},Arg {argCName = "match_end", argType = TInterface "Gtk" "TextIter", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_backward" gtk_source_search_context_backward :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- match_start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- match_end : TInterface "Gtk" "TextIter"- IO CInt---searchContextBackward ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> m (Bool,Gtk.TextIter,Gtk.TextIter) -- result-searchContextBackward _obj iter = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- matchStart <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- matchEnd <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- result <- gtk_source_search_context_backward _obj' iter' matchStart matchEnd- let result' = (/= 0) result- matchStart' <- (wrapBoxed Gtk.TextIter) matchStart- matchEnd' <- (wrapBoxed Gtk.TextIter) matchEnd- touchManagedPtr _obj- touchManagedPtr iter- return (result', matchStart', matchEnd')--data SearchContextBackwardMethodInfo-instance (signature ~ (Gtk.TextIter -> m (Bool,Gtk.TextIter,Gtk.TextIter)), MonadIO m, SearchContextK a) => MethodInfo SearchContextBackwardMethodInfo a signature where- overloadedMethod _ = searchContextBackward---- method SearchContext::backward_async--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", 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 = 4, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "user_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_backward_async" gtk_source_search_context_backward_async :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- Ptr Gio.Cancellable -> -- cancellable : TInterface "Gio" "Cancellable"- FunPtr Gio.AsyncReadyCallbackC -> -- callback : TInterface "Gio" "AsyncReadyCallback"- Ptr () -> -- user_data : TBasicType TPtr- IO ()---searchContextBackwardAsync ::- (MonadIO m, SearchContextK a, Gio.CancellableK b) =>- a -- _obj- -> Gtk.TextIter -- iter- -> Maybe (b) -- cancellable- -> Maybe (Gio.AsyncReadyCallback) -- callback- -> m () -- result-searchContextBackwardAsync _obj iter cancellable callback = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- maybeCancellable <- case cancellable of- Nothing -> return nullPtr- Just jCancellable -> do- let jCancellable' = unsafeManagedPtrCastPtr jCancellable- return jCancellable'- ptrcallback <- callocMem :: IO (Ptr (FunPtr Gio.AsyncReadyCallbackC))- maybeCallback <- case callback of- Nothing -> return (castPtrToFunPtr nullPtr)- Just jCallback -> do- jCallback' <- Gio.mkAsyncReadyCallback (Gio.asyncReadyCallbackWrapper (Just ptrcallback) jCallback)- poke ptrcallback jCallback'- return jCallback'- let userData = nullPtr- gtk_source_search_context_backward_async _obj' iter' maybeCancellable maybeCallback userData- touchManagedPtr _obj- touchManagedPtr iter- whenJust cancellable touchManagedPtr- return ()--data SearchContextBackwardAsyncMethodInfo-instance (signature ~ (Gtk.TextIter -> Maybe (b) -> Maybe (Gio.AsyncReadyCallback) -> m ()), MonadIO m, SearchContextK a, Gio.CancellableK b) => MethodInfo SearchContextBackwardAsyncMethodInfo a signature where- overloadedMethod _ = searchContextBackwardAsync---- method SearchContext::backward_finish--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", 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},Arg {argCName = "match_start", argType = TInterface "Gtk" "TextIter", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing},Arg {argCName = "match_end", argType = TInterface "Gtk" "TextIter", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : True--- Skip return : False--foreign import ccall "gtk_source_search_context_backward_finish" gtk_source_search_context_backward_finish :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- Ptr Gio.AsyncResult -> -- result : TInterface "Gio" "AsyncResult"- Ptr Gtk.TextIter -> -- match_start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- match_end : TInterface "Gtk" "TextIter"- Ptr (Ptr GError) -> -- error- IO CInt---searchContextBackwardFinish ::- (MonadIO m, SearchContextK a, Gio.AsyncResultK b) =>- a -- _obj- -> b -- result_- -> m (Gtk.TextIter,Gtk.TextIter) -- result-searchContextBackwardFinish _obj result_ = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let result_' = unsafeManagedPtrCastPtr result_- matchStart <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- matchEnd <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- onException (do- _ <- propagateGError $ gtk_source_search_context_backward_finish _obj' result_' matchStart matchEnd- matchStart' <- (wrapBoxed Gtk.TextIter) matchStart- matchEnd' <- (wrapBoxed Gtk.TextIter) matchEnd- touchManagedPtr _obj- touchManagedPtr result_- return (matchStart', matchEnd')- ) (do- freeMem matchStart- freeMem matchEnd- )--data SearchContextBackwardFinishMethodInfo-instance (signature ~ (b -> m (Gtk.TextIter,Gtk.TextIter)), MonadIO m, SearchContextK a, Gio.AsyncResultK b) => MethodInfo SearchContextBackwardFinishMethodInfo a signature where- overloadedMethod _ = searchContextBackwardFinish---- method SearchContext::forward--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "match_start", argType = TInterface "Gtk" "TextIter", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing},Arg {argCName = "match_end", argType = TInterface "Gtk" "TextIter", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_forward" gtk_source_search_context_forward :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- match_start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- match_end : TInterface "Gtk" "TextIter"- IO CInt---searchContextForward ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> m (Bool,Gtk.TextIter,Gtk.TextIter) -- result-searchContextForward _obj iter = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- matchStart <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- matchEnd <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- result <- gtk_source_search_context_forward _obj' iter' matchStart matchEnd- let result' = (/= 0) result- matchStart' <- (wrapBoxed Gtk.TextIter) matchStart- matchEnd' <- (wrapBoxed Gtk.TextIter) matchEnd- touchManagedPtr _obj- touchManagedPtr iter- return (result', matchStart', matchEnd')--data SearchContextForwardMethodInfo-instance (signature ~ (Gtk.TextIter -> m (Bool,Gtk.TextIter,Gtk.TextIter)), MonadIO m, SearchContextK a) => MethodInfo SearchContextForwardMethodInfo a signature where- overloadedMethod _ = searchContextForward---- method SearchContext::forward_async--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", 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 = 4, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "user_data", argType = TBasicType TPtr, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_forward_async" gtk_source_search_context_forward_async :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- Ptr Gio.Cancellable -> -- cancellable : TInterface "Gio" "Cancellable"- FunPtr Gio.AsyncReadyCallbackC -> -- callback : TInterface "Gio" "AsyncReadyCallback"- Ptr () -> -- user_data : TBasicType TPtr- IO ()---searchContextForwardAsync ::- (MonadIO m, SearchContextK a, Gio.CancellableK b) =>- a -- _obj- -> Gtk.TextIter -- iter- -> Maybe (b) -- cancellable- -> Maybe (Gio.AsyncReadyCallback) -- callback- -> m () -- result-searchContextForwardAsync _obj iter cancellable callback = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- maybeCancellable <- case cancellable of- Nothing -> return nullPtr- Just jCancellable -> do- let jCancellable' = unsafeManagedPtrCastPtr jCancellable- return jCancellable'- ptrcallback <- callocMem :: IO (Ptr (FunPtr Gio.AsyncReadyCallbackC))- maybeCallback <- case callback of- Nothing -> return (castPtrToFunPtr nullPtr)- Just jCallback -> do- jCallback' <- Gio.mkAsyncReadyCallback (Gio.asyncReadyCallbackWrapper (Just ptrcallback) jCallback)- poke ptrcallback jCallback'- return jCallback'- let userData = nullPtr- gtk_source_search_context_forward_async _obj' iter' maybeCancellable maybeCallback userData- touchManagedPtr _obj- touchManagedPtr iter- whenJust cancellable touchManagedPtr- return ()--data SearchContextForwardAsyncMethodInfo-instance (signature ~ (Gtk.TextIter -> Maybe (b) -> Maybe (Gio.AsyncReadyCallback) -> m ()), MonadIO m, SearchContextK a, Gio.CancellableK b) => MethodInfo SearchContextForwardAsyncMethodInfo a signature where- overloadedMethod _ = searchContextForwardAsync---- method SearchContext::forward_finish--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", 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},Arg {argCName = "match_start", argType = TInterface "Gtk" "TextIter", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing},Arg {argCName = "match_end", argType = TInterface "Gtk" "TextIter", direction = DirectionOut, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = True, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : True--- Skip return : False--foreign import ccall "gtk_source_search_context_forward_finish" gtk_source_search_context_forward_finish :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- Ptr Gio.AsyncResult -> -- result : TInterface "Gio" "AsyncResult"- Ptr Gtk.TextIter -> -- match_start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- match_end : TInterface "Gtk" "TextIter"- Ptr (Ptr GError) -> -- error- IO CInt---searchContextForwardFinish ::- (MonadIO m, SearchContextK a, Gio.AsyncResultK b) =>- a -- _obj- -> b -- result_- -> m (Gtk.TextIter,Gtk.TextIter) -- result-searchContextForwardFinish _obj result_ = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let result_' = unsafeManagedPtrCastPtr result_- matchStart <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- matchEnd <- callocBoxedBytes 80 :: IO (Ptr Gtk.TextIter)- onException (do- _ <- propagateGError $ gtk_source_search_context_forward_finish _obj' result_' matchStart matchEnd- matchStart' <- (wrapBoxed Gtk.TextIter) matchStart- matchEnd' <- (wrapBoxed Gtk.TextIter) matchEnd- touchManagedPtr _obj- touchManagedPtr result_- return (matchStart', matchEnd')- ) (do- freeMem matchStart- freeMem matchEnd- )--data SearchContextForwardFinishMethodInfo-instance (signature ~ (b -> m (Gtk.TextIter,Gtk.TextIter)), MonadIO m, SearchContextK a, Gio.AsyncResultK b) => MethodInfo SearchContextForwardFinishMethodInfo a signature where- overloadedMethod _ = searchContextForwardFinish---- method SearchContext::get_buffer--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Buffer")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_get_buffer" gtk_source_search_context_get_buffer :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- IO (Ptr Buffer)---searchContextGetBuffer ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> m Buffer -- result-searchContextGetBuffer _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_search_context_get_buffer _obj'- checkUnexpectedReturnNULL "gtk_source_search_context_get_buffer" result- result' <- (newObject Buffer) result- touchManagedPtr _obj- return result'--data SearchContextGetBufferMethodInfo-instance (signature ~ (m Buffer), MonadIO m, SearchContextK a) => MethodInfo SearchContextGetBufferMethodInfo a signature where- overloadedMethod _ = searchContextGetBuffer---- method SearchContext::get_highlight--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_get_highlight" gtk_source_search_context_get_highlight :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- IO CInt---searchContextGetHighlight ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> m Bool -- result-searchContextGetHighlight _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_search_context_get_highlight _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data SearchContextGetHighlightMethodInfo-instance (signature ~ (m Bool), MonadIO m, SearchContextK a) => MethodInfo SearchContextGetHighlightMethodInfo a signature where- overloadedMethod _ = searchContextGetHighlight---- method SearchContext::get_match_style--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Style")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_get_match_style" gtk_source_search_context_get_match_style :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- IO (Ptr Style)---searchContextGetMatchStyle ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> m Style -- result-searchContextGetMatchStyle _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_search_context_get_match_style _obj'- checkUnexpectedReturnNULL "gtk_source_search_context_get_match_style" result- result' <- (newObject Style) result- touchManagedPtr _obj- return result'--data SearchContextGetMatchStyleMethodInfo-instance (signature ~ (m Style), MonadIO m, SearchContextK a) => MethodInfo SearchContextGetMatchStyleMethodInfo a signature where- overloadedMethod _ = searchContextGetMatchStyle---- method SearchContext::get_occurrence_position--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "match_start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "match_end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_get_occurrence_position" gtk_source_search_context_get_occurrence_position :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- Ptr Gtk.TextIter -> -- match_start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- match_end : TInterface "Gtk" "TextIter"- IO Int32---searchContextGetOccurrencePosition ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> Gtk.TextIter -- matchStart- -> Gtk.TextIter -- matchEnd- -> m Int32 -- result-searchContextGetOccurrencePosition _obj matchStart matchEnd = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let matchStart' = unsafeManagedPtrGetPtr matchStart- let matchEnd' = unsafeManagedPtrGetPtr matchEnd- result <- gtk_source_search_context_get_occurrence_position _obj' matchStart' matchEnd'- touchManagedPtr _obj- touchManagedPtr matchStart- touchManagedPtr matchEnd- return result--data SearchContextGetOccurrencePositionMethodInfo-instance (signature ~ (Gtk.TextIter -> Gtk.TextIter -> m Int32), MonadIO m, SearchContextK a) => MethodInfo SearchContextGetOccurrencePositionMethodInfo a signature where- overloadedMethod _ = searchContextGetOccurrencePosition---- method SearchContext::get_occurrences_count--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_get_occurrences_count" gtk_source_search_context_get_occurrences_count :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- IO Int32---searchContextGetOccurrencesCount ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> m Int32 -- result-searchContextGetOccurrencesCount _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_search_context_get_occurrences_count _obj'- touchManagedPtr _obj- return result--data SearchContextGetOccurrencesCountMethodInfo-instance (signature ~ (m Int32), MonadIO m, SearchContextK a) => MethodInfo SearchContextGetOccurrencesCountMethodInfo a signature where- overloadedMethod _ = searchContextGetOccurrencesCount---- method SearchContext::get_regex_error--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just TError--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_get_regex_error" gtk_source_search_context_get_regex_error :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- IO (Ptr GError)---searchContextGetRegexError ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> m (Maybe GError) -- result-searchContextGetRegexError _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_search_context_get_regex_error _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (wrapBoxed GError) result'- return result''- touchManagedPtr _obj- return maybeResult--data SearchContextGetRegexErrorMethodInfo-instance (signature ~ (m (Maybe GError)), MonadIO m, SearchContextK a) => MethodInfo SearchContextGetRegexErrorMethodInfo a signature where- overloadedMethod _ = searchContextGetRegexError---- method SearchContext::get_settings--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "SearchSettings")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_get_settings" gtk_source_search_context_get_settings :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- IO (Ptr SearchSettings)---searchContextGetSettings ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> m SearchSettings -- result-searchContextGetSettings _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_search_context_get_settings _obj'- checkUnexpectedReturnNULL "gtk_source_search_context_get_settings" result- result' <- (newObject SearchSettings) result- touchManagedPtr _obj- return result'--data SearchContextGetSettingsMethodInfo-instance (signature ~ (m SearchSettings), MonadIO m, SearchContextK a) => MethodInfo SearchContextGetSettingsMethodInfo a signature where- overloadedMethod _ = searchContextGetSettings---- method SearchContext::replace--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "match_start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "match_end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "replace", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "replace_length", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : True--- Skip return : False--foreign import ccall "gtk_source_search_context_replace" gtk_source_search_context_replace :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- Ptr Gtk.TextIter -> -- match_start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- match_end : TInterface "Gtk" "TextIter"- CString -> -- replace : TBasicType TUTF8- Int32 -> -- replace_length : TBasicType TInt- Ptr (Ptr GError) -> -- error- IO CInt---searchContextReplace ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> Gtk.TextIter -- matchStart- -> Gtk.TextIter -- matchEnd- -> T.Text -- replace- -> Int32 -- replaceLength- -> m () -- result-searchContextReplace _obj matchStart matchEnd replace replaceLength = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let matchStart' = unsafeManagedPtrGetPtr matchStart- let matchEnd' = unsafeManagedPtrGetPtr matchEnd- replace' <- textToCString replace- onException (do- _ <- propagateGError $ gtk_source_search_context_replace _obj' matchStart' matchEnd' replace' replaceLength- touchManagedPtr _obj- touchManagedPtr matchStart- touchManagedPtr matchEnd- freeMem replace'- return ()- ) (do- freeMem replace'- )--data SearchContextReplaceMethodInfo-instance (signature ~ (Gtk.TextIter -> Gtk.TextIter -> T.Text -> Int32 -> m ()), MonadIO m, SearchContextK a) => MethodInfo SearchContextReplaceMethodInfo a signature where- overloadedMethod _ = searchContextReplace---- method SearchContext::replace_all--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "replace", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "replace_length", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUInt)--- throws : True--- Skip return : False--foreign import ccall "gtk_source_search_context_replace_all" gtk_source_search_context_replace_all :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- CString -> -- replace : TBasicType TUTF8- Int32 -> -- replace_length : TBasicType TInt- Ptr (Ptr GError) -> -- error- IO Word32---searchContextReplaceAll ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> T.Text -- replace- -> Int32 -- replaceLength- -> m Word32 -- result-searchContextReplaceAll _obj replace replaceLength = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- replace' <- textToCString replace- onException (do- result <- propagateGError $ gtk_source_search_context_replace_all _obj' replace' replaceLength- touchManagedPtr _obj- freeMem replace'- return result- ) (do- freeMem replace'- )--data SearchContextReplaceAllMethodInfo-instance (signature ~ (T.Text -> Int32 -> m Word32), MonadIO m, SearchContextK a) => MethodInfo SearchContextReplaceAllMethodInfo a signature where- overloadedMethod _ = searchContextReplaceAll---- method SearchContext::set_highlight--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", 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 : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_set_highlight" gtk_source_search_context_set_highlight :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- CInt -> -- highlight : TBasicType TBoolean- IO ()---searchContextSetHighlight ::- (MonadIO m, SearchContextK a) =>- a -- _obj- -> Bool -- highlight- -> m () -- result-searchContextSetHighlight _obj highlight = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let highlight' = (fromIntegral . fromEnum) highlight- gtk_source_search_context_set_highlight _obj' highlight'- touchManagedPtr _obj- return ()--data SearchContextSetHighlightMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, SearchContextK a) => MethodInfo SearchContextSetHighlightMethodInfo a signature where- overloadedMethod _ = searchContextSetHighlight---- method SearchContext::set_match_style--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "match_style", argType = TInterface "GtkSource" "Style", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_set_match_style" gtk_source_search_context_set_match_style :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- Ptr Style -> -- match_style : TInterface "GtkSource" "Style"- IO ()---searchContextSetMatchStyle ::- (MonadIO m, SearchContextK a, StyleK b) =>- a -- _obj- -> Maybe (b) -- matchStyle- -> m () -- result-searchContextSetMatchStyle _obj matchStyle = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeMatchStyle <- case matchStyle of- Nothing -> return nullPtr- Just jMatchStyle -> do- let jMatchStyle' = unsafeManagedPtrCastPtr jMatchStyle- return jMatchStyle'- gtk_source_search_context_set_match_style _obj' maybeMatchStyle- touchManagedPtr _obj- whenJust matchStyle touchManagedPtr- return ()--data SearchContextSetMatchStyleMethodInfo-instance (signature ~ (Maybe (b) -> m ()), MonadIO m, SearchContextK a, StyleK b) => MethodInfo SearchContextSetMatchStyleMethodInfo a signature where- overloadedMethod _ = searchContextSetMatchStyle---- method SearchContext::set_settings--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchContext", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "settings", argType = TInterface "GtkSource" "SearchSettings", direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_context_set_settings" gtk_source_search_context_set_settings :: - Ptr SearchContext -> -- _obj : TInterface "GtkSource" "SearchContext"- Ptr SearchSettings -> -- settings : TInterface "GtkSource" "SearchSettings"- IO ()---searchContextSetSettings ::- (MonadIO m, SearchContextK a, SearchSettingsK b) =>- a -- _obj- -> Maybe (b) -- settings- -> m () -- result-searchContextSetSettings _obj settings = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeSettings <- case settings of- Nothing -> return nullPtr- Just jSettings -> do- let jSettings' = unsafeManagedPtrCastPtr jSettings- return jSettings'- gtk_source_search_context_set_settings _obj' maybeSettings- touchManagedPtr _obj- whenJust settings touchManagedPtr- return ()--data SearchContextSetSettingsMethodInfo-instance (signature ~ (Maybe (b) -> m ()), MonadIO m, SearchContextK a, SearchSettingsK b) => MethodInfo SearchContextSetSettingsMethodInfo a signature where- overloadedMethod _ = searchContextSetSettings--
− GI/GtkSource/Objects/SearchContext.hs-boot
@@ -1,37 +0,0 @@-module GI.GtkSource.Objects.SearchContext where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype SearchContext = SearchContext (ForeignPtr SearchContext)-instance GObject SearchContext where-class GObject o => SearchContextK o-instance (GObject o, IsDescendantOf SearchContext o) => SearchContextK o-data SearchContextBufferPropertyInfo-data SearchContextHighlightPropertyInfo-data SearchContextMatchStylePropertyInfo-data SearchContextOccurrencesCountPropertyInfo-data SearchContextRegexErrorPropertyInfo-data SearchContextSettingsPropertyInfo-data SearchContextBackwardMethodInfo-data SearchContextBackwardAsyncMethodInfo-data SearchContextBackwardFinishMethodInfo-data SearchContextForwardMethodInfo-data SearchContextForwardAsyncMethodInfo-data SearchContextForwardFinishMethodInfo-data SearchContextGetBufferMethodInfo-data SearchContextGetHighlightMethodInfo-data SearchContextGetMatchStyleMethodInfo-data SearchContextGetOccurrencePositionMethodInfo-data SearchContextGetOccurrencesCountMethodInfo-data SearchContextGetRegexErrorMethodInfo-data SearchContextGetSettingsMethodInfo-data SearchContextReplaceMethodInfo-data SearchContextReplaceAllMethodInfo-data SearchContextSetHighlightMethodInfo-data SearchContextSetMatchStyleMethodInfo-data SearchContextSetSettingsMethodInfo
− GI/GtkSource/Objects/SearchSettings.hs
@@ -1,669 +0,0 @@---{- |-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.GtkSource.Objects.SearchSettings- ( ---- * Exported types- SearchSettings(..) ,- SearchSettingsK ,- toSearchSettings ,- noSearchSettings ,--- -- * Methods--- ** searchSettingsGetAtWordBoundaries- SearchSettingsGetAtWordBoundariesMethodInfo,- searchSettingsGetAtWordBoundaries ,----- ** searchSettingsGetCaseSensitive- SearchSettingsGetCaseSensitiveMethodInfo,- searchSettingsGetCaseSensitive ,----- ** searchSettingsGetRegexEnabled- SearchSettingsGetRegexEnabledMethodInfo ,- searchSettingsGetRegexEnabled ,----- ** searchSettingsGetSearchText- SearchSettingsGetSearchTextMethodInfo ,- searchSettingsGetSearchText ,----- ** searchSettingsGetWrapAround- SearchSettingsGetWrapAroundMethodInfo ,- searchSettingsGetWrapAround ,----- ** searchSettingsNew- searchSettingsNew ,----- ** searchSettingsSetAtWordBoundaries- SearchSettingsSetAtWordBoundariesMethodInfo,- searchSettingsSetAtWordBoundaries ,----- ** searchSettingsSetCaseSensitive- SearchSettingsSetCaseSensitiveMethodInfo,- searchSettingsSetCaseSensitive ,----- ** searchSettingsSetRegexEnabled- SearchSettingsSetRegexEnabledMethodInfo ,- searchSettingsSetRegexEnabled ,----- ** searchSettingsSetSearchText- SearchSettingsSetSearchTextMethodInfo ,- searchSettingsSetSearchText ,----- ** searchSettingsSetWrapAround- SearchSettingsSetWrapAroundMethodInfo ,- searchSettingsSetWrapAround ,----- -- * Properties--- ** AtWordBoundaries- SearchSettingsAtWordBoundariesPropertyInfo,- constructSearchSettingsAtWordBoundaries ,- getSearchSettingsAtWordBoundaries ,- searchSettingsAtWordBoundaries ,- setSearchSettingsAtWordBoundaries ,----- ** CaseSensitive- SearchSettingsCaseSensitivePropertyInfo ,- constructSearchSettingsCaseSensitive ,- getSearchSettingsCaseSensitive ,- searchSettingsCaseSensitive ,- setSearchSettingsCaseSensitive ,----- ** RegexEnabled- SearchSettingsRegexEnabledPropertyInfo ,- constructSearchSettingsRegexEnabled ,- getSearchSettingsRegexEnabled ,- searchSettingsRegexEnabled ,- setSearchSettingsRegexEnabled ,----- ** SearchText- SearchSettingsSearchTextPropertyInfo ,- clearSearchSettingsSearchText ,- constructSearchSettingsSearchText ,- getSearchSettingsSearchText ,- searchSettingsSearchText ,- setSearchSettingsSearchText ,----- ** WrapAround- SearchSettingsWrapAroundPropertyInfo ,- constructSearchSettingsWrapAround ,- getSearchSettingsWrapAround ,- searchSettingsWrapAround ,- setSearchSettingsWrapAround ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject--newtype SearchSettings = SearchSettings (ForeignPtr SearchSettings)-foreign import ccall "gtk_source_search_settings_get_type"- c_gtk_source_search_settings_get_type :: IO GType--type instance ParentTypes SearchSettings = SearchSettingsParentTypes-type SearchSettingsParentTypes = '[GObject.Object]--instance GObject SearchSettings where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_search_settings_get_type- --class GObject o => SearchSettingsK o-instance (GObject o, IsDescendantOf SearchSettings o) => SearchSettingsK o--toSearchSettings :: SearchSettingsK o => o -> IO SearchSettings-toSearchSettings = unsafeCastTo SearchSettings--noSearchSettings :: Maybe SearchSettings-noSearchSettings = Nothing--type family ResolveSearchSettingsMethod (t :: Symbol) (o :: *) :: * where- ResolveSearchSettingsMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveSearchSettingsMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveSearchSettingsMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveSearchSettingsMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveSearchSettingsMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveSearchSettingsMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveSearchSettingsMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveSearchSettingsMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveSearchSettingsMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveSearchSettingsMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveSearchSettingsMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveSearchSettingsMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveSearchSettingsMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveSearchSettingsMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveSearchSettingsMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveSearchSettingsMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveSearchSettingsMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveSearchSettingsMethod "getAtWordBoundaries" o = SearchSettingsGetAtWordBoundariesMethodInfo- ResolveSearchSettingsMethod "getCaseSensitive" o = SearchSettingsGetCaseSensitiveMethodInfo- ResolveSearchSettingsMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveSearchSettingsMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveSearchSettingsMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveSearchSettingsMethod "getRegexEnabled" o = SearchSettingsGetRegexEnabledMethodInfo- ResolveSearchSettingsMethod "getSearchText" o = SearchSettingsGetSearchTextMethodInfo- ResolveSearchSettingsMethod "getWrapAround" o = SearchSettingsGetWrapAroundMethodInfo- ResolveSearchSettingsMethod "setAtWordBoundaries" o = SearchSettingsSetAtWordBoundariesMethodInfo- ResolveSearchSettingsMethod "setCaseSensitive" o = SearchSettingsSetCaseSensitiveMethodInfo- ResolveSearchSettingsMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveSearchSettingsMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveSearchSettingsMethod "setRegexEnabled" o = SearchSettingsSetRegexEnabledMethodInfo- ResolveSearchSettingsMethod "setSearchText" o = SearchSettingsSetSearchTextMethodInfo- ResolveSearchSettingsMethod "setWrapAround" o = SearchSettingsSetWrapAroundMethodInfo- ResolveSearchSettingsMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveSearchSettingsMethod t SearchSettings, MethodInfo info SearchSettings p) => IsLabelProxy t (SearchSettings -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveSearchSettingsMethod t SearchSettings, MethodInfo info SearchSettings p) => IsLabel t (SearchSettings -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "at-word-boundaries"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getSearchSettingsAtWordBoundaries :: (MonadIO m, SearchSettingsK o) => o -> m Bool-getSearchSettingsAtWordBoundaries obj = liftIO $ getObjectPropertyBool obj "at-word-boundaries"--setSearchSettingsAtWordBoundaries :: (MonadIO m, SearchSettingsK o) => o -> Bool -> m ()-setSearchSettingsAtWordBoundaries obj val = liftIO $ setObjectPropertyBool obj "at-word-boundaries" val--constructSearchSettingsAtWordBoundaries :: Bool -> IO ([Char], GValue)-constructSearchSettingsAtWordBoundaries val = constructObjectPropertyBool "at-word-boundaries" val--data SearchSettingsAtWordBoundariesPropertyInfo-instance AttrInfo SearchSettingsAtWordBoundariesPropertyInfo where- type AttrAllowedOps SearchSettingsAtWordBoundariesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint SearchSettingsAtWordBoundariesPropertyInfo = (~) Bool- type AttrBaseTypeConstraint SearchSettingsAtWordBoundariesPropertyInfo = SearchSettingsK- type AttrGetType SearchSettingsAtWordBoundariesPropertyInfo = Bool- type AttrLabel SearchSettingsAtWordBoundariesPropertyInfo = "at-word-boundaries"- attrGet _ = getSearchSettingsAtWordBoundaries- attrSet _ = setSearchSettingsAtWordBoundaries- attrConstruct _ = constructSearchSettingsAtWordBoundaries- attrClear _ = undefined---- VVV Prop "case-sensitive"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getSearchSettingsCaseSensitive :: (MonadIO m, SearchSettingsK o) => o -> m Bool-getSearchSettingsCaseSensitive obj = liftIO $ getObjectPropertyBool obj "case-sensitive"--setSearchSettingsCaseSensitive :: (MonadIO m, SearchSettingsK o) => o -> Bool -> m ()-setSearchSettingsCaseSensitive obj val = liftIO $ setObjectPropertyBool obj "case-sensitive" val--constructSearchSettingsCaseSensitive :: Bool -> IO ([Char], GValue)-constructSearchSettingsCaseSensitive val = constructObjectPropertyBool "case-sensitive" val--data SearchSettingsCaseSensitivePropertyInfo-instance AttrInfo SearchSettingsCaseSensitivePropertyInfo where- type AttrAllowedOps SearchSettingsCaseSensitivePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint SearchSettingsCaseSensitivePropertyInfo = (~) Bool- type AttrBaseTypeConstraint SearchSettingsCaseSensitivePropertyInfo = SearchSettingsK- type AttrGetType SearchSettingsCaseSensitivePropertyInfo = Bool- type AttrLabel SearchSettingsCaseSensitivePropertyInfo = "case-sensitive"- attrGet _ = getSearchSettingsCaseSensitive- attrSet _ = setSearchSettingsCaseSensitive- attrConstruct _ = constructSearchSettingsCaseSensitive- attrClear _ = undefined---- VVV Prop "regex-enabled"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getSearchSettingsRegexEnabled :: (MonadIO m, SearchSettingsK o) => o -> m Bool-getSearchSettingsRegexEnabled obj = liftIO $ getObjectPropertyBool obj "regex-enabled"--setSearchSettingsRegexEnabled :: (MonadIO m, SearchSettingsK o) => o -> Bool -> m ()-setSearchSettingsRegexEnabled obj val = liftIO $ setObjectPropertyBool obj "regex-enabled" val--constructSearchSettingsRegexEnabled :: Bool -> IO ([Char], GValue)-constructSearchSettingsRegexEnabled val = constructObjectPropertyBool "regex-enabled" val--data SearchSettingsRegexEnabledPropertyInfo-instance AttrInfo SearchSettingsRegexEnabledPropertyInfo where- type AttrAllowedOps SearchSettingsRegexEnabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint SearchSettingsRegexEnabledPropertyInfo = (~) Bool- type AttrBaseTypeConstraint SearchSettingsRegexEnabledPropertyInfo = SearchSettingsK- type AttrGetType SearchSettingsRegexEnabledPropertyInfo = Bool- type AttrLabel SearchSettingsRegexEnabledPropertyInfo = "regex-enabled"- attrGet _ = getSearchSettingsRegexEnabled- attrSet _ = setSearchSettingsRegexEnabled- attrConstruct _ = constructSearchSettingsRegexEnabled- attrClear _ = undefined---- VVV Prop "search-text"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just True,Just True)--getSearchSettingsSearchText :: (MonadIO m, SearchSettingsK o) => o -> m (Maybe T.Text)-getSearchSettingsSearchText obj = liftIO $ getObjectPropertyString obj "search-text"--setSearchSettingsSearchText :: (MonadIO m, SearchSettingsK o) => o -> T.Text -> m ()-setSearchSettingsSearchText obj val = liftIO $ setObjectPropertyString obj "search-text" (Just val)--constructSearchSettingsSearchText :: T.Text -> IO ([Char], GValue)-constructSearchSettingsSearchText val = constructObjectPropertyString "search-text" (Just val)--clearSearchSettingsSearchText :: (MonadIO m, SearchSettingsK o) => o -> m ()-clearSearchSettingsSearchText obj = liftIO $ setObjectPropertyString obj "search-text" (Nothing :: Maybe T.Text)--data SearchSettingsSearchTextPropertyInfo-instance AttrInfo SearchSettingsSearchTextPropertyInfo where- type AttrAllowedOps SearchSettingsSearchTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint SearchSettingsSearchTextPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint SearchSettingsSearchTextPropertyInfo = SearchSettingsK- type AttrGetType SearchSettingsSearchTextPropertyInfo = (Maybe T.Text)- type AttrLabel SearchSettingsSearchTextPropertyInfo = "search-text"- attrGet _ = getSearchSettingsSearchText- attrSet _ = setSearchSettingsSearchText- attrConstruct _ = constructSearchSettingsSearchText- attrClear _ = clearSearchSettingsSearchText---- VVV Prop "wrap-around"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstruct]- -- Nullable: (Just False,Just False)--getSearchSettingsWrapAround :: (MonadIO m, SearchSettingsK o) => o -> m Bool-getSearchSettingsWrapAround obj = liftIO $ getObjectPropertyBool obj "wrap-around"--setSearchSettingsWrapAround :: (MonadIO m, SearchSettingsK o) => o -> Bool -> m ()-setSearchSettingsWrapAround obj val = liftIO $ setObjectPropertyBool obj "wrap-around" val--constructSearchSettingsWrapAround :: Bool -> IO ([Char], GValue)-constructSearchSettingsWrapAround val = constructObjectPropertyBool "wrap-around" val--data SearchSettingsWrapAroundPropertyInfo-instance AttrInfo SearchSettingsWrapAroundPropertyInfo where- type AttrAllowedOps SearchSettingsWrapAroundPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint SearchSettingsWrapAroundPropertyInfo = (~) Bool- type AttrBaseTypeConstraint SearchSettingsWrapAroundPropertyInfo = SearchSettingsK- type AttrGetType SearchSettingsWrapAroundPropertyInfo = Bool- type AttrLabel SearchSettingsWrapAroundPropertyInfo = "wrap-around"- attrGet _ = getSearchSettingsWrapAround- attrSet _ = setSearchSettingsWrapAround- attrConstruct _ = constructSearchSettingsWrapAround- attrClear _ = undefined--type instance AttributeList SearchSettings = SearchSettingsAttributeList-type SearchSettingsAttributeList = ('[ '("atWordBoundaries", SearchSettingsAtWordBoundariesPropertyInfo), '("caseSensitive", SearchSettingsCaseSensitivePropertyInfo), '("regexEnabled", SearchSettingsRegexEnabledPropertyInfo), '("searchText", SearchSettingsSearchTextPropertyInfo), '("wrapAround", SearchSettingsWrapAroundPropertyInfo)] :: [(Symbol, *)])--searchSettingsAtWordBoundaries :: AttrLabelProxy "atWordBoundaries"-searchSettingsAtWordBoundaries = AttrLabelProxy--searchSettingsCaseSensitive :: AttrLabelProxy "caseSensitive"-searchSettingsCaseSensitive = AttrLabelProxy--searchSettingsRegexEnabled :: AttrLabelProxy "regexEnabled"-searchSettingsRegexEnabled = AttrLabelProxy--searchSettingsSearchText :: AttrLabelProxy "searchText"-searchSettingsSearchText = AttrLabelProxy--searchSettingsWrapAround :: AttrLabelProxy "wrapAround"-searchSettingsWrapAround = AttrLabelProxy--type instance SignalList SearchSettings = SearchSettingsSignalList-type SearchSettingsSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method SearchSettings::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "SearchSettings")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_settings_new" gtk_source_search_settings_new :: - IO (Ptr SearchSettings)---searchSettingsNew ::- (MonadIO m) =>- m SearchSettings -- result-searchSettingsNew = liftIO $ do- result <- gtk_source_search_settings_new- checkUnexpectedReturnNULL "gtk_source_search_settings_new" result- result' <- (wrapObject SearchSettings) result- return result'---- method SearchSettings::get_at_word_boundaries--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_settings_get_at_word_boundaries" gtk_source_search_settings_get_at_word_boundaries :: - Ptr SearchSettings -> -- _obj : TInterface "GtkSource" "SearchSettings"- IO CInt---searchSettingsGetAtWordBoundaries ::- (MonadIO m, SearchSettingsK a) =>- a -- _obj- -> m Bool -- result-searchSettingsGetAtWordBoundaries _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_search_settings_get_at_word_boundaries _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data SearchSettingsGetAtWordBoundariesMethodInfo-instance (signature ~ (m Bool), MonadIO m, SearchSettingsK a) => MethodInfo SearchSettingsGetAtWordBoundariesMethodInfo a signature where- overloadedMethod _ = searchSettingsGetAtWordBoundaries---- method SearchSettings::get_case_sensitive--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_settings_get_case_sensitive" gtk_source_search_settings_get_case_sensitive :: - Ptr SearchSettings -> -- _obj : TInterface "GtkSource" "SearchSettings"- IO CInt---searchSettingsGetCaseSensitive ::- (MonadIO m, SearchSettingsK a) =>- a -- _obj- -> m Bool -- result-searchSettingsGetCaseSensitive _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_search_settings_get_case_sensitive _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data SearchSettingsGetCaseSensitiveMethodInfo-instance (signature ~ (m Bool), MonadIO m, SearchSettingsK a) => MethodInfo SearchSettingsGetCaseSensitiveMethodInfo a signature where- overloadedMethod _ = searchSettingsGetCaseSensitive---- method SearchSettings::get_regex_enabled--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_settings_get_regex_enabled" gtk_source_search_settings_get_regex_enabled :: - Ptr SearchSettings -> -- _obj : TInterface "GtkSource" "SearchSettings"- IO CInt---searchSettingsGetRegexEnabled ::- (MonadIO m, SearchSettingsK a) =>- a -- _obj- -> m Bool -- result-searchSettingsGetRegexEnabled _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_search_settings_get_regex_enabled _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data SearchSettingsGetRegexEnabledMethodInfo-instance (signature ~ (m Bool), MonadIO m, SearchSettingsK a) => MethodInfo SearchSettingsGetRegexEnabledMethodInfo a signature where- overloadedMethod _ = searchSettingsGetRegexEnabled---- method SearchSettings::get_search_text--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_settings_get_search_text" gtk_source_search_settings_get_search_text :: - Ptr SearchSettings -> -- _obj : TInterface "GtkSource" "SearchSettings"- IO CString---searchSettingsGetSearchText ::- (MonadIO m, SearchSettingsK a) =>- a -- _obj- -> m (Maybe T.Text) -- result-searchSettingsGetSearchText _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_search_settings_get_search_text _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- cstringToText result'- return result''- touchManagedPtr _obj- return maybeResult--data SearchSettingsGetSearchTextMethodInfo-instance (signature ~ (m (Maybe T.Text)), MonadIO m, SearchSettingsK a) => MethodInfo SearchSettingsGetSearchTextMethodInfo a signature where- overloadedMethod _ = searchSettingsGetSearchText---- method SearchSettings::get_wrap_around--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_settings_get_wrap_around" gtk_source_search_settings_get_wrap_around :: - Ptr SearchSettings -> -- _obj : TInterface "GtkSource" "SearchSettings"- IO CInt---searchSettingsGetWrapAround ::- (MonadIO m, SearchSettingsK a) =>- a -- _obj- -> m Bool -- result-searchSettingsGetWrapAround _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_search_settings_get_wrap_around _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data SearchSettingsGetWrapAroundMethodInfo-instance (signature ~ (m Bool), MonadIO m, SearchSettingsK a) => MethodInfo SearchSettingsGetWrapAroundMethodInfo a signature where- overloadedMethod _ = searchSettingsGetWrapAround---- method SearchSettings::set_at_word_boundaries--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "at_word_boundaries", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_settings_set_at_word_boundaries" gtk_source_search_settings_set_at_word_boundaries :: - Ptr SearchSettings -> -- _obj : TInterface "GtkSource" "SearchSettings"- CInt -> -- at_word_boundaries : TBasicType TBoolean- IO ()---searchSettingsSetAtWordBoundaries ::- (MonadIO m, SearchSettingsK a) =>- a -- _obj- -> Bool -- atWordBoundaries- -> m () -- result-searchSettingsSetAtWordBoundaries _obj atWordBoundaries = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let atWordBoundaries' = (fromIntegral . fromEnum) atWordBoundaries- gtk_source_search_settings_set_at_word_boundaries _obj' atWordBoundaries'- touchManagedPtr _obj- return ()--data SearchSettingsSetAtWordBoundariesMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, SearchSettingsK a) => MethodInfo SearchSettingsSetAtWordBoundariesMethodInfo a signature where- overloadedMethod _ = searchSettingsSetAtWordBoundaries---- method SearchSettings::set_case_sensitive--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchSettings", 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}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_settings_set_case_sensitive" gtk_source_search_settings_set_case_sensitive :: - Ptr SearchSettings -> -- _obj : TInterface "GtkSource" "SearchSettings"- CInt -> -- case_sensitive : TBasicType TBoolean- IO ()---searchSettingsSetCaseSensitive ::- (MonadIO m, SearchSettingsK a) =>- a -- _obj- -> Bool -- caseSensitive- -> m () -- result-searchSettingsSetCaseSensitive _obj caseSensitive = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let caseSensitive' = (fromIntegral . fromEnum) caseSensitive- gtk_source_search_settings_set_case_sensitive _obj' caseSensitive'- touchManagedPtr _obj- return ()--data SearchSettingsSetCaseSensitiveMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, SearchSettingsK a) => MethodInfo SearchSettingsSetCaseSensitiveMethodInfo a signature where- overloadedMethod _ = searchSettingsSetCaseSensitive---- method SearchSettings::set_regex_enabled--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "regex_enabled", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_settings_set_regex_enabled" gtk_source_search_settings_set_regex_enabled :: - Ptr SearchSettings -> -- _obj : TInterface "GtkSource" "SearchSettings"- CInt -> -- regex_enabled : TBasicType TBoolean- IO ()---searchSettingsSetRegexEnabled ::- (MonadIO m, SearchSettingsK a) =>- a -- _obj- -> Bool -- regexEnabled- -> m () -- result-searchSettingsSetRegexEnabled _obj regexEnabled = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let regexEnabled' = (fromIntegral . fromEnum) regexEnabled- gtk_source_search_settings_set_regex_enabled _obj' regexEnabled'- touchManagedPtr _obj- return ()--data SearchSettingsSetRegexEnabledMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, SearchSettingsK a) => MethodInfo SearchSettingsSetRegexEnabledMethodInfo a signature where- overloadedMethod _ = searchSettingsSetRegexEnabled---- method SearchSettings::set_search_text--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "search_text", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_settings_set_search_text" gtk_source_search_settings_set_search_text :: - Ptr SearchSettings -> -- _obj : TInterface "GtkSource" "SearchSettings"- CString -> -- search_text : TBasicType TUTF8- IO ()---searchSettingsSetSearchText ::- (MonadIO m, SearchSettingsK a) =>- a -- _obj- -> Maybe (T.Text) -- searchText- -> m () -- result-searchSettingsSetSearchText _obj searchText = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybeSearchText <- case searchText of- Nothing -> return nullPtr- Just jSearchText -> do- jSearchText' <- textToCString jSearchText- return jSearchText'- gtk_source_search_settings_set_search_text _obj' maybeSearchText- touchManagedPtr _obj- freeMem maybeSearchText- return ()--data SearchSettingsSetSearchTextMethodInfo-instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, SearchSettingsK a) => MethodInfo SearchSettingsSetSearchTextMethodInfo a signature where- overloadedMethod _ = searchSettingsSetSearchText---- method SearchSettings::set_wrap_around--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "SearchSettings", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "wrap_around", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_search_settings_set_wrap_around" gtk_source_search_settings_set_wrap_around :: - Ptr SearchSettings -> -- _obj : TInterface "GtkSource" "SearchSettings"- CInt -> -- wrap_around : TBasicType TBoolean- IO ()---searchSettingsSetWrapAround ::- (MonadIO m, SearchSettingsK a) =>- a -- _obj- -> Bool -- wrapAround- -> m () -- result-searchSettingsSetWrapAround _obj wrapAround = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let wrapAround' = (fromIntegral . fromEnum) wrapAround- gtk_source_search_settings_set_wrap_around _obj' wrapAround'- touchManagedPtr _obj- return ()--data SearchSettingsSetWrapAroundMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, SearchSettingsK a) => MethodInfo SearchSettingsSetWrapAroundMethodInfo a signature where- overloadedMethod _ = searchSettingsSetWrapAround--
− GI/GtkSource/Objects/SearchSettings.hs-boot
@@ -1,28 +0,0 @@-module GI.GtkSource.Objects.SearchSettings where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype SearchSettings = SearchSettings (ForeignPtr SearchSettings)-instance GObject SearchSettings where-class GObject o => SearchSettingsK o-instance (GObject o, IsDescendantOf SearchSettings o) => SearchSettingsK o-data SearchSettingsAtWordBoundariesPropertyInfo-data SearchSettingsCaseSensitivePropertyInfo-data SearchSettingsRegexEnabledPropertyInfo-data SearchSettingsSearchTextPropertyInfo-data SearchSettingsWrapAroundPropertyInfo-data SearchSettingsGetAtWordBoundariesMethodInfo-data SearchSettingsGetCaseSensitiveMethodInfo-data SearchSettingsGetRegexEnabledMethodInfo-data SearchSettingsGetSearchTextMethodInfo-data SearchSettingsGetWrapAroundMethodInfo-data SearchSettingsSetAtWordBoundariesMethodInfo-data SearchSettingsSetCaseSensitiveMethodInfo-data SearchSettingsSetRegexEnabledMethodInfo-data SearchSettingsSetSearchTextMethodInfo-data SearchSettingsSetWrapAroundMethodInfo
− GI/GtkSource/Objects/Style.hs
@@ -1,761 +0,0 @@---{- |-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.GtkSource.Objects.Style- ( ---- * Exported types- Style(..) ,- StyleK ,- toStyle ,- noStyle ,--- -- * Methods--- ** styleCopy- StyleCopyMethodInfo ,- styleCopy ,----- -- * Properties--- ** Background- StyleBackgroundPropertyInfo ,- constructStyleBackground ,- getStyleBackground ,- styleBackground ,----- ** BackgroundSet- StyleBackgroundSetPropertyInfo ,- constructStyleBackgroundSet ,- getStyleBackgroundSet ,- styleBackgroundSet ,----- ** Bold- StyleBoldPropertyInfo ,- constructStyleBold ,- getStyleBold ,- styleBold ,----- ** BoldSet- StyleBoldSetPropertyInfo ,- constructStyleBoldSet ,- getStyleBoldSet ,- styleBoldSet ,----- ** Foreground- StyleForegroundPropertyInfo ,- constructStyleForeground ,- getStyleForeground ,- styleForeground ,----- ** ForegroundSet- StyleForegroundSetPropertyInfo ,- constructStyleForegroundSet ,- getStyleForegroundSet ,- styleForegroundSet ,----- ** Italic- StyleItalicPropertyInfo ,- constructStyleItalic ,- getStyleItalic ,- styleItalic ,----- ** ItalicSet- StyleItalicSetPropertyInfo ,- constructStyleItalicSet ,- getStyleItalicSet ,- styleItalicSet ,----- ** LineBackground- StyleLineBackgroundPropertyInfo ,- constructStyleLineBackground ,- getStyleLineBackground ,- styleLineBackground ,----- ** LineBackgroundSet- StyleLineBackgroundSetPropertyInfo ,- constructStyleLineBackgroundSet ,- getStyleLineBackgroundSet ,- styleLineBackgroundSet ,----- ** PangoUnderline- StylePangoUnderlinePropertyInfo ,- constructStylePangoUnderline ,- getStylePangoUnderline ,- stylePangoUnderline ,----- ** Scale- StyleScalePropertyInfo ,- constructStyleScale ,- getStyleScale ,- styleScale ,----- ** ScaleSet- StyleScaleSetPropertyInfo ,- constructStyleScaleSet ,- getStyleScaleSet ,- styleScaleSet ,----- ** Strikethrough- StyleStrikethroughPropertyInfo ,- constructStyleStrikethrough ,- getStyleStrikethrough ,- styleStrikethrough ,----- ** StrikethroughSet- StyleStrikethroughSetPropertyInfo ,- constructStyleStrikethroughSet ,- getStyleStrikethroughSet ,- styleStrikethroughSet ,----- ** Underline- StyleUnderlinePropertyInfo ,- constructStyleUnderline ,- getStyleUnderline ,- styleUnderline ,----- ** UnderlineColor- StyleUnderlineColorPropertyInfo ,- constructStyleUnderlineColor ,- getStyleUnderlineColor ,- styleUnderlineColor ,----- ** UnderlineColorSet- StyleUnderlineColorSetPropertyInfo ,- constructStyleUnderlineColorSet ,- getStyleUnderlineColorSet ,- styleUnderlineColorSet ,----- ** UnderlineSet- StyleUnderlineSetPropertyInfo ,- constructStyleUnderlineSet ,- getStyleUnderlineSet ,- styleUnderlineSet ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject-import qualified GI.Pango as Pango--newtype Style = Style (ForeignPtr Style)-foreign import ccall "gtk_source_style_get_type"- c_gtk_source_style_get_type :: IO GType--type instance ParentTypes Style = StyleParentTypes-type StyleParentTypes = '[GObject.Object]--instance GObject Style where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_style_get_type- --class GObject o => StyleK o-instance (GObject o, IsDescendantOf Style o) => StyleK o--toStyle :: StyleK o => o -> IO Style-toStyle = unsafeCastTo Style--noStyle :: Maybe Style-noStyle = Nothing--type family ResolveStyleMethod (t :: Symbol) (o :: *) :: * where- ResolveStyleMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveStyleMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveStyleMethod "copy" o = StyleCopyMethodInfo- ResolveStyleMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveStyleMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveStyleMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveStyleMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveStyleMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveStyleMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveStyleMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveStyleMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveStyleMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveStyleMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveStyleMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveStyleMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveStyleMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveStyleMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveStyleMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveStyleMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveStyleMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveStyleMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveStyleMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveStyleMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveStyleMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveStyleMethod t Style, MethodInfo info Style p) => IsLabelProxy t (Style -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveStyleMethod t Style, MethodInfo info Style p) => IsLabel t (Style -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "background"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleBackground :: (MonadIO m, StyleK o) => o -> m (Maybe T.Text)-getStyleBackground obj = liftIO $ getObjectPropertyString obj "background"--constructStyleBackground :: T.Text -> IO ([Char], GValue)-constructStyleBackground val = constructObjectPropertyString "background" (Just val)--data StyleBackgroundPropertyInfo-instance AttrInfo StyleBackgroundPropertyInfo where- type AttrAllowedOps StyleBackgroundPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint StyleBackgroundPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint StyleBackgroundPropertyInfo = StyleK- type AttrGetType StyleBackgroundPropertyInfo = (Maybe T.Text)- type AttrLabel StyleBackgroundPropertyInfo = "background"- attrGet _ = getStyleBackground- attrSet _ = undefined- attrConstruct _ = constructStyleBackground- attrClear _ = undefined---- VVV Prop "background-set"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleBackgroundSet :: (MonadIO m, StyleK o) => o -> m Bool-getStyleBackgroundSet obj = liftIO $ getObjectPropertyBool obj "background-set"--constructStyleBackgroundSet :: Bool -> IO ([Char], GValue)-constructStyleBackgroundSet val = constructObjectPropertyBool "background-set" val--data StyleBackgroundSetPropertyInfo-instance AttrInfo StyleBackgroundSetPropertyInfo where- type AttrAllowedOps StyleBackgroundSetPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleBackgroundSetPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleBackgroundSetPropertyInfo = StyleK- type AttrGetType StyleBackgroundSetPropertyInfo = Bool- type AttrLabel StyleBackgroundSetPropertyInfo = "background-set"- attrGet _ = getStyleBackgroundSet- attrSet _ = undefined- attrConstruct _ = constructStyleBackgroundSet- attrClear _ = undefined---- VVV Prop "bold"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleBold :: (MonadIO m, StyleK o) => o -> m Bool-getStyleBold obj = liftIO $ getObjectPropertyBool obj "bold"--constructStyleBold :: Bool -> IO ([Char], GValue)-constructStyleBold val = constructObjectPropertyBool "bold" val--data StyleBoldPropertyInfo-instance AttrInfo StyleBoldPropertyInfo where- type AttrAllowedOps StyleBoldPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleBoldPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleBoldPropertyInfo = StyleK- type AttrGetType StyleBoldPropertyInfo = Bool- type AttrLabel StyleBoldPropertyInfo = "bold"- attrGet _ = getStyleBold- attrSet _ = undefined- attrConstruct _ = constructStyleBold- attrClear _ = undefined---- VVV Prop "bold-set"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleBoldSet :: (MonadIO m, StyleK o) => o -> m Bool-getStyleBoldSet obj = liftIO $ getObjectPropertyBool obj "bold-set"--constructStyleBoldSet :: Bool -> IO ([Char], GValue)-constructStyleBoldSet val = constructObjectPropertyBool "bold-set" val--data StyleBoldSetPropertyInfo-instance AttrInfo StyleBoldSetPropertyInfo where- type AttrAllowedOps StyleBoldSetPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleBoldSetPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleBoldSetPropertyInfo = StyleK- type AttrGetType StyleBoldSetPropertyInfo = Bool- type AttrLabel StyleBoldSetPropertyInfo = "bold-set"- attrGet _ = getStyleBoldSet- attrSet _ = undefined- attrConstruct _ = constructStyleBoldSet- attrClear _ = undefined---- VVV Prop "foreground"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleForeground :: (MonadIO m, StyleK o) => o -> m (Maybe T.Text)-getStyleForeground obj = liftIO $ getObjectPropertyString obj "foreground"--constructStyleForeground :: T.Text -> IO ([Char], GValue)-constructStyleForeground val = constructObjectPropertyString "foreground" (Just val)--data StyleForegroundPropertyInfo-instance AttrInfo StyleForegroundPropertyInfo where- type AttrAllowedOps StyleForegroundPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint StyleForegroundPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint StyleForegroundPropertyInfo = StyleK- type AttrGetType StyleForegroundPropertyInfo = (Maybe T.Text)- type AttrLabel StyleForegroundPropertyInfo = "foreground"- attrGet _ = getStyleForeground- attrSet _ = undefined- attrConstruct _ = constructStyleForeground- attrClear _ = undefined---- VVV Prop "foreground-set"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleForegroundSet :: (MonadIO m, StyleK o) => o -> m Bool-getStyleForegroundSet obj = liftIO $ getObjectPropertyBool obj "foreground-set"--constructStyleForegroundSet :: Bool -> IO ([Char], GValue)-constructStyleForegroundSet val = constructObjectPropertyBool "foreground-set" val--data StyleForegroundSetPropertyInfo-instance AttrInfo StyleForegroundSetPropertyInfo where- type AttrAllowedOps StyleForegroundSetPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleForegroundSetPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleForegroundSetPropertyInfo = StyleK- type AttrGetType StyleForegroundSetPropertyInfo = Bool- type AttrLabel StyleForegroundSetPropertyInfo = "foreground-set"- attrGet _ = getStyleForegroundSet- attrSet _ = undefined- attrConstruct _ = constructStyleForegroundSet- attrClear _ = undefined---- VVV Prop "italic"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleItalic :: (MonadIO m, StyleK o) => o -> m Bool-getStyleItalic obj = liftIO $ getObjectPropertyBool obj "italic"--constructStyleItalic :: Bool -> IO ([Char], GValue)-constructStyleItalic val = constructObjectPropertyBool "italic" val--data StyleItalicPropertyInfo-instance AttrInfo StyleItalicPropertyInfo where- type AttrAllowedOps StyleItalicPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleItalicPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleItalicPropertyInfo = StyleK- type AttrGetType StyleItalicPropertyInfo = Bool- type AttrLabel StyleItalicPropertyInfo = "italic"- attrGet _ = getStyleItalic- attrSet _ = undefined- attrConstruct _ = constructStyleItalic- attrClear _ = undefined---- VVV Prop "italic-set"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleItalicSet :: (MonadIO m, StyleK o) => o -> m Bool-getStyleItalicSet obj = liftIO $ getObjectPropertyBool obj "italic-set"--constructStyleItalicSet :: Bool -> IO ([Char], GValue)-constructStyleItalicSet val = constructObjectPropertyBool "italic-set" val--data StyleItalicSetPropertyInfo-instance AttrInfo StyleItalicSetPropertyInfo where- type AttrAllowedOps StyleItalicSetPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleItalicSetPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleItalicSetPropertyInfo = StyleK- type AttrGetType StyleItalicSetPropertyInfo = Bool- type AttrLabel StyleItalicSetPropertyInfo = "italic-set"- attrGet _ = getStyleItalicSet- attrSet _ = undefined- attrConstruct _ = constructStyleItalicSet- attrClear _ = undefined---- VVV Prop "line-background"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleLineBackground :: (MonadIO m, StyleK o) => o -> m (Maybe T.Text)-getStyleLineBackground obj = liftIO $ getObjectPropertyString obj "line-background"--constructStyleLineBackground :: T.Text -> IO ([Char], GValue)-constructStyleLineBackground val = constructObjectPropertyString "line-background" (Just val)--data StyleLineBackgroundPropertyInfo-instance AttrInfo StyleLineBackgroundPropertyInfo where- type AttrAllowedOps StyleLineBackgroundPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint StyleLineBackgroundPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint StyleLineBackgroundPropertyInfo = StyleK- type AttrGetType StyleLineBackgroundPropertyInfo = (Maybe T.Text)- type AttrLabel StyleLineBackgroundPropertyInfo = "line-background"- attrGet _ = getStyleLineBackground- attrSet _ = undefined- attrConstruct _ = constructStyleLineBackground- attrClear _ = undefined---- VVV Prop "line-background-set"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleLineBackgroundSet :: (MonadIO m, StyleK o) => o -> m Bool-getStyleLineBackgroundSet obj = liftIO $ getObjectPropertyBool obj "line-background-set"--constructStyleLineBackgroundSet :: Bool -> IO ([Char], GValue)-constructStyleLineBackgroundSet val = constructObjectPropertyBool "line-background-set" val--data StyleLineBackgroundSetPropertyInfo-instance AttrInfo StyleLineBackgroundSetPropertyInfo where- type AttrAllowedOps StyleLineBackgroundSetPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleLineBackgroundSetPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleLineBackgroundSetPropertyInfo = StyleK- type AttrGetType StyleLineBackgroundSetPropertyInfo = Bool- type AttrLabel StyleLineBackgroundSetPropertyInfo = "line-background-set"- attrGet _ = getStyleLineBackgroundSet- attrSet _ = undefined- attrConstruct _ = constructStyleLineBackgroundSet- attrClear _ = undefined---- VVV Prop "pango-underline"- -- Type: TInterface "Pango" "Underline"- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStylePangoUnderline :: (MonadIO m, StyleK o) => o -> m Pango.Underline-getStylePangoUnderline obj = liftIO $ getObjectPropertyEnum obj "pango-underline"--constructStylePangoUnderline :: Pango.Underline -> IO ([Char], GValue)-constructStylePangoUnderline val = constructObjectPropertyEnum "pango-underline" val--data StylePangoUnderlinePropertyInfo-instance AttrInfo StylePangoUnderlinePropertyInfo where- type AttrAllowedOps StylePangoUnderlinePropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StylePangoUnderlinePropertyInfo = (~) Pango.Underline- type AttrBaseTypeConstraint StylePangoUnderlinePropertyInfo = StyleK- type AttrGetType StylePangoUnderlinePropertyInfo = Pango.Underline- type AttrLabel StylePangoUnderlinePropertyInfo = "pango-underline"- attrGet _ = getStylePangoUnderline- attrSet _ = undefined- attrConstruct _ = constructStylePangoUnderline- attrClear _ = undefined---- VVV Prop "scale"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleScale :: (MonadIO m, StyleK o) => o -> m (Maybe T.Text)-getStyleScale obj = liftIO $ getObjectPropertyString obj "scale"--constructStyleScale :: T.Text -> IO ([Char], GValue)-constructStyleScale val = constructObjectPropertyString "scale" (Just val)--data StyleScalePropertyInfo-instance AttrInfo StyleScalePropertyInfo where- type AttrAllowedOps StyleScalePropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint StyleScalePropertyInfo = (~) T.Text- type AttrBaseTypeConstraint StyleScalePropertyInfo = StyleK- type AttrGetType StyleScalePropertyInfo = (Maybe T.Text)- type AttrLabel StyleScalePropertyInfo = "scale"- attrGet _ = getStyleScale- attrSet _ = undefined- attrConstruct _ = constructStyleScale- attrClear _ = undefined---- VVV Prop "scale-set"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleScaleSet :: (MonadIO m, StyleK o) => o -> m Bool-getStyleScaleSet obj = liftIO $ getObjectPropertyBool obj "scale-set"--constructStyleScaleSet :: Bool -> IO ([Char], GValue)-constructStyleScaleSet val = constructObjectPropertyBool "scale-set" val--data StyleScaleSetPropertyInfo-instance AttrInfo StyleScaleSetPropertyInfo where- type AttrAllowedOps StyleScaleSetPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleScaleSetPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleScaleSetPropertyInfo = StyleK- type AttrGetType StyleScaleSetPropertyInfo = Bool- type AttrLabel StyleScaleSetPropertyInfo = "scale-set"- attrGet _ = getStyleScaleSet- attrSet _ = undefined- attrConstruct _ = constructStyleScaleSet- attrClear _ = undefined---- VVV Prop "strikethrough"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleStrikethrough :: (MonadIO m, StyleK o) => o -> m Bool-getStyleStrikethrough obj = liftIO $ getObjectPropertyBool obj "strikethrough"--constructStyleStrikethrough :: Bool -> IO ([Char], GValue)-constructStyleStrikethrough val = constructObjectPropertyBool "strikethrough" val--data StyleStrikethroughPropertyInfo-instance AttrInfo StyleStrikethroughPropertyInfo where- type AttrAllowedOps StyleStrikethroughPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleStrikethroughPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleStrikethroughPropertyInfo = StyleK- type AttrGetType StyleStrikethroughPropertyInfo = Bool- type AttrLabel StyleStrikethroughPropertyInfo = "strikethrough"- attrGet _ = getStyleStrikethrough- attrSet _ = undefined- attrConstruct _ = constructStyleStrikethrough- attrClear _ = undefined---- VVV Prop "strikethrough-set"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleStrikethroughSet :: (MonadIO m, StyleK o) => o -> m Bool-getStyleStrikethroughSet obj = liftIO $ getObjectPropertyBool obj "strikethrough-set"--constructStyleStrikethroughSet :: Bool -> IO ([Char], GValue)-constructStyleStrikethroughSet val = constructObjectPropertyBool "strikethrough-set" val--data StyleStrikethroughSetPropertyInfo-instance AttrInfo StyleStrikethroughSetPropertyInfo where- type AttrAllowedOps StyleStrikethroughSetPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleStrikethroughSetPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleStrikethroughSetPropertyInfo = StyleK- type AttrGetType StyleStrikethroughSetPropertyInfo = Bool- type AttrLabel StyleStrikethroughSetPropertyInfo = "strikethrough-set"- attrGet _ = getStyleStrikethroughSet- attrSet _ = undefined- attrConstruct _ = constructStyleStrikethroughSet- attrClear _ = undefined---- VVV Prop "underline"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleUnderline :: (MonadIO m, StyleK o) => o -> m Bool-getStyleUnderline obj = liftIO $ getObjectPropertyBool obj "underline"--constructStyleUnderline :: Bool -> IO ([Char], GValue)-constructStyleUnderline val = constructObjectPropertyBool "underline" val--data StyleUnderlinePropertyInfo-instance AttrInfo StyleUnderlinePropertyInfo where- type AttrAllowedOps StyleUnderlinePropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleUnderlinePropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleUnderlinePropertyInfo = StyleK- type AttrGetType StyleUnderlinePropertyInfo = Bool- type AttrLabel StyleUnderlinePropertyInfo = "underline"- attrGet _ = getStyleUnderline- attrSet _ = undefined- attrConstruct _ = constructStyleUnderline- attrClear _ = undefined---- VVV Prop "underline-color"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleUnderlineColor :: (MonadIO m, StyleK o) => o -> m (Maybe T.Text)-getStyleUnderlineColor obj = liftIO $ getObjectPropertyString obj "underline-color"--constructStyleUnderlineColor :: T.Text -> IO ([Char], GValue)-constructStyleUnderlineColor val = constructObjectPropertyString "underline-color" (Just val)--data StyleUnderlineColorPropertyInfo-instance AttrInfo StyleUnderlineColorPropertyInfo where- type AttrAllowedOps StyleUnderlineColorPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint StyleUnderlineColorPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint StyleUnderlineColorPropertyInfo = StyleK- type AttrGetType StyleUnderlineColorPropertyInfo = (Maybe T.Text)- type AttrLabel StyleUnderlineColorPropertyInfo = "underline-color"- attrGet _ = getStyleUnderlineColor- attrSet _ = undefined- attrConstruct _ = constructStyleUnderlineColor- attrClear _ = undefined---- VVV Prop "underline-color-set"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleUnderlineColorSet :: (MonadIO m, StyleK o) => o -> m Bool-getStyleUnderlineColorSet obj = liftIO $ getObjectPropertyBool obj "underline-color-set"--constructStyleUnderlineColorSet :: Bool -> IO ([Char], GValue)-constructStyleUnderlineColorSet val = constructObjectPropertyBool "underline-color-set" val--data StyleUnderlineColorSetPropertyInfo-instance AttrInfo StyleUnderlineColorSetPropertyInfo where- type AttrAllowedOps StyleUnderlineColorSetPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleUnderlineColorSetPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleUnderlineColorSetPropertyInfo = StyleK- type AttrGetType StyleUnderlineColorSetPropertyInfo = Bool- type AttrLabel StyleUnderlineColorSetPropertyInfo = "underline-color-set"- attrGet _ = getStyleUnderlineColorSet- attrSet _ = undefined- attrConstruct _ = constructStyleUnderlineColorSet- attrClear _ = undefined---- VVV Prop "underline-set"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Nothing,Nothing)--getStyleUnderlineSet :: (MonadIO m, StyleK o) => o -> m Bool-getStyleUnderlineSet obj = liftIO $ getObjectPropertyBool obj "underline-set"--constructStyleUnderlineSet :: Bool -> IO ([Char], GValue)-constructStyleUnderlineSet val = constructObjectPropertyBool "underline-set" val--data StyleUnderlineSetPropertyInfo-instance AttrInfo StyleUnderlineSetPropertyInfo where- type AttrAllowedOps StyleUnderlineSetPropertyInfo = '[ 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint StyleUnderlineSetPropertyInfo = (~) Bool- type AttrBaseTypeConstraint StyleUnderlineSetPropertyInfo = StyleK- type AttrGetType StyleUnderlineSetPropertyInfo = Bool- type AttrLabel StyleUnderlineSetPropertyInfo = "underline-set"- attrGet _ = getStyleUnderlineSet- attrSet _ = undefined- attrConstruct _ = constructStyleUnderlineSet- attrClear _ = undefined--type instance AttributeList Style = StyleAttributeList-type StyleAttributeList = ('[ '("background", StyleBackgroundPropertyInfo), '("backgroundSet", StyleBackgroundSetPropertyInfo), '("bold", StyleBoldPropertyInfo), '("boldSet", StyleBoldSetPropertyInfo), '("foreground", StyleForegroundPropertyInfo), '("foregroundSet", StyleForegroundSetPropertyInfo), '("italic", StyleItalicPropertyInfo), '("italicSet", StyleItalicSetPropertyInfo), '("lineBackground", StyleLineBackgroundPropertyInfo), '("lineBackgroundSet", StyleLineBackgroundSetPropertyInfo), '("pangoUnderline", StylePangoUnderlinePropertyInfo), '("scale", StyleScalePropertyInfo), '("scaleSet", StyleScaleSetPropertyInfo), '("strikethrough", StyleStrikethroughPropertyInfo), '("strikethroughSet", StyleStrikethroughSetPropertyInfo), '("underline", StyleUnderlinePropertyInfo), '("underlineColor", StyleUnderlineColorPropertyInfo), '("underlineColorSet", StyleUnderlineColorSetPropertyInfo), '("underlineSet", StyleUnderlineSetPropertyInfo)] :: [(Symbol, *)])--styleBackground :: AttrLabelProxy "background"-styleBackground = AttrLabelProxy--styleBackgroundSet :: AttrLabelProxy "backgroundSet"-styleBackgroundSet = AttrLabelProxy--styleBold :: AttrLabelProxy "bold"-styleBold = AttrLabelProxy--styleBoldSet :: AttrLabelProxy "boldSet"-styleBoldSet = AttrLabelProxy--styleForeground :: AttrLabelProxy "foreground"-styleForeground = AttrLabelProxy--styleForegroundSet :: AttrLabelProxy "foregroundSet"-styleForegroundSet = AttrLabelProxy--styleItalic :: AttrLabelProxy "italic"-styleItalic = AttrLabelProxy--styleItalicSet :: AttrLabelProxy "italicSet"-styleItalicSet = AttrLabelProxy--styleLineBackground :: AttrLabelProxy "lineBackground"-styleLineBackground = AttrLabelProxy--styleLineBackgroundSet :: AttrLabelProxy "lineBackgroundSet"-styleLineBackgroundSet = AttrLabelProxy--stylePangoUnderline :: AttrLabelProxy "pangoUnderline"-stylePangoUnderline = AttrLabelProxy--styleScale :: AttrLabelProxy "scale"-styleScale = AttrLabelProxy--styleScaleSet :: AttrLabelProxy "scaleSet"-styleScaleSet = AttrLabelProxy--styleStrikethrough :: AttrLabelProxy "strikethrough"-styleStrikethrough = AttrLabelProxy--styleStrikethroughSet :: AttrLabelProxy "strikethroughSet"-styleStrikethroughSet = AttrLabelProxy--styleUnderline :: AttrLabelProxy "underline"-styleUnderline = AttrLabelProxy--styleUnderlineColor :: AttrLabelProxy "underlineColor"-styleUnderlineColor = AttrLabelProxy--styleUnderlineColorSet :: AttrLabelProxy "underlineColorSet"-styleUnderlineColorSet = AttrLabelProxy--styleUnderlineSet :: AttrLabelProxy "underlineSet"-styleUnderlineSet = AttrLabelProxy--type instance SignalList Style = StyleSignalList-type StyleSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method Style::copy--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Style", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Style")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_copy" gtk_source_style_copy :: - Ptr Style -> -- _obj : TInterface "GtkSource" "Style"- IO (Ptr Style)---styleCopy ::- (MonadIO m, StyleK a) =>- a -- _obj- -> m Style -- result-styleCopy _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_style_copy _obj'- checkUnexpectedReturnNULL "gtk_source_style_copy" result- result' <- (wrapObject Style) result- touchManagedPtr _obj- return result'--data StyleCopyMethodInfo-instance (signature ~ (m Style), MonadIO m, StyleK a) => MethodInfo StyleCopyMethodInfo a signature where- overloadedMethod _ = styleCopy--
− GI/GtkSource/Objects/Style.hs-boot
@@ -1,33 +0,0 @@-module GI.GtkSource.Objects.Style where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype Style = Style (ForeignPtr Style)-instance GObject Style where-class GObject o => StyleK o-instance (GObject o, IsDescendantOf Style o) => StyleK o-data StyleBackgroundPropertyInfo-data StyleBackgroundSetPropertyInfo-data StyleBoldPropertyInfo-data StyleBoldSetPropertyInfo-data StyleForegroundPropertyInfo-data StyleForegroundSetPropertyInfo-data StyleItalicPropertyInfo-data StyleItalicSetPropertyInfo-data StyleLineBackgroundPropertyInfo-data StyleLineBackgroundSetPropertyInfo-data StylePangoUnderlinePropertyInfo-data StyleScalePropertyInfo-data StyleScaleSetPropertyInfo-data StyleStrikethroughPropertyInfo-data StyleStrikethroughSetPropertyInfo-data StyleUnderlinePropertyInfo-data StyleUnderlineColorPropertyInfo-data StyleUnderlineColorSetPropertyInfo-data StyleUnderlineSetPropertyInfo-data StyleCopyMethodInfo
− GI/GtkSource/Objects/StyleScheme.hs
@@ -1,436 +0,0 @@---{- |-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.GtkSource.Objects.StyleScheme- ( ---- * Exported types- StyleScheme(..) ,- StyleSchemeK ,- toStyleScheme ,- noStyleScheme ,--- -- * Methods--- ** styleSchemeGetAuthors- StyleSchemeGetAuthorsMethodInfo ,- styleSchemeGetAuthors ,----- ** styleSchemeGetDescription- StyleSchemeGetDescriptionMethodInfo ,- styleSchemeGetDescription ,----- ** styleSchemeGetFilename- StyleSchemeGetFilenameMethodInfo ,- styleSchemeGetFilename ,----- ** styleSchemeGetId- StyleSchemeGetIdMethodInfo ,- styleSchemeGetId ,----- ** styleSchemeGetName- StyleSchemeGetNameMethodInfo ,- styleSchemeGetName ,----- ** styleSchemeGetStyle- StyleSchemeGetStyleMethodInfo ,- styleSchemeGetStyle ,----- -- * Properties--- ** Description- StyleSchemeDescriptionPropertyInfo ,- getStyleSchemeDescription ,- styleSchemeDescription ,----- ** Filename- StyleSchemeFilenamePropertyInfo ,- getStyleSchemeFilename ,- styleSchemeFilename ,----- ** Id- StyleSchemeIdPropertyInfo ,- constructStyleSchemeId ,- getStyleSchemeId ,- styleSchemeId ,----- ** Name- StyleSchemeNamePropertyInfo ,- getStyleSchemeName ,- styleSchemeName ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject--newtype StyleScheme = StyleScheme (ForeignPtr StyleScheme)-foreign import ccall "gtk_source_style_scheme_get_type"- c_gtk_source_style_scheme_get_type :: IO GType--type instance ParentTypes StyleScheme = StyleSchemeParentTypes-type StyleSchemeParentTypes = '[GObject.Object]--instance GObject StyleScheme where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_style_scheme_get_type- --class GObject o => StyleSchemeK o-instance (GObject o, IsDescendantOf StyleScheme o) => StyleSchemeK o--toStyleScheme :: StyleSchemeK o => o -> IO StyleScheme-toStyleScheme = unsafeCastTo StyleScheme--noStyleScheme :: Maybe StyleScheme-noStyleScheme = Nothing--type family ResolveStyleSchemeMethod (t :: Symbol) (o :: *) :: * where- ResolveStyleSchemeMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveStyleSchemeMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveStyleSchemeMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveStyleSchemeMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveStyleSchemeMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveStyleSchemeMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveStyleSchemeMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveStyleSchemeMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveStyleSchemeMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveStyleSchemeMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveStyleSchemeMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveStyleSchemeMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveStyleSchemeMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveStyleSchemeMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveStyleSchemeMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveStyleSchemeMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveStyleSchemeMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveStyleSchemeMethod "getAuthors" o = StyleSchemeGetAuthorsMethodInfo- ResolveStyleSchemeMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveStyleSchemeMethod "getDescription" o = StyleSchemeGetDescriptionMethodInfo- ResolveStyleSchemeMethod "getFilename" o = StyleSchemeGetFilenameMethodInfo- ResolveStyleSchemeMethod "getId" o = StyleSchemeGetIdMethodInfo- ResolveStyleSchemeMethod "getName" o = StyleSchemeGetNameMethodInfo- ResolveStyleSchemeMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveStyleSchemeMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveStyleSchemeMethod "getStyle" o = StyleSchemeGetStyleMethodInfo- ResolveStyleSchemeMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveStyleSchemeMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveStyleSchemeMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveStyleSchemeMethod t StyleScheme, MethodInfo info StyleScheme p) => IsLabelProxy t (StyleScheme -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveStyleSchemeMethod t StyleScheme, MethodInfo info StyleScheme p) => IsLabel t (StyleScheme -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "description"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable]- -- Nullable: (Just True,Nothing)--getStyleSchemeDescription :: (MonadIO m, StyleSchemeK o) => o -> m (Maybe T.Text)-getStyleSchemeDescription obj = liftIO $ getObjectPropertyString obj "description"--data StyleSchemeDescriptionPropertyInfo-instance AttrInfo StyleSchemeDescriptionPropertyInfo where- type AttrAllowedOps StyleSchemeDescriptionPropertyInfo = '[ 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint StyleSchemeDescriptionPropertyInfo = (~) ()- type AttrBaseTypeConstraint StyleSchemeDescriptionPropertyInfo = StyleSchemeK- type AttrGetType StyleSchemeDescriptionPropertyInfo = (Maybe T.Text)- type AttrLabel StyleSchemeDescriptionPropertyInfo = "description"- attrGet _ = getStyleSchemeDescription- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "filename"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable]- -- Nullable: (Just True,Nothing)--getStyleSchemeFilename :: (MonadIO m, StyleSchemeK o) => o -> m (Maybe T.Text)-getStyleSchemeFilename obj = liftIO $ getObjectPropertyString obj "filename"--data StyleSchemeFilenamePropertyInfo-instance AttrInfo StyleSchemeFilenamePropertyInfo where- type AttrAllowedOps StyleSchemeFilenamePropertyInfo = '[ 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint StyleSchemeFilenamePropertyInfo = (~) ()- type AttrBaseTypeConstraint StyleSchemeFilenamePropertyInfo = StyleSchemeK- type AttrGetType StyleSchemeFilenamePropertyInfo = (Maybe T.Text)- type AttrLabel StyleSchemeFilenamePropertyInfo = "filename"- attrGet _ = getStyleSchemeFilename- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "id"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable,PropertyWritable,PropertyConstructOnly]- -- Nullable: (Just False,Nothing)--getStyleSchemeId :: (MonadIO m, StyleSchemeK o) => o -> m T.Text-getStyleSchemeId obj = liftIO $ checkUnexpectedNothing "getStyleSchemeId" $ getObjectPropertyString obj "id"--constructStyleSchemeId :: T.Text -> IO ([Char], GValue)-constructStyleSchemeId val = constructObjectPropertyString "id" (Just val)--data StyleSchemeIdPropertyInfo-instance AttrInfo StyleSchemeIdPropertyInfo where- type AttrAllowedOps StyleSchemeIdPropertyInfo = '[ 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint StyleSchemeIdPropertyInfo = (~) T.Text- type AttrBaseTypeConstraint StyleSchemeIdPropertyInfo = StyleSchemeK- type AttrGetType StyleSchemeIdPropertyInfo = T.Text- type AttrLabel StyleSchemeIdPropertyInfo = "id"- attrGet _ = getStyleSchemeId- attrSet _ = undefined- attrConstruct _ = constructStyleSchemeId- attrClear _ = undefined---- VVV Prop "name"- -- Type: TBasicType TUTF8- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getStyleSchemeName :: (MonadIO m, StyleSchemeK o) => o -> m T.Text-getStyleSchemeName obj = liftIO $ checkUnexpectedNothing "getStyleSchemeName" $ getObjectPropertyString obj "name"--data StyleSchemeNamePropertyInfo-instance AttrInfo StyleSchemeNamePropertyInfo where- type AttrAllowedOps StyleSchemeNamePropertyInfo = '[ 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint StyleSchemeNamePropertyInfo = (~) ()- type AttrBaseTypeConstraint StyleSchemeNamePropertyInfo = StyleSchemeK- type AttrGetType StyleSchemeNamePropertyInfo = T.Text- type AttrLabel StyleSchemeNamePropertyInfo = "name"- attrGet _ = getStyleSchemeName- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined--type instance AttributeList StyleScheme = StyleSchemeAttributeList-type StyleSchemeAttributeList = ('[ '("description", StyleSchemeDescriptionPropertyInfo), '("filename", StyleSchemeFilenamePropertyInfo), '("id", StyleSchemeIdPropertyInfo), '("name", StyleSchemeNamePropertyInfo)] :: [(Symbol, *)])--styleSchemeDescription :: AttrLabelProxy "description"-styleSchemeDescription = AttrLabelProxy--styleSchemeFilename :: AttrLabelProxy "filename"-styleSchemeFilename = AttrLabelProxy--styleSchemeId :: AttrLabelProxy "id"-styleSchemeId = AttrLabelProxy--styleSchemeName :: AttrLabelProxy "name"-styleSchemeName = AttrLabelProxy--type instance SignalList StyleScheme = StyleSchemeSignalList-type StyleSchemeSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method StyleScheme::get_authors--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleScheme", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TCArray True (-1) (-1) (TBasicType TUTF8))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_get_authors" gtk_source_style_scheme_get_authors :: - Ptr StyleScheme -> -- _obj : TInterface "GtkSource" "StyleScheme"- IO (Ptr CString)---styleSchemeGetAuthors ::- (MonadIO m, StyleSchemeK a) =>- a -- _obj- -> m (Maybe [T.Text]) -- result-styleSchemeGetAuthors _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_style_scheme_get_authors _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- unpackZeroTerminatedUTF8CArray result'- return result''- touchManagedPtr _obj- return maybeResult--data StyleSchemeGetAuthorsMethodInfo-instance (signature ~ (m (Maybe [T.Text])), MonadIO m, StyleSchemeK a) => MethodInfo StyleSchemeGetAuthorsMethodInfo a signature where- overloadedMethod _ = styleSchemeGetAuthors---- method StyleScheme::get_description--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleScheme", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_get_description" gtk_source_style_scheme_get_description :: - Ptr StyleScheme -> -- _obj : TInterface "GtkSource" "StyleScheme"- IO CString---styleSchemeGetDescription ::- (MonadIO m, StyleSchemeK a) =>- a -- _obj- -> m (Maybe T.Text) -- result-styleSchemeGetDescription _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_style_scheme_get_description _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- cstringToText result'- return result''- touchManagedPtr _obj- return maybeResult--data StyleSchemeGetDescriptionMethodInfo-instance (signature ~ (m (Maybe T.Text)), MonadIO m, StyleSchemeK a) => MethodInfo StyleSchemeGetDescriptionMethodInfo a signature where- overloadedMethod _ = styleSchemeGetDescription---- method StyleScheme::get_filename--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleScheme", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_get_filename" gtk_source_style_scheme_get_filename :: - Ptr StyleScheme -> -- _obj : TInterface "GtkSource" "StyleScheme"- IO CString---styleSchemeGetFilename ::- (MonadIO m, StyleSchemeK a) =>- a -- _obj- -> m (Maybe T.Text) -- result-styleSchemeGetFilename _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_style_scheme_get_filename _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- cstringToText result'- return result''- touchManagedPtr _obj- return maybeResult--data StyleSchemeGetFilenameMethodInfo-instance (signature ~ (m (Maybe T.Text)), MonadIO m, StyleSchemeK a) => MethodInfo StyleSchemeGetFilenameMethodInfo a signature where- overloadedMethod _ = styleSchemeGetFilename---- method StyleScheme::get_id--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleScheme", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_get_id" gtk_source_style_scheme_get_id :: - Ptr StyleScheme -> -- _obj : TInterface "GtkSource" "StyleScheme"- IO CString---styleSchemeGetId ::- (MonadIO m, StyleSchemeK a) =>- a -- _obj- -> m T.Text -- result-styleSchemeGetId _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_style_scheme_get_id _obj'- checkUnexpectedReturnNULL "gtk_source_style_scheme_get_id" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data StyleSchemeGetIdMethodInfo-instance (signature ~ (m T.Text), MonadIO m, StyleSchemeK a) => MethodInfo StyleSchemeGetIdMethodInfo a signature where- overloadedMethod _ = styleSchemeGetId---- method StyleScheme::get_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleScheme", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_get_name" gtk_source_style_scheme_get_name :: - Ptr StyleScheme -> -- _obj : TInterface "GtkSource" "StyleScheme"- IO CString---styleSchemeGetName ::- (MonadIO m, StyleSchemeK a) =>- a -- _obj- -> m T.Text -- result-styleSchemeGetName _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_style_scheme_get_name _obj'- checkUnexpectedReturnNULL "gtk_source_style_scheme_get_name" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data StyleSchemeGetNameMethodInfo-instance (signature ~ (m T.Text), MonadIO m, StyleSchemeK a) => MethodInfo StyleSchemeGetNameMethodInfo a signature where- overloadedMethod _ = styleSchemeGetName---- method StyleScheme::get_style--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleScheme", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "style_id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Style")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_get_style" gtk_source_style_scheme_get_style :: - Ptr StyleScheme -> -- _obj : TInterface "GtkSource" "StyleScheme"- CString -> -- style_id : TBasicType TUTF8- IO (Ptr Style)---styleSchemeGetStyle ::- (MonadIO m, StyleSchemeK a) =>- a -- _obj- -> T.Text -- styleId- -> m (Maybe Style) -- result-styleSchemeGetStyle _obj styleId = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- styleId' <- textToCString styleId- result <- gtk_source_style_scheme_get_style _obj' styleId'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newObject Style) result'- return result''- touchManagedPtr _obj- freeMem styleId'- return maybeResult--data StyleSchemeGetStyleMethodInfo-instance (signature ~ (T.Text -> m (Maybe Style)), MonadIO m, StyleSchemeK a) => MethodInfo StyleSchemeGetStyleMethodInfo a signature where- overloadedMethod _ = styleSchemeGetStyle--
− GI/GtkSource/Objects/StyleScheme.hs-boot
@@ -1,23 +0,0 @@-module GI.GtkSource.Objects.StyleScheme where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype StyleScheme = StyleScheme (ForeignPtr StyleScheme)-instance GObject StyleScheme where-class GObject o => StyleSchemeK o-instance (GObject o, IsDescendantOf StyleScheme o) => StyleSchemeK o-data StyleSchemeDescriptionPropertyInfo-data StyleSchemeFilenamePropertyInfo-data StyleSchemeIdPropertyInfo-data StyleSchemeNamePropertyInfo-data StyleSchemeGetAuthorsMethodInfo-data StyleSchemeGetDescriptionMethodInfo-data StyleSchemeGetFilenameMethodInfo-data StyleSchemeGetIdMethodInfo-data StyleSchemeGetNameMethodInfo-data StyleSchemeGetStyleMethodInfo
− GI/GtkSource/Objects/StyleSchemeChooserButton.hs
@@ -1,449 +0,0 @@---{- |-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.GtkSource.Objects.StyleSchemeChooserButton- ( ---- * Exported types- StyleSchemeChooserButton(..) ,- StyleSchemeChooserButtonK ,- toStyleSchemeChooserButton ,- noStyleSchemeChooserButton ,--- -- * Methods--- ** styleSchemeChooserButtonNew- styleSchemeChooserButtonNew ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.Atk as Atk-import qualified GI.GObject as GObject-import qualified GI.Gtk as Gtk--newtype StyleSchemeChooserButton = StyleSchemeChooserButton (ForeignPtr StyleSchemeChooserButton)-foreign import ccall "gtk_source_style_scheme_chooser_button_get_type"- c_gtk_source_style_scheme_chooser_button_get_type :: IO GType--type instance ParentTypes StyleSchemeChooserButton = StyleSchemeChooserButtonParentTypes-type StyleSchemeChooserButtonParentTypes = '[Gtk.Button, Gtk.Bin, Gtk.Container, Gtk.Widget, GObject.Object, Atk.ImplementorIface, Gtk.Actionable, Gtk.Activatable, Gtk.Buildable, StyleSchemeChooser]--instance GObject StyleSchemeChooserButton where- gobjectIsInitiallyUnowned _ = True- gobjectType _ = c_gtk_source_style_scheme_chooser_button_get_type- --class GObject o => StyleSchemeChooserButtonK o-instance (GObject o, IsDescendantOf StyleSchemeChooserButton o) => StyleSchemeChooserButtonK o--toStyleSchemeChooserButton :: StyleSchemeChooserButtonK o => o -> IO StyleSchemeChooserButton-toStyleSchemeChooserButton = unsafeCastTo StyleSchemeChooserButton--noStyleSchemeChooserButton :: Maybe StyleSchemeChooserButton-noStyleSchemeChooserButton = Nothing--type family ResolveStyleSchemeChooserButtonMethod (t :: Symbol) (o :: *) :: * where- ResolveStyleSchemeChooserButtonMethod "activate" o = Gtk.WidgetActivateMethodInfo- ResolveStyleSchemeChooserButtonMethod "add" o = Gtk.ContainerAddMethodInfo- ResolveStyleSchemeChooserButtonMethod "addAccelerator" o = Gtk.WidgetAddAcceleratorMethodInfo- ResolveStyleSchemeChooserButtonMethod "addChild" o = Gtk.BuildableAddChildMethodInfo- ResolveStyleSchemeChooserButtonMethod "addDeviceEvents" o = Gtk.WidgetAddDeviceEventsMethodInfo- ResolveStyleSchemeChooserButtonMethod "addEvents" o = Gtk.WidgetAddEventsMethodInfo- ResolveStyleSchemeChooserButtonMethod "addMnemonicLabel" o = Gtk.WidgetAddMnemonicLabelMethodInfo- ResolveStyleSchemeChooserButtonMethod "addTickCallback" o = Gtk.WidgetAddTickCallbackMethodInfo- ResolveStyleSchemeChooserButtonMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveStyleSchemeChooserButtonMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveStyleSchemeChooserButtonMethod "canActivateAccel" o = Gtk.WidgetCanActivateAccelMethodInfo- ResolveStyleSchemeChooserButtonMethod "checkResize" o = Gtk.ContainerCheckResizeMethodInfo- ResolveStyleSchemeChooserButtonMethod "childFocus" o = Gtk.WidgetChildFocusMethodInfo- ResolveStyleSchemeChooserButtonMethod "childGetProperty" o = Gtk.ContainerChildGetPropertyMethodInfo- ResolveStyleSchemeChooserButtonMethod "childNotifyByPspec" o = Gtk.ContainerChildNotifyByPspecMethodInfo- ResolveStyleSchemeChooserButtonMethod "childSetProperty" o = Gtk.ContainerChildSetPropertyMethodInfo- ResolveStyleSchemeChooserButtonMethod "childType" o = Gtk.ContainerChildTypeMethodInfo- ResolveStyleSchemeChooserButtonMethod "classPath" o = Gtk.WidgetClassPathMethodInfo- ResolveStyleSchemeChooserButtonMethod "clicked" o = Gtk.ButtonClickedMethodInfo- ResolveStyleSchemeChooserButtonMethod "computeExpand" o = Gtk.WidgetComputeExpandMethodInfo- ResolveStyleSchemeChooserButtonMethod "constructChild" o = Gtk.BuildableConstructChildMethodInfo- ResolveStyleSchemeChooserButtonMethod "createPangoContext" o = Gtk.WidgetCreatePangoContextMethodInfo- ResolveStyleSchemeChooserButtonMethod "createPangoLayout" o = Gtk.WidgetCreatePangoLayoutMethodInfo- ResolveStyleSchemeChooserButtonMethod "customFinished" o = Gtk.BuildableCustomFinishedMethodInfo- ResolveStyleSchemeChooserButtonMethod "customTagEnd" o = Gtk.BuildableCustomTagEndMethodInfo- ResolveStyleSchemeChooserButtonMethod "customTagStart" o = Gtk.BuildableCustomTagStartMethodInfo- ResolveStyleSchemeChooserButtonMethod "destroy" o = Gtk.WidgetDestroyMethodInfo- ResolveStyleSchemeChooserButtonMethod "destroyed" o = Gtk.WidgetDestroyedMethodInfo- ResolveStyleSchemeChooserButtonMethod "deviceIsShadowed" o = Gtk.WidgetDeviceIsShadowedMethodInfo- ResolveStyleSchemeChooserButtonMethod "doSetRelatedAction" o = Gtk.ActivatableDoSetRelatedActionMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragBegin" o = Gtk.WidgetDragBeginMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragBeginWithCoordinates" o = Gtk.WidgetDragBeginWithCoordinatesMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragCheckThreshold" o = Gtk.WidgetDragCheckThresholdMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragDestAddImageTargets" o = Gtk.WidgetDragDestAddImageTargetsMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragDestAddTextTargets" o = Gtk.WidgetDragDestAddTextTargetsMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragDestAddUriTargets" o = Gtk.WidgetDragDestAddUriTargetsMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragDestFindTarget" o = Gtk.WidgetDragDestFindTargetMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragDestGetTargetList" o = Gtk.WidgetDragDestGetTargetListMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragDestGetTrackMotion" o = Gtk.WidgetDragDestGetTrackMotionMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragDestSet" o = Gtk.WidgetDragDestSetMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragDestSetProxy" o = Gtk.WidgetDragDestSetProxyMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragDestSetTargetList" o = Gtk.WidgetDragDestSetTargetListMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragDestSetTrackMotion" o = Gtk.WidgetDragDestSetTrackMotionMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragDestUnset" o = Gtk.WidgetDragDestUnsetMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragGetData" o = Gtk.WidgetDragGetDataMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragHighlight" o = Gtk.WidgetDragHighlightMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragSourceAddImageTargets" o = Gtk.WidgetDragSourceAddImageTargetsMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragSourceAddTextTargets" o = Gtk.WidgetDragSourceAddTextTargetsMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragSourceAddUriTargets" o = Gtk.WidgetDragSourceAddUriTargetsMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragSourceGetTargetList" o = Gtk.WidgetDragSourceGetTargetListMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragSourceSet" o = Gtk.WidgetDragSourceSetMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragSourceSetIconGicon" o = Gtk.WidgetDragSourceSetIconGiconMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragSourceSetIconName" o = Gtk.WidgetDragSourceSetIconNameMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragSourceSetIconPixbuf" o = Gtk.WidgetDragSourceSetIconPixbufMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragSourceSetIconStock" o = Gtk.WidgetDragSourceSetIconStockMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragSourceSetTargetList" o = Gtk.WidgetDragSourceSetTargetListMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragSourceUnset" o = Gtk.WidgetDragSourceUnsetMethodInfo- ResolveStyleSchemeChooserButtonMethod "dragUnhighlight" o = Gtk.WidgetDragUnhighlightMethodInfo- ResolveStyleSchemeChooserButtonMethod "draw" o = Gtk.WidgetDrawMethodInfo- ResolveStyleSchemeChooserButtonMethod "ensureStyle" o = Gtk.WidgetEnsureStyleMethodInfo- ResolveStyleSchemeChooserButtonMethod "enter" o = Gtk.ButtonEnterMethodInfo- ResolveStyleSchemeChooserButtonMethod "errorBell" o = Gtk.WidgetErrorBellMethodInfo- ResolveStyleSchemeChooserButtonMethod "event" o = Gtk.WidgetEventMethodInfo- ResolveStyleSchemeChooserButtonMethod "forall" o = Gtk.ContainerForallMethodInfo- ResolveStyleSchemeChooserButtonMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveStyleSchemeChooserButtonMethod "foreach" o = Gtk.ContainerForeachMethodInfo- ResolveStyleSchemeChooserButtonMethod "freezeChildNotify" o = Gtk.WidgetFreezeChildNotifyMethodInfo- ResolveStyleSchemeChooserButtonMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveStyleSchemeChooserButtonMethod "grabAdd" o = Gtk.WidgetGrabAddMethodInfo- ResolveStyleSchemeChooserButtonMethod "grabDefault" o = Gtk.WidgetGrabDefaultMethodInfo- ResolveStyleSchemeChooserButtonMethod "grabFocus" o = Gtk.WidgetGrabFocusMethodInfo- ResolveStyleSchemeChooserButtonMethod "grabRemove" o = Gtk.WidgetGrabRemoveMethodInfo- ResolveStyleSchemeChooserButtonMethod "hasDefault" o = Gtk.WidgetHasDefaultMethodInfo- ResolveStyleSchemeChooserButtonMethod "hasFocus" o = Gtk.WidgetHasFocusMethodInfo- ResolveStyleSchemeChooserButtonMethod "hasGrab" o = Gtk.WidgetHasGrabMethodInfo- ResolveStyleSchemeChooserButtonMethod "hasRcStyle" o = Gtk.WidgetHasRcStyleMethodInfo- ResolveStyleSchemeChooserButtonMethod "hasScreen" o = Gtk.WidgetHasScreenMethodInfo- ResolveStyleSchemeChooserButtonMethod "hasVisibleFocus" o = Gtk.WidgetHasVisibleFocusMethodInfo- ResolveStyleSchemeChooserButtonMethod "hide" o = Gtk.WidgetHideMethodInfo- ResolveStyleSchemeChooserButtonMethod "hideOnDelete" o = Gtk.WidgetHideOnDeleteMethodInfo- ResolveStyleSchemeChooserButtonMethod "inDestruction" o = Gtk.WidgetInDestructionMethodInfo- ResolveStyleSchemeChooserButtonMethod "initTemplate" o = Gtk.WidgetInitTemplateMethodInfo- ResolveStyleSchemeChooserButtonMethod "inputShapeCombineRegion" o = Gtk.WidgetInputShapeCombineRegionMethodInfo- ResolveStyleSchemeChooserButtonMethod "insertActionGroup" o = Gtk.WidgetInsertActionGroupMethodInfo- ResolveStyleSchemeChooserButtonMethod "intersect" o = Gtk.WidgetIntersectMethodInfo- ResolveStyleSchemeChooserButtonMethod "isAncestor" o = Gtk.WidgetIsAncestorMethodInfo- ResolveStyleSchemeChooserButtonMethod "isComposited" o = Gtk.WidgetIsCompositedMethodInfo- ResolveStyleSchemeChooserButtonMethod "isDrawable" o = Gtk.WidgetIsDrawableMethodInfo- ResolveStyleSchemeChooserButtonMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveStyleSchemeChooserButtonMethod "isFocus" o = Gtk.WidgetIsFocusMethodInfo- ResolveStyleSchemeChooserButtonMethod "isSensitive" o = Gtk.WidgetIsSensitiveMethodInfo- ResolveStyleSchemeChooserButtonMethod "isToplevel" o = Gtk.WidgetIsToplevelMethodInfo- ResolveStyleSchemeChooserButtonMethod "isVisible" o = Gtk.WidgetIsVisibleMethodInfo- ResolveStyleSchemeChooserButtonMethod "keynavFailed" o = Gtk.WidgetKeynavFailedMethodInfo- ResolveStyleSchemeChooserButtonMethod "leave" o = Gtk.ButtonLeaveMethodInfo- ResolveStyleSchemeChooserButtonMethod "listAccelClosures" o = Gtk.WidgetListAccelClosuresMethodInfo- ResolveStyleSchemeChooserButtonMethod "listActionPrefixes" o = Gtk.WidgetListActionPrefixesMethodInfo- ResolveStyleSchemeChooserButtonMethod "listMnemonicLabels" o = Gtk.WidgetListMnemonicLabelsMethodInfo- ResolveStyleSchemeChooserButtonMethod "map" o = Gtk.WidgetMapMethodInfo- ResolveStyleSchemeChooserButtonMethod "mnemonicActivate" o = Gtk.WidgetMnemonicActivateMethodInfo- ResolveStyleSchemeChooserButtonMethod "modifyBase" o = Gtk.WidgetModifyBaseMethodInfo- ResolveStyleSchemeChooserButtonMethod "modifyBg" o = Gtk.WidgetModifyBgMethodInfo- ResolveStyleSchemeChooserButtonMethod "modifyCursor" o = Gtk.WidgetModifyCursorMethodInfo- ResolveStyleSchemeChooserButtonMethod "modifyFg" o = Gtk.WidgetModifyFgMethodInfo- ResolveStyleSchemeChooserButtonMethod "modifyFont" o = Gtk.WidgetModifyFontMethodInfo- ResolveStyleSchemeChooserButtonMethod "modifyStyle" o = Gtk.WidgetModifyStyleMethodInfo- ResolveStyleSchemeChooserButtonMethod "modifyText" o = Gtk.WidgetModifyTextMethodInfo- ResolveStyleSchemeChooserButtonMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveStyleSchemeChooserButtonMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveStyleSchemeChooserButtonMethod "overrideBackgroundColor" o = Gtk.WidgetOverrideBackgroundColorMethodInfo- ResolveStyleSchemeChooserButtonMethod "overrideColor" o = Gtk.WidgetOverrideColorMethodInfo- ResolveStyleSchemeChooserButtonMethod "overrideCursor" o = Gtk.WidgetOverrideCursorMethodInfo- ResolveStyleSchemeChooserButtonMethod "overrideFont" o = Gtk.WidgetOverrideFontMethodInfo- ResolveStyleSchemeChooserButtonMethod "overrideSymbolicColor" o = Gtk.WidgetOverrideSymbolicColorMethodInfo- ResolveStyleSchemeChooserButtonMethod "parserFinished" o = Gtk.BuildableParserFinishedMethodInfo- ResolveStyleSchemeChooserButtonMethod "path" o = Gtk.WidgetPathMethodInfo- ResolveStyleSchemeChooserButtonMethod "pressed" o = Gtk.ButtonPressedMethodInfo- ResolveStyleSchemeChooserButtonMethod "propagateDraw" o = Gtk.ContainerPropagateDrawMethodInfo- ResolveStyleSchemeChooserButtonMethod "queueComputeExpand" o = Gtk.WidgetQueueComputeExpandMethodInfo- ResolveStyleSchemeChooserButtonMethod "queueDraw" o = Gtk.WidgetQueueDrawMethodInfo- ResolveStyleSchemeChooserButtonMethod "queueDrawArea" o = Gtk.WidgetQueueDrawAreaMethodInfo- ResolveStyleSchemeChooserButtonMethod "queueDrawRegion" o = Gtk.WidgetQueueDrawRegionMethodInfo- ResolveStyleSchemeChooserButtonMethod "queueResize" o = Gtk.WidgetQueueResizeMethodInfo- ResolveStyleSchemeChooserButtonMethod "queueResizeNoRedraw" o = Gtk.WidgetQueueResizeNoRedrawMethodInfo- ResolveStyleSchemeChooserButtonMethod "realize" o = Gtk.WidgetRealizeMethodInfo- ResolveStyleSchemeChooserButtonMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveStyleSchemeChooserButtonMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveStyleSchemeChooserButtonMethod "regionIntersect" o = Gtk.WidgetRegionIntersectMethodInfo- ResolveStyleSchemeChooserButtonMethod "registerWindow" o = Gtk.WidgetRegisterWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod "released" o = Gtk.ButtonReleasedMethodInfo- ResolveStyleSchemeChooserButtonMethod "remove" o = Gtk.ContainerRemoveMethodInfo- ResolveStyleSchemeChooserButtonMethod "removeAccelerator" o = Gtk.WidgetRemoveAcceleratorMethodInfo- ResolveStyleSchemeChooserButtonMethod "removeMnemonicLabel" o = Gtk.WidgetRemoveMnemonicLabelMethodInfo- ResolveStyleSchemeChooserButtonMethod "removeTickCallback" o = Gtk.WidgetRemoveTickCallbackMethodInfo- ResolveStyleSchemeChooserButtonMethod "renderIcon" o = Gtk.WidgetRenderIconMethodInfo- ResolveStyleSchemeChooserButtonMethod "renderIconPixbuf" o = Gtk.WidgetRenderIconPixbufMethodInfo- ResolveStyleSchemeChooserButtonMethod "reparent" o = Gtk.WidgetReparentMethodInfo- ResolveStyleSchemeChooserButtonMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveStyleSchemeChooserButtonMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveStyleSchemeChooserButtonMethod "resetRcStyles" o = Gtk.WidgetResetRcStylesMethodInfo- ResolveStyleSchemeChooserButtonMethod "resetStyle" o = Gtk.WidgetResetStyleMethodInfo- ResolveStyleSchemeChooserButtonMethod "resizeChildren" o = Gtk.ContainerResizeChildrenMethodInfo- ResolveStyleSchemeChooserButtonMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveStyleSchemeChooserButtonMethod "sendExpose" o = Gtk.WidgetSendExposeMethodInfo- ResolveStyleSchemeChooserButtonMethod "sendFocusChange" o = Gtk.WidgetSendFocusChangeMethodInfo- ResolveStyleSchemeChooserButtonMethod "shapeCombineRegion" o = Gtk.WidgetShapeCombineRegionMethodInfo- ResolveStyleSchemeChooserButtonMethod "show" o = Gtk.WidgetShowMethodInfo- ResolveStyleSchemeChooserButtonMethod "showAll" o = Gtk.WidgetShowAllMethodInfo- ResolveStyleSchemeChooserButtonMethod "showNow" o = Gtk.WidgetShowNowMethodInfo- ResolveStyleSchemeChooserButtonMethod "sizeAllocate" o = Gtk.WidgetSizeAllocateMethodInfo- ResolveStyleSchemeChooserButtonMethod "sizeAllocateWithBaseline" o = Gtk.WidgetSizeAllocateWithBaselineMethodInfo- ResolveStyleSchemeChooserButtonMethod "sizeRequest" o = Gtk.WidgetSizeRequestMethodInfo- ResolveStyleSchemeChooserButtonMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveStyleSchemeChooserButtonMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveStyleSchemeChooserButtonMethod "styleAttach" o = Gtk.WidgetStyleAttachMethodInfo- ResolveStyleSchemeChooserButtonMethod "styleGetProperty" o = Gtk.WidgetStyleGetPropertyMethodInfo- ResolveStyleSchemeChooserButtonMethod "syncActionProperties" o = Gtk.ActivatableSyncActionPropertiesMethodInfo- ResolveStyleSchemeChooserButtonMethod "thawChildNotify" o = Gtk.WidgetThawChildNotifyMethodInfo- ResolveStyleSchemeChooserButtonMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveStyleSchemeChooserButtonMethod "translateCoordinates" o = Gtk.WidgetTranslateCoordinatesMethodInfo- ResolveStyleSchemeChooserButtonMethod "triggerTooltipQuery" o = Gtk.WidgetTriggerTooltipQueryMethodInfo- ResolveStyleSchemeChooserButtonMethod "unmap" o = Gtk.WidgetUnmapMethodInfo- ResolveStyleSchemeChooserButtonMethod "unparent" o = Gtk.WidgetUnparentMethodInfo- ResolveStyleSchemeChooserButtonMethod "unrealize" o = Gtk.WidgetUnrealizeMethodInfo- ResolveStyleSchemeChooserButtonMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveStyleSchemeChooserButtonMethod "unregisterWindow" o = Gtk.WidgetUnregisterWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod "unsetFocusChain" o = Gtk.ContainerUnsetFocusChainMethodInfo- ResolveStyleSchemeChooserButtonMethod "unsetStateFlags" o = Gtk.WidgetUnsetStateFlagsMethodInfo- ResolveStyleSchemeChooserButtonMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveStyleSchemeChooserButtonMethod "getAccessible" o = Gtk.WidgetGetAccessibleMethodInfo- ResolveStyleSchemeChooserButtonMethod "getActionGroup" o = Gtk.WidgetGetActionGroupMethodInfo- ResolveStyleSchemeChooserButtonMethod "getActionName" o = Gtk.ActionableGetActionNameMethodInfo- ResolveStyleSchemeChooserButtonMethod "getActionTargetValue" o = Gtk.ActionableGetActionTargetValueMethodInfo- ResolveStyleSchemeChooserButtonMethod "getAlignment" o = Gtk.ButtonGetAlignmentMethodInfo- ResolveStyleSchemeChooserButtonMethod "getAllocatedBaseline" o = Gtk.WidgetGetAllocatedBaselineMethodInfo- ResolveStyleSchemeChooserButtonMethod "getAllocatedHeight" o = Gtk.WidgetGetAllocatedHeightMethodInfo- ResolveStyleSchemeChooserButtonMethod "getAllocatedWidth" o = Gtk.WidgetGetAllocatedWidthMethodInfo- ResolveStyleSchemeChooserButtonMethod "getAllocation" o = Gtk.WidgetGetAllocationMethodInfo- ResolveStyleSchemeChooserButtonMethod "getAlwaysShowImage" o = Gtk.ButtonGetAlwaysShowImageMethodInfo- ResolveStyleSchemeChooserButtonMethod "getAncestor" o = Gtk.WidgetGetAncestorMethodInfo- ResolveStyleSchemeChooserButtonMethod "getAppPaintable" o = Gtk.WidgetGetAppPaintableMethodInfo- ResolveStyleSchemeChooserButtonMethod "getBorderWidth" o = Gtk.ContainerGetBorderWidthMethodInfo- ResolveStyleSchemeChooserButtonMethod "getCanDefault" o = Gtk.WidgetGetCanDefaultMethodInfo- ResolveStyleSchemeChooserButtonMethod "getCanFocus" o = Gtk.WidgetGetCanFocusMethodInfo- ResolveStyleSchemeChooserButtonMethod "getChild" o = Gtk.BinGetChildMethodInfo- ResolveStyleSchemeChooserButtonMethod "getChildRequisition" o = Gtk.WidgetGetChildRequisitionMethodInfo- ResolveStyleSchemeChooserButtonMethod "getChildVisible" o = Gtk.WidgetGetChildVisibleMethodInfo- ResolveStyleSchemeChooserButtonMethod "getChildren" o = Gtk.ContainerGetChildrenMethodInfo- ResolveStyleSchemeChooserButtonMethod "getClip" o = Gtk.WidgetGetClipMethodInfo- ResolveStyleSchemeChooserButtonMethod "getClipboard" o = Gtk.WidgetGetClipboardMethodInfo- ResolveStyleSchemeChooserButtonMethod "getCompositeName" o = Gtk.WidgetGetCompositeNameMethodInfo- ResolveStyleSchemeChooserButtonMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveStyleSchemeChooserButtonMethod "getDeviceEnabled" o = Gtk.WidgetGetDeviceEnabledMethodInfo- ResolveStyleSchemeChooserButtonMethod "getDeviceEvents" o = Gtk.WidgetGetDeviceEventsMethodInfo- ResolveStyleSchemeChooserButtonMethod "getDirection" o = Gtk.WidgetGetDirectionMethodInfo- ResolveStyleSchemeChooserButtonMethod "getDisplay" o = Gtk.WidgetGetDisplayMethodInfo- ResolveStyleSchemeChooserButtonMethod "getDoubleBuffered" o = Gtk.WidgetGetDoubleBufferedMethodInfo- ResolveStyleSchemeChooserButtonMethod "getEventWindow" o = Gtk.ButtonGetEventWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod "getEvents" o = Gtk.WidgetGetEventsMethodInfo- ResolveStyleSchemeChooserButtonMethod "getFocusChain" o = Gtk.ContainerGetFocusChainMethodInfo- ResolveStyleSchemeChooserButtonMethod "getFocusChild" o = Gtk.ContainerGetFocusChildMethodInfo- ResolveStyleSchemeChooserButtonMethod "getFocusHadjustment" o = Gtk.ContainerGetFocusHadjustmentMethodInfo- ResolveStyleSchemeChooserButtonMethod "getFocusOnClick" o = Gtk.ButtonGetFocusOnClickMethodInfo- ResolveStyleSchemeChooserButtonMethod "getFocusVadjustment" o = Gtk.ContainerGetFocusVadjustmentMethodInfo- ResolveStyleSchemeChooserButtonMethod "getFontMap" o = Gtk.WidgetGetFontMapMethodInfo- ResolveStyleSchemeChooserButtonMethod "getFontOptions" o = Gtk.WidgetGetFontOptionsMethodInfo- ResolveStyleSchemeChooserButtonMethod "getFrameClock" o = Gtk.WidgetGetFrameClockMethodInfo- ResolveStyleSchemeChooserButtonMethod "getHalign" o = Gtk.WidgetGetHalignMethodInfo- ResolveStyleSchemeChooserButtonMethod "getHasTooltip" o = Gtk.WidgetGetHasTooltipMethodInfo- ResolveStyleSchemeChooserButtonMethod "getHasWindow" o = Gtk.WidgetGetHasWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod "getHexpand" o = Gtk.WidgetGetHexpandMethodInfo- ResolveStyleSchemeChooserButtonMethod "getHexpandSet" o = Gtk.WidgetGetHexpandSetMethodInfo- ResolveStyleSchemeChooserButtonMethod "getImage" o = Gtk.ButtonGetImageMethodInfo- ResolveStyleSchemeChooserButtonMethod "getImagePosition" o = Gtk.ButtonGetImagePositionMethodInfo- ResolveStyleSchemeChooserButtonMethod "getInternalChild" o = Gtk.BuildableGetInternalChildMethodInfo- ResolveStyleSchemeChooserButtonMethod "getLabel" o = Gtk.ButtonGetLabelMethodInfo- ResolveStyleSchemeChooserButtonMethod "getMapped" o = Gtk.WidgetGetMappedMethodInfo- ResolveStyleSchemeChooserButtonMethod "getMarginBottom" o = Gtk.WidgetGetMarginBottomMethodInfo- ResolveStyleSchemeChooserButtonMethod "getMarginEnd" o = Gtk.WidgetGetMarginEndMethodInfo- ResolveStyleSchemeChooserButtonMethod "getMarginLeft" o = Gtk.WidgetGetMarginLeftMethodInfo- ResolveStyleSchemeChooserButtonMethod "getMarginRight" o = Gtk.WidgetGetMarginRightMethodInfo- ResolveStyleSchemeChooserButtonMethod "getMarginStart" o = Gtk.WidgetGetMarginStartMethodInfo- ResolveStyleSchemeChooserButtonMethod "getMarginTop" o = Gtk.WidgetGetMarginTopMethodInfo- ResolveStyleSchemeChooserButtonMethod "getModifierMask" o = Gtk.WidgetGetModifierMaskMethodInfo- ResolveStyleSchemeChooserButtonMethod "getModifierStyle" o = Gtk.WidgetGetModifierStyleMethodInfo- ResolveStyleSchemeChooserButtonMethod "getNoShowAll" o = Gtk.WidgetGetNoShowAllMethodInfo- ResolveStyleSchemeChooserButtonMethod "getOpacity" o = Gtk.WidgetGetOpacityMethodInfo- ResolveStyleSchemeChooserButtonMethod "getPangoContext" o = Gtk.WidgetGetPangoContextMethodInfo- ResolveStyleSchemeChooserButtonMethod "getParent" o = Gtk.WidgetGetParentMethodInfo- ResolveStyleSchemeChooserButtonMethod "getParentWindow" o = Gtk.WidgetGetParentWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod "getPath" o = Gtk.WidgetGetPathMethodInfo- ResolveStyleSchemeChooserButtonMethod "getPathForChild" o = Gtk.ContainerGetPathForChildMethodInfo- ResolveStyleSchemeChooserButtonMethod "getPointer" o = Gtk.WidgetGetPointerMethodInfo- ResolveStyleSchemeChooserButtonMethod "getPreferredHeight" o = Gtk.WidgetGetPreferredHeightMethodInfo- ResolveStyleSchemeChooserButtonMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo- ResolveStyleSchemeChooserButtonMethod "getPreferredHeightForWidth" o = Gtk.WidgetGetPreferredHeightForWidthMethodInfo- ResolveStyleSchemeChooserButtonMethod "getPreferredSize" o = Gtk.WidgetGetPreferredSizeMethodInfo- ResolveStyleSchemeChooserButtonMethod "getPreferredWidth" o = Gtk.WidgetGetPreferredWidthMethodInfo- ResolveStyleSchemeChooserButtonMethod "getPreferredWidthForHeight" o = Gtk.WidgetGetPreferredWidthForHeightMethodInfo- ResolveStyleSchemeChooserButtonMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveStyleSchemeChooserButtonMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveStyleSchemeChooserButtonMethod "getRealized" o = Gtk.WidgetGetRealizedMethodInfo- ResolveStyleSchemeChooserButtonMethod "getReceivesDefault" o = Gtk.WidgetGetReceivesDefaultMethodInfo- ResolveStyleSchemeChooserButtonMethod "getRelatedAction" o = Gtk.ActivatableGetRelatedActionMethodInfo- ResolveStyleSchemeChooserButtonMethod "getRelief" o = Gtk.ButtonGetReliefMethodInfo- ResolveStyleSchemeChooserButtonMethod "getRequestMode" o = Gtk.WidgetGetRequestModeMethodInfo- ResolveStyleSchemeChooserButtonMethod "getRequisition" o = Gtk.WidgetGetRequisitionMethodInfo- ResolveStyleSchemeChooserButtonMethod "getResizeMode" o = Gtk.ContainerGetResizeModeMethodInfo- ResolveStyleSchemeChooserButtonMethod "getRootWindow" o = Gtk.WidgetGetRootWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod "getScaleFactor" o = Gtk.WidgetGetScaleFactorMethodInfo- ResolveStyleSchemeChooserButtonMethod "getScreen" o = Gtk.WidgetGetScreenMethodInfo- ResolveStyleSchemeChooserButtonMethod "getSensitive" o = Gtk.WidgetGetSensitiveMethodInfo- ResolveStyleSchemeChooserButtonMethod "getSettings" o = Gtk.WidgetGetSettingsMethodInfo- ResolveStyleSchemeChooserButtonMethod "getSizeRequest" o = Gtk.WidgetGetSizeRequestMethodInfo- ResolveStyleSchemeChooserButtonMethod "getState" o = Gtk.WidgetGetStateMethodInfo- ResolveStyleSchemeChooserButtonMethod "getStateFlags" o = Gtk.WidgetGetStateFlagsMethodInfo- ResolveStyleSchemeChooserButtonMethod "getStyle" o = Gtk.WidgetGetStyleMethodInfo- ResolveStyleSchemeChooserButtonMethod "getStyleContext" o = Gtk.WidgetGetStyleContextMethodInfo- ResolveStyleSchemeChooserButtonMethod "getStyleScheme" o = StyleSchemeChooserGetStyleSchemeMethodInfo- ResolveStyleSchemeChooserButtonMethod "getSupportMultidevice" o = Gtk.WidgetGetSupportMultideviceMethodInfo- ResolveStyleSchemeChooserButtonMethod "getTemplateChild" o = Gtk.WidgetGetTemplateChildMethodInfo- ResolveStyleSchemeChooserButtonMethod "getTooltipMarkup" o = Gtk.WidgetGetTooltipMarkupMethodInfo- ResolveStyleSchemeChooserButtonMethod "getTooltipText" o = Gtk.WidgetGetTooltipTextMethodInfo- ResolveStyleSchemeChooserButtonMethod "getTooltipWindow" o = Gtk.WidgetGetTooltipWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod "getToplevel" o = Gtk.WidgetGetToplevelMethodInfo- ResolveStyleSchemeChooserButtonMethod "getUseActionAppearance" o = Gtk.ActivatableGetUseActionAppearanceMethodInfo- ResolveStyleSchemeChooserButtonMethod "getUseStock" o = Gtk.ButtonGetUseStockMethodInfo- ResolveStyleSchemeChooserButtonMethod "getUseUnderline" o = Gtk.ButtonGetUseUnderlineMethodInfo- ResolveStyleSchemeChooserButtonMethod "getValign" o = Gtk.WidgetGetValignMethodInfo- ResolveStyleSchemeChooserButtonMethod "getValignWithBaseline" o = Gtk.WidgetGetValignWithBaselineMethodInfo- ResolveStyleSchemeChooserButtonMethod "getVexpand" o = Gtk.WidgetGetVexpandMethodInfo- ResolveStyleSchemeChooserButtonMethod "getVexpandSet" o = Gtk.WidgetGetVexpandSetMethodInfo- ResolveStyleSchemeChooserButtonMethod "getVisible" o = Gtk.WidgetGetVisibleMethodInfo- ResolveStyleSchemeChooserButtonMethod "getVisual" o = Gtk.WidgetGetVisualMethodInfo- ResolveStyleSchemeChooserButtonMethod "getWindow" o = Gtk.WidgetGetWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod "setAccelPath" o = Gtk.WidgetSetAccelPathMethodInfo- ResolveStyleSchemeChooserButtonMethod "setActionName" o = Gtk.ActionableSetActionNameMethodInfo- ResolveStyleSchemeChooserButtonMethod "setActionTargetValue" o = Gtk.ActionableSetActionTargetValueMethodInfo- ResolveStyleSchemeChooserButtonMethod "setAlignment" o = Gtk.ButtonSetAlignmentMethodInfo- ResolveStyleSchemeChooserButtonMethod "setAllocation" o = Gtk.WidgetSetAllocationMethodInfo- ResolveStyleSchemeChooserButtonMethod "setAlwaysShowImage" o = Gtk.ButtonSetAlwaysShowImageMethodInfo- ResolveStyleSchemeChooserButtonMethod "setAppPaintable" o = Gtk.WidgetSetAppPaintableMethodInfo- ResolveStyleSchemeChooserButtonMethod "setBorderWidth" o = Gtk.ContainerSetBorderWidthMethodInfo- ResolveStyleSchemeChooserButtonMethod "setBuildableProperty" o = Gtk.BuildableSetBuildablePropertyMethodInfo- ResolveStyleSchemeChooserButtonMethod "setCanDefault" o = Gtk.WidgetSetCanDefaultMethodInfo- ResolveStyleSchemeChooserButtonMethod "setCanFocus" o = Gtk.WidgetSetCanFocusMethodInfo- ResolveStyleSchemeChooserButtonMethod "setChildVisible" o = Gtk.WidgetSetChildVisibleMethodInfo- ResolveStyleSchemeChooserButtonMethod "setClip" o = Gtk.WidgetSetClipMethodInfo- ResolveStyleSchemeChooserButtonMethod "setCompositeName" o = Gtk.WidgetSetCompositeNameMethodInfo- ResolveStyleSchemeChooserButtonMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveStyleSchemeChooserButtonMethod "setDetailedActionName" o = Gtk.ActionableSetDetailedActionNameMethodInfo- ResolveStyleSchemeChooserButtonMethod "setDeviceEnabled" o = Gtk.WidgetSetDeviceEnabledMethodInfo- ResolveStyleSchemeChooserButtonMethod "setDeviceEvents" o = Gtk.WidgetSetDeviceEventsMethodInfo- ResolveStyleSchemeChooserButtonMethod "setDirection" o = Gtk.WidgetSetDirectionMethodInfo- ResolveStyleSchemeChooserButtonMethod "setDoubleBuffered" o = Gtk.WidgetSetDoubleBufferedMethodInfo- ResolveStyleSchemeChooserButtonMethod "setEvents" o = Gtk.WidgetSetEventsMethodInfo- ResolveStyleSchemeChooserButtonMethod "setFocusChain" o = Gtk.ContainerSetFocusChainMethodInfo- ResolveStyleSchemeChooserButtonMethod "setFocusChild" o = Gtk.ContainerSetFocusChildMethodInfo- ResolveStyleSchemeChooserButtonMethod "setFocusHadjustment" o = Gtk.ContainerSetFocusHadjustmentMethodInfo- ResolveStyleSchemeChooserButtonMethod "setFocusOnClick" o = Gtk.ButtonSetFocusOnClickMethodInfo- ResolveStyleSchemeChooserButtonMethod "setFocusVadjustment" o = Gtk.ContainerSetFocusVadjustmentMethodInfo- ResolveStyleSchemeChooserButtonMethod "setFontMap" o = Gtk.WidgetSetFontMapMethodInfo- ResolveStyleSchemeChooserButtonMethod "setFontOptions" o = Gtk.WidgetSetFontOptionsMethodInfo- ResolveStyleSchemeChooserButtonMethod "setHalign" o = Gtk.WidgetSetHalignMethodInfo- ResolveStyleSchemeChooserButtonMethod "setHasTooltip" o = Gtk.WidgetSetHasTooltipMethodInfo- ResolveStyleSchemeChooserButtonMethod "setHasWindow" o = Gtk.WidgetSetHasWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod "setHexpand" o = Gtk.WidgetSetHexpandMethodInfo- ResolveStyleSchemeChooserButtonMethod "setHexpandSet" o = Gtk.WidgetSetHexpandSetMethodInfo- ResolveStyleSchemeChooserButtonMethod "setImage" o = Gtk.ButtonSetImageMethodInfo- ResolveStyleSchemeChooserButtonMethod "setImagePosition" o = Gtk.ButtonSetImagePositionMethodInfo- ResolveStyleSchemeChooserButtonMethod "setLabel" o = Gtk.ButtonSetLabelMethodInfo- ResolveStyleSchemeChooserButtonMethod "setMapped" o = Gtk.WidgetSetMappedMethodInfo- ResolveStyleSchemeChooserButtonMethod "setMarginBottom" o = Gtk.WidgetSetMarginBottomMethodInfo- ResolveStyleSchemeChooserButtonMethod "setMarginEnd" o = Gtk.WidgetSetMarginEndMethodInfo- ResolveStyleSchemeChooserButtonMethod "setMarginLeft" o = Gtk.WidgetSetMarginLeftMethodInfo- ResolveStyleSchemeChooserButtonMethod "setMarginRight" o = Gtk.WidgetSetMarginRightMethodInfo- ResolveStyleSchemeChooserButtonMethod "setMarginStart" o = Gtk.WidgetSetMarginStartMethodInfo- ResolveStyleSchemeChooserButtonMethod "setMarginTop" o = Gtk.WidgetSetMarginTopMethodInfo- ResolveStyleSchemeChooserButtonMethod "setNoShowAll" o = Gtk.WidgetSetNoShowAllMethodInfo- ResolveStyleSchemeChooserButtonMethod "setOpacity" o = Gtk.WidgetSetOpacityMethodInfo- ResolveStyleSchemeChooserButtonMethod "setParent" o = Gtk.WidgetSetParentMethodInfo- ResolveStyleSchemeChooserButtonMethod "setParentWindow" o = Gtk.WidgetSetParentWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveStyleSchemeChooserButtonMethod "setRealized" o = Gtk.WidgetSetRealizedMethodInfo- ResolveStyleSchemeChooserButtonMethod "setReallocateRedraws" o = Gtk.ContainerSetReallocateRedrawsMethodInfo- ResolveStyleSchemeChooserButtonMethod "setReceivesDefault" o = Gtk.WidgetSetReceivesDefaultMethodInfo- ResolveStyleSchemeChooserButtonMethod "setRedrawOnAllocate" o = Gtk.WidgetSetRedrawOnAllocateMethodInfo- ResolveStyleSchemeChooserButtonMethod "setRelatedAction" o = Gtk.ActivatableSetRelatedActionMethodInfo- ResolveStyleSchemeChooserButtonMethod "setRelief" o = Gtk.ButtonSetReliefMethodInfo- ResolveStyleSchemeChooserButtonMethod "setResizeMode" o = Gtk.ContainerSetResizeModeMethodInfo- ResolveStyleSchemeChooserButtonMethod "setSensitive" o = Gtk.WidgetSetSensitiveMethodInfo- ResolveStyleSchemeChooserButtonMethod "setSizeRequest" o = Gtk.WidgetSetSizeRequestMethodInfo- ResolveStyleSchemeChooserButtonMethod "setState" o = Gtk.WidgetSetStateMethodInfo- ResolveStyleSchemeChooserButtonMethod "setStateFlags" o = Gtk.WidgetSetStateFlagsMethodInfo- ResolveStyleSchemeChooserButtonMethod "setStyle" o = Gtk.WidgetSetStyleMethodInfo- ResolveStyleSchemeChooserButtonMethod "setStyleScheme" o = StyleSchemeChooserSetStyleSchemeMethodInfo- ResolveStyleSchemeChooserButtonMethod "setSupportMultidevice" o = Gtk.WidgetSetSupportMultideviceMethodInfo- ResolveStyleSchemeChooserButtonMethod "setTooltipMarkup" o = Gtk.WidgetSetTooltipMarkupMethodInfo- ResolveStyleSchemeChooserButtonMethod "setTooltipText" o = Gtk.WidgetSetTooltipTextMethodInfo- ResolveStyleSchemeChooserButtonMethod "setTooltipWindow" o = Gtk.WidgetSetTooltipWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod "setUseActionAppearance" o = Gtk.ActivatableSetUseActionAppearanceMethodInfo- ResolveStyleSchemeChooserButtonMethod "setUseStock" o = Gtk.ButtonSetUseStockMethodInfo- ResolveStyleSchemeChooserButtonMethod "setUseUnderline" o = Gtk.ButtonSetUseUnderlineMethodInfo- ResolveStyleSchemeChooserButtonMethod "setValign" o = Gtk.WidgetSetValignMethodInfo- ResolveStyleSchemeChooserButtonMethod "setVexpand" o = Gtk.WidgetSetVexpandMethodInfo- ResolveStyleSchemeChooserButtonMethod "setVexpandSet" o = Gtk.WidgetSetVexpandSetMethodInfo- ResolveStyleSchemeChooserButtonMethod "setVisible" o = Gtk.WidgetSetVisibleMethodInfo- ResolveStyleSchemeChooserButtonMethod "setVisual" o = Gtk.WidgetSetVisualMethodInfo- ResolveStyleSchemeChooserButtonMethod "setWindow" o = Gtk.WidgetSetWindowMethodInfo- ResolveStyleSchemeChooserButtonMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveStyleSchemeChooserButtonMethod t StyleSchemeChooserButton, MethodInfo info StyleSchemeChooserButton p) => IsLabelProxy t (StyleSchemeChooserButton -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveStyleSchemeChooserButtonMethod t StyleSchemeChooserButton, MethodInfo info StyleSchemeChooserButton p) => IsLabel t (StyleSchemeChooserButton -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif--type instance AttributeList StyleSchemeChooserButton = StyleSchemeChooserButtonAttributeList-type StyleSchemeChooserButtonAttributeList = ('[ '("actionName", Gtk.ActionableActionNamePropertyInfo), '("actionTarget", Gtk.ActionableActionTargetPropertyInfo), '("alwaysShowImage", Gtk.ButtonAlwaysShowImagePropertyInfo), '("appPaintable", Gtk.WidgetAppPaintablePropertyInfo), '("borderWidth", Gtk.ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.WidgetCanFocusPropertyInfo), '("child", Gtk.ContainerChildPropertyInfo), '("compositeChild", Gtk.WidgetCompositeChildPropertyInfo), '("doubleBuffered", Gtk.WidgetDoubleBufferedPropertyInfo), '("events", Gtk.WidgetEventsPropertyInfo), '("expand", Gtk.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.ButtonFocusOnClickPropertyInfo), '("halign", Gtk.WidgetHalignPropertyInfo), '("hasDefault", Gtk.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.WidgetHexpandSetPropertyInfo), '("image", Gtk.ButtonImagePropertyInfo), '("imagePosition", Gtk.ButtonImagePositionPropertyInfo), '("isFocus", Gtk.WidgetIsFocusPropertyInfo), '("label", Gtk.ButtonLabelPropertyInfo), '("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), '("receivesDefault", Gtk.WidgetReceivesDefaultPropertyInfo), '("relatedAction", Gtk.ActivatableRelatedActionPropertyInfo), '("relief", Gtk.ButtonReliefPropertyInfo), '("resizeMode", Gtk.ContainerResizeModePropertyInfo), '("scaleFactor", Gtk.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.WidgetSensitivePropertyInfo), '("style", Gtk.WidgetStylePropertyInfo), '("styleScheme", StyleSchemeChooserStyleSchemePropertyInfo), '("tooltipMarkup", Gtk.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.WidgetTooltipTextPropertyInfo), '("useActionAppearance", Gtk.ActivatableUseActionAppearancePropertyInfo), '("useStock", Gtk.ButtonUseStockPropertyInfo), '("useUnderline", Gtk.ButtonUseUnderlinePropertyInfo), '("valign", Gtk.WidgetValignPropertyInfo), '("vexpand", Gtk.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.WidgetVexpandSetPropertyInfo), '("visible", Gtk.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.WidgetWidthRequestPropertyInfo), '("window", Gtk.WidgetWindowPropertyInfo), '("xalign", Gtk.ButtonXalignPropertyInfo), '("yalign", Gtk.ButtonYalignPropertyInfo)] :: [(Symbol, *)])--type instance SignalList StyleSchemeChooserButton = StyleSchemeChooserButtonSignalList-type StyleSchemeChooserButtonSignalList = ('[ '("accelClosuresChanged", Gtk.WidgetAccelClosuresChangedSignalInfo), '("activate", Gtk.ButtonActivateSignalInfo), '("add", Gtk.ContainerAddSignalInfo), '("buttonPressEvent", Gtk.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.WidgetCanActivateAccelSignalInfo), '("checkResize", Gtk.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.WidgetChildNotifySignalInfo), '("clicked", Gtk.ButtonClickedSignalInfo), '("compositedChanged", Gtk.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.WidgetConfigureEventSignalInfo), '("damageEvent", Gtk.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.WidgetDeleteEventSignalInfo), '("destroy", Gtk.WidgetDestroySignalInfo), '("destroyEvent", Gtk.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.WidgetDirectionChangedSignalInfo), '("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), '("enter", Gtk.ButtonEnterSignalInfo), '("enterNotifyEvent", Gtk.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.WidgetEventSignalInfo), '("eventAfter", Gtk.WidgetEventAfterSignalInfo), '("focus", Gtk.WidgetFocusSignalInfo), '("focusInEvent", Gtk.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.WidgetGrabNotifySignalInfo), '("hide", Gtk.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.WidgetHierarchyChangedSignalInfo), '("keyPressEvent", Gtk.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.WidgetKeynavFailedSignalInfo), '("leave", Gtk.ButtonLeaveSignalInfo), '("leaveNotifyEvent", Gtk.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.WidgetMapSignalInfo), '("mapEvent", Gtk.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.WidgetMotionNotifyEventSignalInfo), '("moveFocus", Gtk.WidgetMoveFocusSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("parentSet", Gtk.WidgetParentSetSignalInfo), '("popupMenu", Gtk.WidgetPopupMenuSignalInfo), '("pressed", Gtk.ButtonPressedSignalInfo), '("propertyNotifyEvent", Gtk.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.WidgetQueryTooltipSignalInfo), '("realize", Gtk.WidgetRealizeSignalInfo), '("released", Gtk.ButtonReleasedSignalInfo), '("remove", Gtk.ContainerRemoveSignalInfo), '("screenChanged", Gtk.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.WidgetSelectionRequestEventSignalInfo), '("setFocusChild", Gtk.ContainerSetFocusChildSignalInfo), '("show", Gtk.WidgetShowSignalInfo), '("showHelp", Gtk.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.WidgetStyleUpdatedSignalInfo), '("touchEvent", Gtk.WidgetTouchEventSignalInfo), '("unmap", Gtk.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])---- method StyleSchemeChooserButton::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "StyleSchemeChooserButton")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_chooser_button_new" gtk_source_style_scheme_chooser_button_new :: - IO (Ptr StyleSchemeChooserButton)---styleSchemeChooserButtonNew ::- (MonadIO m) =>- m StyleSchemeChooserButton -- result-styleSchemeChooserButtonNew = liftIO $ do- result <- gtk_source_style_scheme_chooser_button_new- checkUnexpectedReturnNULL "gtk_source_style_scheme_chooser_button_new" result- result' <- (newObject StyleSchemeChooserButton) result- return result'--
− GI/GtkSource/Objects/StyleSchemeChooserButton.hs-boot
@@ -1,13 +0,0 @@-module GI.GtkSource.Objects.StyleSchemeChooserButton where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype StyleSchemeChooserButton = StyleSchemeChooserButton (ForeignPtr StyleSchemeChooserButton)-instance GObject StyleSchemeChooserButton where-class GObject o => StyleSchemeChooserButtonK o-instance (GObject o, IsDescendantOf StyleSchemeChooserButton o) => StyleSchemeChooserButtonK o
− GI/GtkSource/Objects/StyleSchemeChooserWidget.hs
@@ -1,414 +0,0 @@---{- |-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.GtkSource.Objects.StyleSchemeChooserWidget- ( ---- * Exported types- StyleSchemeChooserWidget(..) ,- StyleSchemeChooserWidgetK ,- toStyleSchemeChooserWidget ,- noStyleSchemeChooserWidget ,--- -- * Methods--- ** styleSchemeChooserWidgetNew- styleSchemeChooserWidgetNew ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.Atk as Atk-import qualified GI.GObject as GObject-import qualified GI.Gtk as Gtk--newtype StyleSchemeChooserWidget = StyleSchemeChooserWidget (ForeignPtr StyleSchemeChooserWidget)-foreign import ccall "gtk_source_style_scheme_chooser_widget_get_type"- c_gtk_source_style_scheme_chooser_widget_get_type :: IO GType--type instance ParentTypes StyleSchemeChooserWidget = StyleSchemeChooserWidgetParentTypes-type StyleSchemeChooserWidgetParentTypes = '[Gtk.Bin, Gtk.Container, Gtk.Widget, GObject.Object, Atk.ImplementorIface, Gtk.Buildable, StyleSchemeChooser]--instance GObject StyleSchemeChooserWidget where- gobjectIsInitiallyUnowned _ = True- gobjectType _ = c_gtk_source_style_scheme_chooser_widget_get_type- --class GObject o => StyleSchemeChooserWidgetK o-instance (GObject o, IsDescendantOf StyleSchemeChooserWidget o) => StyleSchemeChooserWidgetK o--toStyleSchemeChooserWidget :: StyleSchemeChooserWidgetK o => o -> IO StyleSchemeChooserWidget-toStyleSchemeChooserWidget = unsafeCastTo StyleSchemeChooserWidget--noStyleSchemeChooserWidget :: Maybe StyleSchemeChooserWidget-noStyleSchemeChooserWidget = Nothing--type family ResolveStyleSchemeChooserWidgetMethod (t :: Symbol) (o :: *) :: * where- ResolveStyleSchemeChooserWidgetMethod "activate" o = Gtk.WidgetActivateMethodInfo- ResolveStyleSchemeChooserWidgetMethod "add" o = Gtk.ContainerAddMethodInfo- ResolveStyleSchemeChooserWidgetMethod "addAccelerator" o = Gtk.WidgetAddAcceleratorMethodInfo- ResolveStyleSchemeChooserWidgetMethod "addChild" o = Gtk.BuildableAddChildMethodInfo- ResolveStyleSchemeChooserWidgetMethod "addDeviceEvents" o = Gtk.WidgetAddDeviceEventsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "addEvents" o = Gtk.WidgetAddEventsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "addMnemonicLabel" o = Gtk.WidgetAddMnemonicLabelMethodInfo- ResolveStyleSchemeChooserWidgetMethod "addTickCallback" o = Gtk.WidgetAddTickCallbackMethodInfo- ResolveStyleSchemeChooserWidgetMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveStyleSchemeChooserWidgetMethod "canActivateAccel" o = Gtk.WidgetCanActivateAccelMethodInfo- ResolveStyleSchemeChooserWidgetMethod "checkResize" o = Gtk.ContainerCheckResizeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "childFocus" o = Gtk.WidgetChildFocusMethodInfo- ResolveStyleSchemeChooserWidgetMethod "childGetProperty" o = Gtk.ContainerChildGetPropertyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "childNotifyByPspec" o = Gtk.ContainerChildNotifyByPspecMethodInfo- ResolveStyleSchemeChooserWidgetMethod "childSetProperty" o = Gtk.ContainerChildSetPropertyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "childType" o = Gtk.ContainerChildTypeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "classPath" o = Gtk.WidgetClassPathMethodInfo- ResolveStyleSchemeChooserWidgetMethod "computeExpand" o = Gtk.WidgetComputeExpandMethodInfo- ResolveStyleSchemeChooserWidgetMethod "constructChild" o = Gtk.BuildableConstructChildMethodInfo- ResolveStyleSchemeChooserWidgetMethod "createPangoContext" o = Gtk.WidgetCreatePangoContextMethodInfo- ResolveStyleSchemeChooserWidgetMethod "createPangoLayout" o = Gtk.WidgetCreatePangoLayoutMethodInfo- ResolveStyleSchemeChooserWidgetMethod "customFinished" o = Gtk.BuildableCustomFinishedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "customTagEnd" o = Gtk.BuildableCustomTagEndMethodInfo- ResolveStyleSchemeChooserWidgetMethod "customTagStart" o = Gtk.BuildableCustomTagStartMethodInfo- ResolveStyleSchemeChooserWidgetMethod "destroy" o = Gtk.WidgetDestroyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "destroyed" o = Gtk.WidgetDestroyedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "deviceIsShadowed" o = Gtk.WidgetDeviceIsShadowedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragBegin" o = Gtk.WidgetDragBeginMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragBeginWithCoordinates" o = Gtk.WidgetDragBeginWithCoordinatesMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragCheckThreshold" o = Gtk.WidgetDragCheckThresholdMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragDestAddImageTargets" o = Gtk.WidgetDragDestAddImageTargetsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragDestAddTextTargets" o = Gtk.WidgetDragDestAddTextTargetsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragDestAddUriTargets" o = Gtk.WidgetDragDestAddUriTargetsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragDestFindTarget" o = Gtk.WidgetDragDestFindTargetMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragDestGetTargetList" o = Gtk.WidgetDragDestGetTargetListMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragDestGetTrackMotion" o = Gtk.WidgetDragDestGetTrackMotionMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragDestSet" o = Gtk.WidgetDragDestSetMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragDestSetProxy" o = Gtk.WidgetDragDestSetProxyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragDestSetTargetList" o = Gtk.WidgetDragDestSetTargetListMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragDestSetTrackMotion" o = Gtk.WidgetDragDestSetTrackMotionMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragDestUnset" o = Gtk.WidgetDragDestUnsetMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragGetData" o = Gtk.WidgetDragGetDataMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragHighlight" o = Gtk.WidgetDragHighlightMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragSourceAddImageTargets" o = Gtk.WidgetDragSourceAddImageTargetsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragSourceAddTextTargets" o = Gtk.WidgetDragSourceAddTextTargetsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragSourceAddUriTargets" o = Gtk.WidgetDragSourceAddUriTargetsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragSourceGetTargetList" o = Gtk.WidgetDragSourceGetTargetListMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragSourceSet" o = Gtk.WidgetDragSourceSetMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragSourceSetIconGicon" o = Gtk.WidgetDragSourceSetIconGiconMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragSourceSetIconName" o = Gtk.WidgetDragSourceSetIconNameMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragSourceSetIconPixbuf" o = Gtk.WidgetDragSourceSetIconPixbufMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragSourceSetIconStock" o = Gtk.WidgetDragSourceSetIconStockMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragSourceSetTargetList" o = Gtk.WidgetDragSourceSetTargetListMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragSourceUnset" o = Gtk.WidgetDragSourceUnsetMethodInfo- ResolveStyleSchemeChooserWidgetMethod "dragUnhighlight" o = Gtk.WidgetDragUnhighlightMethodInfo- ResolveStyleSchemeChooserWidgetMethod "draw" o = Gtk.WidgetDrawMethodInfo- ResolveStyleSchemeChooserWidgetMethod "ensureStyle" o = Gtk.WidgetEnsureStyleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "errorBell" o = Gtk.WidgetErrorBellMethodInfo- ResolveStyleSchemeChooserWidgetMethod "event" o = Gtk.WidgetEventMethodInfo- ResolveStyleSchemeChooserWidgetMethod "forall" o = Gtk.ContainerForallMethodInfo- ResolveStyleSchemeChooserWidgetMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveStyleSchemeChooserWidgetMethod "foreach" o = Gtk.ContainerForeachMethodInfo- ResolveStyleSchemeChooserWidgetMethod "freezeChildNotify" o = Gtk.WidgetFreezeChildNotifyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "grabAdd" o = Gtk.WidgetGrabAddMethodInfo- ResolveStyleSchemeChooserWidgetMethod "grabDefault" o = Gtk.WidgetGrabDefaultMethodInfo- ResolveStyleSchemeChooserWidgetMethod "grabFocus" o = Gtk.WidgetGrabFocusMethodInfo- ResolveStyleSchemeChooserWidgetMethod "grabRemove" o = Gtk.WidgetGrabRemoveMethodInfo- ResolveStyleSchemeChooserWidgetMethod "hasDefault" o = Gtk.WidgetHasDefaultMethodInfo- ResolveStyleSchemeChooserWidgetMethod "hasFocus" o = Gtk.WidgetHasFocusMethodInfo- ResolveStyleSchemeChooserWidgetMethod "hasGrab" o = Gtk.WidgetHasGrabMethodInfo- ResolveStyleSchemeChooserWidgetMethod "hasRcStyle" o = Gtk.WidgetHasRcStyleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "hasScreen" o = Gtk.WidgetHasScreenMethodInfo- ResolveStyleSchemeChooserWidgetMethod "hasVisibleFocus" o = Gtk.WidgetHasVisibleFocusMethodInfo- ResolveStyleSchemeChooserWidgetMethod "hide" o = Gtk.WidgetHideMethodInfo- ResolveStyleSchemeChooserWidgetMethod "hideOnDelete" o = Gtk.WidgetHideOnDeleteMethodInfo- ResolveStyleSchemeChooserWidgetMethod "inDestruction" o = Gtk.WidgetInDestructionMethodInfo- ResolveStyleSchemeChooserWidgetMethod "initTemplate" o = Gtk.WidgetInitTemplateMethodInfo- ResolveStyleSchemeChooserWidgetMethod "inputShapeCombineRegion" o = Gtk.WidgetInputShapeCombineRegionMethodInfo- ResolveStyleSchemeChooserWidgetMethod "insertActionGroup" o = Gtk.WidgetInsertActionGroupMethodInfo- ResolveStyleSchemeChooserWidgetMethod "intersect" o = Gtk.WidgetIntersectMethodInfo- ResolveStyleSchemeChooserWidgetMethod "isAncestor" o = Gtk.WidgetIsAncestorMethodInfo- ResolveStyleSchemeChooserWidgetMethod "isComposited" o = Gtk.WidgetIsCompositedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "isDrawable" o = Gtk.WidgetIsDrawableMethodInfo- ResolveStyleSchemeChooserWidgetMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveStyleSchemeChooserWidgetMethod "isFocus" o = Gtk.WidgetIsFocusMethodInfo- ResolveStyleSchemeChooserWidgetMethod "isSensitive" o = Gtk.WidgetIsSensitiveMethodInfo- ResolveStyleSchemeChooserWidgetMethod "isToplevel" o = Gtk.WidgetIsToplevelMethodInfo- ResolveStyleSchemeChooserWidgetMethod "isVisible" o = Gtk.WidgetIsVisibleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "keynavFailed" o = Gtk.WidgetKeynavFailedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "listAccelClosures" o = Gtk.WidgetListAccelClosuresMethodInfo- ResolveStyleSchemeChooserWidgetMethod "listActionPrefixes" o = Gtk.WidgetListActionPrefixesMethodInfo- ResolveStyleSchemeChooserWidgetMethod "listMnemonicLabels" o = Gtk.WidgetListMnemonicLabelsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "map" o = Gtk.WidgetMapMethodInfo- ResolveStyleSchemeChooserWidgetMethod "mnemonicActivate" o = Gtk.WidgetMnemonicActivateMethodInfo- ResolveStyleSchemeChooserWidgetMethod "modifyBase" o = Gtk.WidgetModifyBaseMethodInfo- ResolveStyleSchemeChooserWidgetMethod "modifyBg" o = Gtk.WidgetModifyBgMethodInfo- ResolveStyleSchemeChooserWidgetMethod "modifyCursor" o = Gtk.WidgetModifyCursorMethodInfo- ResolveStyleSchemeChooserWidgetMethod "modifyFg" o = Gtk.WidgetModifyFgMethodInfo- ResolveStyleSchemeChooserWidgetMethod "modifyFont" o = Gtk.WidgetModifyFontMethodInfo- ResolveStyleSchemeChooserWidgetMethod "modifyStyle" o = Gtk.WidgetModifyStyleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "modifyText" o = Gtk.WidgetModifyTextMethodInfo- ResolveStyleSchemeChooserWidgetMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveStyleSchemeChooserWidgetMethod "overrideBackgroundColor" o = Gtk.WidgetOverrideBackgroundColorMethodInfo- ResolveStyleSchemeChooserWidgetMethod "overrideColor" o = Gtk.WidgetOverrideColorMethodInfo- ResolveStyleSchemeChooserWidgetMethod "overrideCursor" o = Gtk.WidgetOverrideCursorMethodInfo- ResolveStyleSchemeChooserWidgetMethod "overrideFont" o = Gtk.WidgetOverrideFontMethodInfo- ResolveStyleSchemeChooserWidgetMethod "overrideSymbolicColor" o = Gtk.WidgetOverrideSymbolicColorMethodInfo- ResolveStyleSchemeChooserWidgetMethod "parserFinished" o = Gtk.BuildableParserFinishedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "path" o = Gtk.WidgetPathMethodInfo- ResolveStyleSchemeChooserWidgetMethod "propagateDraw" o = Gtk.ContainerPropagateDrawMethodInfo- ResolveStyleSchemeChooserWidgetMethod "queueComputeExpand" o = Gtk.WidgetQueueComputeExpandMethodInfo- ResolveStyleSchemeChooserWidgetMethod "queueDraw" o = Gtk.WidgetQueueDrawMethodInfo- ResolveStyleSchemeChooserWidgetMethod "queueDrawArea" o = Gtk.WidgetQueueDrawAreaMethodInfo- ResolveStyleSchemeChooserWidgetMethod "queueDrawRegion" o = Gtk.WidgetQueueDrawRegionMethodInfo- ResolveStyleSchemeChooserWidgetMethod "queueResize" o = Gtk.WidgetQueueResizeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "queueResizeNoRedraw" o = Gtk.WidgetQueueResizeNoRedrawMethodInfo- ResolveStyleSchemeChooserWidgetMethod "realize" o = Gtk.WidgetRealizeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveStyleSchemeChooserWidgetMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveStyleSchemeChooserWidgetMethod "regionIntersect" o = Gtk.WidgetRegionIntersectMethodInfo- ResolveStyleSchemeChooserWidgetMethod "registerWindow" o = Gtk.WidgetRegisterWindowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "remove" o = Gtk.ContainerRemoveMethodInfo- ResolveStyleSchemeChooserWidgetMethod "removeAccelerator" o = Gtk.WidgetRemoveAcceleratorMethodInfo- ResolveStyleSchemeChooserWidgetMethod "removeMnemonicLabel" o = Gtk.WidgetRemoveMnemonicLabelMethodInfo- ResolveStyleSchemeChooserWidgetMethod "removeTickCallback" o = Gtk.WidgetRemoveTickCallbackMethodInfo- ResolveStyleSchemeChooserWidgetMethod "renderIcon" o = Gtk.WidgetRenderIconMethodInfo- ResolveStyleSchemeChooserWidgetMethod "renderIconPixbuf" o = Gtk.WidgetRenderIconPixbufMethodInfo- ResolveStyleSchemeChooserWidgetMethod "reparent" o = Gtk.WidgetReparentMethodInfo- ResolveStyleSchemeChooserWidgetMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveStyleSchemeChooserWidgetMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveStyleSchemeChooserWidgetMethod "resetRcStyles" o = Gtk.WidgetResetRcStylesMethodInfo- ResolveStyleSchemeChooserWidgetMethod "resetStyle" o = Gtk.WidgetResetStyleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "resizeChildren" o = Gtk.ContainerResizeChildrenMethodInfo- ResolveStyleSchemeChooserWidgetMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "sendExpose" o = Gtk.WidgetSendExposeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "sendFocusChange" o = Gtk.WidgetSendFocusChangeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "shapeCombineRegion" o = Gtk.WidgetShapeCombineRegionMethodInfo- ResolveStyleSchemeChooserWidgetMethod "show" o = Gtk.WidgetShowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "showAll" o = Gtk.WidgetShowAllMethodInfo- ResolveStyleSchemeChooserWidgetMethod "showNow" o = Gtk.WidgetShowNowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "sizeAllocate" o = Gtk.WidgetSizeAllocateMethodInfo- ResolveStyleSchemeChooserWidgetMethod "sizeAllocateWithBaseline" o = Gtk.WidgetSizeAllocateWithBaselineMethodInfo- ResolveStyleSchemeChooserWidgetMethod "sizeRequest" o = Gtk.WidgetSizeRequestMethodInfo- ResolveStyleSchemeChooserWidgetMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveStyleSchemeChooserWidgetMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveStyleSchemeChooserWidgetMethod "styleAttach" o = Gtk.WidgetStyleAttachMethodInfo- ResolveStyleSchemeChooserWidgetMethod "styleGetProperty" o = Gtk.WidgetStyleGetPropertyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "thawChildNotify" o = Gtk.WidgetThawChildNotifyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "translateCoordinates" o = Gtk.WidgetTranslateCoordinatesMethodInfo- ResolveStyleSchemeChooserWidgetMethod "triggerTooltipQuery" o = Gtk.WidgetTriggerTooltipQueryMethodInfo- ResolveStyleSchemeChooserWidgetMethod "unmap" o = Gtk.WidgetUnmapMethodInfo- ResolveStyleSchemeChooserWidgetMethod "unparent" o = Gtk.WidgetUnparentMethodInfo- ResolveStyleSchemeChooserWidgetMethod "unrealize" o = Gtk.WidgetUnrealizeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveStyleSchemeChooserWidgetMethod "unregisterWindow" o = Gtk.WidgetUnregisterWindowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "unsetFocusChain" o = Gtk.ContainerUnsetFocusChainMethodInfo- ResolveStyleSchemeChooserWidgetMethod "unsetStateFlags" o = Gtk.WidgetUnsetStateFlagsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getAccessible" o = Gtk.WidgetGetAccessibleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getActionGroup" o = Gtk.WidgetGetActionGroupMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getAllocatedBaseline" o = Gtk.WidgetGetAllocatedBaselineMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getAllocatedHeight" o = Gtk.WidgetGetAllocatedHeightMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getAllocatedWidth" o = Gtk.WidgetGetAllocatedWidthMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getAllocation" o = Gtk.WidgetGetAllocationMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getAncestor" o = Gtk.WidgetGetAncestorMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getAppPaintable" o = Gtk.WidgetGetAppPaintableMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getBorderWidth" o = Gtk.ContainerGetBorderWidthMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getCanDefault" o = Gtk.WidgetGetCanDefaultMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getCanFocus" o = Gtk.WidgetGetCanFocusMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getChild" o = Gtk.BinGetChildMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getChildRequisition" o = Gtk.WidgetGetChildRequisitionMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getChildVisible" o = Gtk.WidgetGetChildVisibleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getChildren" o = Gtk.ContainerGetChildrenMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getClip" o = Gtk.WidgetGetClipMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getClipboard" o = Gtk.WidgetGetClipboardMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getCompositeName" o = Gtk.WidgetGetCompositeNameMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getDeviceEnabled" o = Gtk.WidgetGetDeviceEnabledMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getDeviceEvents" o = Gtk.WidgetGetDeviceEventsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getDirection" o = Gtk.WidgetGetDirectionMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getDisplay" o = Gtk.WidgetGetDisplayMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getDoubleBuffered" o = Gtk.WidgetGetDoubleBufferedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getEvents" o = Gtk.WidgetGetEventsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getFocusChain" o = Gtk.ContainerGetFocusChainMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getFocusChild" o = Gtk.ContainerGetFocusChildMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getFocusHadjustment" o = Gtk.ContainerGetFocusHadjustmentMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getFocusVadjustment" o = Gtk.ContainerGetFocusVadjustmentMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getFontMap" o = Gtk.WidgetGetFontMapMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getFontOptions" o = Gtk.WidgetGetFontOptionsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getFrameClock" o = Gtk.WidgetGetFrameClockMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getHalign" o = Gtk.WidgetGetHalignMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getHasTooltip" o = Gtk.WidgetGetHasTooltipMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getHasWindow" o = Gtk.WidgetGetHasWindowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getHexpand" o = Gtk.WidgetGetHexpandMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getHexpandSet" o = Gtk.WidgetGetHexpandSetMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getInternalChild" o = Gtk.BuildableGetInternalChildMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getMapped" o = Gtk.WidgetGetMappedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getMarginBottom" o = Gtk.WidgetGetMarginBottomMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getMarginEnd" o = Gtk.WidgetGetMarginEndMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getMarginLeft" o = Gtk.WidgetGetMarginLeftMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getMarginRight" o = Gtk.WidgetGetMarginRightMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getMarginStart" o = Gtk.WidgetGetMarginStartMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getMarginTop" o = Gtk.WidgetGetMarginTopMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getModifierMask" o = Gtk.WidgetGetModifierMaskMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getModifierStyle" o = Gtk.WidgetGetModifierStyleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getNoShowAll" o = Gtk.WidgetGetNoShowAllMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getOpacity" o = Gtk.WidgetGetOpacityMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getPangoContext" o = Gtk.WidgetGetPangoContextMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getParent" o = Gtk.WidgetGetParentMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getParentWindow" o = Gtk.WidgetGetParentWindowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getPath" o = Gtk.WidgetGetPathMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getPathForChild" o = Gtk.ContainerGetPathForChildMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getPointer" o = Gtk.WidgetGetPointerMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getPreferredHeight" o = Gtk.WidgetGetPreferredHeightMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getPreferredHeightForWidth" o = Gtk.WidgetGetPreferredHeightForWidthMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getPreferredSize" o = Gtk.WidgetGetPreferredSizeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getPreferredWidth" o = Gtk.WidgetGetPreferredWidthMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getPreferredWidthForHeight" o = Gtk.WidgetGetPreferredWidthForHeightMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getRealized" o = Gtk.WidgetGetRealizedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getReceivesDefault" o = Gtk.WidgetGetReceivesDefaultMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getRequestMode" o = Gtk.WidgetGetRequestModeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getRequisition" o = Gtk.WidgetGetRequisitionMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getResizeMode" o = Gtk.ContainerGetResizeModeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getRootWindow" o = Gtk.WidgetGetRootWindowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getScaleFactor" o = Gtk.WidgetGetScaleFactorMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getScreen" o = Gtk.WidgetGetScreenMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getSensitive" o = Gtk.WidgetGetSensitiveMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getSettings" o = Gtk.WidgetGetSettingsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getSizeRequest" o = Gtk.WidgetGetSizeRequestMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getState" o = Gtk.WidgetGetStateMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getStateFlags" o = Gtk.WidgetGetStateFlagsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getStyle" o = Gtk.WidgetGetStyleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getStyleContext" o = Gtk.WidgetGetStyleContextMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getStyleScheme" o = StyleSchemeChooserGetStyleSchemeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getSupportMultidevice" o = Gtk.WidgetGetSupportMultideviceMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getTemplateChild" o = Gtk.WidgetGetTemplateChildMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getTooltipMarkup" o = Gtk.WidgetGetTooltipMarkupMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getTooltipText" o = Gtk.WidgetGetTooltipTextMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getTooltipWindow" o = Gtk.WidgetGetTooltipWindowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getToplevel" o = Gtk.WidgetGetToplevelMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getValign" o = Gtk.WidgetGetValignMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getValignWithBaseline" o = Gtk.WidgetGetValignWithBaselineMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getVexpand" o = Gtk.WidgetGetVexpandMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getVexpandSet" o = Gtk.WidgetGetVexpandSetMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getVisible" o = Gtk.WidgetGetVisibleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getVisual" o = Gtk.WidgetGetVisualMethodInfo- ResolveStyleSchemeChooserWidgetMethod "getWindow" o = Gtk.WidgetGetWindowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setAccelPath" o = Gtk.WidgetSetAccelPathMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setAllocation" o = Gtk.WidgetSetAllocationMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setAppPaintable" o = Gtk.WidgetSetAppPaintableMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setBorderWidth" o = Gtk.ContainerSetBorderWidthMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setBuildableProperty" o = Gtk.BuildableSetBuildablePropertyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setCanDefault" o = Gtk.WidgetSetCanDefaultMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setCanFocus" o = Gtk.WidgetSetCanFocusMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setChildVisible" o = Gtk.WidgetSetChildVisibleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setClip" o = Gtk.WidgetSetClipMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setCompositeName" o = Gtk.WidgetSetCompositeNameMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setDeviceEnabled" o = Gtk.WidgetSetDeviceEnabledMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setDeviceEvents" o = Gtk.WidgetSetDeviceEventsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setDirection" o = Gtk.WidgetSetDirectionMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setDoubleBuffered" o = Gtk.WidgetSetDoubleBufferedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setEvents" o = Gtk.WidgetSetEventsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setFocusChain" o = Gtk.ContainerSetFocusChainMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setFocusChild" o = Gtk.ContainerSetFocusChildMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setFocusHadjustment" o = Gtk.ContainerSetFocusHadjustmentMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setFocusVadjustment" o = Gtk.ContainerSetFocusVadjustmentMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setFontMap" o = Gtk.WidgetSetFontMapMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setFontOptions" o = Gtk.WidgetSetFontOptionsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setHalign" o = Gtk.WidgetSetHalignMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setHasTooltip" o = Gtk.WidgetSetHasTooltipMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setHasWindow" o = Gtk.WidgetSetHasWindowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setHexpand" o = Gtk.WidgetSetHexpandMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setHexpandSet" o = Gtk.WidgetSetHexpandSetMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setMapped" o = Gtk.WidgetSetMappedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setMarginBottom" o = Gtk.WidgetSetMarginBottomMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setMarginEnd" o = Gtk.WidgetSetMarginEndMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setMarginLeft" o = Gtk.WidgetSetMarginLeftMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setMarginRight" o = Gtk.WidgetSetMarginRightMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setMarginStart" o = Gtk.WidgetSetMarginStartMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setMarginTop" o = Gtk.WidgetSetMarginTopMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setNoShowAll" o = Gtk.WidgetSetNoShowAllMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setOpacity" o = Gtk.WidgetSetOpacityMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setParent" o = Gtk.WidgetSetParentMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setParentWindow" o = Gtk.WidgetSetParentWindowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setRealized" o = Gtk.WidgetSetRealizedMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setReallocateRedraws" o = Gtk.ContainerSetReallocateRedrawsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setReceivesDefault" o = Gtk.WidgetSetReceivesDefaultMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setRedrawOnAllocate" o = Gtk.WidgetSetRedrawOnAllocateMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setResizeMode" o = Gtk.ContainerSetResizeModeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setSensitive" o = Gtk.WidgetSetSensitiveMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setSizeRequest" o = Gtk.WidgetSetSizeRequestMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setState" o = Gtk.WidgetSetStateMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setStateFlags" o = Gtk.WidgetSetStateFlagsMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setStyle" o = Gtk.WidgetSetStyleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setStyleScheme" o = StyleSchemeChooserSetStyleSchemeMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setSupportMultidevice" o = Gtk.WidgetSetSupportMultideviceMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setTooltipMarkup" o = Gtk.WidgetSetTooltipMarkupMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setTooltipText" o = Gtk.WidgetSetTooltipTextMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setTooltipWindow" o = Gtk.WidgetSetTooltipWindowMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setValign" o = Gtk.WidgetSetValignMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setVexpand" o = Gtk.WidgetSetVexpandMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setVexpandSet" o = Gtk.WidgetSetVexpandSetMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setVisible" o = Gtk.WidgetSetVisibleMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setVisual" o = Gtk.WidgetSetVisualMethodInfo- ResolveStyleSchemeChooserWidgetMethod "setWindow" o = Gtk.WidgetSetWindowMethodInfo- ResolveStyleSchemeChooserWidgetMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveStyleSchemeChooserWidgetMethod t StyleSchemeChooserWidget, MethodInfo info StyleSchemeChooserWidget p) => IsLabelProxy t (StyleSchemeChooserWidget -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveStyleSchemeChooserWidgetMethod t StyleSchemeChooserWidget, MethodInfo info StyleSchemeChooserWidget p) => IsLabel t (StyleSchemeChooserWidget -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif--type instance AttributeList StyleSchemeChooserWidget = StyleSchemeChooserWidgetAttributeList-type StyleSchemeChooserWidgetAttributeList = ('[ '("appPaintable", Gtk.WidgetAppPaintablePropertyInfo), '("borderWidth", Gtk.ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.WidgetCanFocusPropertyInfo), '("child", Gtk.ContainerChildPropertyInfo), '("compositeChild", Gtk.WidgetCompositeChildPropertyInfo), '("doubleBuffered", Gtk.WidgetDoubleBufferedPropertyInfo), '("events", Gtk.WidgetEventsPropertyInfo), '("expand", Gtk.WidgetExpandPropertyInfo), '("halign", Gtk.WidgetHalignPropertyInfo), '("hasDefault", Gtk.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.WidgetHexpandSetPropertyInfo), '("isFocus", Gtk.WidgetIsFocusPropertyInfo), '("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), '("receivesDefault", Gtk.WidgetReceivesDefaultPropertyInfo), '("resizeMode", Gtk.ContainerResizeModePropertyInfo), '("scaleFactor", Gtk.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.WidgetSensitivePropertyInfo), '("style", Gtk.WidgetStylePropertyInfo), '("styleScheme", StyleSchemeChooserStyleSchemePropertyInfo), '("tooltipMarkup", Gtk.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.WidgetTooltipTextPropertyInfo), '("valign", Gtk.WidgetValignPropertyInfo), '("vexpand", Gtk.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.WidgetVexpandSetPropertyInfo), '("visible", Gtk.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.WidgetWidthRequestPropertyInfo), '("window", Gtk.WidgetWindowPropertyInfo)] :: [(Symbol, *)])--type instance SignalList StyleSchemeChooserWidget = StyleSchemeChooserWidgetSignalList-type StyleSchemeChooserWidgetSignalList = ('[ '("accelClosuresChanged", Gtk.WidgetAccelClosuresChangedSignalInfo), '("add", Gtk.ContainerAddSignalInfo), '("buttonPressEvent", Gtk.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.WidgetCanActivateAccelSignalInfo), '("checkResize", Gtk.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.WidgetConfigureEventSignalInfo), '("damageEvent", Gtk.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.WidgetDeleteEventSignalInfo), '("destroy", Gtk.WidgetDestroySignalInfo), '("destroyEvent", Gtk.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.WidgetDirectionChangedSignalInfo), '("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), '("enterNotifyEvent", Gtk.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.WidgetEventSignalInfo), '("eventAfter", Gtk.WidgetEventAfterSignalInfo), '("focus", Gtk.WidgetFocusSignalInfo), '("focusInEvent", Gtk.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.WidgetGrabNotifySignalInfo), '("hide", Gtk.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.WidgetHierarchyChangedSignalInfo), '("keyPressEvent", Gtk.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.WidgetMapSignalInfo), '("mapEvent", Gtk.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.WidgetMotionNotifyEventSignalInfo), '("moveFocus", Gtk.WidgetMoveFocusSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("parentSet", Gtk.WidgetParentSetSignalInfo), '("popupMenu", Gtk.WidgetPopupMenuSignalInfo), '("propertyNotifyEvent", Gtk.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.WidgetQueryTooltipSignalInfo), '("realize", Gtk.WidgetRealizeSignalInfo), '("remove", Gtk.ContainerRemoveSignalInfo), '("screenChanged", Gtk.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.WidgetSelectionRequestEventSignalInfo), '("setFocusChild", Gtk.ContainerSetFocusChildSignalInfo), '("show", Gtk.WidgetShowSignalInfo), '("showHelp", Gtk.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.WidgetStyleUpdatedSignalInfo), '("touchEvent", Gtk.WidgetTouchEventSignalInfo), '("unmap", Gtk.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])---- method StyleSchemeChooserWidget::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "StyleSchemeChooserWidget")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_chooser_widget_new" gtk_source_style_scheme_chooser_widget_new :: - IO (Ptr StyleSchemeChooserWidget)---styleSchemeChooserWidgetNew ::- (MonadIO m) =>- m StyleSchemeChooserWidget -- result-styleSchemeChooserWidgetNew = liftIO $ do- result <- gtk_source_style_scheme_chooser_widget_new- checkUnexpectedReturnNULL "gtk_source_style_scheme_chooser_widget_new" result- result' <- (newObject StyleSchemeChooserWidget) result- return result'--
− GI/GtkSource/Objects/StyleSchemeChooserWidget.hs-boot
@@ -1,13 +0,0 @@-module GI.GtkSource.Objects.StyleSchemeChooserWidget where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype StyleSchemeChooserWidget = StyleSchemeChooserWidget (ForeignPtr StyleSchemeChooserWidget)-instance GObject StyleSchemeChooserWidget where-class GObject o => StyleSchemeChooserWidgetK o-instance (GObject o, IsDescendantOf StyleSchemeChooserWidget o) => StyleSchemeChooserWidgetK o
− GI/GtkSource/Objects/StyleSchemeManager.hs
@@ -1,477 +0,0 @@---{- |-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.GtkSource.Objects.StyleSchemeManager- ( ---- * Exported types- StyleSchemeManager(..) ,- StyleSchemeManagerK ,- toStyleSchemeManager ,- noStyleSchemeManager ,--- -- * Methods--- ** styleSchemeManagerAppendSearchPath- StyleSchemeManagerAppendSearchPathMethodInfo,- styleSchemeManagerAppendSearchPath ,----- ** styleSchemeManagerForceRescan- StyleSchemeManagerForceRescanMethodInfo ,- styleSchemeManagerForceRescan ,----- ** styleSchemeManagerGetDefault- styleSchemeManagerGetDefault ,----- ** styleSchemeManagerGetScheme- StyleSchemeManagerGetSchemeMethodInfo ,- styleSchemeManagerGetScheme ,----- ** styleSchemeManagerGetSchemeIds- StyleSchemeManagerGetSchemeIdsMethodInfo,- styleSchemeManagerGetSchemeIds ,----- ** styleSchemeManagerGetSearchPath- StyleSchemeManagerGetSearchPathMethodInfo,- styleSchemeManagerGetSearchPath ,----- ** styleSchemeManagerNew- styleSchemeManagerNew ,----- ** styleSchemeManagerPrependSearchPath- StyleSchemeManagerPrependSearchPathMethodInfo,- styleSchemeManagerPrependSearchPath ,----- ** styleSchemeManagerSetSearchPath- StyleSchemeManagerSetSearchPathMethodInfo,- styleSchemeManagerSetSearchPath ,----- -- * Properties--- ** SchemeIds- StyleSchemeManagerSchemeIdsPropertyInfo ,- getStyleSchemeManagerSchemeIds ,- styleSchemeManagerSchemeIds ,----- ** SearchPath- StyleSchemeManagerSearchPathPropertyInfo,- clearStyleSchemeManagerSearchPath ,- constructStyleSchemeManagerSearchPath ,- getStyleSchemeManagerSearchPath ,- setStyleSchemeManagerSearchPath ,- styleSchemeManagerSearchPath ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.GObject as GObject--newtype StyleSchemeManager = StyleSchemeManager (ForeignPtr StyleSchemeManager)-foreign import ccall "gtk_source_style_scheme_manager_get_type"- c_gtk_source_style_scheme_manager_get_type :: IO GType--type instance ParentTypes StyleSchemeManager = StyleSchemeManagerParentTypes-type StyleSchemeManagerParentTypes = '[GObject.Object]--instance GObject StyleSchemeManager where- gobjectIsInitiallyUnowned _ = False- gobjectType _ = c_gtk_source_style_scheme_manager_get_type- --class GObject o => StyleSchemeManagerK o-instance (GObject o, IsDescendantOf StyleSchemeManager o) => StyleSchemeManagerK o--toStyleSchemeManager :: StyleSchemeManagerK o => o -> IO StyleSchemeManager-toStyleSchemeManager = unsafeCastTo StyleSchemeManager--noStyleSchemeManager :: Maybe StyleSchemeManager-noStyleSchemeManager = Nothing--type family ResolveStyleSchemeManagerMethod (t :: Symbol) (o :: *) :: * where- ResolveStyleSchemeManagerMethod "appendSearchPath" o = StyleSchemeManagerAppendSearchPathMethodInfo- ResolveStyleSchemeManagerMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveStyleSchemeManagerMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveStyleSchemeManagerMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveStyleSchemeManagerMethod "forceRescan" o = StyleSchemeManagerForceRescanMethodInfo- ResolveStyleSchemeManagerMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveStyleSchemeManagerMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveStyleSchemeManagerMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveStyleSchemeManagerMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveStyleSchemeManagerMethod "prependSearchPath" o = StyleSchemeManagerPrependSearchPathMethodInfo- ResolveStyleSchemeManagerMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveStyleSchemeManagerMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveStyleSchemeManagerMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveStyleSchemeManagerMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveStyleSchemeManagerMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveStyleSchemeManagerMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveStyleSchemeManagerMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveStyleSchemeManagerMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveStyleSchemeManagerMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveStyleSchemeManagerMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveStyleSchemeManagerMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveStyleSchemeManagerMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveStyleSchemeManagerMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveStyleSchemeManagerMethod "getScheme" o = StyleSchemeManagerGetSchemeMethodInfo- ResolveStyleSchemeManagerMethod "getSchemeIds" o = StyleSchemeManagerGetSchemeIdsMethodInfo- ResolveStyleSchemeManagerMethod "getSearchPath" o = StyleSchemeManagerGetSearchPathMethodInfo- ResolveStyleSchemeManagerMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveStyleSchemeManagerMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveStyleSchemeManagerMethod "setSearchPath" o = StyleSchemeManagerSetSearchPathMethodInfo- ResolveStyleSchemeManagerMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveStyleSchemeManagerMethod t StyleSchemeManager, MethodInfo info StyleSchemeManager p) => IsLabelProxy t (StyleSchemeManager -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveStyleSchemeManagerMethod t StyleSchemeManager, MethodInfo info StyleSchemeManager p) => IsLabel t (StyleSchemeManager -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- VVV Prop "scheme-ids"- -- Type: TCArray True (-1) (-1) (TBasicType TUTF8)- -- Flags: [PropertyReadable]- -- Nullable: (Just True,Nothing)--getStyleSchemeManagerSchemeIds :: (MonadIO m, StyleSchemeManagerK o) => o -> m (Maybe [T.Text])-getStyleSchemeManagerSchemeIds obj = liftIO $ getObjectPropertyStringArray obj "scheme-ids"--data StyleSchemeManagerSchemeIdsPropertyInfo-instance AttrInfo StyleSchemeManagerSchemeIdsPropertyInfo where- type AttrAllowedOps StyleSchemeManagerSchemeIdsPropertyInfo = '[ 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint StyleSchemeManagerSchemeIdsPropertyInfo = (~) ()- type AttrBaseTypeConstraint StyleSchemeManagerSchemeIdsPropertyInfo = StyleSchemeManagerK- type AttrGetType StyleSchemeManagerSchemeIdsPropertyInfo = (Maybe [T.Text])- type AttrLabel StyleSchemeManagerSchemeIdsPropertyInfo = "scheme-ids"- attrGet _ = getStyleSchemeManagerSchemeIds- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "search-path"- -- Type: TCArray True (-1) (-1) (TBasicType TUTF8)- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just True)--getStyleSchemeManagerSearchPath :: (MonadIO m, StyleSchemeManagerK o) => o -> m [T.Text]-getStyleSchemeManagerSearchPath obj = liftIO $ checkUnexpectedNothing "getStyleSchemeManagerSearchPath" $ getObjectPropertyStringArray obj "search-path"--setStyleSchemeManagerSearchPath :: (MonadIO m, StyleSchemeManagerK o) => o -> [T.Text] -> m ()-setStyleSchemeManagerSearchPath obj val = liftIO $ setObjectPropertyStringArray obj "search-path" (Just val)--constructStyleSchemeManagerSearchPath :: [T.Text] -> IO ([Char], GValue)-constructStyleSchemeManagerSearchPath val = constructObjectPropertyStringArray "search-path" (Just val)--clearStyleSchemeManagerSearchPath :: (MonadIO m, StyleSchemeManagerK o) => o -> m ()-clearStyleSchemeManagerSearchPath obj = liftIO $ setObjectPropertyStringArray obj "search-path" (Nothing :: Maybe [T.Text])--data StyleSchemeManagerSearchPathPropertyInfo-instance AttrInfo StyleSchemeManagerSearchPathPropertyInfo where- type AttrAllowedOps StyleSchemeManagerSearchPathPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint StyleSchemeManagerSearchPathPropertyInfo = (~) [T.Text]- type AttrBaseTypeConstraint StyleSchemeManagerSearchPathPropertyInfo = StyleSchemeManagerK- type AttrGetType StyleSchemeManagerSearchPathPropertyInfo = [T.Text]- type AttrLabel StyleSchemeManagerSearchPathPropertyInfo = "search-path"- attrGet _ = getStyleSchemeManagerSearchPath- attrSet _ = setStyleSchemeManagerSearchPath- attrConstruct _ = constructStyleSchemeManagerSearchPath- attrClear _ = clearStyleSchemeManagerSearchPath--type instance AttributeList StyleSchemeManager = StyleSchemeManagerAttributeList-type StyleSchemeManagerAttributeList = ('[ '("schemeIds", StyleSchemeManagerSchemeIdsPropertyInfo), '("searchPath", StyleSchemeManagerSearchPathPropertyInfo)] :: [(Symbol, *)])--styleSchemeManagerSchemeIds :: AttrLabelProxy "schemeIds"-styleSchemeManagerSchemeIds = AttrLabelProxy--styleSchemeManagerSearchPath :: AttrLabelProxy "searchPath"-styleSchemeManagerSearchPath = AttrLabelProxy--type instance SignalList StyleSchemeManager = StyleSchemeManagerSignalList-type StyleSchemeManagerSignalList = ('[ '("notify", GObject.ObjectNotifySignalInfo)] :: [(Symbol, *)])---- method StyleSchemeManager::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "StyleSchemeManager")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_manager_new" gtk_source_style_scheme_manager_new :: - IO (Ptr StyleSchemeManager)---styleSchemeManagerNew ::- (MonadIO m) =>- m StyleSchemeManager -- result-styleSchemeManagerNew = liftIO $ do- result <- gtk_source_style_scheme_manager_new- checkUnexpectedReturnNULL "gtk_source_style_scheme_manager_new" result- result' <- (wrapObject StyleSchemeManager) result- return result'---- method StyleSchemeManager::append_search_path--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleSchemeManager", 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 : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_manager_append_search_path" gtk_source_style_scheme_manager_append_search_path :: - Ptr StyleSchemeManager -> -- _obj : TInterface "GtkSource" "StyleSchemeManager"- CString -> -- path : TBasicType TUTF8- IO ()---styleSchemeManagerAppendSearchPath ::- (MonadIO m, StyleSchemeManagerK a) =>- a -- _obj- -> T.Text -- path- -> m () -- result-styleSchemeManagerAppendSearchPath _obj path = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- path' <- textToCString path- gtk_source_style_scheme_manager_append_search_path _obj' path'- touchManagedPtr _obj- freeMem path'- return ()--data StyleSchemeManagerAppendSearchPathMethodInfo-instance (signature ~ (T.Text -> m ()), MonadIO m, StyleSchemeManagerK a) => MethodInfo StyleSchemeManagerAppendSearchPathMethodInfo a signature where- overloadedMethod _ = styleSchemeManagerAppendSearchPath---- method StyleSchemeManager::force_rescan--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleSchemeManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_manager_force_rescan" gtk_source_style_scheme_manager_force_rescan :: - Ptr StyleSchemeManager -> -- _obj : TInterface "GtkSource" "StyleSchemeManager"- IO ()---styleSchemeManagerForceRescan ::- (MonadIO m, StyleSchemeManagerK a) =>- a -- _obj- -> m () -- result-styleSchemeManagerForceRescan _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_style_scheme_manager_force_rescan _obj'- touchManagedPtr _obj- return ()--data StyleSchemeManagerForceRescanMethodInfo-instance (signature ~ (m ()), MonadIO m, StyleSchemeManagerK a) => MethodInfo StyleSchemeManagerForceRescanMethodInfo a signature where- overloadedMethod _ = styleSchemeManagerForceRescan---- method StyleSchemeManager::get_scheme--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleSchemeManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "scheme_id", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "StyleScheme")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_manager_get_scheme" gtk_source_style_scheme_manager_get_scheme :: - Ptr StyleSchemeManager -> -- _obj : TInterface "GtkSource" "StyleSchemeManager"- CString -> -- scheme_id : TBasicType TUTF8- IO (Ptr StyleScheme)---styleSchemeManagerGetScheme ::- (MonadIO m, StyleSchemeManagerK a) =>- a -- _obj- -> T.Text -- schemeId- -> m StyleScheme -- result-styleSchemeManagerGetScheme _obj schemeId = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- schemeId' <- textToCString schemeId- result <- gtk_source_style_scheme_manager_get_scheme _obj' schemeId'- checkUnexpectedReturnNULL "gtk_source_style_scheme_manager_get_scheme" result- result' <- (newObject StyleScheme) result- touchManagedPtr _obj- freeMem schemeId'- return result'--data StyleSchemeManagerGetSchemeMethodInfo-instance (signature ~ (T.Text -> m StyleScheme), MonadIO m, StyleSchemeManagerK a) => MethodInfo StyleSchemeManagerGetSchemeMethodInfo a signature where- overloadedMethod _ = styleSchemeManagerGetScheme---- method StyleSchemeManager::get_scheme_ids--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleSchemeManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TCArray True (-1) (-1) (TBasicType TUTF8))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_manager_get_scheme_ids" gtk_source_style_scheme_manager_get_scheme_ids :: - Ptr StyleSchemeManager -> -- _obj : TInterface "GtkSource" "StyleSchemeManager"- IO (Ptr CString)---styleSchemeManagerGetSchemeIds ::- (MonadIO m, StyleSchemeManagerK a) =>- a -- _obj- -> m (Maybe [T.Text]) -- result-styleSchemeManagerGetSchemeIds _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_style_scheme_manager_get_scheme_ids _obj'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- unpackZeroTerminatedUTF8CArray result'- return result''- touchManagedPtr _obj- return maybeResult--data StyleSchemeManagerGetSchemeIdsMethodInfo-instance (signature ~ (m (Maybe [T.Text])), MonadIO m, StyleSchemeManagerK a) => MethodInfo StyleSchemeManagerGetSchemeIdsMethodInfo a signature where- overloadedMethod _ = styleSchemeManagerGetSchemeIds---- method StyleSchemeManager::get_search_path--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleSchemeManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TCArray True (-1) (-1) (TBasicType TUTF8))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_manager_get_search_path" gtk_source_style_scheme_manager_get_search_path :: - Ptr StyleSchemeManager -> -- _obj : TInterface "GtkSource" "StyleSchemeManager"- IO (Ptr CString)---styleSchemeManagerGetSearchPath ::- (MonadIO m, StyleSchemeManagerK a) =>- a -- _obj- -> m [T.Text] -- result-styleSchemeManagerGetSearchPath _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_style_scheme_manager_get_search_path _obj'- checkUnexpectedReturnNULL "gtk_source_style_scheme_manager_get_search_path" result- result' <- unpackZeroTerminatedUTF8CArray result- touchManagedPtr _obj- return result'--data StyleSchemeManagerGetSearchPathMethodInfo-instance (signature ~ (m [T.Text]), MonadIO m, StyleSchemeManagerK a) => MethodInfo StyleSchemeManagerGetSearchPathMethodInfo a signature where- overloadedMethod _ = styleSchemeManagerGetSearchPath---- method StyleSchemeManager::prepend_search_path--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleSchemeManager", 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 : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_manager_prepend_search_path" gtk_source_style_scheme_manager_prepend_search_path :: - Ptr StyleSchemeManager -> -- _obj : TInterface "GtkSource" "StyleSchemeManager"- CString -> -- path : TBasicType TUTF8- IO ()---styleSchemeManagerPrependSearchPath ::- (MonadIO m, StyleSchemeManagerK a) =>- a -- _obj- -> T.Text -- path- -> m () -- result-styleSchemeManagerPrependSearchPath _obj path = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- path' <- textToCString path- gtk_source_style_scheme_manager_prepend_search_path _obj' path'- touchManagedPtr _obj- freeMem path'- return ()--data StyleSchemeManagerPrependSearchPathMethodInfo-instance (signature ~ (T.Text -> m ()), MonadIO m, StyleSchemeManagerK a) => MethodInfo StyleSchemeManagerPrependSearchPathMethodInfo a signature where- overloadedMethod _ = styleSchemeManagerPrependSearchPath---- method StyleSchemeManager::set_search_path--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "StyleSchemeManager", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "path", argType = TCArray True (-1) (-1) (TBasicType TUTF8), direction = DirectionIn, mayBeNull = True, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_manager_set_search_path" gtk_source_style_scheme_manager_set_search_path :: - Ptr StyleSchemeManager -> -- _obj : TInterface "GtkSource" "StyleSchemeManager"- Ptr CString -> -- path : TCArray True (-1) (-1) (TBasicType TUTF8)- IO ()---styleSchemeManagerSetSearchPath ::- (MonadIO m, StyleSchemeManagerK a) =>- a -- _obj- -> Maybe ([T.Text]) -- path- -> m () -- result-styleSchemeManagerSetSearchPath _obj path = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- maybePath <- case path of- Nothing -> return nullPtr- Just jPath -> do- jPath' <- packZeroTerminatedUTF8CArray jPath- return jPath'- gtk_source_style_scheme_manager_set_search_path _obj' maybePath- touchManagedPtr _obj- mapZeroTerminatedCArray freeMem maybePath- freeMem maybePath- return ()--data StyleSchemeManagerSetSearchPathMethodInfo-instance (signature ~ (Maybe ([T.Text]) -> m ()), MonadIO m, StyleSchemeManagerK a) => MethodInfo StyleSchemeManagerSetSearchPathMethodInfo a signature where- overloadedMethod _ = styleSchemeManagerSetSearchPath---- method StyleSchemeManager::get_default--- method type : MemberFunction--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "StyleSchemeManager")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_style_scheme_manager_get_default" gtk_source_style_scheme_manager_get_default :: - IO (Ptr StyleSchemeManager)---styleSchemeManagerGetDefault ::- (MonadIO m) =>- m StyleSchemeManager -- result-styleSchemeManagerGetDefault = liftIO $ do- result <- gtk_source_style_scheme_manager_get_default- checkUnexpectedReturnNULL "gtk_source_style_scheme_manager_get_default" result- result' <- (newObject StyleSchemeManager) result- return result'--
− GI/GtkSource/Objects/StyleSchemeManager.hs-boot
@@ -1,22 +0,0 @@-module GI.GtkSource.Objects.StyleSchemeManager where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype StyleSchemeManager = StyleSchemeManager (ForeignPtr StyleSchemeManager)-instance GObject StyleSchemeManager where-class GObject o => StyleSchemeManagerK o-instance (GObject o, IsDescendantOf StyleSchemeManager o) => StyleSchemeManagerK o-data StyleSchemeManagerSchemeIdsPropertyInfo-data StyleSchemeManagerSearchPathPropertyInfo-data StyleSchemeManagerAppendSearchPathMethodInfo-data StyleSchemeManagerForceRescanMethodInfo-data StyleSchemeManagerGetSchemeMethodInfo-data StyleSchemeManagerGetSchemeIdsMethodInfo-data StyleSchemeManagerGetSearchPathMethodInfo-data StyleSchemeManagerPrependSearchPathMethodInfo-data StyleSchemeManagerSetSearchPathMethodInfo
− GI/GtkSource/Objects/View.hs
@@ -1,2958 +0,0 @@---{- |-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.GtkSource.Objects.View- ( ---- * Exported types- View(..) ,- ViewK ,- toView ,- noView ,--- -- * Methods--- ** viewGetAutoIndent- ViewGetAutoIndentMethodInfo ,- viewGetAutoIndent ,----- ** viewGetBackgroundPattern- ViewGetBackgroundPatternMethodInfo ,- viewGetBackgroundPattern ,----- ** viewGetCompletion- ViewGetCompletionMethodInfo ,- viewGetCompletion ,----- ** viewGetDrawSpaces- ViewGetDrawSpacesMethodInfo ,- viewGetDrawSpaces ,----- ** viewGetGutter- ViewGetGutterMethodInfo ,- viewGetGutter ,----- ** viewGetHighlightCurrentLine- ViewGetHighlightCurrentLineMethodInfo ,- viewGetHighlightCurrentLine ,----- ** viewGetIndentOnTab- ViewGetIndentOnTabMethodInfo ,- viewGetIndentOnTab ,----- ** viewGetIndentWidth- ViewGetIndentWidthMethodInfo ,- viewGetIndentWidth ,----- ** viewGetInsertSpacesInsteadOfTabs- ViewGetInsertSpacesInsteadOfTabsMethodInfo,- viewGetInsertSpacesInsteadOfTabs ,----- ** viewGetMarkAttributes- ViewGetMarkAttributesMethodInfo ,- viewGetMarkAttributes ,----- ** viewGetRightMarginPosition- ViewGetRightMarginPositionMethodInfo ,- viewGetRightMarginPosition ,----- ** viewGetShowLineMarks- ViewGetShowLineMarksMethodInfo ,- viewGetShowLineMarks ,----- ** viewGetShowLineNumbers- ViewGetShowLineNumbersMethodInfo ,- viewGetShowLineNumbers ,----- ** viewGetShowRightMargin- ViewGetShowRightMarginMethodInfo ,- viewGetShowRightMargin ,----- ** viewGetSmartBackspace- ViewGetSmartBackspaceMethodInfo ,- viewGetSmartBackspace ,----- ** viewGetSmartHomeEnd- ViewGetSmartHomeEndMethodInfo ,- viewGetSmartHomeEnd ,----- ** viewGetTabWidth- ViewGetTabWidthMethodInfo ,- viewGetTabWidth ,----- ** viewGetVisualColumn- ViewGetVisualColumnMethodInfo ,- viewGetVisualColumn ,----- ** viewIndentLines- ViewIndentLinesMethodInfo ,- viewIndentLines ,----- ** viewNew- viewNew ,----- ** viewNewWithBuffer- viewNewWithBuffer ,----- ** viewSetAutoIndent- ViewSetAutoIndentMethodInfo ,- viewSetAutoIndent ,----- ** viewSetBackgroundPattern- ViewSetBackgroundPatternMethodInfo ,- viewSetBackgroundPattern ,----- ** viewSetDrawSpaces- ViewSetDrawSpacesMethodInfo ,- viewSetDrawSpaces ,----- ** viewSetHighlightCurrentLine- ViewSetHighlightCurrentLineMethodInfo ,- viewSetHighlightCurrentLine ,----- ** viewSetIndentOnTab- ViewSetIndentOnTabMethodInfo ,- viewSetIndentOnTab ,----- ** viewSetIndentWidth- ViewSetIndentWidthMethodInfo ,- viewSetIndentWidth ,----- ** viewSetInsertSpacesInsteadOfTabs- ViewSetInsertSpacesInsteadOfTabsMethodInfo,- viewSetInsertSpacesInsteadOfTabs ,----- ** viewSetMarkAttributes- ViewSetMarkAttributesMethodInfo ,- viewSetMarkAttributes ,----- ** viewSetRightMarginPosition- ViewSetRightMarginPositionMethodInfo ,- viewSetRightMarginPosition ,----- ** viewSetShowLineMarks- ViewSetShowLineMarksMethodInfo ,- viewSetShowLineMarks ,----- ** viewSetShowLineNumbers- ViewSetShowLineNumbersMethodInfo ,- viewSetShowLineNumbers ,----- ** viewSetShowRightMargin- ViewSetShowRightMarginMethodInfo ,- viewSetShowRightMargin ,----- ** viewSetSmartBackspace- ViewSetSmartBackspaceMethodInfo ,- viewSetSmartBackspace ,----- ** viewSetSmartHomeEnd- ViewSetSmartHomeEndMethodInfo ,- viewSetSmartHomeEnd ,----- ** viewSetTabWidth- ViewSetTabWidthMethodInfo ,- viewSetTabWidth ,----- ** viewUnindentLines- ViewUnindentLinesMethodInfo ,- viewUnindentLines ,----- -- * Properties--- ** AutoIndent- ViewAutoIndentPropertyInfo ,- constructViewAutoIndent ,- getViewAutoIndent ,- setViewAutoIndent ,- viewAutoIndent ,----- ** BackgroundPattern- ViewBackgroundPatternPropertyInfo ,- constructViewBackgroundPattern ,- getViewBackgroundPattern ,- setViewBackgroundPattern ,- viewBackgroundPattern ,----- ** Completion- ViewCompletionPropertyInfo ,- getViewCompletion ,- viewCompletion ,----- ** DrawSpaces- ViewDrawSpacesPropertyInfo ,- constructViewDrawSpaces ,- getViewDrawSpaces ,- setViewDrawSpaces ,- viewDrawSpaces ,----- ** HighlightCurrentLine- ViewHighlightCurrentLinePropertyInfo ,- constructViewHighlightCurrentLine ,- getViewHighlightCurrentLine ,- setViewHighlightCurrentLine ,- viewHighlightCurrentLine ,----- ** IndentOnTab- ViewIndentOnTabPropertyInfo ,- constructViewIndentOnTab ,- getViewIndentOnTab ,- setViewIndentOnTab ,- viewIndentOnTab ,----- ** IndentWidth- ViewIndentWidthPropertyInfo ,- constructViewIndentWidth ,- getViewIndentWidth ,- setViewIndentWidth ,- viewIndentWidth ,----- ** InsertSpacesInsteadOfTabs- ViewInsertSpacesInsteadOfTabsPropertyInfo,- constructViewInsertSpacesInsteadOfTabs ,- getViewInsertSpacesInsteadOfTabs ,- setViewInsertSpacesInsteadOfTabs ,- viewInsertSpacesInsteadOfTabs ,----- ** RightMarginPosition- ViewRightMarginPositionPropertyInfo ,- constructViewRightMarginPosition ,- getViewRightMarginPosition ,- setViewRightMarginPosition ,- viewRightMarginPosition ,----- ** ShowLineMarks- ViewShowLineMarksPropertyInfo ,- constructViewShowLineMarks ,- getViewShowLineMarks ,- setViewShowLineMarks ,- viewShowLineMarks ,----- ** ShowLineNumbers- ViewShowLineNumbersPropertyInfo ,- constructViewShowLineNumbers ,- getViewShowLineNumbers ,- setViewShowLineNumbers ,- viewShowLineNumbers ,----- ** ShowRightMargin- ViewShowRightMarginPropertyInfo ,- constructViewShowRightMargin ,- getViewShowRightMargin ,- setViewShowRightMargin ,- viewShowRightMargin ,----- ** SmartBackspace- ViewSmartBackspacePropertyInfo ,- constructViewSmartBackspace ,- getViewSmartBackspace ,- setViewSmartBackspace ,- viewSmartBackspace ,----- ** SmartHomeEnd- ViewSmartHomeEndPropertyInfo ,- constructViewSmartHomeEnd ,- getViewSmartHomeEnd ,- setViewSmartHomeEnd ,- viewSmartHomeEnd ,----- ** TabWidth- ViewTabWidthPropertyInfo ,- constructViewTabWidth ,- getViewTabWidth ,- setViewTabWidth ,- viewTabWidth ,----- -- * Signals--- ** ChangeCase- ViewChangeCaseCallback ,- ViewChangeCaseCallbackC ,- ViewChangeCaseSignalInfo ,- afterViewChangeCase ,- mkViewChangeCaseCallback ,- noViewChangeCaseCallback ,- onViewChangeCase ,- viewChangeCaseCallbackWrapper ,- viewChangeCaseClosure ,----- ** ChangeNumber- ViewChangeNumberCallback ,- ViewChangeNumberCallbackC ,- ViewChangeNumberSignalInfo ,- afterViewChangeNumber ,- mkViewChangeNumberCallback ,- noViewChangeNumberCallback ,- onViewChangeNumber ,- viewChangeNumberCallbackWrapper ,- viewChangeNumberClosure ,----- ** JoinLines- ViewJoinLinesCallback ,- ViewJoinLinesCallbackC ,- ViewJoinLinesSignalInfo ,- afterViewJoinLines ,- mkViewJoinLinesCallback ,- noViewJoinLinesCallback ,- onViewJoinLines ,- viewJoinLinesCallbackWrapper ,- viewJoinLinesClosure ,----- ** LineMarkActivated- ViewLineMarkActivatedCallback ,- ViewLineMarkActivatedCallbackC ,- ViewLineMarkActivatedSignalInfo ,- afterViewLineMarkActivated ,- mkViewLineMarkActivatedCallback ,- noViewLineMarkActivatedCallback ,- onViewLineMarkActivated ,- viewLineMarkActivatedCallbackWrapper ,- viewLineMarkActivatedClosure ,----- ** MoveLines- ViewMoveLinesCallback ,- ViewMoveLinesCallbackC ,- ViewMoveLinesSignalInfo ,- afterViewMoveLines ,- mkViewMoveLinesCallback ,- noViewMoveLinesCallback ,- onViewMoveLines ,- viewMoveLinesCallbackWrapper ,- viewMoveLinesClosure ,----- ** MoveToMatchingBracket- ViewMoveToMatchingBracketCallback ,- ViewMoveToMatchingBracketCallbackC ,- ViewMoveToMatchingBracketSignalInfo ,- afterViewMoveToMatchingBracket ,- mkViewMoveToMatchingBracketCallback ,- noViewMoveToMatchingBracketCallback ,- onViewMoveToMatchingBracket ,- viewMoveToMatchingBracketCallbackWrapper,- viewMoveToMatchingBracketClosure ,----- ** MoveWords- ViewMoveWordsCallback ,- ViewMoveWordsCallbackC ,- ViewMoveWordsSignalInfo ,- afterViewMoveWords ,- mkViewMoveWordsCallback ,- noViewMoveWordsCallback ,- onViewMoveWords ,- viewMoveWordsCallbackWrapper ,- viewMoveWordsClosure ,----- ** Redo- ViewRedoCallback ,- ViewRedoCallbackC ,- ViewRedoSignalInfo ,- afterViewRedo ,- mkViewRedoCallback ,- noViewRedoCallback ,- onViewRedo ,- viewRedoCallbackWrapper ,- viewRedoClosure ,----- ** ShowCompletion- ViewShowCompletionCallback ,- ViewShowCompletionCallbackC ,- ViewShowCompletionSignalInfo ,- afterViewShowCompletion ,- mkViewShowCompletionCallback ,- noViewShowCompletionCallback ,- onViewShowCompletion ,- viewShowCompletionCallbackWrapper ,- viewShowCompletionClosure ,----- ** SmartHomeEnd- ViewSmartHomeEndCallback ,- ViewSmartHomeEndCallbackC ,- ViewSmartHomeEndSignalInfo ,- afterViewSmartHomeEnd ,- mkViewSmartHomeEndCallback ,- noViewSmartHomeEndCallback ,- onViewSmartHomeEnd ,- viewSmartHomeEndCallbackWrapper ,- viewSmartHomeEndClosure ,----- ** Undo- ViewUndoCallback ,- ViewUndoCallbackC ,- ViewUndoSignalInfo ,- afterViewUndo ,- mkViewUndoCallback ,- noViewUndoCallback ,- onViewUndo ,- viewUndoCallbackWrapper ,- viewUndoClosure ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks-import qualified GI.Atk as Atk-import qualified GI.GObject as GObject-import qualified GI.Gdk as Gdk-import qualified GI.Gtk as Gtk--newtype View = View (ForeignPtr View)-foreign import ccall "gtk_source_view_get_type"- c_gtk_source_view_get_type :: IO GType--type instance ParentTypes View = ViewParentTypes-type ViewParentTypes = '[Gtk.TextView, Gtk.Container, Gtk.Widget, GObject.Object, Atk.ImplementorIface, Gtk.Buildable, Gtk.Scrollable]--instance GObject View where- gobjectIsInitiallyUnowned _ = True- gobjectType _ = c_gtk_source_view_get_type- --class GObject o => ViewK o-instance (GObject o, IsDescendantOf View o) => ViewK o--toView :: ViewK o => o -> IO View-toView = unsafeCastTo View--noView :: Maybe View-noView = Nothing--type family ResolveViewMethod (t :: Symbol) (o :: *) :: * where- ResolveViewMethod "activate" o = Gtk.WidgetActivateMethodInfo- ResolveViewMethod "add" o = Gtk.ContainerAddMethodInfo- ResolveViewMethod "addAccelerator" o = Gtk.WidgetAddAcceleratorMethodInfo- ResolveViewMethod "addChild" o = Gtk.BuildableAddChildMethodInfo- ResolveViewMethod "addChildAtAnchor" o = Gtk.TextViewAddChildAtAnchorMethodInfo- ResolveViewMethod "addChildInWindow" o = Gtk.TextViewAddChildInWindowMethodInfo- ResolveViewMethod "addDeviceEvents" o = Gtk.WidgetAddDeviceEventsMethodInfo- ResolveViewMethod "addEvents" o = Gtk.WidgetAddEventsMethodInfo- ResolveViewMethod "addMnemonicLabel" o = Gtk.WidgetAddMnemonicLabelMethodInfo- ResolveViewMethod "addTickCallback" o = Gtk.WidgetAddTickCallbackMethodInfo- ResolveViewMethod "backwardDisplayLine" o = Gtk.TextViewBackwardDisplayLineMethodInfo- ResolveViewMethod "backwardDisplayLineStart" o = Gtk.TextViewBackwardDisplayLineStartMethodInfo- ResolveViewMethod "bindProperty" o = GObject.ObjectBindPropertyMethodInfo- ResolveViewMethod "bindPropertyFull" o = GObject.ObjectBindPropertyFullMethodInfo- ResolveViewMethod "bufferToWindowCoords" o = Gtk.TextViewBufferToWindowCoordsMethodInfo- ResolveViewMethod "canActivateAccel" o = Gtk.WidgetCanActivateAccelMethodInfo- ResolveViewMethod "checkResize" o = Gtk.ContainerCheckResizeMethodInfo- ResolveViewMethod "childFocus" o = Gtk.WidgetChildFocusMethodInfo- ResolveViewMethod "childGetProperty" o = Gtk.ContainerChildGetPropertyMethodInfo- ResolveViewMethod "childNotifyByPspec" o = Gtk.ContainerChildNotifyByPspecMethodInfo- ResolveViewMethod "childSetProperty" o = Gtk.ContainerChildSetPropertyMethodInfo- ResolveViewMethod "childType" o = Gtk.ContainerChildTypeMethodInfo- ResolveViewMethod "classPath" o = Gtk.WidgetClassPathMethodInfo- ResolveViewMethod "computeExpand" o = Gtk.WidgetComputeExpandMethodInfo- ResolveViewMethod "constructChild" o = Gtk.BuildableConstructChildMethodInfo- ResolveViewMethod "createPangoContext" o = Gtk.WidgetCreatePangoContextMethodInfo- ResolveViewMethod "createPangoLayout" o = Gtk.WidgetCreatePangoLayoutMethodInfo- ResolveViewMethod "customFinished" o = Gtk.BuildableCustomFinishedMethodInfo- ResolveViewMethod "customTagEnd" o = Gtk.BuildableCustomTagEndMethodInfo- ResolveViewMethod "customTagStart" o = Gtk.BuildableCustomTagStartMethodInfo- ResolveViewMethod "destroy" o = Gtk.WidgetDestroyMethodInfo- ResolveViewMethod "destroyed" o = Gtk.WidgetDestroyedMethodInfo- ResolveViewMethod "deviceIsShadowed" o = Gtk.WidgetDeviceIsShadowedMethodInfo- ResolveViewMethod "dragBegin" o = Gtk.WidgetDragBeginMethodInfo- ResolveViewMethod "dragBeginWithCoordinates" o = Gtk.WidgetDragBeginWithCoordinatesMethodInfo- ResolveViewMethod "dragCheckThreshold" o = Gtk.WidgetDragCheckThresholdMethodInfo- ResolveViewMethod "dragDestAddImageTargets" o = Gtk.WidgetDragDestAddImageTargetsMethodInfo- ResolveViewMethod "dragDestAddTextTargets" o = Gtk.WidgetDragDestAddTextTargetsMethodInfo- ResolveViewMethod "dragDestAddUriTargets" o = Gtk.WidgetDragDestAddUriTargetsMethodInfo- ResolveViewMethod "dragDestFindTarget" o = Gtk.WidgetDragDestFindTargetMethodInfo- ResolveViewMethod "dragDestGetTargetList" o = Gtk.WidgetDragDestGetTargetListMethodInfo- ResolveViewMethod "dragDestGetTrackMotion" o = Gtk.WidgetDragDestGetTrackMotionMethodInfo- ResolveViewMethod "dragDestSet" o = Gtk.WidgetDragDestSetMethodInfo- ResolveViewMethod "dragDestSetProxy" o = Gtk.WidgetDragDestSetProxyMethodInfo- ResolveViewMethod "dragDestSetTargetList" o = Gtk.WidgetDragDestSetTargetListMethodInfo- ResolveViewMethod "dragDestSetTrackMotion" o = Gtk.WidgetDragDestSetTrackMotionMethodInfo- ResolveViewMethod "dragDestUnset" o = Gtk.WidgetDragDestUnsetMethodInfo- ResolveViewMethod "dragGetData" o = Gtk.WidgetDragGetDataMethodInfo- ResolveViewMethod "dragHighlight" o = Gtk.WidgetDragHighlightMethodInfo- ResolveViewMethod "dragSourceAddImageTargets" o = Gtk.WidgetDragSourceAddImageTargetsMethodInfo- ResolveViewMethod "dragSourceAddTextTargets" o = Gtk.WidgetDragSourceAddTextTargetsMethodInfo- ResolveViewMethod "dragSourceAddUriTargets" o = Gtk.WidgetDragSourceAddUriTargetsMethodInfo- ResolveViewMethod "dragSourceGetTargetList" o = Gtk.WidgetDragSourceGetTargetListMethodInfo- ResolveViewMethod "dragSourceSet" o = Gtk.WidgetDragSourceSetMethodInfo- ResolveViewMethod "dragSourceSetIconGicon" o = Gtk.WidgetDragSourceSetIconGiconMethodInfo- ResolveViewMethod "dragSourceSetIconName" o = Gtk.WidgetDragSourceSetIconNameMethodInfo- ResolveViewMethod "dragSourceSetIconPixbuf" o = Gtk.WidgetDragSourceSetIconPixbufMethodInfo- ResolveViewMethod "dragSourceSetIconStock" o = Gtk.WidgetDragSourceSetIconStockMethodInfo- ResolveViewMethod "dragSourceSetTargetList" o = Gtk.WidgetDragSourceSetTargetListMethodInfo- ResolveViewMethod "dragSourceUnset" o = Gtk.WidgetDragSourceUnsetMethodInfo- ResolveViewMethod "dragUnhighlight" o = Gtk.WidgetDragUnhighlightMethodInfo- ResolveViewMethod "draw" o = Gtk.WidgetDrawMethodInfo- ResolveViewMethod "ensureStyle" o = Gtk.WidgetEnsureStyleMethodInfo- ResolveViewMethod "errorBell" o = Gtk.WidgetErrorBellMethodInfo- ResolveViewMethod "event" o = Gtk.WidgetEventMethodInfo- ResolveViewMethod "forall" o = Gtk.ContainerForallMethodInfo- ResolveViewMethod "forceFloating" o = GObject.ObjectForceFloatingMethodInfo- ResolveViewMethod "foreach" o = Gtk.ContainerForeachMethodInfo- ResolveViewMethod "forwardDisplayLine" o = Gtk.TextViewForwardDisplayLineMethodInfo- ResolveViewMethod "forwardDisplayLineEnd" o = Gtk.TextViewForwardDisplayLineEndMethodInfo- ResolveViewMethod "freezeChildNotify" o = Gtk.WidgetFreezeChildNotifyMethodInfo- ResolveViewMethod "freezeNotify" o = GObject.ObjectFreezeNotifyMethodInfo- ResolveViewMethod "grabAdd" o = Gtk.WidgetGrabAddMethodInfo- ResolveViewMethod "grabDefault" o = Gtk.WidgetGrabDefaultMethodInfo- ResolveViewMethod "grabFocus" o = Gtk.WidgetGrabFocusMethodInfo- ResolveViewMethod "grabRemove" o = Gtk.WidgetGrabRemoveMethodInfo- ResolveViewMethod "hasDefault" o = Gtk.WidgetHasDefaultMethodInfo- ResolveViewMethod "hasFocus" o = Gtk.WidgetHasFocusMethodInfo- ResolveViewMethod "hasGrab" o = Gtk.WidgetHasGrabMethodInfo- ResolveViewMethod "hasRcStyle" o = Gtk.WidgetHasRcStyleMethodInfo- ResolveViewMethod "hasScreen" o = Gtk.WidgetHasScreenMethodInfo- ResolveViewMethod "hasVisibleFocus" o = Gtk.WidgetHasVisibleFocusMethodInfo- ResolveViewMethod "hide" o = Gtk.WidgetHideMethodInfo- ResolveViewMethod "hideOnDelete" o = Gtk.WidgetHideOnDeleteMethodInfo- ResolveViewMethod "imContextFilterKeypress" o = Gtk.TextViewImContextFilterKeypressMethodInfo- ResolveViewMethod "inDestruction" o = Gtk.WidgetInDestructionMethodInfo- ResolveViewMethod "indentLines" o = ViewIndentLinesMethodInfo- ResolveViewMethod "initTemplate" o = Gtk.WidgetInitTemplateMethodInfo- ResolveViewMethod "inputShapeCombineRegion" o = Gtk.WidgetInputShapeCombineRegionMethodInfo- ResolveViewMethod "insertActionGroup" o = Gtk.WidgetInsertActionGroupMethodInfo- ResolveViewMethod "intersect" o = Gtk.WidgetIntersectMethodInfo- ResolveViewMethod "isAncestor" o = Gtk.WidgetIsAncestorMethodInfo- ResolveViewMethod "isComposited" o = Gtk.WidgetIsCompositedMethodInfo- ResolveViewMethod "isDrawable" o = Gtk.WidgetIsDrawableMethodInfo- ResolveViewMethod "isFloating" o = GObject.ObjectIsFloatingMethodInfo- ResolveViewMethod "isFocus" o = Gtk.WidgetIsFocusMethodInfo- ResolveViewMethod "isSensitive" o = Gtk.WidgetIsSensitiveMethodInfo- ResolveViewMethod "isToplevel" o = Gtk.WidgetIsToplevelMethodInfo- ResolveViewMethod "isVisible" o = Gtk.WidgetIsVisibleMethodInfo- ResolveViewMethod "keynavFailed" o = Gtk.WidgetKeynavFailedMethodInfo- ResolveViewMethod "listAccelClosures" o = Gtk.WidgetListAccelClosuresMethodInfo- ResolveViewMethod "listActionPrefixes" o = Gtk.WidgetListActionPrefixesMethodInfo- ResolveViewMethod "listMnemonicLabels" o = Gtk.WidgetListMnemonicLabelsMethodInfo- ResolveViewMethod "map" o = Gtk.WidgetMapMethodInfo- ResolveViewMethod "mnemonicActivate" o = Gtk.WidgetMnemonicActivateMethodInfo- ResolveViewMethod "modifyBase" o = Gtk.WidgetModifyBaseMethodInfo- ResolveViewMethod "modifyBg" o = Gtk.WidgetModifyBgMethodInfo- ResolveViewMethod "modifyCursor" o = Gtk.WidgetModifyCursorMethodInfo- ResolveViewMethod "modifyFg" o = Gtk.WidgetModifyFgMethodInfo- ResolveViewMethod "modifyFont" o = Gtk.WidgetModifyFontMethodInfo- ResolveViewMethod "modifyStyle" o = Gtk.WidgetModifyStyleMethodInfo- ResolveViewMethod "modifyText" o = Gtk.WidgetModifyTextMethodInfo- ResolveViewMethod "moveChild" o = Gtk.TextViewMoveChildMethodInfo- ResolveViewMethod "moveMarkOnscreen" o = Gtk.TextViewMoveMarkOnscreenMethodInfo- ResolveViewMethod "moveVisually" o = Gtk.TextViewMoveVisuallyMethodInfo- ResolveViewMethod "notify" o = GObject.ObjectNotifyMethodInfo- ResolveViewMethod "notifyByPspec" o = GObject.ObjectNotifyByPspecMethodInfo- ResolveViewMethod "overrideBackgroundColor" o = Gtk.WidgetOverrideBackgroundColorMethodInfo- ResolveViewMethod "overrideColor" o = Gtk.WidgetOverrideColorMethodInfo- ResolveViewMethod "overrideCursor" o = Gtk.WidgetOverrideCursorMethodInfo- ResolveViewMethod "overrideFont" o = Gtk.WidgetOverrideFontMethodInfo- ResolveViewMethod "overrideSymbolicColor" o = Gtk.WidgetOverrideSymbolicColorMethodInfo- ResolveViewMethod "parserFinished" o = Gtk.BuildableParserFinishedMethodInfo- ResolveViewMethod "path" o = Gtk.WidgetPathMethodInfo- ResolveViewMethod "placeCursorOnscreen" o = Gtk.TextViewPlaceCursorOnscreenMethodInfo- ResolveViewMethod "propagateDraw" o = Gtk.ContainerPropagateDrawMethodInfo- ResolveViewMethod "queueComputeExpand" o = Gtk.WidgetQueueComputeExpandMethodInfo- ResolveViewMethod "queueDraw" o = Gtk.WidgetQueueDrawMethodInfo- ResolveViewMethod "queueDrawArea" o = Gtk.WidgetQueueDrawAreaMethodInfo- ResolveViewMethod "queueDrawRegion" o = Gtk.WidgetQueueDrawRegionMethodInfo- ResolveViewMethod "queueResize" o = Gtk.WidgetQueueResizeMethodInfo- ResolveViewMethod "queueResizeNoRedraw" o = Gtk.WidgetQueueResizeNoRedrawMethodInfo- ResolveViewMethod "realize" o = Gtk.WidgetRealizeMethodInfo- ResolveViewMethod "ref" o = GObject.ObjectRefMethodInfo- ResolveViewMethod "refSink" o = GObject.ObjectRefSinkMethodInfo- ResolveViewMethod "regionIntersect" o = Gtk.WidgetRegionIntersectMethodInfo- ResolveViewMethod "registerWindow" o = Gtk.WidgetRegisterWindowMethodInfo- ResolveViewMethod "remove" o = Gtk.ContainerRemoveMethodInfo- ResolveViewMethod "removeAccelerator" o = Gtk.WidgetRemoveAcceleratorMethodInfo- ResolveViewMethod "removeMnemonicLabel" o = Gtk.WidgetRemoveMnemonicLabelMethodInfo- ResolveViewMethod "removeTickCallback" o = Gtk.WidgetRemoveTickCallbackMethodInfo- ResolveViewMethod "renderIcon" o = Gtk.WidgetRenderIconMethodInfo- ResolveViewMethod "renderIconPixbuf" o = Gtk.WidgetRenderIconPixbufMethodInfo- ResolveViewMethod "reparent" o = Gtk.WidgetReparentMethodInfo- ResolveViewMethod "replaceData" o = GObject.ObjectReplaceDataMethodInfo- ResolveViewMethod "replaceQdata" o = GObject.ObjectReplaceQdataMethodInfo- ResolveViewMethod "resetImContext" o = Gtk.TextViewResetImContextMethodInfo- ResolveViewMethod "resetRcStyles" o = Gtk.WidgetResetRcStylesMethodInfo- ResolveViewMethod "resetStyle" o = Gtk.WidgetResetStyleMethodInfo- ResolveViewMethod "resizeChildren" o = Gtk.ContainerResizeChildrenMethodInfo- ResolveViewMethod "runDispose" o = GObject.ObjectRunDisposeMethodInfo- ResolveViewMethod "scrollMarkOnscreen" o = Gtk.TextViewScrollMarkOnscreenMethodInfo- ResolveViewMethod "scrollToIter" o = Gtk.TextViewScrollToIterMethodInfo- ResolveViewMethod "scrollToMark" o = Gtk.TextViewScrollToMarkMethodInfo- ResolveViewMethod "sendExpose" o = Gtk.WidgetSendExposeMethodInfo- ResolveViewMethod "sendFocusChange" o = Gtk.WidgetSendFocusChangeMethodInfo- ResolveViewMethod "shapeCombineRegion" o = Gtk.WidgetShapeCombineRegionMethodInfo- ResolveViewMethod "show" o = Gtk.WidgetShowMethodInfo- ResolveViewMethod "showAll" o = Gtk.WidgetShowAllMethodInfo- ResolveViewMethod "showNow" o = Gtk.WidgetShowNowMethodInfo- ResolveViewMethod "sizeAllocate" o = Gtk.WidgetSizeAllocateMethodInfo- ResolveViewMethod "sizeAllocateWithBaseline" o = Gtk.WidgetSizeAllocateWithBaselineMethodInfo- ResolveViewMethod "sizeRequest" o = Gtk.WidgetSizeRequestMethodInfo- ResolveViewMethod "startsDisplayLine" o = Gtk.TextViewStartsDisplayLineMethodInfo- ResolveViewMethod "stealData" o = GObject.ObjectStealDataMethodInfo- ResolveViewMethod "stealQdata" o = GObject.ObjectStealQdataMethodInfo- ResolveViewMethod "styleAttach" o = Gtk.WidgetStyleAttachMethodInfo- ResolveViewMethod "styleGetProperty" o = Gtk.WidgetStyleGetPropertyMethodInfo- ResolveViewMethod "thawChildNotify" o = Gtk.WidgetThawChildNotifyMethodInfo- ResolveViewMethod "thawNotify" o = GObject.ObjectThawNotifyMethodInfo- ResolveViewMethod "translateCoordinates" o = Gtk.WidgetTranslateCoordinatesMethodInfo- ResolveViewMethod "triggerTooltipQuery" o = Gtk.WidgetTriggerTooltipQueryMethodInfo- ResolveViewMethod "unindentLines" o = ViewUnindentLinesMethodInfo- ResolveViewMethod "unmap" o = Gtk.WidgetUnmapMethodInfo- ResolveViewMethod "unparent" o = Gtk.WidgetUnparentMethodInfo- ResolveViewMethod "unrealize" o = Gtk.WidgetUnrealizeMethodInfo- ResolveViewMethod "unref" o = GObject.ObjectUnrefMethodInfo- ResolveViewMethod "unregisterWindow" o = Gtk.WidgetUnregisterWindowMethodInfo- ResolveViewMethod "unsetFocusChain" o = Gtk.ContainerUnsetFocusChainMethodInfo- ResolveViewMethod "unsetStateFlags" o = Gtk.WidgetUnsetStateFlagsMethodInfo- ResolveViewMethod "watchClosure" o = GObject.ObjectWatchClosureMethodInfo- ResolveViewMethod "windowToBufferCoords" o = Gtk.TextViewWindowToBufferCoordsMethodInfo- ResolveViewMethod "getAcceptsTab" o = Gtk.TextViewGetAcceptsTabMethodInfo- ResolveViewMethod "getAccessible" o = Gtk.WidgetGetAccessibleMethodInfo- ResolveViewMethod "getActionGroup" o = Gtk.WidgetGetActionGroupMethodInfo- ResolveViewMethod "getAllocatedBaseline" o = Gtk.WidgetGetAllocatedBaselineMethodInfo- ResolveViewMethod "getAllocatedHeight" o = Gtk.WidgetGetAllocatedHeightMethodInfo- ResolveViewMethod "getAllocatedWidth" o = Gtk.WidgetGetAllocatedWidthMethodInfo- ResolveViewMethod "getAllocation" o = Gtk.WidgetGetAllocationMethodInfo- ResolveViewMethod "getAncestor" o = Gtk.WidgetGetAncestorMethodInfo- ResolveViewMethod "getAppPaintable" o = Gtk.WidgetGetAppPaintableMethodInfo- ResolveViewMethod "getAutoIndent" o = ViewGetAutoIndentMethodInfo- ResolveViewMethod "getBackgroundPattern" o = ViewGetBackgroundPatternMethodInfo- ResolveViewMethod "getBorder" o = Gtk.ScrollableGetBorderMethodInfo- ResolveViewMethod "getBorderWidth" o = Gtk.ContainerGetBorderWidthMethodInfo- ResolveViewMethod "getBorderWindowSize" o = Gtk.TextViewGetBorderWindowSizeMethodInfo- ResolveViewMethod "getBottomMargin" o = Gtk.TextViewGetBottomMarginMethodInfo- ResolveViewMethod "getBuffer" o = Gtk.TextViewGetBufferMethodInfo- ResolveViewMethod "getCanDefault" o = Gtk.WidgetGetCanDefaultMethodInfo- ResolveViewMethod "getCanFocus" o = Gtk.WidgetGetCanFocusMethodInfo- ResolveViewMethod "getChildRequisition" o = Gtk.WidgetGetChildRequisitionMethodInfo- ResolveViewMethod "getChildVisible" o = Gtk.WidgetGetChildVisibleMethodInfo- ResolveViewMethod "getChildren" o = Gtk.ContainerGetChildrenMethodInfo- ResolveViewMethod "getClip" o = Gtk.WidgetGetClipMethodInfo- ResolveViewMethod "getClipboard" o = Gtk.WidgetGetClipboardMethodInfo- ResolveViewMethod "getCompletion" o = ViewGetCompletionMethodInfo- ResolveViewMethod "getCompositeName" o = Gtk.WidgetGetCompositeNameMethodInfo- ResolveViewMethod "getCursorLocations" o = Gtk.TextViewGetCursorLocationsMethodInfo- ResolveViewMethod "getCursorVisible" o = Gtk.TextViewGetCursorVisibleMethodInfo- ResolveViewMethod "getData" o = GObject.ObjectGetDataMethodInfo- ResolveViewMethod "getDefaultAttributes" o = Gtk.TextViewGetDefaultAttributesMethodInfo- ResolveViewMethod "getDeviceEnabled" o = Gtk.WidgetGetDeviceEnabledMethodInfo- ResolveViewMethod "getDeviceEvents" o = Gtk.WidgetGetDeviceEventsMethodInfo- ResolveViewMethod "getDirection" o = Gtk.WidgetGetDirectionMethodInfo- ResolveViewMethod "getDisplay" o = Gtk.WidgetGetDisplayMethodInfo- ResolveViewMethod "getDoubleBuffered" o = Gtk.WidgetGetDoubleBufferedMethodInfo- ResolveViewMethod "getDrawSpaces" o = ViewGetDrawSpacesMethodInfo- ResolveViewMethod "getEditable" o = Gtk.TextViewGetEditableMethodInfo- ResolveViewMethod "getEvents" o = Gtk.WidgetGetEventsMethodInfo- ResolveViewMethod "getFocusChain" o = Gtk.ContainerGetFocusChainMethodInfo- ResolveViewMethod "getFocusChild" o = Gtk.ContainerGetFocusChildMethodInfo- ResolveViewMethod "getFocusHadjustment" o = Gtk.ContainerGetFocusHadjustmentMethodInfo- ResolveViewMethod "getFocusVadjustment" o = Gtk.ContainerGetFocusVadjustmentMethodInfo- ResolveViewMethod "getFontMap" o = Gtk.WidgetGetFontMapMethodInfo- ResolveViewMethod "getFontOptions" o = Gtk.WidgetGetFontOptionsMethodInfo- ResolveViewMethod "getFrameClock" o = Gtk.WidgetGetFrameClockMethodInfo- ResolveViewMethod "getGutter" o = ViewGetGutterMethodInfo- ResolveViewMethod "getHalign" o = Gtk.WidgetGetHalignMethodInfo- ResolveViewMethod "getHasTooltip" o = Gtk.WidgetGetHasTooltipMethodInfo- ResolveViewMethod "getHasWindow" o = Gtk.WidgetGetHasWindowMethodInfo- ResolveViewMethod "getHexpand" o = Gtk.WidgetGetHexpandMethodInfo- ResolveViewMethod "getHexpandSet" o = Gtk.WidgetGetHexpandSetMethodInfo- ResolveViewMethod "getHighlightCurrentLine" o = ViewGetHighlightCurrentLineMethodInfo- ResolveViewMethod "getHscrollPolicy" o = Gtk.ScrollableGetHscrollPolicyMethodInfo- ResolveViewMethod "getIndent" o = Gtk.TextViewGetIndentMethodInfo- ResolveViewMethod "getIndentOnTab" o = ViewGetIndentOnTabMethodInfo- ResolveViewMethod "getIndentWidth" o = ViewGetIndentWidthMethodInfo- ResolveViewMethod "getInputHints" o = Gtk.TextViewGetInputHintsMethodInfo- ResolveViewMethod "getInputPurpose" o = Gtk.TextViewGetInputPurposeMethodInfo- ResolveViewMethod "getInsertSpacesInsteadOfTabs" o = ViewGetInsertSpacesInsteadOfTabsMethodInfo- ResolveViewMethod "getInternalChild" o = Gtk.BuildableGetInternalChildMethodInfo- ResolveViewMethod "getIterAtLocation" o = Gtk.TextViewGetIterAtLocationMethodInfo- ResolveViewMethod "getIterAtPosition" o = Gtk.TextViewGetIterAtPositionMethodInfo- ResolveViewMethod "getIterLocation" o = Gtk.TextViewGetIterLocationMethodInfo- ResolveViewMethod "getJustification" o = Gtk.TextViewGetJustificationMethodInfo- ResolveViewMethod "getLeftMargin" o = Gtk.TextViewGetLeftMarginMethodInfo- ResolveViewMethod "getLineAtY" o = Gtk.TextViewGetLineAtYMethodInfo- ResolveViewMethod "getLineYrange" o = Gtk.TextViewGetLineYrangeMethodInfo- ResolveViewMethod "getMapped" o = Gtk.WidgetGetMappedMethodInfo- ResolveViewMethod "getMarginBottom" o = Gtk.WidgetGetMarginBottomMethodInfo- ResolveViewMethod "getMarginEnd" o = Gtk.WidgetGetMarginEndMethodInfo- ResolveViewMethod "getMarginLeft" o = Gtk.WidgetGetMarginLeftMethodInfo- ResolveViewMethod "getMarginRight" o = Gtk.WidgetGetMarginRightMethodInfo- ResolveViewMethod "getMarginStart" o = Gtk.WidgetGetMarginStartMethodInfo- ResolveViewMethod "getMarginTop" o = Gtk.WidgetGetMarginTopMethodInfo- ResolveViewMethod "getMarkAttributes" o = ViewGetMarkAttributesMethodInfo- ResolveViewMethod "getModifierMask" o = Gtk.WidgetGetModifierMaskMethodInfo- ResolveViewMethod "getModifierStyle" o = Gtk.WidgetGetModifierStyleMethodInfo- ResolveViewMethod "getMonospace" o = Gtk.TextViewGetMonospaceMethodInfo- ResolveViewMethod "getNoShowAll" o = Gtk.WidgetGetNoShowAllMethodInfo- ResolveViewMethod "getOpacity" o = Gtk.WidgetGetOpacityMethodInfo- ResolveViewMethod "getOverwrite" o = Gtk.TextViewGetOverwriteMethodInfo- ResolveViewMethod "getPangoContext" o = Gtk.WidgetGetPangoContextMethodInfo- ResolveViewMethod "getParent" o = Gtk.WidgetGetParentMethodInfo- ResolveViewMethod "getParentWindow" o = Gtk.WidgetGetParentWindowMethodInfo- ResolveViewMethod "getPath" o = Gtk.WidgetGetPathMethodInfo- ResolveViewMethod "getPathForChild" o = Gtk.ContainerGetPathForChildMethodInfo- ResolveViewMethod "getPixelsAboveLines" o = Gtk.TextViewGetPixelsAboveLinesMethodInfo- ResolveViewMethod "getPixelsBelowLines" o = Gtk.TextViewGetPixelsBelowLinesMethodInfo- ResolveViewMethod "getPixelsInsideWrap" o = Gtk.TextViewGetPixelsInsideWrapMethodInfo- ResolveViewMethod "getPointer" o = Gtk.WidgetGetPointerMethodInfo- ResolveViewMethod "getPreferredHeight" o = Gtk.WidgetGetPreferredHeightMethodInfo- ResolveViewMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo- ResolveViewMethod "getPreferredHeightForWidth" o = Gtk.WidgetGetPreferredHeightForWidthMethodInfo- ResolveViewMethod "getPreferredSize" o = Gtk.WidgetGetPreferredSizeMethodInfo- ResolveViewMethod "getPreferredWidth" o = Gtk.WidgetGetPreferredWidthMethodInfo- ResolveViewMethod "getPreferredWidthForHeight" o = Gtk.WidgetGetPreferredWidthForHeightMethodInfo- ResolveViewMethod "getProperty" o = GObject.ObjectGetPropertyMethodInfo- ResolveViewMethod "getQdata" o = GObject.ObjectGetQdataMethodInfo- ResolveViewMethod "getRealized" o = Gtk.WidgetGetRealizedMethodInfo- ResolveViewMethod "getReceivesDefault" o = Gtk.WidgetGetReceivesDefaultMethodInfo- ResolveViewMethod "getRequestMode" o = Gtk.WidgetGetRequestModeMethodInfo- ResolveViewMethod "getRequisition" o = Gtk.WidgetGetRequisitionMethodInfo- ResolveViewMethod "getResizeMode" o = Gtk.ContainerGetResizeModeMethodInfo- ResolveViewMethod "getRightMargin" o = Gtk.TextViewGetRightMarginMethodInfo- ResolveViewMethod "getRightMarginPosition" o = ViewGetRightMarginPositionMethodInfo- ResolveViewMethod "getRootWindow" o = Gtk.WidgetGetRootWindowMethodInfo- ResolveViewMethod "getScaleFactor" o = Gtk.WidgetGetScaleFactorMethodInfo- ResolveViewMethod "getScreen" o = Gtk.WidgetGetScreenMethodInfo- ResolveViewMethod "getSensitive" o = Gtk.WidgetGetSensitiveMethodInfo- ResolveViewMethod "getSettings" o = Gtk.WidgetGetSettingsMethodInfo- ResolveViewMethod "getShowLineMarks" o = ViewGetShowLineMarksMethodInfo- ResolveViewMethod "getShowLineNumbers" o = ViewGetShowLineNumbersMethodInfo- ResolveViewMethod "getShowRightMargin" o = ViewGetShowRightMarginMethodInfo- ResolveViewMethod "getSizeRequest" o = Gtk.WidgetGetSizeRequestMethodInfo- ResolveViewMethod "getSmartBackspace" o = ViewGetSmartBackspaceMethodInfo- ResolveViewMethod "getSmartHomeEnd" o = ViewGetSmartHomeEndMethodInfo- ResolveViewMethod "getState" o = Gtk.WidgetGetStateMethodInfo- ResolveViewMethod "getStateFlags" o = Gtk.WidgetGetStateFlagsMethodInfo- ResolveViewMethod "getStyle" o = Gtk.WidgetGetStyleMethodInfo- ResolveViewMethod "getStyleContext" o = Gtk.WidgetGetStyleContextMethodInfo- ResolveViewMethod "getSupportMultidevice" o = Gtk.WidgetGetSupportMultideviceMethodInfo- ResolveViewMethod "getTabWidth" o = ViewGetTabWidthMethodInfo- ResolveViewMethod "getTabs" o = Gtk.TextViewGetTabsMethodInfo- ResolveViewMethod "getTemplateChild" o = Gtk.WidgetGetTemplateChildMethodInfo- ResolveViewMethod "getTooltipMarkup" o = Gtk.WidgetGetTooltipMarkupMethodInfo- ResolveViewMethod "getTooltipText" o = Gtk.WidgetGetTooltipTextMethodInfo- ResolveViewMethod "getTooltipWindow" o = Gtk.WidgetGetTooltipWindowMethodInfo- ResolveViewMethod "getTopMargin" o = Gtk.TextViewGetTopMarginMethodInfo- ResolveViewMethod "getToplevel" o = Gtk.WidgetGetToplevelMethodInfo- ResolveViewMethod "getValign" o = Gtk.WidgetGetValignMethodInfo- ResolveViewMethod "getValignWithBaseline" o = Gtk.WidgetGetValignWithBaselineMethodInfo- ResolveViewMethod "getVexpand" o = Gtk.WidgetGetVexpandMethodInfo- ResolveViewMethod "getVexpandSet" o = Gtk.WidgetGetVexpandSetMethodInfo- ResolveViewMethod "getVisible" o = Gtk.WidgetGetVisibleMethodInfo- ResolveViewMethod "getVisibleRect" o = Gtk.TextViewGetVisibleRectMethodInfo- ResolveViewMethod "getVisual" o = Gtk.WidgetGetVisualMethodInfo- ResolveViewMethod "getVisualColumn" o = ViewGetVisualColumnMethodInfo- ResolveViewMethod "getVscrollPolicy" o = Gtk.ScrollableGetVscrollPolicyMethodInfo- ResolveViewMethod "getWindowType" o = Gtk.TextViewGetWindowTypeMethodInfo- ResolveViewMethod "getWrapMode" o = Gtk.TextViewGetWrapModeMethodInfo- ResolveViewMethod "setAccelPath" o = Gtk.WidgetSetAccelPathMethodInfo- ResolveViewMethod "setAcceptsTab" o = Gtk.TextViewSetAcceptsTabMethodInfo- ResolveViewMethod "setAllocation" o = Gtk.WidgetSetAllocationMethodInfo- ResolveViewMethod "setAppPaintable" o = Gtk.WidgetSetAppPaintableMethodInfo- ResolveViewMethod "setAutoIndent" o = ViewSetAutoIndentMethodInfo- ResolveViewMethod "setBackgroundPattern" o = ViewSetBackgroundPatternMethodInfo- ResolveViewMethod "setBorderWidth" o = Gtk.ContainerSetBorderWidthMethodInfo- ResolveViewMethod "setBorderWindowSize" o = Gtk.TextViewSetBorderWindowSizeMethodInfo- ResolveViewMethod "setBottomMargin" o = Gtk.TextViewSetBottomMarginMethodInfo- ResolveViewMethod "setBuffer" o = Gtk.TextViewSetBufferMethodInfo- ResolveViewMethod "setBuildableProperty" o = Gtk.BuildableSetBuildablePropertyMethodInfo- ResolveViewMethod "setCanDefault" o = Gtk.WidgetSetCanDefaultMethodInfo- ResolveViewMethod "setCanFocus" o = Gtk.WidgetSetCanFocusMethodInfo- ResolveViewMethod "setChildVisible" o = Gtk.WidgetSetChildVisibleMethodInfo- ResolveViewMethod "setClip" o = Gtk.WidgetSetClipMethodInfo- ResolveViewMethod "setCompositeName" o = Gtk.WidgetSetCompositeNameMethodInfo- ResolveViewMethod "setCursorVisible" o = Gtk.TextViewSetCursorVisibleMethodInfo- ResolveViewMethod "setData" o = GObject.ObjectSetDataMethodInfo- ResolveViewMethod "setDeviceEnabled" o = Gtk.WidgetSetDeviceEnabledMethodInfo- ResolveViewMethod "setDeviceEvents" o = Gtk.WidgetSetDeviceEventsMethodInfo- ResolveViewMethod "setDirection" o = Gtk.WidgetSetDirectionMethodInfo- ResolveViewMethod "setDoubleBuffered" o = Gtk.WidgetSetDoubleBufferedMethodInfo- ResolveViewMethod "setDrawSpaces" o = ViewSetDrawSpacesMethodInfo- ResolveViewMethod "setEditable" o = Gtk.TextViewSetEditableMethodInfo- ResolveViewMethod "setEvents" o = Gtk.WidgetSetEventsMethodInfo- ResolveViewMethod "setFocusChain" o = Gtk.ContainerSetFocusChainMethodInfo- ResolveViewMethod "setFocusChild" o = Gtk.ContainerSetFocusChildMethodInfo- ResolveViewMethod "setFocusHadjustment" o = Gtk.ContainerSetFocusHadjustmentMethodInfo- ResolveViewMethod "setFocusVadjustment" o = Gtk.ContainerSetFocusVadjustmentMethodInfo- ResolveViewMethod "setFontMap" o = Gtk.WidgetSetFontMapMethodInfo- ResolveViewMethod "setFontOptions" o = Gtk.WidgetSetFontOptionsMethodInfo- ResolveViewMethod "setHadjustment" o = Gtk.ScrollableSetHadjustmentMethodInfo- ResolveViewMethod "setHalign" o = Gtk.WidgetSetHalignMethodInfo- ResolveViewMethod "setHasTooltip" o = Gtk.WidgetSetHasTooltipMethodInfo- ResolveViewMethod "setHasWindow" o = Gtk.WidgetSetHasWindowMethodInfo- ResolveViewMethod "setHexpand" o = Gtk.WidgetSetHexpandMethodInfo- ResolveViewMethod "setHexpandSet" o = Gtk.WidgetSetHexpandSetMethodInfo- ResolveViewMethod "setHighlightCurrentLine" o = ViewSetHighlightCurrentLineMethodInfo- ResolveViewMethod "setHscrollPolicy" o = Gtk.ScrollableSetHscrollPolicyMethodInfo- ResolveViewMethod "setIndent" o = Gtk.TextViewSetIndentMethodInfo- ResolveViewMethod "setIndentOnTab" o = ViewSetIndentOnTabMethodInfo- ResolveViewMethod "setIndentWidth" o = ViewSetIndentWidthMethodInfo- ResolveViewMethod "setInputHints" o = Gtk.TextViewSetInputHintsMethodInfo- ResolveViewMethod "setInputPurpose" o = Gtk.TextViewSetInputPurposeMethodInfo- ResolveViewMethod "setInsertSpacesInsteadOfTabs" o = ViewSetInsertSpacesInsteadOfTabsMethodInfo- ResolveViewMethod "setJustification" o = Gtk.TextViewSetJustificationMethodInfo- ResolveViewMethod "setLeftMargin" o = Gtk.TextViewSetLeftMarginMethodInfo- ResolveViewMethod "setMapped" o = Gtk.WidgetSetMappedMethodInfo- ResolveViewMethod "setMarginBottom" o = Gtk.WidgetSetMarginBottomMethodInfo- ResolveViewMethod "setMarginEnd" o = Gtk.WidgetSetMarginEndMethodInfo- ResolveViewMethod "setMarginLeft" o = Gtk.WidgetSetMarginLeftMethodInfo- ResolveViewMethod "setMarginRight" o = Gtk.WidgetSetMarginRightMethodInfo- ResolveViewMethod "setMarginStart" o = Gtk.WidgetSetMarginStartMethodInfo- ResolveViewMethod "setMarginTop" o = Gtk.WidgetSetMarginTopMethodInfo- ResolveViewMethod "setMarkAttributes" o = ViewSetMarkAttributesMethodInfo- ResolveViewMethod "setMonospace" o = Gtk.TextViewSetMonospaceMethodInfo- ResolveViewMethod "setNoShowAll" o = Gtk.WidgetSetNoShowAllMethodInfo- ResolveViewMethod "setOpacity" o = Gtk.WidgetSetOpacityMethodInfo- ResolveViewMethod "setOverwrite" o = Gtk.TextViewSetOverwriteMethodInfo- ResolveViewMethod "setParent" o = Gtk.WidgetSetParentMethodInfo- ResolveViewMethod "setParentWindow" o = Gtk.WidgetSetParentWindowMethodInfo- ResolveViewMethod "setPixelsAboveLines" o = Gtk.TextViewSetPixelsAboveLinesMethodInfo- ResolveViewMethod "setPixelsBelowLines" o = Gtk.TextViewSetPixelsBelowLinesMethodInfo- ResolveViewMethod "setPixelsInsideWrap" o = Gtk.TextViewSetPixelsInsideWrapMethodInfo- ResolveViewMethod "setProperty" o = GObject.ObjectSetPropertyMethodInfo- ResolveViewMethod "setRealized" o = Gtk.WidgetSetRealizedMethodInfo- ResolveViewMethod "setReallocateRedraws" o = Gtk.ContainerSetReallocateRedrawsMethodInfo- ResolveViewMethod "setReceivesDefault" o = Gtk.WidgetSetReceivesDefaultMethodInfo- ResolveViewMethod "setRedrawOnAllocate" o = Gtk.WidgetSetRedrawOnAllocateMethodInfo- ResolveViewMethod "setResizeMode" o = Gtk.ContainerSetResizeModeMethodInfo- ResolveViewMethod "setRightMargin" o = Gtk.TextViewSetRightMarginMethodInfo- ResolveViewMethod "setRightMarginPosition" o = ViewSetRightMarginPositionMethodInfo- ResolveViewMethod "setSensitive" o = Gtk.WidgetSetSensitiveMethodInfo- ResolveViewMethod "setShowLineMarks" o = ViewSetShowLineMarksMethodInfo- ResolveViewMethod "setShowLineNumbers" o = ViewSetShowLineNumbersMethodInfo- ResolveViewMethod "setShowRightMargin" o = ViewSetShowRightMarginMethodInfo- ResolveViewMethod "setSizeRequest" o = Gtk.WidgetSetSizeRequestMethodInfo- ResolveViewMethod "setSmartBackspace" o = ViewSetSmartBackspaceMethodInfo- ResolveViewMethod "setSmartHomeEnd" o = ViewSetSmartHomeEndMethodInfo- ResolveViewMethod "setState" o = Gtk.WidgetSetStateMethodInfo- ResolveViewMethod "setStateFlags" o = Gtk.WidgetSetStateFlagsMethodInfo- ResolveViewMethod "setStyle" o = Gtk.WidgetSetStyleMethodInfo- ResolveViewMethod "setSupportMultidevice" o = Gtk.WidgetSetSupportMultideviceMethodInfo- ResolveViewMethod "setTabWidth" o = ViewSetTabWidthMethodInfo- ResolveViewMethod "setTabs" o = Gtk.TextViewSetTabsMethodInfo- ResolveViewMethod "setTooltipMarkup" o = Gtk.WidgetSetTooltipMarkupMethodInfo- ResolveViewMethod "setTooltipText" o = Gtk.WidgetSetTooltipTextMethodInfo- ResolveViewMethod "setTooltipWindow" o = Gtk.WidgetSetTooltipWindowMethodInfo- ResolveViewMethod "setTopMargin" o = Gtk.TextViewSetTopMarginMethodInfo- ResolveViewMethod "setVadjustment" o = Gtk.ScrollableSetVadjustmentMethodInfo- ResolveViewMethod "setValign" o = Gtk.WidgetSetValignMethodInfo- ResolveViewMethod "setVexpand" o = Gtk.WidgetSetVexpandMethodInfo- ResolveViewMethod "setVexpandSet" o = Gtk.WidgetSetVexpandSetMethodInfo- ResolveViewMethod "setVisible" o = Gtk.WidgetSetVisibleMethodInfo- ResolveViewMethod "setVisual" o = Gtk.WidgetSetVisualMethodInfo- ResolveViewMethod "setVscrollPolicy" o = Gtk.ScrollableSetVscrollPolicyMethodInfo- ResolveViewMethod "setWindow" o = Gtk.WidgetSetWindowMethodInfo- ResolveViewMethod "setWrapMode" o = Gtk.TextViewSetWrapModeMethodInfo- ResolveViewMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveViewMethod t View, MethodInfo info View p) => IsLabelProxy t (View -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveViewMethod t View, MethodInfo info View p) => IsLabel t (View -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif---- signal View::change-case-type ViewChangeCaseCallback =- ChangeCaseType ->- IO ()--noViewChangeCaseCallback :: Maybe ViewChangeCaseCallback-noViewChangeCaseCallback = Nothing--type ViewChangeCaseCallbackC =- Ptr () -> -- object- CUInt ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkViewChangeCaseCallback :: ViewChangeCaseCallbackC -> IO (FunPtr ViewChangeCaseCallbackC)--viewChangeCaseClosure :: ViewChangeCaseCallback -> IO Closure-viewChangeCaseClosure cb = newCClosure =<< mkViewChangeCaseCallback wrapped- where wrapped = viewChangeCaseCallbackWrapper cb--viewChangeCaseCallbackWrapper ::- ViewChangeCaseCallback ->- Ptr () ->- CUInt ->- Ptr () ->- IO ()-viewChangeCaseCallbackWrapper _cb _ caseType _ = do- let caseType' = (toEnum . fromIntegral) caseType- _cb caseType'--onViewChangeCase :: (GObject a, MonadIO m) => a -> ViewChangeCaseCallback -> m SignalHandlerId-onViewChangeCase obj cb = liftIO $ connectViewChangeCase obj cb SignalConnectBefore-afterViewChangeCase :: (GObject a, MonadIO m) => a -> ViewChangeCaseCallback -> m SignalHandlerId-afterViewChangeCase obj cb = connectViewChangeCase obj cb SignalConnectAfter--connectViewChangeCase :: (GObject a, MonadIO m) =>- a -> ViewChangeCaseCallback -> SignalConnectMode -> m SignalHandlerId-connectViewChangeCase obj cb after = liftIO $ do- cb' <- mkViewChangeCaseCallback (viewChangeCaseCallbackWrapper cb)- connectSignalFunPtr obj "change-case" cb' after---- signal View::change-number-type ViewChangeNumberCallback =- Int32 ->- IO ()--noViewChangeNumberCallback :: Maybe ViewChangeNumberCallback-noViewChangeNumberCallback = Nothing--type ViewChangeNumberCallbackC =- Ptr () -> -- object- Int32 ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkViewChangeNumberCallback :: ViewChangeNumberCallbackC -> IO (FunPtr ViewChangeNumberCallbackC)--viewChangeNumberClosure :: ViewChangeNumberCallback -> IO Closure-viewChangeNumberClosure cb = newCClosure =<< mkViewChangeNumberCallback wrapped- where wrapped = viewChangeNumberCallbackWrapper cb--viewChangeNumberCallbackWrapper ::- ViewChangeNumberCallback ->- Ptr () ->- Int32 ->- Ptr () ->- IO ()-viewChangeNumberCallbackWrapper _cb _ count _ = do- _cb count--onViewChangeNumber :: (GObject a, MonadIO m) => a -> ViewChangeNumberCallback -> m SignalHandlerId-onViewChangeNumber obj cb = liftIO $ connectViewChangeNumber obj cb SignalConnectBefore-afterViewChangeNumber :: (GObject a, MonadIO m) => a -> ViewChangeNumberCallback -> m SignalHandlerId-afterViewChangeNumber obj cb = connectViewChangeNumber obj cb SignalConnectAfter--connectViewChangeNumber :: (GObject a, MonadIO m) =>- a -> ViewChangeNumberCallback -> SignalConnectMode -> m SignalHandlerId-connectViewChangeNumber obj cb after = liftIO $ do- cb' <- mkViewChangeNumberCallback (viewChangeNumberCallbackWrapper cb)- connectSignalFunPtr obj "change-number" cb' after---- signal View::join-lines-type ViewJoinLinesCallback =- IO ()--noViewJoinLinesCallback :: Maybe ViewJoinLinesCallback-noViewJoinLinesCallback = Nothing--type ViewJoinLinesCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkViewJoinLinesCallback :: ViewJoinLinesCallbackC -> IO (FunPtr ViewJoinLinesCallbackC)--viewJoinLinesClosure :: ViewJoinLinesCallback -> IO Closure-viewJoinLinesClosure cb = newCClosure =<< mkViewJoinLinesCallback wrapped- where wrapped = viewJoinLinesCallbackWrapper cb--viewJoinLinesCallbackWrapper ::- ViewJoinLinesCallback ->- Ptr () ->- Ptr () ->- IO ()-viewJoinLinesCallbackWrapper _cb _ _ = do- _cb --onViewJoinLines :: (GObject a, MonadIO m) => a -> ViewJoinLinesCallback -> m SignalHandlerId-onViewJoinLines obj cb = liftIO $ connectViewJoinLines obj cb SignalConnectBefore-afterViewJoinLines :: (GObject a, MonadIO m) => a -> ViewJoinLinesCallback -> m SignalHandlerId-afterViewJoinLines obj cb = connectViewJoinLines obj cb SignalConnectAfter--connectViewJoinLines :: (GObject a, MonadIO m) =>- a -> ViewJoinLinesCallback -> SignalConnectMode -> m SignalHandlerId-connectViewJoinLines obj cb after = liftIO $ do- cb' <- mkViewJoinLinesCallback (viewJoinLinesCallbackWrapper cb)- connectSignalFunPtr obj "join-lines" cb' after---- signal View::line-mark-activated-type ViewLineMarkActivatedCallback =- Gtk.TextIter ->- Gdk.Event ->- IO ()--noViewLineMarkActivatedCallback :: Maybe ViewLineMarkActivatedCallback-noViewLineMarkActivatedCallback = Nothing--type ViewLineMarkActivatedCallbackC =- Ptr () -> -- object- Ptr Gtk.TextIter ->- Ptr Gdk.Event ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkViewLineMarkActivatedCallback :: ViewLineMarkActivatedCallbackC -> IO (FunPtr ViewLineMarkActivatedCallbackC)--viewLineMarkActivatedClosure :: ViewLineMarkActivatedCallback -> IO Closure-viewLineMarkActivatedClosure cb = newCClosure =<< mkViewLineMarkActivatedCallback wrapped- where wrapped = viewLineMarkActivatedCallbackWrapper cb--viewLineMarkActivatedCallbackWrapper ::- ViewLineMarkActivatedCallback ->- Ptr () ->- Ptr Gtk.TextIter ->- Ptr Gdk.Event ->- Ptr () ->- IO ()-viewLineMarkActivatedCallbackWrapper _cb _ iter event _ = do- iter' <- (newBoxed Gtk.TextIter) iter- event' <- (newBoxed Gdk.Event) event- _cb iter' event'--onViewLineMarkActivated :: (GObject a, MonadIO m) => a -> ViewLineMarkActivatedCallback -> m SignalHandlerId-onViewLineMarkActivated obj cb = liftIO $ connectViewLineMarkActivated obj cb SignalConnectBefore-afterViewLineMarkActivated :: (GObject a, MonadIO m) => a -> ViewLineMarkActivatedCallback -> m SignalHandlerId-afterViewLineMarkActivated obj cb = connectViewLineMarkActivated obj cb SignalConnectAfter--connectViewLineMarkActivated :: (GObject a, MonadIO m) =>- a -> ViewLineMarkActivatedCallback -> SignalConnectMode -> m SignalHandlerId-connectViewLineMarkActivated obj cb after = liftIO $ do- cb' <- mkViewLineMarkActivatedCallback (viewLineMarkActivatedCallbackWrapper cb)- connectSignalFunPtr obj "line-mark-activated" cb' after---- signal View::move-lines-type ViewMoveLinesCallback =- Bool ->- Int32 ->- IO ()--noViewMoveLinesCallback :: Maybe ViewMoveLinesCallback-noViewMoveLinesCallback = Nothing--type ViewMoveLinesCallbackC =- Ptr () -> -- object- CInt ->- Int32 ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkViewMoveLinesCallback :: ViewMoveLinesCallbackC -> IO (FunPtr ViewMoveLinesCallbackC)--viewMoveLinesClosure :: ViewMoveLinesCallback -> IO Closure-viewMoveLinesClosure cb = newCClosure =<< mkViewMoveLinesCallback wrapped- where wrapped = viewMoveLinesCallbackWrapper cb--viewMoveLinesCallbackWrapper ::- ViewMoveLinesCallback ->- Ptr () ->- CInt ->- Int32 ->- Ptr () ->- IO ()-viewMoveLinesCallbackWrapper _cb _ copy count _ = do- let copy' = (/= 0) copy- _cb copy' count--onViewMoveLines :: (GObject a, MonadIO m) => a -> ViewMoveLinesCallback -> m SignalHandlerId-onViewMoveLines obj cb = liftIO $ connectViewMoveLines obj cb SignalConnectBefore-afterViewMoveLines :: (GObject a, MonadIO m) => a -> ViewMoveLinesCallback -> m SignalHandlerId-afterViewMoveLines obj cb = connectViewMoveLines obj cb SignalConnectAfter--connectViewMoveLines :: (GObject a, MonadIO m) =>- a -> ViewMoveLinesCallback -> SignalConnectMode -> m SignalHandlerId-connectViewMoveLines obj cb after = liftIO $ do- cb' <- mkViewMoveLinesCallback (viewMoveLinesCallbackWrapper cb)- connectSignalFunPtr obj "move-lines" cb' after---- signal View::move-to-matching-bracket-type ViewMoveToMatchingBracketCallback =- Bool ->- IO ()--noViewMoveToMatchingBracketCallback :: Maybe ViewMoveToMatchingBracketCallback-noViewMoveToMatchingBracketCallback = Nothing--type ViewMoveToMatchingBracketCallbackC =- Ptr () -> -- object- CInt ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkViewMoveToMatchingBracketCallback :: ViewMoveToMatchingBracketCallbackC -> IO (FunPtr ViewMoveToMatchingBracketCallbackC)--viewMoveToMatchingBracketClosure :: ViewMoveToMatchingBracketCallback -> IO Closure-viewMoveToMatchingBracketClosure cb = newCClosure =<< mkViewMoveToMatchingBracketCallback wrapped- where wrapped = viewMoveToMatchingBracketCallbackWrapper cb--viewMoveToMatchingBracketCallbackWrapper ::- ViewMoveToMatchingBracketCallback ->- Ptr () ->- CInt ->- Ptr () ->- IO ()-viewMoveToMatchingBracketCallbackWrapper _cb _ extendSelection _ = do- let extendSelection' = (/= 0) extendSelection- _cb extendSelection'--onViewMoveToMatchingBracket :: (GObject a, MonadIO m) => a -> ViewMoveToMatchingBracketCallback -> m SignalHandlerId-onViewMoveToMatchingBracket obj cb = liftIO $ connectViewMoveToMatchingBracket obj cb SignalConnectBefore-afterViewMoveToMatchingBracket :: (GObject a, MonadIO m) => a -> ViewMoveToMatchingBracketCallback -> m SignalHandlerId-afterViewMoveToMatchingBracket obj cb = connectViewMoveToMatchingBracket obj cb SignalConnectAfter--connectViewMoveToMatchingBracket :: (GObject a, MonadIO m) =>- a -> ViewMoveToMatchingBracketCallback -> SignalConnectMode -> m SignalHandlerId-connectViewMoveToMatchingBracket obj cb after = liftIO $ do- cb' <- mkViewMoveToMatchingBracketCallback (viewMoveToMatchingBracketCallbackWrapper cb)- connectSignalFunPtr obj "move-to-matching-bracket" cb' after---- signal View::move-words-type ViewMoveWordsCallback =- Int32 ->- IO ()--noViewMoveWordsCallback :: Maybe ViewMoveWordsCallback-noViewMoveWordsCallback = Nothing--type ViewMoveWordsCallbackC =- Ptr () -> -- object- Int32 ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkViewMoveWordsCallback :: ViewMoveWordsCallbackC -> IO (FunPtr ViewMoveWordsCallbackC)--viewMoveWordsClosure :: ViewMoveWordsCallback -> IO Closure-viewMoveWordsClosure cb = newCClosure =<< mkViewMoveWordsCallback wrapped- where wrapped = viewMoveWordsCallbackWrapper cb--viewMoveWordsCallbackWrapper ::- ViewMoveWordsCallback ->- Ptr () ->- Int32 ->- Ptr () ->- IO ()-viewMoveWordsCallbackWrapper _cb _ count _ = do- _cb count--onViewMoveWords :: (GObject a, MonadIO m) => a -> ViewMoveWordsCallback -> m SignalHandlerId-onViewMoveWords obj cb = liftIO $ connectViewMoveWords obj cb SignalConnectBefore-afterViewMoveWords :: (GObject a, MonadIO m) => a -> ViewMoveWordsCallback -> m SignalHandlerId-afterViewMoveWords obj cb = connectViewMoveWords obj cb SignalConnectAfter--connectViewMoveWords :: (GObject a, MonadIO m) =>- a -> ViewMoveWordsCallback -> SignalConnectMode -> m SignalHandlerId-connectViewMoveWords obj cb after = liftIO $ do- cb' <- mkViewMoveWordsCallback (viewMoveWordsCallbackWrapper cb)- connectSignalFunPtr obj "move-words" cb' after---- signal View::redo-type ViewRedoCallback =- IO ()--noViewRedoCallback :: Maybe ViewRedoCallback-noViewRedoCallback = Nothing--type ViewRedoCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkViewRedoCallback :: ViewRedoCallbackC -> IO (FunPtr ViewRedoCallbackC)--viewRedoClosure :: ViewRedoCallback -> IO Closure-viewRedoClosure cb = newCClosure =<< mkViewRedoCallback wrapped- where wrapped = viewRedoCallbackWrapper cb--viewRedoCallbackWrapper ::- ViewRedoCallback ->- Ptr () ->- Ptr () ->- IO ()-viewRedoCallbackWrapper _cb _ _ = do- _cb --onViewRedo :: (GObject a, MonadIO m) => a -> ViewRedoCallback -> m SignalHandlerId-onViewRedo obj cb = liftIO $ connectViewRedo obj cb SignalConnectBefore-afterViewRedo :: (GObject a, MonadIO m) => a -> ViewRedoCallback -> m SignalHandlerId-afterViewRedo obj cb = connectViewRedo obj cb SignalConnectAfter--connectViewRedo :: (GObject a, MonadIO m) =>- a -> ViewRedoCallback -> SignalConnectMode -> m SignalHandlerId-connectViewRedo obj cb after = liftIO $ do- cb' <- mkViewRedoCallback (viewRedoCallbackWrapper cb)- connectSignalFunPtr obj "redo" cb' after---- signal View::show-completion-type ViewShowCompletionCallback =- IO ()--noViewShowCompletionCallback :: Maybe ViewShowCompletionCallback-noViewShowCompletionCallback = Nothing--type ViewShowCompletionCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkViewShowCompletionCallback :: ViewShowCompletionCallbackC -> IO (FunPtr ViewShowCompletionCallbackC)--viewShowCompletionClosure :: ViewShowCompletionCallback -> IO Closure-viewShowCompletionClosure cb = newCClosure =<< mkViewShowCompletionCallback wrapped- where wrapped = viewShowCompletionCallbackWrapper cb--viewShowCompletionCallbackWrapper ::- ViewShowCompletionCallback ->- Ptr () ->- Ptr () ->- IO ()-viewShowCompletionCallbackWrapper _cb _ _ = do- _cb --onViewShowCompletion :: (GObject a, MonadIO m) => a -> ViewShowCompletionCallback -> m SignalHandlerId-onViewShowCompletion obj cb = liftIO $ connectViewShowCompletion obj cb SignalConnectBefore-afterViewShowCompletion :: (GObject a, MonadIO m) => a -> ViewShowCompletionCallback -> m SignalHandlerId-afterViewShowCompletion obj cb = connectViewShowCompletion obj cb SignalConnectAfter--connectViewShowCompletion :: (GObject a, MonadIO m) =>- a -> ViewShowCompletionCallback -> SignalConnectMode -> m SignalHandlerId-connectViewShowCompletion obj cb after = liftIO $ do- cb' <- mkViewShowCompletionCallback (viewShowCompletionCallbackWrapper cb)- connectSignalFunPtr obj "show-completion" cb' after---- signal View::smart-home-end-type ViewSmartHomeEndCallback =- Gtk.TextIter ->- Int32 ->- IO ()--noViewSmartHomeEndCallback :: Maybe ViewSmartHomeEndCallback-noViewSmartHomeEndCallback = Nothing--type ViewSmartHomeEndCallbackC =- Ptr () -> -- object- Ptr Gtk.TextIter ->- Int32 ->- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkViewSmartHomeEndCallback :: ViewSmartHomeEndCallbackC -> IO (FunPtr ViewSmartHomeEndCallbackC)--viewSmartHomeEndClosure :: ViewSmartHomeEndCallback -> IO Closure-viewSmartHomeEndClosure cb = newCClosure =<< mkViewSmartHomeEndCallback wrapped- where wrapped = viewSmartHomeEndCallbackWrapper cb--viewSmartHomeEndCallbackWrapper ::- ViewSmartHomeEndCallback ->- Ptr () ->- Ptr Gtk.TextIter ->- Int32 ->- Ptr () ->- IO ()-viewSmartHomeEndCallbackWrapper _cb _ iter count _ = do- iter' <- (newBoxed Gtk.TextIter) iter- _cb iter' count--onViewSmartHomeEnd :: (GObject a, MonadIO m) => a -> ViewSmartHomeEndCallback -> m SignalHandlerId-onViewSmartHomeEnd obj cb = liftIO $ connectViewSmartHomeEnd obj cb SignalConnectBefore-afterViewSmartHomeEnd :: (GObject a, MonadIO m) => a -> ViewSmartHomeEndCallback -> m SignalHandlerId-afterViewSmartHomeEnd obj cb = connectViewSmartHomeEnd obj cb SignalConnectAfter--connectViewSmartHomeEnd :: (GObject a, MonadIO m) =>- a -> ViewSmartHomeEndCallback -> SignalConnectMode -> m SignalHandlerId-connectViewSmartHomeEnd obj cb after = liftIO $ do- cb' <- mkViewSmartHomeEndCallback (viewSmartHomeEndCallbackWrapper cb)- connectSignalFunPtr obj "smart-home-end" cb' after---- signal View::undo-type ViewUndoCallback =- IO ()--noViewUndoCallback :: Maybe ViewUndoCallback-noViewUndoCallback = Nothing--type ViewUndoCallbackC =- Ptr () -> -- object- Ptr () -> -- user_data- IO ()--foreign import ccall "wrapper"- mkViewUndoCallback :: ViewUndoCallbackC -> IO (FunPtr ViewUndoCallbackC)--viewUndoClosure :: ViewUndoCallback -> IO Closure-viewUndoClosure cb = newCClosure =<< mkViewUndoCallback wrapped- where wrapped = viewUndoCallbackWrapper cb--viewUndoCallbackWrapper ::- ViewUndoCallback ->- Ptr () ->- Ptr () ->- IO ()-viewUndoCallbackWrapper _cb _ _ = do- _cb --onViewUndo :: (GObject a, MonadIO m) => a -> ViewUndoCallback -> m SignalHandlerId-onViewUndo obj cb = liftIO $ connectViewUndo obj cb SignalConnectBefore-afterViewUndo :: (GObject a, MonadIO m) => a -> ViewUndoCallback -> m SignalHandlerId-afterViewUndo obj cb = connectViewUndo obj cb SignalConnectAfter--connectViewUndo :: (GObject a, MonadIO m) =>- a -> ViewUndoCallback -> SignalConnectMode -> m SignalHandlerId-connectViewUndo obj cb after = liftIO $ do- cb' <- mkViewUndoCallback (viewUndoCallbackWrapper cb)- connectSignalFunPtr obj "undo" cb' after---- VVV Prop "auto-indent"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewAutoIndent :: (MonadIO m, ViewK o) => o -> m Bool-getViewAutoIndent obj = liftIO $ getObjectPropertyBool obj "auto-indent"--setViewAutoIndent :: (MonadIO m, ViewK o) => o -> Bool -> m ()-setViewAutoIndent obj val = liftIO $ setObjectPropertyBool obj "auto-indent" val--constructViewAutoIndent :: Bool -> IO ([Char], GValue)-constructViewAutoIndent val = constructObjectPropertyBool "auto-indent" val--data ViewAutoIndentPropertyInfo-instance AttrInfo ViewAutoIndentPropertyInfo where- type AttrAllowedOps ViewAutoIndentPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewAutoIndentPropertyInfo = (~) Bool- type AttrBaseTypeConstraint ViewAutoIndentPropertyInfo = ViewK- type AttrGetType ViewAutoIndentPropertyInfo = Bool- type AttrLabel ViewAutoIndentPropertyInfo = "auto-indent"- attrGet _ = getViewAutoIndent- attrSet _ = setViewAutoIndent- attrConstruct _ = constructViewAutoIndent- attrClear _ = undefined---- VVV Prop "background-pattern"- -- Type: TInterface "GtkSource" "BackgroundPatternType"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewBackgroundPattern :: (MonadIO m, ViewK o) => o -> m BackgroundPatternType-getViewBackgroundPattern obj = liftIO $ getObjectPropertyEnum obj "background-pattern"--setViewBackgroundPattern :: (MonadIO m, ViewK o) => o -> BackgroundPatternType -> m ()-setViewBackgroundPattern obj val = liftIO $ setObjectPropertyEnum obj "background-pattern" val--constructViewBackgroundPattern :: BackgroundPatternType -> IO ([Char], GValue)-constructViewBackgroundPattern val = constructObjectPropertyEnum "background-pattern" val--data ViewBackgroundPatternPropertyInfo-instance AttrInfo ViewBackgroundPatternPropertyInfo where- type AttrAllowedOps ViewBackgroundPatternPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewBackgroundPatternPropertyInfo = (~) BackgroundPatternType- type AttrBaseTypeConstraint ViewBackgroundPatternPropertyInfo = ViewK- type AttrGetType ViewBackgroundPatternPropertyInfo = BackgroundPatternType- type AttrLabel ViewBackgroundPatternPropertyInfo = "background-pattern"- attrGet _ = getViewBackgroundPattern- attrSet _ = setViewBackgroundPattern- attrConstruct _ = constructViewBackgroundPattern- attrClear _ = undefined---- VVV Prop "completion"- -- Type: TInterface "GtkSource" "Completion"- -- Flags: [PropertyReadable]- -- Nullable: (Just False,Nothing)--getViewCompletion :: (MonadIO m, ViewK o) => o -> m Completion-getViewCompletion obj = liftIO $ checkUnexpectedNothing "getViewCompletion" $ getObjectPropertyObject obj "completion" Completion--data ViewCompletionPropertyInfo-instance AttrInfo ViewCompletionPropertyInfo where- type AttrAllowedOps ViewCompletionPropertyInfo = '[ 'AttrGet, 'AttrClear]- type AttrSetTypeConstraint ViewCompletionPropertyInfo = (~) ()- type AttrBaseTypeConstraint ViewCompletionPropertyInfo = ViewK- type AttrGetType ViewCompletionPropertyInfo = Completion- type AttrLabel ViewCompletionPropertyInfo = "completion"- attrGet _ = getViewCompletion- attrSet _ = undefined- attrConstruct _ = undefined- attrClear _ = undefined---- VVV Prop "draw-spaces"- -- Type: TInterface "GtkSource" "DrawSpacesFlags"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewDrawSpaces :: (MonadIO m, ViewK o) => o -> m [DrawSpacesFlags]-getViewDrawSpaces obj = liftIO $ getObjectPropertyFlags obj "draw-spaces"--setViewDrawSpaces :: (MonadIO m, ViewK o) => o -> [DrawSpacesFlags] -> m ()-setViewDrawSpaces obj val = liftIO $ setObjectPropertyFlags obj "draw-spaces" val--constructViewDrawSpaces :: [DrawSpacesFlags] -> IO ([Char], GValue)-constructViewDrawSpaces val = constructObjectPropertyFlags "draw-spaces" val--data ViewDrawSpacesPropertyInfo-instance AttrInfo ViewDrawSpacesPropertyInfo where- type AttrAllowedOps ViewDrawSpacesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewDrawSpacesPropertyInfo = (~) [DrawSpacesFlags]- type AttrBaseTypeConstraint ViewDrawSpacesPropertyInfo = ViewK- type AttrGetType ViewDrawSpacesPropertyInfo = [DrawSpacesFlags]- type AttrLabel ViewDrawSpacesPropertyInfo = "draw-spaces"- attrGet _ = getViewDrawSpaces- attrSet _ = setViewDrawSpaces- attrConstruct _ = constructViewDrawSpaces- attrClear _ = undefined---- VVV Prop "highlight-current-line"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewHighlightCurrentLine :: (MonadIO m, ViewK o) => o -> m Bool-getViewHighlightCurrentLine obj = liftIO $ getObjectPropertyBool obj "highlight-current-line"--setViewHighlightCurrentLine :: (MonadIO m, ViewK o) => o -> Bool -> m ()-setViewHighlightCurrentLine obj val = liftIO $ setObjectPropertyBool obj "highlight-current-line" val--constructViewHighlightCurrentLine :: Bool -> IO ([Char], GValue)-constructViewHighlightCurrentLine val = constructObjectPropertyBool "highlight-current-line" val--data ViewHighlightCurrentLinePropertyInfo-instance AttrInfo ViewHighlightCurrentLinePropertyInfo where- type AttrAllowedOps ViewHighlightCurrentLinePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewHighlightCurrentLinePropertyInfo = (~) Bool- type AttrBaseTypeConstraint ViewHighlightCurrentLinePropertyInfo = ViewK- type AttrGetType ViewHighlightCurrentLinePropertyInfo = Bool- type AttrLabel ViewHighlightCurrentLinePropertyInfo = "highlight-current-line"- attrGet _ = getViewHighlightCurrentLine- attrSet _ = setViewHighlightCurrentLine- attrConstruct _ = constructViewHighlightCurrentLine- attrClear _ = undefined---- VVV Prop "indent-on-tab"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewIndentOnTab :: (MonadIO m, ViewK o) => o -> m Bool-getViewIndentOnTab obj = liftIO $ getObjectPropertyBool obj "indent-on-tab"--setViewIndentOnTab :: (MonadIO m, ViewK o) => o -> Bool -> m ()-setViewIndentOnTab obj val = liftIO $ setObjectPropertyBool obj "indent-on-tab" val--constructViewIndentOnTab :: Bool -> IO ([Char], GValue)-constructViewIndentOnTab val = constructObjectPropertyBool "indent-on-tab" val--data ViewIndentOnTabPropertyInfo-instance AttrInfo ViewIndentOnTabPropertyInfo where- type AttrAllowedOps ViewIndentOnTabPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewIndentOnTabPropertyInfo = (~) Bool- type AttrBaseTypeConstraint ViewIndentOnTabPropertyInfo = ViewK- type AttrGetType ViewIndentOnTabPropertyInfo = Bool- type AttrLabel ViewIndentOnTabPropertyInfo = "indent-on-tab"- attrGet _ = getViewIndentOnTab- attrSet _ = setViewIndentOnTab- attrConstruct _ = constructViewIndentOnTab- attrClear _ = undefined---- VVV Prop "indent-width"- -- Type: TBasicType TInt- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewIndentWidth :: (MonadIO m, ViewK o) => o -> m Int32-getViewIndentWidth obj = liftIO $ getObjectPropertyInt32 obj "indent-width"--setViewIndentWidth :: (MonadIO m, ViewK o) => o -> Int32 -> m ()-setViewIndentWidth obj val = liftIO $ setObjectPropertyInt32 obj "indent-width" val--constructViewIndentWidth :: Int32 -> IO ([Char], GValue)-constructViewIndentWidth val = constructObjectPropertyInt32 "indent-width" val--data ViewIndentWidthPropertyInfo-instance AttrInfo ViewIndentWidthPropertyInfo where- type AttrAllowedOps ViewIndentWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewIndentWidthPropertyInfo = (~) Int32- type AttrBaseTypeConstraint ViewIndentWidthPropertyInfo = ViewK- type AttrGetType ViewIndentWidthPropertyInfo = Int32- type AttrLabel ViewIndentWidthPropertyInfo = "indent-width"- attrGet _ = getViewIndentWidth- attrSet _ = setViewIndentWidth- attrConstruct _ = constructViewIndentWidth- attrClear _ = undefined---- VVV Prop "insert-spaces-instead-of-tabs"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewInsertSpacesInsteadOfTabs :: (MonadIO m, ViewK o) => o -> m Bool-getViewInsertSpacesInsteadOfTabs obj = liftIO $ getObjectPropertyBool obj "insert-spaces-instead-of-tabs"--setViewInsertSpacesInsteadOfTabs :: (MonadIO m, ViewK o) => o -> Bool -> m ()-setViewInsertSpacesInsteadOfTabs obj val = liftIO $ setObjectPropertyBool obj "insert-spaces-instead-of-tabs" val--constructViewInsertSpacesInsteadOfTabs :: Bool -> IO ([Char], GValue)-constructViewInsertSpacesInsteadOfTabs val = constructObjectPropertyBool "insert-spaces-instead-of-tabs" val--data ViewInsertSpacesInsteadOfTabsPropertyInfo-instance AttrInfo ViewInsertSpacesInsteadOfTabsPropertyInfo where- type AttrAllowedOps ViewInsertSpacesInsteadOfTabsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewInsertSpacesInsteadOfTabsPropertyInfo = (~) Bool- type AttrBaseTypeConstraint ViewInsertSpacesInsteadOfTabsPropertyInfo = ViewK- type AttrGetType ViewInsertSpacesInsteadOfTabsPropertyInfo = Bool- type AttrLabel ViewInsertSpacesInsteadOfTabsPropertyInfo = "insert-spaces-instead-of-tabs"- attrGet _ = getViewInsertSpacesInsteadOfTabs- attrSet _ = setViewInsertSpacesInsteadOfTabs- attrConstruct _ = constructViewInsertSpacesInsteadOfTabs- attrClear _ = undefined---- VVV Prop "right-margin-position"- -- Type: TBasicType TUInt- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewRightMarginPosition :: (MonadIO m, ViewK o) => o -> m Word32-getViewRightMarginPosition obj = liftIO $ getObjectPropertyUInt32 obj "right-margin-position"--setViewRightMarginPosition :: (MonadIO m, ViewK o) => o -> Word32 -> m ()-setViewRightMarginPosition obj val = liftIO $ setObjectPropertyUInt32 obj "right-margin-position" val--constructViewRightMarginPosition :: Word32 -> IO ([Char], GValue)-constructViewRightMarginPosition val = constructObjectPropertyUInt32 "right-margin-position" val--data ViewRightMarginPositionPropertyInfo-instance AttrInfo ViewRightMarginPositionPropertyInfo where- type AttrAllowedOps ViewRightMarginPositionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewRightMarginPositionPropertyInfo = (~) Word32- type AttrBaseTypeConstraint ViewRightMarginPositionPropertyInfo = ViewK- type AttrGetType ViewRightMarginPositionPropertyInfo = Word32- type AttrLabel ViewRightMarginPositionPropertyInfo = "right-margin-position"- attrGet _ = getViewRightMarginPosition- attrSet _ = setViewRightMarginPosition- attrConstruct _ = constructViewRightMarginPosition- attrClear _ = undefined---- VVV Prop "show-line-marks"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewShowLineMarks :: (MonadIO m, ViewK o) => o -> m Bool-getViewShowLineMarks obj = liftIO $ getObjectPropertyBool obj "show-line-marks"--setViewShowLineMarks :: (MonadIO m, ViewK o) => o -> Bool -> m ()-setViewShowLineMarks obj val = liftIO $ setObjectPropertyBool obj "show-line-marks" val--constructViewShowLineMarks :: Bool -> IO ([Char], GValue)-constructViewShowLineMarks val = constructObjectPropertyBool "show-line-marks" val--data ViewShowLineMarksPropertyInfo-instance AttrInfo ViewShowLineMarksPropertyInfo where- type AttrAllowedOps ViewShowLineMarksPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewShowLineMarksPropertyInfo = (~) Bool- type AttrBaseTypeConstraint ViewShowLineMarksPropertyInfo = ViewK- type AttrGetType ViewShowLineMarksPropertyInfo = Bool- type AttrLabel ViewShowLineMarksPropertyInfo = "show-line-marks"- attrGet _ = getViewShowLineMarks- attrSet _ = setViewShowLineMarks- attrConstruct _ = constructViewShowLineMarks- attrClear _ = undefined---- VVV Prop "show-line-numbers"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewShowLineNumbers :: (MonadIO m, ViewK o) => o -> m Bool-getViewShowLineNumbers obj = liftIO $ getObjectPropertyBool obj "show-line-numbers"--setViewShowLineNumbers :: (MonadIO m, ViewK o) => o -> Bool -> m ()-setViewShowLineNumbers obj val = liftIO $ setObjectPropertyBool obj "show-line-numbers" val--constructViewShowLineNumbers :: Bool -> IO ([Char], GValue)-constructViewShowLineNumbers val = constructObjectPropertyBool "show-line-numbers" val--data ViewShowLineNumbersPropertyInfo-instance AttrInfo ViewShowLineNumbersPropertyInfo where- type AttrAllowedOps ViewShowLineNumbersPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewShowLineNumbersPropertyInfo = (~) Bool- type AttrBaseTypeConstraint ViewShowLineNumbersPropertyInfo = ViewK- type AttrGetType ViewShowLineNumbersPropertyInfo = Bool- type AttrLabel ViewShowLineNumbersPropertyInfo = "show-line-numbers"- attrGet _ = getViewShowLineNumbers- attrSet _ = setViewShowLineNumbers- attrConstruct _ = constructViewShowLineNumbers- attrClear _ = undefined---- VVV Prop "show-right-margin"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewShowRightMargin :: (MonadIO m, ViewK o) => o -> m Bool-getViewShowRightMargin obj = liftIO $ getObjectPropertyBool obj "show-right-margin"--setViewShowRightMargin :: (MonadIO m, ViewK o) => o -> Bool -> m ()-setViewShowRightMargin obj val = liftIO $ setObjectPropertyBool obj "show-right-margin" val--constructViewShowRightMargin :: Bool -> IO ([Char], GValue)-constructViewShowRightMargin val = constructObjectPropertyBool "show-right-margin" val--data ViewShowRightMarginPropertyInfo-instance AttrInfo ViewShowRightMarginPropertyInfo where- type AttrAllowedOps ViewShowRightMarginPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewShowRightMarginPropertyInfo = (~) Bool- type AttrBaseTypeConstraint ViewShowRightMarginPropertyInfo = ViewK- type AttrGetType ViewShowRightMarginPropertyInfo = Bool- type AttrLabel ViewShowRightMarginPropertyInfo = "show-right-margin"- attrGet _ = getViewShowRightMargin- attrSet _ = setViewShowRightMargin- attrConstruct _ = constructViewShowRightMargin- attrClear _ = undefined---- VVV Prop "smart-backspace"- -- Type: TBasicType TBoolean- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewSmartBackspace :: (MonadIO m, ViewK o) => o -> m Bool-getViewSmartBackspace obj = liftIO $ getObjectPropertyBool obj "smart-backspace"--setViewSmartBackspace :: (MonadIO m, ViewK o) => o -> Bool -> m ()-setViewSmartBackspace obj val = liftIO $ setObjectPropertyBool obj "smart-backspace" val--constructViewSmartBackspace :: Bool -> IO ([Char], GValue)-constructViewSmartBackspace val = constructObjectPropertyBool "smart-backspace" val--data ViewSmartBackspacePropertyInfo-instance AttrInfo ViewSmartBackspacePropertyInfo where- type AttrAllowedOps ViewSmartBackspacePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewSmartBackspacePropertyInfo = (~) Bool- type AttrBaseTypeConstraint ViewSmartBackspacePropertyInfo = ViewK- type AttrGetType ViewSmartBackspacePropertyInfo = Bool- type AttrLabel ViewSmartBackspacePropertyInfo = "smart-backspace"- attrGet _ = getViewSmartBackspace- attrSet _ = setViewSmartBackspace- attrConstruct _ = constructViewSmartBackspace- attrClear _ = undefined---- VVV Prop "smart-home-end"- -- Type: TInterface "GtkSource" "SmartHomeEndType"- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewSmartHomeEnd :: (MonadIO m, ViewK o) => o -> m SmartHomeEndType-getViewSmartHomeEnd obj = liftIO $ getObjectPropertyEnum obj "smart-home-end"--setViewSmartHomeEnd :: (MonadIO m, ViewK o) => o -> SmartHomeEndType -> m ()-setViewSmartHomeEnd obj val = liftIO $ setObjectPropertyEnum obj "smart-home-end" val--constructViewSmartHomeEnd :: SmartHomeEndType -> IO ([Char], GValue)-constructViewSmartHomeEnd val = constructObjectPropertyEnum "smart-home-end" val--data ViewSmartHomeEndPropertyInfo-instance AttrInfo ViewSmartHomeEndPropertyInfo where- type AttrAllowedOps ViewSmartHomeEndPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewSmartHomeEndPropertyInfo = (~) SmartHomeEndType- type AttrBaseTypeConstraint ViewSmartHomeEndPropertyInfo = ViewK- type AttrGetType ViewSmartHomeEndPropertyInfo = SmartHomeEndType- type AttrLabel ViewSmartHomeEndPropertyInfo = "smart-home-end"- attrGet _ = getViewSmartHomeEnd- attrSet _ = setViewSmartHomeEnd- attrConstruct _ = constructViewSmartHomeEnd- attrClear _ = undefined---- VVV Prop "tab-width"- -- Type: TBasicType TUInt- -- Flags: [PropertyReadable,PropertyWritable]- -- Nullable: (Just False,Just False)--getViewTabWidth :: (MonadIO m, ViewK o) => o -> m Word32-getViewTabWidth obj = liftIO $ getObjectPropertyUInt32 obj "tab-width"--setViewTabWidth :: (MonadIO m, ViewK o) => o -> Word32 -> m ()-setViewTabWidth obj val = liftIO $ setObjectPropertyUInt32 obj "tab-width" val--constructViewTabWidth :: Word32 -> IO ([Char], GValue)-constructViewTabWidth val = constructObjectPropertyUInt32 "tab-width" val--data ViewTabWidthPropertyInfo-instance AttrInfo ViewTabWidthPropertyInfo where- type AttrAllowedOps ViewTabWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]- type AttrSetTypeConstraint ViewTabWidthPropertyInfo = (~) Word32- type AttrBaseTypeConstraint ViewTabWidthPropertyInfo = ViewK- type AttrGetType ViewTabWidthPropertyInfo = Word32- type AttrLabel ViewTabWidthPropertyInfo = "tab-width"- attrGet _ = getViewTabWidth- attrSet _ = setViewTabWidth- attrConstruct _ = constructViewTabWidth- attrClear _ = undefined--type instance AttributeList View = ViewAttributeList-type ViewAttributeList = ('[ '("acceptsTab", Gtk.TextViewAcceptsTabPropertyInfo), '("appPaintable", Gtk.WidgetAppPaintablePropertyInfo), '("autoIndent", ViewAutoIndentPropertyInfo), '("backgroundPattern", ViewBackgroundPatternPropertyInfo), '("borderWidth", Gtk.ContainerBorderWidthPropertyInfo), '("bottomMargin", Gtk.TextViewBottomMarginPropertyInfo), '("buffer", Gtk.TextViewBufferPropertyInfo), '("canDefault", Gtk.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.WidgetCanFocusPropertyInfo), '("child", Gtk.ContainerChildPropertyInfo), '("completion", ViewCompletionPropertyInfo), '("compositeChild", Gtk.WidgetCompositeChildPropertyInfo), '("cursorVisible", Gtk.TextViewCursorVisiblePropertyInfo), '("doubleBuffered", Gtk.WidgetDoubleBufferedPropertyInfo), '("drawSpaces", ViewDrawSpacesPropertyInfo), '("editable", Gtk.TextViewEditablePropertyInfo), '("events", Gtk.WidgetEventsPropertyInfo), '("expand", Gtk.WidgetExpandPropertyInfo), '("hadjustment", Gtk.ScrollableHadjustmentPropertyInfo), '("halign", Gtk.WidgetHalignPropertyInfo), '("hasDefault", Gtk.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.WidgetHexpandSetPropertyInfo), '("highlightCurrentLine", ViewHighlightCurrentLinePropertyInfo), '("hscrollPolicy", Gtk.ScrollableHscrollPolicyPropertyInfo), '("imModule", Gtk.TextViewImModulePropertyInfo), '("indent", Gtk.TextViewIndentPropertyInfo), '("indentOnTab", ViewIndentOnTabPropertyInfo), '("indentWidth", ViewIndentWidthPropertyInfo), '("inputHints", Gtk.TextViewInputHintsPropertyInfo), '("inputPurpose", Gtk.TextViewInputPurposePropertyInfo), '("insertSpacesInsteadOfTabs", ViewInsertSpacesInsteadOfTabsPropertyInfo), '("isFocus", Gtk.WidgetIsFocusPropertyInfo), '("justification", Gtk.TextViewJustificationPropertyInfo), '("leftMargin", Gtk.TextViewLeftMarginPropertyInfo), '("margin", Gtk.WidgetMarginPropertyInfo), '("marginBottom", Gtk.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.WidgetMarginTopPropertyInfo), '("monospace", Gtk.TextViewMonospacePropertyInfo), '("name", Gtk.WidgetNamePropertyInfo), '("noShowAll", Gtk.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.WidgetOpacityPropertyInfo), '("overwrite", Gtk.TextViewOverwritePropertyInfo), '("parent", Gtk.WidgetParentPropertyInfo), '("pixelsAboveLines", Gtk.TextViewPixelsAboveLinesPropertyInfo), '("pixelsBelowLines", Gtk.TextViewPixelsBelowLinesPropertyInfo), '("pixelsInsideWrap", Gtk.TextViewPixelsInsideWrapPropertyInfo), '("populateAll", Gtk.TextViewPopulateAllPropertyInfo), '("receivesDefault", Gtk.WidgetReceivesDefaultPropertyInfo), '("resizeMode", Gtk.ContainerResizeModePropertyInfo), '("rightMargin", Gtk.TextViewRightMarginPropertyInfo), '("rightMarginPosition", ViewRightMarginPositionPropertyInfo), '("scaleFactor", Gtk.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.WidgetSensitivePropertyInfo), '("showLineMarks", ViewShowLineMarksPropertyInfo), '("showLineNumbers", ViewShowLineNumbersPropertyInfo), '("showRightMargin", ViewShowRightMarginPropertyInfo), '("smartBackspace", ViewSmartBackspacePropertyInfo), '("smartHomeEnd", ViewSmartHomeEndPropertyInfo), '("style", Gtk.WidgetStylePropertyInfo), '("tabWidth", ViewTabWidthPropertyInfo), '("tabs", Gtk.TextViewTabsPropertyInfo), '("tooltipMarkup", Gtk.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.WidgetTooltipTextPropertyInfo), '("topMargin", Gtk.TextViewTopMarginPropertyInfo), '("vadjustment", Gtk.ScrollableVadjustmentPropertyInfo), '("valign", Gtk.WidgetValignPropertyInfo), '("vexpand", Gtk.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.WidgetVexpandSetPropertyInfo), '("visible", Gtk.WidgetVisiblePropertyInfo), '("vscrollPolicy", Gtk.ScrollableVscrollPolicyPropertyInfo), '("widthRequest", Gtk.WidgetWidthRequestPropertyInfo), '("window", Gtk.WidgetWindowPropertyInfo), '("wrapMode", Gtk.TextViewWrapModePropertyInfo)] :: [(Symbol, *)])--viewAutoIndent :: AttrLabelProxy "autoIndent"-viewAutoIndent = AttrLabelProxy--viewBackgroundPattern :: AttrLabelProxy "backgroundPattern"-viewBackgroundPattern = AttrLabelProxy--viewCompletion :: AttrLabelProxy "completion"-viewCompletion = AttrLabelProxy--viewDrawSpaces :: AttrLabelProxy "drawSpaces"-viewDrawSpaces = AttrLabelProxy--viewHighlightCurrentLine :: AttrLabelProxy "highlightCurrentLine"-viewHighlightCurrentLine = AttrLabelProxy--viewIndentOnTab :: AttrLabelProxy "indentOnTab"-viewIndentOnTab = AttrLabelProxy--viewIndentWidth :: AttrLabelProxy "indentWidth"-viewIndentWidth = AttrLabelProxy--viewInsertSpacesInsteadOfTabs :: AttrLabelProxy "insertSpacesInsteadOfTabs"-viewInsertSpacesInsteadOfTabs = AttrLabelProxy--viewRightMarginPosition :: AttrLabelProxy "rightMarginPosition"-viewRightMarginPosition = AttrLabelProxy--viewShowLineMarks :: AttrLabelProxy "showLineMarks"-viewShowLineMarks = AttrLabelProxy--viewShowLineNumbers :: AttrLabelProxy "showLineNumbers"-viewShowLineNumbers = AttrLabelProxy--viewShowRightMargin :: AttrLabelProxy "showRightMargin"-viewShowRightMargin = AttrLabelProxy--viewSmartBackspace :: AttrLabelProxy "smartBackspace"-viewSmartBackspace = AttrLabelProxy--viewSmartHomeEnd :: AttrLabelProxy "smartHomeEnd"-viewSmartHomeEnd = AttrLabelProxy--viewTabWidth :: AttrLabelProxy "tabWidth"-viewTabWidth = AttrLabelProxy--data ViewChangeCaseSignalInfo-instance SignalInfo ViewChangeCaseSignalInfo where- type HaskellCallbackType ViewChangeCaseSignalInfo = ViewChangeCaseCallback- connectSignal _ = connectViewChangeCase--data ViewChangeNumberSignalInfo-instance SignalInfo ViewChangeNumberSignalInfo where- type HaskellCallbackType ViewChangeNumberSignalInfo = ViewChangeNumberCallback- connectSignal _ = connectViewChangeNumber--data ViewJoinLinesSignalInfo-instance SignalInfo ViewJoinLinesSignalInfo where- type HaskellCallbackType ViewJoinLinesSignalInfo = ViewJoinLinesCallback- connectSignal _ = connectViewJoinLines--data ViewLineMarkActivatedSignalInfo-instance SignalInfo ViewLineMarkActivatedSignalInfo where- type HaskellCallbackType ViewLineMarkActivatedSignalInfo = ViewLineMarkActivatedCallback- connectSignal _ = connectViewLineMarkActivated--data ViewMoveLinesSignalInfo-instance SignalInfo ViewMoveLinesSignalInfo where- type HaskellCallbackType ViewMoveLinesSignalInfo = ViewMoveLinesCallback- connectSignal _ = connectViewMoveLines--data ViewMoveToMatchingBracketSignalInfo-instance SignalInfo ViewMoveToMatchingBracketSignalInfo where- type HaskellCallbackType ViewMoveToMatchingBracketSignalInfo = ViewMoveToMatchingBracketCallback- connectSignal _ = connectViewMoveToMatchingBracket--data ViewMoveWordsSignalInfo-instance SignalInfo ViewMoveWordsSignalInfo where- type HaskellCallbackType ViewMoveWordsSignalInfo = ViewMoveWordsCallback- connectSignal _ = connectViewMoveWords--data ViewRedoSignalInfo-instance SignalInfo ViewRedoSignalInfo where- type HaskellCallbackType ViewRedoSignalInfo = ViewRedoCallback- connectSignal _ = connectViewRedo--data ViewShowCompletionSignalInfo-instance SignalInfo ViewShowCompletionSignalInfo where- type HaskellCallbackType ViewShowCompletionSignalInfo = ViewShowCompletionCallback- connectSignal _ = connectViewShowCompletion--data ViewSmartHomeEndSignalInfo-instance SignalInfo ViewSmartHomeEndSignalInfo where- type HaskellCallbackType ViewSmartHomeEndSignalInfo = ViewSmartHomeEndCallback- connectSignal _ = connectViewSmartHomeEnd--data ViewUndoSignalInfo-instance SignalInfo ViewUndoSignalInfo where- type HaskellCallbackType ViewUndoSignalInfo = ViewUndoCallback- connectSignal _ = connectViewUndo--type instance SignalList View = ViewSignalList-type ViewSignalList = ('[ '("accelClosuresChanged", Gtk.WidgetAccelClosuresChangedSignalInfo), '("add", Gtk.ContainerAddSignalInfo), '("backspace", Gtk.TextViewBackspaceSignalInfo), '("buttonPressEvent", Gtk.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.WidgetCanActivateAccelSignalInfo), '("changeCase", ViewChangeCaseSignalInfo), '("changeNumber", ViewChangeNumberSignalInfo), '("checkResize", Gtk.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.WidgetConfigureEventSignalInfo), '("copyClipboard", Gtk.TextViewCopyClipboardSignalInfo), '("cutClipboard", Gtk.TextViewCutClipboardSignalInfo), '("damageEvent", Gtk.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.WidgetDeleteEventSignalInfo), '("deleteFromCursor", Gtk.TextViewDeleteFromCursorSignalInfo), '("destroy", Gtk.WidgetDestroySignalInfo), '("destroyEvent", Gtk.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.WidgetDirectionChangedSignalInfo), '("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), '("enterNotifyEvent", Gtk.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.WidgetEventSignalInfo), '("eventAfter", Gtk.WidgetEventAfterSignalInfo), '("extendSelection", Gtk.TextViewExtendSelectionSignalInfo), '("focus", Gtk.WidgetFocusSignalInfo), '("focusInEvent", Gtk.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.WidgetGrabNotifySignalInfo), '("hide", Gtk.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.WidgetHierarchyChangedSignalInfo), '("insertAtCursor", Gtk.TextViewInsertAtCursorSignalInfo), '("joinLines", ViewJoinLinesSignalInfo), '("keyPressEvent", Gtk.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.WidgetLeaveNotifyEventSignalInfo), '("lineMarkActivated", ViewLineMarkActivatedSignalInfo), '("map", Gtk.WidgetMapSignalInfo), '("mapEvent", Gtk.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.WidgetMotionNotifyEventSignalInfo), '("moveCursor", Gtk.TextViewMoveCursorSignalInfo), '("moveFocus", Gtk.WidgetMoveFocusSignalInfo), '("moveLines", ViewMoveLinesSignalInfo), '("moveToMatchingBracket", ViewMoveToMatchingBracketSignalInfo), '("moveViewport", Gtk.TextViewMoveViewportSignalInfo), '("moveWords", ViewMoveWordsSignalInfo), '("notify", GObject.ObjectNotifySignalInfo), '("parentSet", Gtk.WidgetParentSetSignalInfo), '("pasteClipboard", Gtk.TextViewPasteClipboardSignalInfo), '("populatePopup", Gtk.TextViewPopulatePopupSignalInfo), '("popupMenu", Gtk.WidgetPopupMenuSignalInfo), '("preeditChanged", Gtk.TextViewPreeditChangedSignalInfo), '("propertyNotifyEvent", Gtk.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.WidgetQueryTooltipSignalInfo), '("realize", Gtk.WidgetRealizeSignalInfo), '("redo", ViewRedoSignalInfo), '("remove", Gtk.ContainerRemoveSignalInfo), '("screenChanged", Gtk.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.WidgetScrollEventSignalInfo), '("selectAll", Gtk.TextViewSelectAllSignalInfo), '("selectionClearEvent", Gtk.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.WidgetSelectionRequestEventSignalInfo), '("setAnchor", Gtk.TextViewSetAnchorSignalInfo), '("setFocusChild", Gtk.ContainerSetFocusChildSignalInfo), '("show", Gtk.WidgetShowSignalInfo), '("showCompletion", ViewShowCompletionSignalInfo), '("showHelp", Gtk.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.WidgetSizeAllocateSignalInfo), '("smartHomeEnd", ViewSmartHomeEndSignalInfo), '("stateChanged", Gtk.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.WidgetStyleUpdatedSignalInfo), '("toggleCursorVisible", Gtk.TextViewToggleCursorVisibleSignalInfo), '("toggleOverwrite", Gtk.TextViewToggleOverwriteSignalInfo), '("touchEvent", Gtk.WidgetTouchEventSignalInfo), '("undo", ViewUndoSignalInfo), '("unmap", Gtk.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])---- method View::new--- method type : Constructor--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "View")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_new" gtk_source_view_new :: - IO (Ptr View)---viewNew ::- (MonadIO m) =>- m View -- result-viewNew = liftIO $ do- result <- gtk_source_view_new- checkUnexpectedReturnNULL "gtk_source_view_new" result- result' <- (newObject View) result- return result'---- method View::new_with_buffer--- method type : Constructor--- Args : [Arg {argCName = "buffer", argType = TInterface "GtkSource" "Buffer", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "View")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_new_with_buffer" gtk_source_view_new_with_buffer :: - Ptr Buffer -> -- buffer : TInterface "GtkSource" "Buffer"- IO (Ptr View)---viewNewWithBuffer ::- (MonadIO m, BufferK a) =>- a -- buffer- -> m View -- result-viewNewWithBuffer buffer = liftIO $ do- let buffer' = unsafeManagedPtrCastPtr buffer- result <- gtk_source_view_new_with_buffer buffer'- checkUnexpectedReturnNULL "gtk_source_view_new_with_buffer" result- result' <- (newObject View) result- touchManagedPtr buffer- return result'---- method View::get_auto_indent--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_auto_indent" gtk_source_view_get_auto_indent :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO CInt---viewGetAutoIndent ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Bool -- result-viewGetAutoIndent _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_auto_indent _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data ViewGetAutoIndentMethodInfo-instance (signature ~ (m Bool), MonadIO m, ViewK a) => MethodInfo ViewGetAutoIndentMethodInfo a signature where- overloadedMethod _ = viewGetAutoIndent---- method View::get_background_pattern--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "BackgroundPatternType")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_background_pattern" gtk_source_view_get_background_pattern :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO CUInt---viewGetBackgroundPattern ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m BackgroundPatternType -- result-viewGetBackgroundPattern _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_background_pattern _obj'- let result' = (toEnum . fromIntegral) result- touchManagedPtr _obj- return result'--data ViewGetBackgroundPatternMethodInfo-instance (signature ~ (m BackgroundPatternType), MonadIO m, ViewK a) => MethodInfo ViewGetBackgroundPatternMethodInfo a signature where- overloadedMethod _ = viewGetBackgroundPattern---- method View::get_completion--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Completion")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_completion" gtk_source_view_get_completion :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO (Ptr Completion)---viewGetCompletion ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Completion -- result-viewGetCompletion _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_completion _obj'- checkUnexpectedReturnNULL "gtk_source_view_get_completion" result- result' <- (newObject Completion) result- touchManagedPtr _obj- return result'--data ViewGetCompletionMethodInfo-instance (signature ~ (m Completion), MonadIO m, ViewK a) => MethodInfo ViewGetCompletionMethodInfo a signature where- overloadedMethod _ = viewGetCompletion---- method View::get_draw_spaces--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "DrawSpacesFlags")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_draw_spaces" gtk_source_view_get_draw_spaces :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO CUInt---viewGetDrawSpaces ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m [DrawSpacesFlags] -- result-viewGetDrawSpaces _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_draw_spaces _obj'- let result' = wordToGFlags result- touchManagedPtr _obj- return result'--data ViewGetDrawSpacesMethodInfo-instance (signature ~ (m [DrawSpacesFlags]), MonadIO m, ViewK a) => MethodInfo ViewGetDrawSpacesMethodInfo a signature where- overloadedMethod _ = viewGetDrawSpaces---- method View::get_gutter--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "window_type", argType = TInterface "Gtk" "TextWindowType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Gutter")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_gutter" gtk_source_view_get_gutter :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CUInt -> -- window_type : TInterface "Gtk" "TextWindowType"- IO (Ptr Gutter)---viewGetGutter ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Gtk.TextWindowType -- windowType- -> m Gutter -- result-viewGetGutter _obj windowType = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let windowType' = (fromIntegral . fromEnum) windowType- result <- gtk_source_view_get_gutter _obj' windowType'- checkUnexpectedReturnNULL "gtk_source_view_get_gutter" result- result' <- (newObject Gutter) result- touchManagedPtr _obj- return result'--data ViewGetGutterMethodInfo-instance (signature ~ (Gtk.TextWindowType -> m Gutter), MonadIO m, ViewK a) => MethodInfo ViewGetGutterMethodInfo a signature where- overloadedMethod _ = viewGetGutter---- method View::get_highlight_current_line--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_highlight_current_line" gtk_source_view_get_highlight_current_line :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO CInt---viewGetHighlightCurrentLine ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Bool -- result-viewGetHighlightCurrentLine _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_highlight_current_line _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data ViewGetHighlightCurrentLineMethodInfo-instance (signature ~ (m Bool), MonadIO m, ViewK a) => MethodInfo ViewGetHighlightCurrentLineMethodInfo a signature where- overloadedMethod _ = viewGetHighlightCurrentLine---- method View::get_indent_on_tab--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_indent_on_tab" gtk_source_view_get_indent_on_tab :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO CInt---viewGetIndentOnTab ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Bool -- result-viewGetIndentOnTab _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_indent_on_tab _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data ViewGetIndentOnTabMethodInfo-instance (signature ~ (m Bool), MonadIO m, ViewK a) => MethodInfo ViewGetIndentOnTabMethodInfo a signature where- overloadedMethod _ = viewGetIndentOnTab---- method View::get_indent_width--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_indent_width" gtk_source_view_get_indent_width :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO Int32---viewGetIndentWidth ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Int32 -- result-viewGetIndentWidth _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_indent_width _obj'- touchManagedPtr _obj- return result--data ViewGetIndentWidthMethodInfo-instance (signature ~ (m Int32), MonadIO m, ViewK a) => MethodInfo ViewGetIndentWidthMethodInfo a signature where- overloadedMethod _ = viewGetIndentWidth---- method View::get_insert_spaces_instead_of_tabs--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_insert_spaces_instead_of_tabs" gtk_source_view_get_insert_spaces_instead_of_tabs :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO CInt---viewGetInsertSpacesInsteadOfTabs ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Bool -- result-viewGetInsertSpacesInsteadOfTabs _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_insert_spaces_instead_of_tabs _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data ViewGetInsertSpacesInsteadOfTabsMethodInfo-instance (signature ~ (m Bool), MonadIO m, ViewK a) => MethodInfo ViewGetInsertSpacesInsteadOfTabsMethodInfo a signature where- overloadedMethod _ = viewGetInsertSpacesInsteadOfTabs---- method View::get_mark_attributes--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "priority", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "MarkAttributes")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_mark_attributes" gtk_source_view_get_mark_attributes :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CString -> -- category : TBasicType TUTF8- Int32 -> -- priority : TBasicType TInt- IO (Ptr MarkAttributes)---viewGetMarkAttributes ::- (MonadIO m, ViewK a) =>- a -- _obj- -> T.Text -- category- -> Int32 -- priority- -> m MarkAttributes -- result-viewGetMarkAttributes _obj category priority = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- category' <- textToCString category- result <- gtk_source_view_get_mark_attributes _obj' category' priority- checkUnexpectedReturnNULL "gtk_source_view_get_mark_attributes" result- result' <- (newObject MarkAttributes) result- touchManagedPtr _obj- freeMem category'- return result'--data ViewGetMarkAttributesMethodInfo-instance (signature ~ (T.Text -> Int32 -> m MarkAttributes), MonadIO m, ViewK a) => MethodInfo ViewGetMarkAttributesMethodInfo a signature where- overloadedMethod _ = viewGetMarkAttributes---- method View::get_right_margin_position--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_right_margin_position" gtk_source_view_get_right_margin_position :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO Word32---viewGetRightMarginPosition ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Word32 -- result-viewGetRightMarginPosition _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_right_margin_position _obj'- touchManagedPtr _obj- return result--data ViewGetRightMarginPositionMethodInfo-instance (signature ~ (m Word32), MonadIO m, ViewK a) => MethodInfo ViewGetRightMarginPositionMethodInfo a signature where- overloadedMethod _ = viewGetRightMarginPosition---- method View::get_show_line_marks--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_show_line_marks" gtk_source_view_get_show_line_marks :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO CInt---viewGetShowLineMarks ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Bool -- result-viewGetShowLineMarks _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_show_line_marks _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data ViewGetShowLineMarksMethodInfo-instance (signature ~ (m Bool), MonadIO m, ViewK a) => MethodInfo ViewGetShowLineMarksMethodInfo a signature where- overloadedMethod _ = viewGetShowLineMarks---- method View::get_show_line_numbers--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_show_line_numbers" gtk_source_view_get_show_line_numbers :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO CInt---viewGetShowLineNumbers ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Bool -- result-viewGetShowLineNumbers _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_show_line_numbers _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data ViewGetShowLineNumbersMethodInfo-instance (signature ~ (m Bool), MonadIO m, ViewK a) => MethodInfo ViewGetShowLineNumbersMethodInfo a signature where- overloadedMethod _ = viewGetShowLineNumbers---- method View::get_show_right_margin--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_show_right_margin" gtk_source_view_get_show_right_margin :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO CInt---viewGetShowRightMargin ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Bool -- result-viewGetShowRightMargin _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_show_right_margin _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data ViewGetShowRightMarginMethodInfo-instance (signature ~ (m Bool), MonadIO m, ViewK a) => MethodInfo ViewGetShowRightMarginMethodInfo a signature where- overloadedMethod _ = viewGetShowRightMargin---- method View::get_smart_backspace--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TBoolean)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_smart_backspace" gtk_source_view_get_smart_backspace :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO CInt---viewGetSmartBackspace ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Bool -- result-viewGetSmartBackspace _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_smart_backspace _obj'- let result' = (/= 0) result- touchManagedPtr _obj- return result'--data ViewGetSmartBackspaceMethodInfo-instance (signature ~ (m Bool), MonadIO m, ViewK a) => MethodInfo ViewGetSmartBackspaceMethodInfo a signature where- overloadedMethod _ = viewGetSmartBackspace---- method View::get_smart_home_end--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "SmartHomeEndType")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_smart_home_end" gtk_source_view_get_smart_home_end :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO CUInt---viewGetSmartHomeEnd ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m SmartHomeEndType -- result-viewGetSmartHomeEnd _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_smart_home_end _obj'- let result' = (toEnum . fromIntegral) result- touchManagedPtr _obj- return result'--data ViewGetSmartHomeEndMethodInfo-instance (signature ~ (m SmartHomeEndType), MonadIO m, ViewK a) => MethodInfo ViewGetSmartHomeEndMethodInfo a signature where- overloadedMethod _ = viewGetSmartHomeEnd---- method View::get_tab_width--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_tab_width" gtk_source_view_get_tab_width :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- IO Word32---viewGetTabWidth ::- (MonadIO m, ViewK a) =>- a -- _obj- -> m Word32 -- result-viewGetTabWidth _obj = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- result <- gtk_source_view_get_tab_width _obj'- touchManagedPtr _obj- return result--data ViewGetTabWidthMethodInfo-instance (signature ~ (m Word32), MonadIO m, ViewK a) => MethodInfo ViewGetTabWidthMethodInfo a signature where- overloadedMethod _ = viewGetTabWidth---- method View::get_visual_column--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "iter", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUInt)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_get_visual_column" gtk_source_view_get_visual_column :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- Ptr Gtk.TextIter -> -- iter : TInterface "Gtk" "TextIter"- IO Word32---viewGetVisualColumn ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Gtk.TextIter -- iter- -> m Word32 -- result-viewGetVisualColumn _obj iter = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let iter' = unsafeManagedPtrGetPtr iter- result <- gtk_source_view_get_visual_column _obj' iter'- touchManagedPtr _obj- touchManagedPtr iter- return result--data ViewGetVisualColumnMethodInfo-instance (signature ~ (Gtk.TextIter -> m Word32), MonadIO m, ViewK a) => MethodInfo ViewGetVisualColumnMethodInfo a signature where- overloadedMethod _ = viewGetVisualColumn---- method View::indent_lines--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_indent_lines" gtk_source_view_indent_lines :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- Ptr Gtk.TextIter -> -- start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- end : TInterface "Gtk" "TextIter"- IO ()---viewIndentLines ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Gtk.TextIter -- start- -> Gtk.TextIter -- end- -> m () -- result-viewIndentLines _obj start end = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let start' = unsafeManagedPtrGetPtr start- let end' = unsafeManagedPtrGetPtr end- gtk_source_view_indent_lines _obj' start' end'- touchManagedPtr _obj- touchManagedPtr start- touchManagedPtr end- return ()--data ViewIndentLinesMethodInfo-instance (signature ~ (Gtk.TextIter -> Gtk.TextIter -> m ()), MonadIO m, ViewK a) => MethodInfo ViewIndentLinesMethodInfo a signature where- overloadedMethod _ = viewIndentLines---- method View::set_auto_indent--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_auto_indent" gtk_source_view_set_auto_indent :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CInt -> -- enable : TBasicType TBoolean- IO ()---viewSetAutoIndent ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Bool -- enable- -> m () -- result-viewSetAutoIndent _obj enable = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let enable' = (fromIntegral . fromEnum) enable- gtk_source_view_set_auto_indent _obj' enable'- touchManagedPtr _obj- return ()--data ViewSetAutoIndentMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetAutoIndentMethodInfo a signature where- overloadedMethod _ = viewSetAutoIndent---- method View::set_background_pattern--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "background_pattern", argType = TInterface "GtkSource" "BackgroundPatternType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_background_pattern" gtk_source_view_set_background_pattern :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CUInt -> -- background_pattern : TInterface "GtkSource" "BackgroundPatternType"- IO ()---viewSetBackgroundPattern ::- (MonadIO m, ViewK a) =>- a -- _obj- -> BackgroundPatternType -- backgroundPattern- -> m () -- result-viewSetBackgroundPattern _obj backgroundPattern = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let backgroundPattern' = (fromIntegral . fromEnum) backgroundPattern- gtk_source_view_set_background_pattern _obj' backgroundPattern'- touchManagedPtr _obj- return ()--data ViewSetBackgroundPatternMethodInfo-instance (signature ~ (BackgroundPatternType -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetBackgroundPatternMethodInfo a signature where- overloadedMethod _ = viewSetBackgroundPattern---- method View::set_draw_spaces--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "flags", argType = TInterface "GtkSource" "DrawSpacesFlags", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_draw_spaces" gtk_source_view_set_draw_spaces :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CUInt -> -- flags : TInterface "GtkSource" "DrawSpacesFlags"- IO ()---viewSetDrawSpaces ::- (MonadIO m, ViewK a) =>- a -- _obj- -> [DrawSpacesFlags] -- flags- -> m () -- result-viewSetDrawSpaces _obj flags = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let flags' = gflagsToWord flags- gtk_source_view_set_draw_spaces _obj' flags'- touchManagedPtr _obj- return ()--data ViewSetDrawSpacesMethodInfo-instance (signature ~ ([DrawSpacesFlags] -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetDrawSpacesMethodInfo a signature where- overloadedMethod _ = viewSetDrawSpaces---- method View::set_highlight_current_line--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", 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 : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_highlight_current_line" gtk_source_view_set_highlight_current_line :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CInt -> -- highlight : TBasicType TBoolean- IO ()---viewSetHighlightCurrentLine ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Bool -- highlight- -> m () -- result-viewSetHighlightCurrentLine _obj highlight = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let highlight' = (fromIntegral . fromEnum) highlight- gtk_source_view_set_highlight_current_line _obj' highlight'- touchManagedPtr _obj- return ()--data ViewSetHighlightCurrentLineMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetHighlightCurrentLineMethodInfo a signature where- overloadedMethod _ = viewSetHighlightCurrentLine---- method View::set_indent_on_tab--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_indent_on_tab" gtk_source_view_set_indent_on_tab :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CInt -> -- enable : TBasicType TBoolean- IO ()---viewSetIndentOnTab ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Bool -- enable- -> m () -- result-viewSetIndentOnTab _obj enable = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let enable' = (fromIntegral . fromEnum) enable- gtk_source_view_set_indent_on_tab _obj' enable'- touchManagedPtr _obj- return ()--data ViewSetIndentOnTabMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetIndentOnTabMethodInfo a signature where- overloadedMethod _ = viewSetIndentOnTab---- method View::set_indent_width--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "width", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_indent_width" gtk_source_view_set_indent_width :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- Int32 -> -- width : TBasicType TInt- IO ()---viewSetIndentWidth ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Int32 -- width- -> m () -- result-viewSetIndentWidth _obj width = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_view_set_indent_width _obj' width- touchManagedPtr _obj- return ()--data ViewSetIndentWidthMethodInfo-instance (signature ~ (Int32 -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetIndentWidthMethodInfo a signature where- overloadedMethod _ = viewSetIndentWidth---- method View::set_insert_spaces_instead_of_tabs--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "enable", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_insert_spaces_instead_of_tabs" gtk_source_view_set_insert_spaces_instead_of_tabs :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CInt -> -- enable : TBasicType TBoolean- IO ()---viewSetInsertSpacesInsteadOfTabs ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Bool -- enable- -> m () -- result-viewSetInsertSpacesInsteadOfTabs _obj enable = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let enable' = (fromIntegral . fromEnum) enable- gtk_source_view_set_insert_spaces_instead_of_tabs _obj' enable'- touchManagedPtr _obj- return ()--data ViewSetInsertSpacesInsteadOfTabsMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetInsertSpacesInsteadOfTabsMethodInfo a signature where- overloadedMethod _ = viewSetInsertSpacesInsteadOfTabs---- method View::set_mark_attributes--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "category", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "attributes", argType = TInterface "GtkSource" "MarkAttributes", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "priority", argType = TBasicType TInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_mark_attributes" gtk_source_view_set_mark_attributes :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CString -> -- category : TBasicType TUTF8- Ptr MarkAttributes -> -- attributes : TInterface "GtkSource" "MarkAttributes"- Int32 -> -- priority : TBasicType TInt- IO ()---viewSetMarkAttributes ::- (MonadIO m, ViewK a, MarkAttributesK b) =>- a -- _obj- -> T.Text -- category- -> b -- attributes- -> Int32 -- priority- -> m () -- result-viewSetMarkAttributes _obj category attributes priority = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- category' <- textToCString category- let attributes' = unsafeManagedPtrCastPtr attributes- gtk_source_view_set_mark_attributes _obj' category' attributes' priority- touchManagedPtr _obj- touchManagedPtr attributes- freeMem category'- return ()--data ViewSetMarkAttributesMethodInfo-instance (signature ~ (T.Text -> b -> Int32 -> m ()), MonadIO m, ViewK a, MarkAttributesK b) => MethodInfo ViewSetMarkAttributesMethodInfo a signature where- overloadedMethod _ = viewSetMarkAttributes---- method View::set_right_margin_position--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "pos", argType = TBasicType TUInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_right_margin_position" gtk_source_view_set_right_margin_position :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- Word32 -> -- pos : TBasicType TUInt- IO ()---viewSetRightMarginPosition ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Word32 -- pos- -> m () -- result-viewSetRightMarginPosition _obj pos = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_view_set_right_margin_position _obj' pos- touchManagedPtr _obj- return ()--data ViewSetRightMarginPositionMethodInfo-instance (signature ~ (Word32 -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetRightMarginPositionMethodInfo a signature where- overloadedMethod _ = viewSetRightMarginPosition---- method View::set_show_line_marks--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "show", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_show_line_marks" gtk_source_view_set_show_line_marks :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CInt -> -- show : TBasicType TBoolean- IO ()---viewSetShowLineMarks ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Bool -- show_- -> m () -- result-viewSetShowLineMarks _obj show_ = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let show_' = (fromIntegral . fromEnum) show_- gtk_source_view_set_show_line_marks _obj' show_'- touchManagedPtr _obj- return ()--data ViewSetShowLineMarksMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetShowLineMarksMethodInfo a signature where- overloadedMethod _ = viewSetShowLineMarks---- method View::set_show_line_numbers--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "show", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_show_line_numbers" gtk_source_view_set_show_line_numbers :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CInt -> -- show : TBasicType TBoolean- IO ()---viewSetShowLineNumbers ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Bool -- show_- -> m () -- result-viewSetShowLineNumbers _obj show_ = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let show_' = (fromIntegral . fromEnum) show_- gtk_source_view_set_show_line_numbers _obj' show_'- touchManagedPtr _obj- return ()--data ViewSetShowLineNumbersMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetShowLineNumbersMethodInfo a signature where- overloadedMethod _ = viewSetShowLineNumbers---- method View::set_show_right_margin--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "show", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_show_right_margin" gtk_source_view_set_show_right_margin :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CInt -> -- show : TBasicType TBoolean- IO ()---viewSetShowRightMargin ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Bool -- show_- -> m () -- result-viewSetShowRightMargin _obj show_ = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let show_' = (fromIntegral . fromEnum) show_- gtk_source_view_set_show_right_margin _obj' show_'- touchManagedPtr _obj- return ()--data ViewSetShowRightMarginMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetShowRightMarginMethodInfo a signature where- overloadedMethod _ = viewSetShowRightMargin---- method View::set_smart_backspace--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "smart_backspace", argType = TBasicType TBoolean, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_smart_backspace" gtk_source_view_set_smart_backspace :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CInt -> -- smart_backspace : TBasicType TBoolean- IO ()---viewSetSmartBackspace ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Bool -- smartBackspace- -> m () -- result-viewSetSmartBackspace _obj smartBackspace = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let smartBackspace' = (fromIntegral . fromEnum) smartBackspace- gtk_source_view_set_smart_backspace _obj' smartBackspace'- touchManagedPtr _obj- return ()--data ViewSetSmartBackspaceMethodInfo-instance (signature ~ (Bool -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetSmartBackspaceMethodInfo a signature where- overloadedMethod _ = viewSetSmartBackspace---- method View::set_smart_home_end--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "smart_home_end", argType = TInterface "GtkSource" "SmartHomeEndType", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_smart_home_end" gtk_source_view_set_smart_home_end :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- CUInt -> -- smart_home_end : TInterface "GtkSource" "SmartHomeEndType"- IO ()---viewSetSmartHomeEnd ::- (MonadIO m, ViewK a) =>- a -- _obj- -> SmartHomeEndType -- smartHomeEnd- -> m () -- result-viewSetSmartHomeEnd _obj smartHomeEnd = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let smartHomeEnd' = (fromIntegral . fromEnum) smartHomeEnd- gtk_source_view_set_smart_home_end _obj' smartHomeEnd'- touchManagedPtr _obj- return ()--data ViewSetSmartHomeEndMethodInfo-instance (signature ~ (SmartHomeEndType -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetSmartHomeEndMethodInfo a signature where- overloadedMethod _ = viewSetSmartHomeEnd---- method View::set_tab_width--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "width", argType = TBasicType TUInt, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_set_tab_width" gtk_source_view_set_tab_width :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- Word32 -> -- width : TBasicType TUInt- IO ()---viewSetTabWidth ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Word32 -- width- -> m () -- result-viewSetTabWidth _obj width = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- gtk_source_view_set_tab_width _obj' width- touchManagedPtr _obj- return ()--data ViewSetTabWidthMethodInfo-instance (signature ~ (Word32 -> m ()), MonadIO m, ViewK a) => MethodInfo ViewSetTabWidthMethodInfo a signature where- overloadedMethod _ = viewSetTabWidth---- method View::unindent_lines--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "View", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "start", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing},Arg {argCName = "end", argType = TInterface "Gtk" "TextIter", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_view_unindent_lines" gtk_source_view_unindent_lines :: - Ptr View -> -- _obj : TInterface "GtkSource" "View"- Ptr Gtk.TextIter -> -- start : TInterface "Gtk" "TextIter"- Ptr Gtk.TextIter -> -- end : TInterface "Gtk" "TextIter"- IO ()---viewUnindentLines ::- (MonadIO m, ViewK a) =>- a -- _obj- -> Gtk.TextIter -- start- -> Gtk.TextIter -- end- -> m () -- result-viewUnindentLines _obj start end = liftIO $ do- let _obj' = unsafeManagedPtrCastPtr _obj- let start' = unsafeManagedPtrGetPtr start- let end' = unsafeManagedPtrGetPtr end- gtk_source_view_unindent_lines _obj' start' end'- touchManagedPtr _obj- touchManagedPtr start- touchManagedPtr end- return ()--data ViewUnindentLinesMethodInfo-instance (signature ~ (Gtk.TextIter -> Gtk.TextIter -> m ()), MonadIO m, ViewK a) => MethodInfo ViewUnindentLinesMethodInfo a signature where- overloadedMethod _ = viewUnindentLines--
− GI/GtkSource/Objects/View.hs-boot
@@ -1,74 +0,0 @@-module GI.GtkSource.Objects.View where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype View = View (ForeignPtr View)-instance GObject View where-class GObject o => ViewK o-instance (GObject o, IsDescendantOf View o) => ViewK o-data ViewAutoIndentPropertyInfo-data ViewBackgroundPatternPropertyInfo-data ViewCompletionPropertyInfo-data ViewDrawSpacesPropertyInfo-data ViewHighlightCurrentLinePropertyInfo-data ViewIndentOnTabPropertyInfo-data ViewIndentWidthPropertyInfo-data ViewInsertSpacesInsteadOfTabsPropertyInfo-data ViewRightMarginPositionPropertyInfo-data ViewShowLineMarksPropertyInfo-data ViewShowLineNumbersPropertyInfo-data ViewShowRightMarginPropertyInfo-data ViewSmartBackspacePropertyInfo-data ViewSmartHomeEndPropertyInfo-data ViewTabWidthPropertyInfo-data ViewChangeCaseSignalInfo-data ViewChangeNumberSignalInfo-data ViewJoinLinesSignalInfo-data ViewLineMarkActivatedSignalInfo-data ViewMoveLinesSignalInfo-data ViewMoveToMatchingBracketSignalInfo-data ViewMoveWordsSignalInfo-data ViewRedoSignalInfo-data ViewShowCompletionSignalInfo-data ViewSmartHomeEndSignalInfo-data ViewUndoSignalInfo-data ViewGetAutoIndentMethodInfo-data ViewGetBackgroundPatternMethodInfo-data ViewGetCompletionMethodInfo-data ViewGetDrawSpacesMethodInfo-data ViewGetGutterMethodInfo-data ViewGetHighlightCurrentLineMethodInfo-data ViewGetIndentOnTabMethodInfo-data ViewGetIndentWidthMethodInfo-data ViewGetInsertSpacesInsteadOfTabsMethodInfo-data ViewGetMarkAttributesMethodInfo-data ViewGetRightMarginPositionMethodInfo-data ViewGetShowLineMarksMethodInfo-data ViewGetShowLineNumbersMethodInfo-data ViewGetShowRightMarginMethodInfo-data ViewGetSmartBackspaceMethodInfo-data ViewGetSmartHomeEndMethodInfo-data ViewGetTabWidthMethodInfo-data ViewGetVisualColumnMethodInfo-data ViewIndentLinesMethodInfo-data ViewSetAutoIndentMethodInfo-data ViewSetBackgroundPatternMethodInfo-data ViewSetDrawSpacesMethodInfo-data ViewSetHighlightCurrentLineMethodInfo-data ViewSetIndentOnTabMethodInfo-data ViewSetIndentWidthMethodInfo-data ViewSetInsertSpacesInsteadOfTabsMethodInfo-data ViewSetMarkAttributesMethodInfo-data ViewSetRightMarginPositionMethodInfo-data ViewSetShowLineMarksMethodInfo-data ViewSetShowLineNumbersMethodInfo-data ViewSetShowRightMarginMethodInfo-data ViewSetSmartBackspaceMethodInfo-data ViewSetSmartHomeEndMethodInfo-data ViewSetTabWidthMethodInfo-data ViewUnindentLinesMethodInfo
− GI/GtkSource/Structs.hs
@@ -1,27 +0,0 @@---{- |-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.GtkSource.Structs- ( module GI.GtkSource.Structs.Encoding ,--- ) where--import GI.GtkSource.Structs.Encoding--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks--
− GI/GtkSource/Structs/Encoding.hs
@@ -1,363 +0,0 @@---{- |-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.GtkSource.Structs.Encoding- ( ---- * Exported types- Encoding(..) ,- noEncoding ,--- -- * Methods--- ** encodingCopy- EncodingCopyMethodInfo ,- encodingCopy ,----- ** encodingFree- EncodingFreeMethodInfo ,- encodingFree ,----- ** encodingGetAll- encodingGetAll ,----- ** encodingGetCharset- EncodingGetCharsetMethodInfo ,- encodingGetCharset ,----- ** encodingGetCurrent- encodingGetCurrent ,----- ** encodingGetDefaultCandidates- encodingGetDefaultCandidates ,----- ** encodingGetFromCharset- encodingGetFromCharset ,----- ** encodingGetName- EncodingGetNameMethodInfo ,- encodingGetName ,----- ** encodingGetUtf8- encodingGetUtf8 ,----- ** encodingToString- EncodingToStringMethodInfo ,- encodingToString ,----- ) where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--import GI.GtkSource.Types-import GI.GtkSource.Callbacks--newtype Encoding = Encoding (ForeignPtr Encoding)-foreign import ccall "gtk_source_encoding_get_type" c_gtk_source_encoding_get_type :: - IO GType--instance BoxedObject Encoding where- boxedType _ = c_gtk_source_encoding_get_type--noEncoding :: Maybe Encoding-noEncoding = Nothing---type instance AttributeList Encoding = EncodingAttributeList-type EncodingAttributeList = ('[ ] :: [(Symbol, *)])---- method Encoding::copy--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Encoding", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Encoding")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_encoding_copy" gtk_source_encoding_copy :: - Ptr Encoding -> -- _obj : TInterface "GtkSource" "Encoding"- IO (Ptr Encoding)---encodingCopy ::- (MonadIO m) =>- Encoding -- _obj- -> m Encoding -- result-encodingCopy _obj = liftIO $ do- let _obj' = unsafeManagedPtrGetPtr _obj- result <- gtk_source_encoding_copy _obj'- checkUnexpectedReturnNULL "gtk_source_encoding_copy" result- result' <- (wrapBoxed Encoding) result- touchManagedPtr _obj- return result'--data EncodingCopyMethodInfo-instance (signature ~ (m Encoding), MonadIO m) => MethodInfo EncodingCopyMethodInfo Encoding signature where- overloadedMethod _ = encodingCopy---- method Encoding::free--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Encoding", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Nothing--- throws : False--- Skip return : False--foreign import ccall "gtk_source_encoding_free" gtk_source_encoding_free :: - Ptr Encoding -> -- _obj : TInterface "GtkSource" "Encoding"- IO ()---encodingFree ::- (MonadIO m) =>- Encoding -- _obj- -> m () -- result-encodingFree _obj = liftIO $ do- let _obj' = unsafeManagedPtrGetPtr _obj- gtk_source_encoding_free _obj'- touchManagedPtr _obj- return ()--data EncodingFreeMethodInfo-instance (signature ~ (m ()), MonadIO m) => MethodInfo EncodingFreeMethodInfo Encoding signature where- overloadedMethod _ = encodingFree---- method Encoding::get_charset--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Encoding", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_encoding_get_charset" gtk_source_encoding_get_charset :: - Ptr Encoding -> -- _obj : TInterface "GtkSource" "Encoding"- IO CString---encodingGetCharset ::- (MonadIO m) =>- Encoding -- _obj- -> m T.Text -- result-encodingGetCharset _obj = liftIO $ do- let _obj' = unsafeManagedPtrGetPtr _obj- result <- gtk_source_encoding_get_charset _obj'- checkUnexpectedReturnNULL "gtk_source_encoding_get_charset" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data EncodingGetCharsetMethodInfo-instance (signature ~ (m T.Text), MonadIO m) => MethodInfo EncodingGetCharsetMethodInfo Encoding signature where- overloadedMethod _ = encodingGetCharset---- method Encoding::get_name--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Encoding", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_encoding_get_name" gtk_source_encoding_get_name :: - Ptr Encoding -> -- _obj : TInterface "GtkSource" "Encoding"- IO CString---encodingGetName ::- (MonadIO m) =>- Encoding -- _obj- -> m T.Text -- result-encodingGetName _obj = liftIO $ do- let _obj' = unsafeManagedPtrGetPtr _obj- result <- gtk_source_encoding_get_name _obj'- checkUnexpectedReturnNULL "gtk_source_encoding_get_name" result- result' <- cstringToText result- touchManagedPtr _obj- return result'--data EncodingGetNameMethodInfo-instance (signature ~ (m T.Text), MonadIO m) => MethodInfo EncodingGetNameMethodInfo Encoding signature where- overloadedMethod _ = encodingGetName---- method Encoding::to_string--- method type : OrdinaryMethod--- Args : [Arg {argCName = "_obj", argType = TInterface "GtkSource" "Encoding", direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TBasicType TUTF8)--- throws : False--- Skip return : False--foreign import ccall "gtk_source_encoding_to_string" gtk_source_encoding_to_string :: - Ptr Encoding -> -- _obj : TInterface "GtkSource" "Encoding"- IO CString---encodingToString ::- (MonadIO m) =>- Encoding -- _obj- -> m T.Text -- result-encodingToString _obj = liftIO $ do- let _obj' = unsafeManagedPtrGetPtr _obj- result <- gtk_source_encoding_to_string _obj'- checkUnexpectedReturnNULL "gtk_source_encoding_to_string" result- result' <- cstringToText result- freeMem result- touchManagedPtr _obj- return result'--data EncodingToStringMethodInfo-instance (signature ~ (m T.Text), MonadIO m) => MethodInfo EncodingToStringMethodInfo Encoding signature where- overloadedMethod _ = encodingToString---- method Encoding::get_all--- method type : MemberFunction--- Args : []--- Lengths : []--- returnType : Just (TGSList (TInterface "GtkSource" "Encoding"))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_encoding_get_all" gtk_source_encoding_get_all :: - IO (Ptr (GSList (Ptr Encoding)))---encodingGetAll ::- (MonadIO m) =>- m [Encoding] -- result-encodingGetAll = liftIO $ do- result <- gtk_source_encoding_get_all- result' <- unpackGSList result- result'' <- mapM (newBoxed Encoding) result'- g_slist_free result- return result''---- method Encoding::get_current--- method type : MemberFunction--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Encoding")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_encoding_get_current" gtk_source_encoding_get_current :: - IO (Ptr Encoding)---encodingGetCurrent ::- (MonadIO m) =>- m Encoding -- result-encodingGetCurrent = liftIO $ do- result <- gtk_source_encoding_get_current- checkUnexpectedReturnNULL "gtk_source_encoding_get_current" result- result' <- (newBoxed Encoding) result- return result'---- method Encoding::get_default_candidates--- method type : MemberFunction--- Args : []--- Lengths : []--- returnType : Just (TGSList (TInterface "GtkSource" "Encoding"))--- throws : False--- Skip return : False--foreign import ccall "gtk_source_encoding_get_default_candidates" gtk_source_encoding_get_default_candidates :: - IO (Ptr (GSList (Ptr Encoding)))---encodingGetDefaultCandidates ::- (MonadIO m) =>- m [Encoding] -- result-encodingGetDefaultCandidates = liftIO $ do- result <- gtk_source_encoding_get_default_candidates- result' <- unpackGSList result- result'' <- mapM (newBoxed Encoding) result'- g_slist_free result- return result''---- method Encoding::get_from_charset--- method type : MemberFunction--- Args : [Arg {argCName = "charset", argType = TBasicType TUTF8, direction = DirectionIn, mayBeNull = False, argScope = ScopeTypeInvalid, argClosure = -1, argDestroy = -1, argCallerAllocates = False, transfer = TransferNothing}]--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Encoding")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_encoding_get_from_charset" gtk_source_encoding_get_from_charset :: - CString -> -- charset : TBasicType TUTF8- IO (Ptr Encoding)---encodingGetFromCharset ::- (MonadIO m) =>- T.Text -- charset- -> m (Maybe Encoding) -- result-encodingGetFromCharset charset = liftIO $ do- charset' <- textToCString charset- result <- gtk_source_encoding_get_from_charset charset'- maybeResult <- convertIfNonNull result $ \result' -> do- result'' <- (newBoxed Encoding) result'- return result''- freeMem charset'- return maybeResult---- method Encoding::get_utf8--- method type : MemberFunction--- Args : []--- Lengths : []--- returnType : Just (TInterface "GtkSource" "Encoding")--- throws : False--- Skip return : False--foreign import ccall "gtk_source_encoding_get_utf8" gtk_source_encoding_get_utf8 :: - IO (Ptr Encoding)---encodingGetUtf8 ::- (MonadIO m) =>- m Encoding -- result-encodingGetUtf8 = liftIO $ do- result <- gtk_source_encoding_get_utf8- checkUnexpectedReturnNULL "gtk_source_encoding_get_utf8" result- result' <- (newBoxed Encoding) result- return result'--type family ResolveEncodingMethod (t :: Symbol) (o :: *) :: * where- ResolveEncodingMethod "copy" o = EncodingCopyMethodInfo- ResolveEncodingMethod "free" o = EncodingFreeMethodInfo- ResolveEncodingMethod "toString" o = EncodingToStringMethodInfo- ResolveEncodingMethod "getCharset" o = EncodingGetCharsetMethodInfo- ResolveEncodingMethod "getName" o = EncodingGetNameMethodInfo- ResolveEncodingMethod l o = MethodResolutionFailed l o--instance (info ~ ResolveEncodingMethod t Encoding, MethodInfo info Encoding p) => IsLabelProxy t (Encoding -> p) where- fromLabelProxy _ = overloadedMethod (MethodProxy :: MethodProxy info)--#if MIN_VERSION_base(4,9,0)-instance (info ~ ResolveEncodingMethod t Encoding, MethodInfo info Encoding p) => IsLabel t (Encoding -> p) where- fromLabel _ = overloadedMethod (MethodProxy :: MethodProxy info)-#endif--
− GI/GtkSource/Structs/Encoding.hs-boot
@@ -1,16 +0,0 @@-module GI.GtkSource.Structs.Encoding where--import Data.GI.Base.ShortPrelude--import qualified Data.GI.Base.Attributes as GI.Attributes-import qualified Data.Text as T-import qualified Data.ByteString.Char8 as B-import qualified Data.Map as Map--newtype Encoding = Encoding (ForeignPtr Encoding)-instance BoxedObject Encoding where-data EncodingCopyMethodInfo-data EncodingFreeMethodInfo-data EncodingGetCharsetMethodInfo-data EncodingGetNameMethodInfo-data EncodingToStringMethodInfo
− GI/GtkSource/Types.hs
@@ -1,76 +0,0 @@-module GI.GtkSource.Types- ( module GI.GtkSource.Interfaces.CompletionProposal,- module GI.GtkSource.Interfaces.CompletionProvider,- module GI.GtkSource.Interfaces.StyleSchemeChooser,- module GI.GtkSource.Interfaces.UndoManager,- module GI.GtkSource.Objects.Buffer ,- module GI.GtkSource.Objects.Completion ,- module GI.GtkSource.Objects.CompletionContext,- module GI.GtkSource.Objects.CompletionInfo,- module GI.GtkSource.Objects.CompletionItem,- module GI.GtkSource.Objects.CompletionWords,- module GI.GtkSource.Objects.File ,- module GI.GtkSource.Objects.FileLoader ,- module GI.GtkSource.Objects.FileSaver ,- module GI.GtkSource.Objects.Gutter ,- module GI.GtkSource.Objects.GutterRenderer,- module GI.GtkSource.Objects.GutterRendererPixbuf,- module GI.GtkSource.Objects.GutterRendererText,- module GI.GtkSource.Objects.Language ,- module GI.GtkSource.Objects.LanguageManager,- module GI.GtkSource.Objects.Map ,- module GI.GtkSource.Objects.Mark ,- module GI.GtkSource.Objects.MarkAttributes,- module GI.GtkSource.Objects.PrintCompositor,- module GI.GtkSource.Objects.SearchContext,- module GI.GtkSource.Objects.SearchSettings,- module GI.GtkSource.Objects.Style ,- module GI.GtkSource.Objects.StyleScheme ,- module GI.GtkSource.Objects.StyleSchemeChooserButton,- module GI.GtkSource.Objects.StyleSchemeChooserWidget,- module GI.GtkSource.Objects.StyleSchemeManager,- module GI.GtkSource.Objects.View ,- module GI.GtkSource.Structs.Encoding ,- module GI.GtkSource.Enums ,- module GI.GtkSource.Flags ,--- ) where---import {-# SOURCE #-} GI.GtkSource.Interfaces.CompletionProposal-import {-# SOURCE #-} GI.GtkSource.Interfaces.CompletionProvider-import {-# SOURCE #-} GI.GtkSource.Interfaces.StyleSchemeChooser-import {-# SOURCE #-} GI.GtkSource.Interfaces.UndoManager-import {-# SOURCE #-} GI.GtkSource.Objects.Buffer-import {-# SOURCE #-} GI.GtkSource.Objects.Completion-import {-# SOURCE #-} GI.GtkSource.Objects.CompletionContext-import {-# SOURCE #-} GI.GtkSource.Objects.CompletionInfo-import {-# SOURCE #-} GI.GtkSource.Objects.CompletionItem-import {-# SOURCE #-} GI.GtkSource.Objects.CompletionWords-import {-# SOURCE #-} GI.GtkSource.Objects.File-import {-# SOURCE #-} GI.GtkSource.Objects.FileLoader-import {-# SOURCE #-} GI.GtkSource.Objects.FileSaver-import {-# SOURCE #-} GI.GtkSource.Objects.Gutter-import {-# SOURCE #-} GI.GtkSource.Objects.GutterRenderer-import {-# SOURCE #-} GI.GtkSource.Objects.GutterRendererPixbuf-import {-# SOURCE #-} GI.GtkSource.Objects.GutterRendererText-import {-# SOURCE #-} GI.GtkSource.Objects.Language-import {-# SOURCE #-} GI.GtkSource.Objects.LanguageManager-import {-# SOURCE #-} GI.GtkSource.Objects.Map-import {-# SOURCE #-} GI.GtkSource.Objects.Mark-import {-# SOURCE #-} GI.GtkSource.Objects.MarkAttributes-import {-# SOURCE #-} GI.GtkSource.Objects.PrintCompositor-import {-# SOURCE #-} GI.GtkSource.Objects.SearchContext-import {-# SOURCE #-} GI.GtkSource.Objects.SearchSettings-import {-# SOURCE #-} GI.GtkSource.Objects.Style-import {-# SOURCE #-} GI.GtkSource.Objects.StyleScheme-import {-# SOURCE #-} GI.GtkSource.Objects.StyleSchemeChooserButton-import {-# SOURCE #-} GI.GtkSource.Objects.StyleSchemeChooserWidget-import {-# SOURCE #-} GI.GtkSource.Objects.StyleSchemeManager-import {-# SOURCE #-} GI.GtkSource.Objects.View-import {-# SOURCE #-} GI.GtkSource.Structs.Encoding--import GI.GtkSource.Enums-import GI.GtkSource.Flags-
Setup.hs view
@@ -1,3 +1,12 @@-#!/usr/bin/env runhaskell-import Distribution.Simple-main = defaultMain+{-# LANGUAGE OverloadedStrings #-}++import Distribution.Simple (defaultMainWithHooks)+import Data.GI.CodeGen.CabalHooks (simpleHaskellGIHooks)++main = defaultMainWithHooks (simpleHaskellGIHooks name version verbose+ overridesFile outputDir)+ where name = "GtkSource"+ version = "3.0"+ verbose = False+ overridesFile = Nothing+ outputDir = Nothing
gi-gtksource.cabal view
@@ -1,6 +1,5 @@--- Autogenerated, do not edit. name: gi-gtksource-version: 0.3.18.15+version: 3.0.1 synopsis: GtkSource bindings description: Bindings for GtkSource, autogenerated by haskell-gi. homepage: https://github.com/haskell-gi/haskell-gi@@ -9,68 +8,33 @@ author: Will Thompson, Iñaki García Etxebarria and Jonas Platte maintainer: Iñaki García Etxebarria (garetxe@gmail.com) category: Bindings-build-type: Simple-cabal-version: >=1.10+build-type: Custom+cabal-version: >= 1.24 +custom-setup+ setup-depends: base >= 4.7,+ Cabal >= 1.24,+ haskell-gi >= 0.15+ library default-language: Haskell2010 default-extensions: NoImplicitPrelude, 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.GtkSource.Types- GI.GtkSource- GI.GtkSource.Callbacks- GI.GtkSource.Enums- GI.GtkSource.Flags- GI.GtkSource.Functions- GI.GtkSource.Interfaces- GI.GtkSource.Interfaces.CompletionProposal- GI.GtkSource.Interfaces.CompletionProvider- GI.GtkSource.Interfaces.StyleSchemeChooser- GI.GtkSource.Interfaces.UndoManager- GI.GtkSource.Objects- GI.GtkSource.Objects.Buffer- GI.GtkSource.Objects.Completion- GI.GtkSource.Objects.CompletionContext- GI.GtkSource.Objects.CompletionInfo- GI.GtkSource.Objects.CompletionItem- GI.GtkSource.Objects.CompletionWords- GI.GtkSource.Objects.File- GI.GtkSource.Objects.FileLoader- GI.GtkSource.Objects.FileSaver- GI.GtkSource.Objects.Gutter- GI.GtkSource.Objects.GutterRenderer- GI.GtkSource.Objects.GutterRendererPixbuf- GI.GtkSource.Objects.GutterRendererText- GI.GtkSource.Objects.Language- GI.GtkSource.Objects.LanguageManager- GI.GtkSource.Objects.Map- GI.GtkSource.Objects.Mark- GI.GtkSource.Objects.MarkAttributes- GI.GtkSource.Objects.PrintCompositor- GI.GtkSource.Objects.SearchContext- GI.GtkSource.Objects.SearchSettings- GI.GtkSource.Objects.Style- GI.GtkSource.Objects.StyleScheme- GI.GtkSource.Objects.StyleSchemeChooserButton- GI.GtkSource.Objects.StyleSchemeChooserWidget- GI.GtkSource.Objects.StyleSchemeManager- GI.GtkSource.Objects.View- GI.GtkSource.Structs- GI.GtkSource.Structs.Encoding- pkgconfig-depends: gtksourceview-3.0 >= 3.18++ pkgconfig-depends: gtksourceview-3.0 build-depends: base >= 4.7 && <5, haskell-gi-base >= 0.15 && < 1,- gi-atk >= 0.2.18.15 && < 0.2.19,- gi-glib >= 0.2.46.15 && < 0.2.47,- gi-gobject >= 0.2.46.15 && < 0.2.47,- gi-gdk >= 0.3.18.15 && < 0.3.19,- gi-gdkpixbuf >= 0.2.32.15 && < 0.2.33,- gi-gio >= 0.2.46.15 && < 0.2.47,- gi-gtk >= 0.3.18.15 && < 0.3.19,- gi-pango >= 0.1.38.15 && < 0.1.39,- gi-cairo >= 0.1.14.15 && < 0.1.15,+ gi-atk == 2.0.*,+ gi-glib == 2.0.*,+ gi-gobject == 2.0.*,+ gi-gdk == 3.0.*,+ gi-gdkpixbuf == 2.0.*,+ gi-gio == 2.0.*,+ gi-gtk == 3.0.*,+ gi-pango == 1.0.*,+ gi-cairo == 1.0.*, bytestring >= 0.10, containers >= 0.5, text >= 1.0,- transformers >= 0.3+ transformers >= 0.5