{-# LINE 2 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
module Graphics.UI.Gtk.Multiline.TextBuffer (
TextBuffer,
TextBufferClass,
castToTextBuffer, gTypeTextBuffer,
toTextBuffer,
textBufferNew,
textBufferGetLineCount,
textBufferGetCharCount,
textBufferGetTagTable,
textBufferInsert,
textBufferInsertByteString,
textBufferInsertAtCursor,
textBufferInsertByteStringAtCursor,
textBufferInsertInteractive,
textBufferInsertByteStringInteractive,
textBufferInsertInteractiveAtCursor,
textBufferInsertByteStringInteractiveAtCursor,
textBufferInsertRange,
textBufferInsertRangeInteractive,
textBufferDelete,
textBufferDeleteInteractive,
textBufferSetByteString,
textBufferGetByteString,
textBufferGetByteStringSlice,
textBufferSetText,
textBufferGetText,
textBufferGetSlice,
textBufferInsertPixbuf,
textBufferCreateMark,
textBufferAddMark,
textBufferMoveMark,
textBufferMoveMarkByName,
textBufferDeleteMark,
textBufferDeleteMarkByName,
textBufferGetMark,
textBufferGetInsert,
textBufferGetSelectionBound,
textBufferPlaceCursor,
textBufferApplyTag,
textBufferRemoveTag,
textBufferApplyTagByName,
textBufferRemoveTagByName,
textBufferRemoveAllTags,
textBufferGetIterAtLineOffset,
textBufferGetIterAtOffset,
textBufferGetIterAtLine,
textBufferGetIterAtMark,
textBufferGetStartIter,
textBufferGetEndIter,
textBufferGetModified,
textBufferSetModified,
textBufferDeleteSelection,
textBufferHasSelection,
textBufferGetSelectionBounds,
textBufferSelectRange,
textBufferGetBounds,
textBufferBeginUserAction,
textBufferEndUserAction,
textBufferBackspace,
textBufferInsertChildAnchor,
textBufferCreateChildAnchor,
textBufferGetIterAtChildAnchor,
textBufferPasteClipboard,
textBufferPasteClipboardAtCursor,
textBufferCopyClipboard,
textBufferCutClipboard,
textBufferAddSelectionClipboard,
textBufferRemoveSelectionClipboard,
textBufferTagTable,
textBufferText,
textBufferModified,
applyTag,
beginUserAction,
bufferChanged,
deleteRange,
endUserAction,
insertPixbuf,
insertChildAnchor,
bufferInsertText,
markDeleted,
markSet,
modifiedChanged,
pasteDone,
removeTag,
onApplyTag,
afterApplyTag,
onBeginUserAction,
afterBeginUserAction,
onBufferChanged,
afterBufferChanged,
onDeleteRange,
afterDeleteRange,
onEndUserAction,
afterEndUserAction,
onInsertPixbuf,
afterInsertPixbuf,
onBufferInsertText,
afterBufferInsertText,
onMarkDeleted,
afterMarkDeleted,
onMarkSet,
afterMarkSet,
onModifiedChanged,
afterModifiedChanged,
onRemoveTag,
afterRemoveTag
) where
import Control.Monad (liftM)
import System.Glib.FFI
import System.Glib.UTFString
import System.Glib.Attributes
import System.Glib.Properties
import Data.ByteString (ByteString)
import Data.ByteString.Unsafe (unsafeUseAsCStringLen, unsafePackCStringFinalizer)
import Graphics.UI.Gtk.Types
{-# LINE 207 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
import Graphics.UI.Gtk.Signals
{-# LINE 208 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
import Graphics.UI.Gtk.Multiline.Types
{-# LINE 209 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
import Graphics.UI.Gtk.Multiline.TextMark (MarkName)
import Graphics.UI.Gtk.Multiline.TextTag (TagName)
{-# LINE 213 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
textBufferNew ::
Maybe TextTagTable
-> IO TextBuffer
textBufferNew :: Maybe TextTagTable -> IO TextBuffer
textBufferNew Maybe TextTagTable
table =
(ForeignPtr TextBuffer -> TextBuffer, FinalizerPtr TextBuffer)
-> IO (Ptr TextBuffer) -> IO TextBuffer
forall obj.
GObjectClass obj =>
(ForeignPtr obj -> obj, FinalizerPtr obj) -> IO (Ptr obj) -> IO obj
wrapNewGObject (ForeignPtr TextBuffer -> TextBuffer, FinalizerPtr TextBuffer)
forall {a}. (ForeignPtr TextBuffer -> TextBuffer, FinalizerPtr a)
mkTextBuffer (IO (Ptr TextBuffer) -> IO TextBuffer)
-> IO (Ptr TextBuffer) -> IO TextBuffer
forall a b. (a -> b) -> a -> b
$
(\(TextTagTable ForeignPtr TextTagTable
arg1) -> ForeignPtr TextTagTable
-> (Ptr TextTagTable -> IO (Ptr TextBuffer)) -> IO (Ptr TextBuffer)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextTagTable
arg1 ((Ptr TextTagTable -> IO (Ptr TextBuffer)) -> IO (Ptr TextBuffer))
-> (Ptr TextTagTable -> IO (Ptr TextBuffer)) -> IO (Ptr TextBuffer)
forall a b. (a -> b) -> a -> b
$ \Ptr TextTagTable
argPtr1 ->Ptr TextTagTable -> IO (Ptr TextBuffer)
gtk_text_buffer_new Ptr TextTagTable
argPtr1)
{-# LINE 226 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(maybe (TextTagTable nullForeignPtr) toTextTagTable table)
textBufferGetLineCount :: TextBufferClass self => self -> IO Int
textBufferGetLineCount :: forall self. TextBufferClass self => self -> IO Int
textBufferGetLineCount self
self =
(CInt -> Int) -> IO CInt -> IO Int
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral (IO CInt -> IO Int) -> IO CInt -> IO Int
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> IO CInt
gtk_text_buffer_get_line_count Ptr TextBuffer
argPtr1)
{-# LINE 238 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
textBufferGetCharCount :: TextBufferClass self => self -> IO Int
textBufferGetCharCount :: forall self. TextBufferClass self => self -> IO Int
textBufferGetCharCount self
self =
(CInt -> Int) -> IO CInt -> IO Int
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral (IO CInt -> IO Int) -> IO CInt -> IO Int
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> IO CInt
gtk_text_buffer_get_char_count Ptr TextBuffer
argPtr1)
{-# LINE 247 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
textBufferGetTagTable :: TextBufferClass self => self -> IO TextTagTable
textBufferGetTagTable :: forall self. TextBufferClass self => self -> IO TextTagTable
textBufferGetTagTable self
self =
(ForeignPtr TextTagTable -> TextTagTable,
FinalizerPtr TextTagTable)
-> IO (Ptr TextTagTable) -> IO TextTagTable
forall obj.
GObjectClass obj =>
(ForeignPtr obj -> obj, FinalizerPtr obj) -> IO (Ptr obj) -> IO obj
makeNewGObject (ForeignPtr TextTagTable -> TextTagTable,
FinalizerPtr TextTagTable)
forall {a}.
(ForeignPtr TextTagTable -> TextTagTable, FinalizerPtr a)
mkTextTagTable (IO (Ptr TextTagTable) -> IO TextTagTable)
-> IO (Ptr TextTagTable) -> IO TextTagTable
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) -> ForeignPtr TextBuffer
-> (Ptr TextBuffer -> IO (Ptr TextTagTable))
-> IO (Ptr TextTagTable)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO (Ptr TextTagTable))
-> IO (Ptr TextTagTable))
-> (Ptr TextBuffer -> IO (Ptr TextTagTable))
-> IO (Ptr TextTagTable)
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> IO (Ptr TextTagTable)
gtk_text_buffer_get_tag_table Ptr TextBuffer
argPtr1)
{-# LINE 255 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
textBufferInsert :: (TextBufferClass self, GlibString string) => self
-> TextIter
-> string
-> IO ()
textBufferInsert :: forall self string.
(TextBufferClass self, GlibString string) =>
self -> TextIter -> string -> IO ()
textBufferInsert self
self TextIter
iter string
text =
string -> (CStringLen -> IO ()) -> IO ()
forall a. string -> (CStringLen -> IO a) -> IO a
forall s a. GlibString s => s -> (CStringLen -> IO a) -> IO a
withUTFStringLen string
text ((CStringLen -> IO ()) -> IO ()) -> (CStringLen -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \(Ptr CChar
textPtr, Int
len) ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) Ptr CChar
arg3 CInt
arg4 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer -> Ptr TextIter -> Ptr CChar -> CInt -> IO ()
gtk_text_buffer_insert Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr CChar
arg3 CInt
arg4)
{-# LINE 269 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
Ptr CChar
textPtr
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
len)
textBufferInsertByteString :: TextBufferClass self => self
-> TextIter
-> ByteString
-> IO ()
textBufferInsertByteString :: forall self.
TextBufferClass self =>
self -> TextIter -> ByteString -> IO ()
textBufferInsertByteString self
self TextIter
iter ByteString
text =
ByteString -> (CStringLen -> IO ()) -> IO ()
forall a. ByteString -> (CStringLen -> IO a) -> IO a
unsafeUseAsCStringLen ByteString
text ((CStringLen -> IO ()) -> IO ()) -> (CStringLen -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \(Ptr CChar
textPtr, Int
len) ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) Ptr CChar
arg3 CInt
arg4 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer -> Ptr TextIter -> Ptr CChar -> CInt -> IO ()
gtk_text_buffer_insert Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr CChar
arg3 CInt
arg4)
{-# LINE 286 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
Ptr CChar
textPtr
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
len)
textBufferInsertAtCursor :: (TextBufferClass self, GlibString string) => self -> string -> IO ()
textBufferInsertAtCursor :: forall self string.
(TextBufferClass self, GlibString string) =>
self -> string -> IO ()
textBufferInsertAtCursor self
self string
text =
string -> (CStringLen -> IO ()) -> IO ()
forall a. string -> (CStringLen -> IO a) -> IO a
forall s a. GlibString s => s -> (CStringLen -> IO a) -> IO a
withUTFStringLen string
text ((CStringLen -> IO ()) -> IO ()) -> (CStringLen -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \(Ptr CChar
textPtr, Int
len) ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 CInt
arg3 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> Ptr CChar -> CInt -> IO ()
gtk_text_buffer_insert_at_cursor Ptr TextBuffer
argPtr1 Ptr CChar
arg2 CInt
arg3)
{-# LINE 298 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
textPtr
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
len)
textBufferInsertByteStringAtCursor :: TextBufferClass self => self -> ByteString -> IO ()
textBufferInsertByteStringAtCursor :: forall self. TextBufferClass self => self -> ByteString -> IO ()
textBufferInsertByteStringAtCursor self
self ByteString
text =
ByteString -> (CStringLen -> IO ()) -> IO ()
forall a. ByteString -> (CStringLen -> IO a) -> IO a
unsafeUseAsCStringLen ByteString
text ((CStringLen -> IO ()) -> IO ()) -> (CStringLen -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \(Ptr CChar
textPtr, Int
len) ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 CInt
arg3 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> Ptr CChar -> CInt -> IO ()
gtk_text_buffer_insert_at_cursor Ptr TextBuffer
argPtr1 Ptr CChar
arg2 CInt
arg3)
{-# LINE 311 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
textPtr
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
len)
textBufferInsertInteractive :: (TextBufferClass self, GlibString string) => self
-> TextIter
-> string
-> Bool
-> IO Bool
textBufferInsertInteractive :: forall self string.
(TextBufferClass self, GlibString string) =>
self -> TextIter -> string -> Bool -> IO Bool
textBufferInsertInteractive self
self TextIter
iter string
text Bool
defaultEditable =
(CInt -> Bool) -> IO CInt -> IO Bool
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Bool
forall a. (Eq a, Num a) => a -> Bool
toBool (IO CInt -> IO Bool) -> IO CInt -> IO Bool
forall a b. (a -> b) -> a -> b
$
string -> (CStringLen -> IO CInt) -> IO CInt
forall a. string -> (CStringLen -> IO a) -> IO a
forall s a. GlibString s => s -> (CStringLen -> IO a) -> IO a
withUTFStringLen string
text ((CStringLen -> IO CInt) -> IO CInt)
-> (CStringLen -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \(Ptr CChar
textPtr, Int
len) ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) Ptr CChar
arg3 CInt
arg4 CInt
arg5 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer
-> Ptr TextIter -> Ptr CChar -> CInt -> CInt -> IO CInt
gtk_text_buffer_insert_interactive Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr CChar
arg3 CInt
arg4 CInt
arg5)
{-# LINE 333 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
Ptr CChar
textPtr
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
len)
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
defaultEditable)
textBufferInsertByteStringInteractive :: TextBufferClass self => self
-> TextIter
-> ByteString
-> Bool
-> IO Bool
textBufferInsertByteStringInteractive :: forall self.
TextBufferClass self =>
self -> TextIter -> ByteString -> Bool -> IO Bool
textBufferInsertByteStringInteractive self
self TextIter
iter ByteString
text Bool
defaultEditable =
(CInt -> Bool) -> IO CInt -> IO Bool
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Bool
forall a. (Eq a, Num a) => a -> Bool
toBool (IO CInt -> IO Bool) -> IO CInt -> IO Bool
forall a b. (a -> b) -> a -> b
$
ByteString -> (CStringLen -> IO CInt) -> IO CInt
forall a. ByteString -> (CStringLen -> IO a) -> IO a
unsafeUseAsCStringLen ByteString
text ((CStringLen -> IO CInt) -> IO CInt)
-> (CStringLen -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \(Ptr CChar
textPtr, Int
len) ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) Ptr CChar
arg3 CInt
arg4 CInt
arg5 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer
-> Ptr TextIter -> Ptr CChar -> CInt -> CInt -> IO CInt
gtk_text_buffer_insert_interactive Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr CChar
arg3 CInt
arg4 CInt
arg5)
{-# LINE 352 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
Ptr CChar
textPtr
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
len)
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
defaultEditable)
textBufferInsertInteractiveAtCursor :: (TextBufferClass self, GlibString string) => self
-> string
-> Bool
-> IO Bool
textBufferInsertInteractiveAtCursor :: forall self string.
(TextBufferClass self, GlibString string) =>
self -> string -> Bool -> IO Bool
textBufferInsertInteractiveAtCursor self
self string
text Bool
defaultEditable =
(CInt -> Bool) -> IO CInt -> IO Bool
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Bool
forall a. (Eq a, Num a) => a -> Bool
toBool (IO CInt -> IO Bool) -> IO CInt -> IO Bool
forall a b. (a -> b) -> a -> b
$
string -> (CStringLen -> IO CInt) -> IO CInt
forall a. string -> (CStringLen -> IO a) -> IO a
forall s a. GlibString s => s -> (CStringLen -> IO a) -> IO a
withUTFStringLen string
text ((CStringLen -> IO CInt) -> IO CInt)
-> (CStringLen -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \(Ptr CChar
textPtr, Int
len) ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 CInt
arg3 CInt
arg4 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> Ptr CChar -> CInt -> CInt -> IO CInt
gtk_text_buffer_insert_interactive_at_cursor Ptr TextBuffer
argPtr1 Ptr CChar
arg2 CInt
arg3 CInt
arg4)
{-# LINE 368 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
textPtr
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
len)
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
defaultEditable)
textBufferInsertByteStringInteractiveAtCursor :: TextBufferClass self => self
-> ByteString
-> Bool
-> IO Bool
textBufferInsertByteStringInteractiveAtCursor :: forall self.
TextBufferClass self =>
self -> ByteString -> Bool -> IO Bool
textBufferInsertByteStringInteractiveAtCursor self
self ByteString
text Bool
defaultEditable =
(CInt -> Bool) -> IO CInt -> IO Bool
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Bool
forall a. (Eq a, Num a) => a -> Bool
toBool (IO CInt -> IO Bool) -> IO CInt -> IO Bool
forall a b. (a -> b) -> a -> b
$
ByteString -> (CStringLen -> IO CInt) -> IO CInt
forall a. ByteString -> (CStringLen -> IO a) -> IO a
unsafeUseAsCStringLen ByteString
text ((CStringLen -> IO CInt) -> IO CInt)
-> (CStringLen -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \(Ptr CChar
textPtr, Int
len) ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 CInt
arg3 CInt
arg4 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> Ptr CChar -> CInt -> CInt -> IO CInt
gtk_text_buffer_insert_interactive_at_cursor Ptr TextBuffer
argPtr1 Ptr CChar
arg2 CInt
arg3 CInt
arg4)
{-# LINE 385 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
textPtr
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
len)
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
defaultEditable)
textBufferInsertRange :: TextBufferClass self => self
-> TextIter
-> TextIter
-> TextIter
-> IO ()
textBufferInsertRange :: forall self.
TextBufferClass self =>
self -> TextIter -> TextIter -> TextIter -> IO ()
textBufferInsertRange self
self TextIter
iter TextIter
start TextIter
end =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) (TextIter ForeignPtr TextIter
arg4) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg4 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr4 ->Ptr TextBuffer
-> Ptr TextIter -> Ptr TextIter -> Ptr TextIter -> IO ()
gtk_text_buffer_insert_range Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3 Ptr TextIter
argPtr4)
{-# LINE 406 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
TextIter
start
TextIter
end
textBufferInsertRangeInteractive :: TextBufferClass self => self
-> TextIter
-> TextIter
-> TextIter
-> Bool
-> IO Bool
textBufferInsertRangeInteractive :: forall self.
TextBufferClass self =>
self -> TextIter -> TextIter -> TextIter -> Bool -> IO Bool
textBufferInsertRangeInteractive self
self TextIter
iter TextIter
start TextIter
end Bool
defaultEditable =
(CInt -> Bool) -> IO CInt -> IO Bool
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Bool
forall a. (Eq a, Num a) => a -> Bool
toBool (IO CInt -> IO Bool) -> IO CInt -> IO Bool
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) (TextIter ForeignPtr TextIter
arg4) CInt
arg5 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg4 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr4 ->Ptr TextBuffer
-> Ptr TextIter -> Ptr TextIter -> Ptr TextIter -> CInt -> IO CInt
gtk_text_buffer_insert_range_interactive Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3 Ptr TextIter
argPtr4 CInt
arg5)
{-# LINE 426 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
TextIter
start
TextIter
end
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
defaultEditable)
textBufferDelete :: TextBufferClass self => self
-> TextIter
-> TextIter
-> IO ()
textBufferDelete :: forall self.
TextBufferClass self =>
self -> TextIter -> TextIter -> IO ()
textBufferDelete self
self TextIter
start TextIter
end =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr TextIter -> Ptr TextIter -> IO ()
gtk_text_buffer_delete Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3)
{-# LINE 446 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
start
TextIter
end
textBufferDeleteInteractive :: TextBufferClass self => self
-> TextIter
-> TextIter
-> Bool
-> IO Bool
textBufferDeleteInteractive :: forall self.
TextBufferClass self =>
self -> TextIter -> TextIter -> Bool -> IO Bool
textBufferDeleteInteractive self
self TextIter
startIter TextIter
endIter Bool
defaultEditable =
(CInt -> Bool) -> IO CInt -> IO Bool
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Bool
forall a. (Eq a, Num a) => a -> Bool
toBool (IO CInt -> IO Bool) -> IO CInt -> IO Bool
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) CInt
arg4 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr TextIter -> Ptr TextIter -> CInt -> IO CInt
gtk_text_buffer_delete_interactive Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3 CInt
arg4)
{-# LINE 464 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
startIter
TextIter
endIter
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
defaultEditable)
textBufferSetText :: (TextBufferClass self, GlibString string) => self
-> string
-> IO ()
textBufferSetText :: forall self string.
(TextBufferClass self, GlibString string) =>
self -> string -> IO ()
textBufferSetText self
self string
text =
string -> (CStringLen -> IO ()) -> IO ()
forall a. string -> (CStringLen -> IO a) -> IO a
forall s a. GlibString s => s -> (CStringLen -> IO a) -> IO a
withUTFStringLen string
text ((CStringLen -> IO ()) -> IO ()) -> (CStringLen -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \(Ptr CChar
textPtr, Int
len) ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 CInt
arg3 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> Ptr CChar -> CInt -> IO ()
gtk_text_buffer_set_text Ptr TextBuffer
argPtr1 Ptr CChar
arg2 CInt
arg3)
{-# LINE 477 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
textPtr
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
len)
textBufferGetText :: (TextBufferClass self, GlibString string) => self
-> TextIter
-> TextIter
-> Bool
-> IO string
textBufferGetText :: forall self string.
(TextBufferClass self, GlibString string) =>
self -> TextIter -> TextIter -> Bool -> IO string
textBufferGetText self
self TextIter
start TextIter
end Bool
includeHiddenChars =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) CInt
arg4 -> ForeignPtr TextBuffer
-> (Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer
-> Ptr TextIter -> Ptr TextIter -> CInt -> IO (Ptr CChar)
gtk_text_buffer_get_text Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3 CInt
arg4)
{-# LINE 495 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
start
TextIter
end
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
includeHiddenChars)
IO (Ptr CChar) -> (Ptr CChar -> IO string) -> IO string
forall a b. IO a -> (a -> IO b) -> IO b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= Ptr CChar -> IO string
forall s. GlibString s => Ptr CChar -> IO s
readUTFString
textBufferGetSlice :: (TextBufferClass self, GlibString string) => self
-> TextIter
-> TextIter
-> Bool
-> IO string
textBufferGetSlice :: forall self string.
(TextBufferClass self, GlibString string) =>
self -> TextIter -> TextIter -> Bool -> IO string
textBufferGetSlice self
self TextIter
start TextIter
end Bool
includeHiddenChars =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) CInt
arg4 -> ForeignPtr TextBuffer
-> (Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer
-> Ptr TextIter -> Ptr TextIter -> CInt -> IO (Ptr CChar)
gtk_text_buffer_get_slice Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3 CInt
arg4)
{-# LINE 517 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
start
TextIter
end
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
includeHiddenChars)
IO (Ptr CChar) -> (Ptr CChar -> IO string) -> IO string
forall a b. IO a -> (a -> IO b) -> IO b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= Ptr CChar -> IO string
forall s. GlibString s => Ptr CChar -> IO s
readUTFString
textBufferSetByteString :: TextBufferClass self => self
-> ByteString
-> IO ()
textBufferSetByteString :: forall self. TextBufferClass self => self -> ByteString -> IO ()
textBufferSetByteString self
self ByteString
text =
ByteString -> (CStringLen -> IO ()) -> IO ()
forall a. ByteString -> (CStringLen -> IO a) -> IO a
unsafeUseAsCStringLen ByteString
text ((CStringLen -> IO ()) -> IO ()) -> (CStringLen -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \(Ptr CChar
textPtr, Int
len) ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 CInt
arg3 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> Ptr CChar -> CInt -> IO ()
gtk_text_buffer_set_text Ptr TextBuffer
argPtr1 Ptr CChar
arg2 CInt
arg3)
{-# LINE 534 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
textPtr
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
len)
textBufferGetByteString :: TextBufferClass self => self
-> TextIter
-> TextIter
-> Bool
-> IO ByteString
textBufferGetByteString :: forall self.
TextBufferClass self =>
self -> TextIter -> TextIter -> Bool -> IO ByteString
textBufferGetByteString self
self TextIter
start TextIter
end Bool
includeHiddenChars = do
Ptr CChar
sPtr <- (\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) CInt
arg4 -> ForeignPtr TextBuffer
-> (Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer
-> Ptr TextIter -> Ptr TextIter -> CInt -> IO (Ptr CChar)
gtk_text_buffer_get_text Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3 CInt
arg4)
{-# LINE 550 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
start
TextIter
end
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
includeHiddenChars)
Int
sLen <- CChar -> Ptr CChar -> IO Int
forall a. (Storable a, Eq a) => a -> Ptr a -> IO Int
lengthArray0 CChar
0 Ptr CChar
sPtr
Ptr Word8 -> Int -> IO () -> IO ByteString
unsafePackCStringFinalizer (Ptr CChar -> Ptr Word8
forall a b. Ptr a -> Ptr b
castPtr Ptr CChar
sPtr) (Int -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
sLen)
(Ptr () -> IO ()
g_free (Ptr CChar -> Ptr ()
forall a b. Ptr a -> Ptr b
castPtr Ptr CChar
sPtr))
textBufferGetByteStringSlice :: TextBufferClass self => self
-> TextIter
-> TextIter
-> Bool
-> IO ByteString
textBufferGetByteStringSlice :: forall self.
TextBufferClass self =>
self -> TextIter -> TextIter -> Bool -> IO ByteString
textBufferGetByteStringSlice self
self TextIter
start TextIter
end Bool
includeHiddenChars = do
Ptr CChar
sPtr <- (\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) CInt
arg4 -> ForeignPtr TextBuffer
-> (Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextBuffer -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar))
-> (Ptr TextIter -> IO (Ptr CChar)) -> IO (Ptr CChar)
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer
-> Ptr TextIter -> Ptr TextIter -> CInt -> IO (Ptr CChar)
gtk_text_buffer_get_slice Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3 CInt
arg4)
{-# LINE 570 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
start
TextIter
end
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
includeHiddenChars)
Int
sLen <- CChar -> Ptr CChar -> IO Int
forall a. (Storable a, Eq a) => a -> Ptr a -> IO Int
lengthArray0 CChar
0 Ptr CChar
sPtr
Ptr Word8 -> Int -> IO () -> IO ByteString
unsafePackCStringFinalizer (Ptr CChar -> Ptr Word8
forall a b. Ptr a -> Ptr b
castPtr Ptr CChar
sPtr) (Int -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
sLen)
(Ptr () -> IO ()
g_free (Ptr CChar -> Ptr ()
forall a b. Ptr a -> Ptr b
castPtr Ptr CChar
sPtr))
textBufferInsertPixbuf :: TextBufferClass self => self
-> TextIter
-> Pixbuf
-> IO ()
textBufferInsertPixbuf :: forall self.
TextBufferClass self =>
self -> TextIter -> Pixbuf -> IO ()
textBufferInsertPixbuf self
self TextIter
iter Pixbuf
pixbuf =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (Pixbuf ForeignPtr Pixbuf
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr Pixbuf -> (Ptr Pixbuf -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr Pixbuf
arg3 ((Ptr Pixbuf -> IO ()) -> IO ()) -> (Ptr Pixbuf -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr Pixbuf
argPtr3 ->Ptr TextBuffer -> Ptr TextIter -> Ptr Pixbuf -> IO ()
gtk_text_buffer_insert_pixbuf Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr Pixbuf
argPtr3)
{-# LINE 592 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
Pixbuf
pixbuf
textBufferCreateMark :: TextBufferClass self => self
-> Maybe MarkName
-> TextIter
-> Bool
-> IO TextMark
textBufferCreateMark :: forall self.
TextBufferClass self =>
self -> Maybe MarkName -> TextIter -> Bool -> IO TextMark
textBufferCreateMark self
self Maybe MarkName
markName TextIter
where_ Bool
leftGravity =
(ForeignPtr TextMark -> TextMark, FinalizerPtr TextMark)
-> IO (Ptr TextMark) -> IO TextMark
forall obj.
GObjectClass obj =>
(ForeignPtr obj -> obj, FinalizerPtr obj) -> IO (Ptr obj) -> IO obj
makeNewGObject (ForeignPtr TextMark -> TextMark, FinalizerPtr TextMark)
forall {a}. (ForeignPtr TextMark -> TextMark, FinalizerPtr a)
mkTextMark (IO (Ptr TextMark) -> IO TextMark)
-> IO (Ptr TextMark) -> IO TextMark
forall a b. (a -> b) -> a -> b
$
(MarkName -> (Ptr CChar -> IO (Ptr TextMark)) -> IO (Ptr TextMark))
-> Maybe MarkName
-> (Ptr CChar -> IO (Ptr TextMark))
-> IO (Ptr TextMark)
forall a b c.
(a -> (Ptr b -> IO c) -> IO c)
-> Maybe a -> (Ptr b -> IO c) -> IO c
maybeWith MarkName -> (Ptr CChar -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall s a. GlibString s => s -> (Ptr CChar -> IO a) -> IO a
forall a. MarkName -> (Ptr CChar -> IO a) -> IO a
withUTFString Maybe MarkName
markName ((Ptr CChar -> IO (Ptr TextMark)) -> IO (Ptr TextMark))
-> (Ptr CChar -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. (a -> b) -> a -> b
$ \Ptr CChar
markNamePtr ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 (TextIter ForeignPtr TextIter
arg3) CInt
arg4 -> ForeignPtr TextBuffer
-> (Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark))
-> (Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter
-> (Ptr TextIter -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO (Ptr TextMark)) -> IO (Ptr TextMark))
-> (Ptr TextIter -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer
-> Ptr CChar -> Ptr TextIter -> CInt -> IO (Ptr TextMark)
gtk_text_buffer_create_mark Ptr TextBuffer
argPtr1 Ptr CChar
arg2 Ptr TextIter
argPtr3 CInt
arg4)
{-# LINE 617 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
markNamePtr
TextIter
where_
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
leftGravity)
textBufferAddMark :: TextBufferClass self => self
-> TextMark
-> TextIter
-> IO ()
textBufferAddMark :: forall self.
TextBufferClass self =>
self -> TextMark -> TextIter -> IO ()
textBufferAddMark self
self TextMark
mark TextIter
iter =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextMark ForeignPtr TextMark
arg2) (TextIter ForeignPtr TextIter
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextMark -> (Ptr TextMark -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextMark
arg2 ((Ptr TextMark -> IO ()) -> IO ())
-> (Ptr TextMark -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextMark
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr TextMark -> Ptr TextIter -> IO ()
gtk_text_buffer_add_mark Ptr TextBuffer
argPtr1 Ptr TextMark
argPtr2 Ptr TextIter
argPtr3) (self -> TextBuffer
forall o. TextBufferClass o => o -> TextBuffer
toTextBuffer self
self) (TextMark -> TextMark
forall o. TextMarkClass o => o -> TextMark
toTextMark TextMark
mark) TextIter
iter
textBufferMoveMark :: (TextBufferClass self, TextMarkClass mark) => self
-> mark
-> TextIter
-> IO ()
textBufferMoveMark :: forall self mark.
(TextBufferClass self, TextMarkClass mark) =>
self -> mark -> TextIter -> IO ()
textBufferMoveMark self
self mark
mark TextIter
where_ =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextMark ForeignPtr TextMark
arg2) (TextIter ForeignPtr TextIter
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextMark -> (Ptr TextMark -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextMark
arg2 ((Ptr TextMark -> IO ()) -> IO ())
-> (Ptr TextMark -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextMark
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr TextMark -> Ptr TextIter -> IO ()
gtk_text_buffer_move_mark Ptr TextBuffer
argPtr1 Ptr TextMark
argPtr2 Ptr TextIter
argPtr3)
{-# LINE 645 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
(mark -> TextMark
forall o. TextMarkClass o => o -> TextMark
toTextMark mark
mark)
TextIter
where_
textBufferMoveMarkByName :: TextBufferClass self => self
-> MarkName
-> TextIter
-> IO ()
textBufferMoveMarkByName :: forall self.
TextBufferClass self =>
self -> MarkName -> TextIter -> IO ()
textBufferMoveMarkByName self
self MarkName
name TextIter
where_ =
MarkName -> (Ptr CChar -> IO ()) -> IO ()
forall s a. GlibString s => s -> (Ptr CChar -> IO a) -> IO a
forall a. MarkName -> (Ptr CChar -> IO a) -> IO a
withUTFString MarkName
name ((Ptr CChar -> IO ()) -> IO ()) -> (Ptr CChar -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr CChar
namePtr ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 (TextIter ForeignPtr TextIter
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr CChar -> Ptr TextIter -> IO ()
gtk_text_buffer_move_mark_by_name Ptr TextBuffer
argPtr1 Ptr CChar
arg2 Ptr TextIter
argPtr3)
{-# LINE 659 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
namePtr
TextIter
where_
textBufferDeleteMark :: (TextBufferClass self, TextMarkClass mark) => self
-> mark
-> IO ()
textBufferDeleteMark :: forall self mark.
(TextBufferClass self, TextMarkClass mark) =>
self -> mark -> IO ()
textBufferDeleteMark self
self mark
mark =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextMark ForeignPtr TextMark
arg2) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextMark -> (Ptr TextMark -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextMark
arg2 ((Ptr TextMark -> IO ()) -> IO ())
-> (Ptr TextMark -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextMark
argPtr2 ->Ptr TextBuffer -> Ptr TextMark -> IO ()
gtk_text_buffer_delete_mark Ptr TextBuffer
argPtr1 Ptr TextMark
argPtr2)
{-# LINE 677 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
(mark -> TextMark
forall o. TextMarkClass o => o -> TextMark
toTextMark mark
mark)
textBufferDeleteMarkByName :: TextBufferClass self => self
-> MarkName
-> IO ()
textBufferDeleteMarkByName :: forall self. TextBufferClass self => self -> MarkName -> IO ()
textBufferDeleteMarkByName self
self MarkName
name =
MarkName -> (Ptr CChar -> IO ()) -> IO ()
forall s a. GlibString s => s -> (Ptr CChar -> IO a) -> IO a
forall a. MarkName -> (Ptr CChar -> IO a) -> IO a
withUTFString MarkName
name ((Ptr CChar -> IO ()) -> IO ()) -> (Ptr CChar -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr CChar
namePtr ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> Ptr CChar -> IO ()
gtk_text_buffer_delete_mark_by_name Ptr TextBuffer
argPtr1 Ptr CChar
arg2)
{-# LINE 689 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
namePtr
textBufferGetMark :: TextBufferClass self => self
-> MarkName
-> IO (Maybe TextMark)
textBufferGetMark :: forall self.
TextBufferClass self =>
self -> MarkName -> IO (Maybe TextMark)
textBufferGetMark self
self MarkName
name =
(IO (Ptr TextMark) -> IO TextMark)
-> IO (Ptr TextMark) -> IO (Maybe TextMark)
forall a. (IO (Ptr a) -> IO a) -> IO (Ptr a) -> IO (Maybe a)
maybeNull ((ForeignPtr TextMark -> TextMark, FinalizerPtr TextMark)
-> IO (Ptr TextMark) -> IO TextMark
forall obj.
GObjectClass obj =>
(ForeignPtr obj -> obj, FinalizerPtr obj) -> IO (Ptr obj) -> IO obj
makeNewGObject (ForeignPtr TextMark -> TextMark, FinalizerPtr TextMark)
forall {a}. (ForeignPtr TextMark -> TextMark, FinalizerPtr a)
mkTextMark) (IO (Ptr TextMark) -> IO (Maybe TextMark))
-> IO (Ptr TextMark) -> IO (Maybe TextMark)
forall a b. (a -> b) -> a -> b
$
MarkName -> (Ptr CChar -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall s a. GlibString s => s -> (Ptr CChar -> IO a) -> IO a
forall a. MarkName -> (Ptr CChar -> IO a) -> IO a
withUTFString MarkName
name ((Ptr CChar -> IO (Ptr TextMark)) -> IO (Ptr TextMark))
-> (Ptr CChar -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. (a -> b) -> a -> b
$ \Ptr CChar
namePtr ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 -> ForeignPtr TextBuffer
-> (Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark))
-> (Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> Ptr CChar -> IO (Ptr TextMark)
gtk_text_buffer_get_mark Ptr TextBuffer
argPtr1 Ptr CChar
arg2)
{-# LINE 702 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
namePtr
textBufferGetInsert :: TextBufferClass self => self -> IO TextMark
textBufferGetInsert :: forall self. TextBufferClass self => self -> IO TextMark
textBufferGetInsert self
self =
(ForeignPtr TextMark -> TextMark, FinalizerPtr TextMark)
-> IO (Ptr TextMark) -> IO TextMark
forall obj.
GObjectClass obj =>
(ForeignPtr obj -> obj, FinalizerPtr obj) -> IO (Ptr obj) -> IO obj
makeNewGObject (ForeignPtr TextMark -> TextMark, FinalizerPtr TextMark)
forall {a}. (ForeignPtr TextMark -> TextMark, FinalizerPtr a)
mkTextMark (IO (Ptr TextMark) -> IO TextMark)
-> IO (Ptr TextMark) -> IO TextMark
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) -> ForeignPtr TextBuffer
-> (Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark))
-> (Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> IO (Ptr TextMark)
gtk_text_buffer_get_insert Ptr TextBuffer
argPtr1)
{-# LINE 713 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
textBufferGetSelectionBound :: TextBufferClass self => self -> IO TextMark
textBufferGetSelectionBound :: forall self. TextBufferClass self => self -> IO TextMark
textBufferGetSelectionBound self
self =
(ForeignPtr TextMark -> TextMark, FinalizerPtr TextMark)
-> IO (Ptr TextMark) -> IO TextMark
forall obj.
GObjectClass obj =>
(ForeignPtr obj -> obj, FinalizerPtr obj) -> IO (Ptr obj) -> IO obj
makeNewGObject (ForeignPtr TextMark -> TextMark, FinalizerPtr TextMark)
forall {a}. (ForeignPtr TextMark -> TextMark, FinalizerPtr a)
mkTextMark (IO (Ptr TextMark) -> IO TextMark)
-> IO (Ptr TextMark) -> IO TextMark
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) -> ForeignPtr TextBuffer
-> (Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark))
-> (Ptr TextBuffer -> IO (Ptr TextMark)) -> IO (Ptr TextMark)
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> IO (Ptr TextMark)
gtk_text_buffer_get_selection_bound Ptr TextBuffer
argPtr1)
{-# LINE 730 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
textBufferPlaceCursor :: TextBufferClass self => self
-> TextIter
-> IO ()
textBufferPlaceCursor :: forall self. TextBufferClass self => self -> TextIter -> IO ()
textBufferPlaceCursor self
self TextIter
where_ =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer -> Ptr TextIter -> IO ()
gtk_text_buffer_place_cursor Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2)
{-# LINE 744 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
where_
textBufferApplyTag :: (TextBufferClass self, TextTagClass tag) => self
-> tag
-> TextIter
-> TextIter
-> IO ()
textBufferApplyTag :: forall self tag.
(TextBufferClass self, TextTagClass tag) =>
self -> tag -> TextIter -> TextIter -> IO ()
textBufferApplyTag self
self tag
tag TextIter
start TextIter
end =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextTag ForeignPtr TextTag
arg2) (TextIter ForeignPtr TextIter
arg3) (TextIter ForeignPtr TextIter
arg4) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextTag -> (Ptr TextTag -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextTag
arg2 ((Ptr TextTag -> IO ()) -> IO ())
-> (Ptr TextTag -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextTag
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg4 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr4 ->Ptr TextBuffer
-> Ptr TextTag -> Ptr TextIter -> Ptr TextIter -> IO ()
gtk_text_buffer_apply_tag Ptr TextBuffer
argPtr1 Ptr TextTag
argPtr2 Ptr TextIter
argPtr3 Ptr TextIter
argPtr4)
{-# LINE 758 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
(tag -> TextTag
forall o. TextTagClass o => o -> TextTag
toTextTag tag
tag)
TextIter
start
TextIter
end
textBufferRemoveTag :: (TextBufferClass self, TextTagClass tag) => self
-> tag
-> TextIter
-> TextIter
-> IO ()
textBufferRemoveTag :: forall self tag.
(TextBufferClass self, TextTagClass tag) =>
self -> tag -> TextIter -> TextIter -> IO ()
textBufferRemoveTag self
self tag
tag TextIter
start TextIter
end =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextTag ForeignPtr TextTag
arg2) (TextIter ForeignPtr TextIter
arg3) (TextIter ForeignPtr TextIter
arg4) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextTag -> (Ptr TextTag -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextTag
arg2 ((Ptr TextTag -> IO ()) -> IO ())
-> (Ptr TextTag -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextTag
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg4 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr4 ->Ptr TextBuffer
-> Ptr TextTag -> Ptr TextIter -> Ptr TextIter -> IO ()
gtk_text_buffer_remove_tag Ptr TextBuffer
argPtr1 Ptr TextTag
argPtr2 Ptr TextIter
argPtr3 Ptr TextIter
argPtr4)
{-# LINE 774 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
(tag -> TextTag
forall o. TextTagClass o => o -> TextTag
toTextTag tag
tag)
TextIter
start
TextIter
end
textBufferApplyTagByName :: TextBufferClass self => self
-> TagName
-> TextIter
-> TextIter
-> IO ()
textBufferApplyTagByName :: forall self.
TextBufferClass self =>
self -> MarkName -> TextIter -> TextIter -> IO ()
textBufferApplyTagByName self
self MarkName
name TextIter
start TextIter
end =
MarkName -> (Ptr CChar -> IO ()) -> IO ()
forall s a. GlibString s => s -> (Ptr CChar -> IO a) -> IO a
forall a. MarkName -> (Ptr CChar -> IO a) -> IO a
withUTFString MarkName
name ((Ptr CChar -> IO ()) -> IO ()) -> (Ptr CChar -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr CChar
namePtr ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 (TextIter ForeignPtr TextIter
arg3) (TextIter ForeignPtr TextIter
arg4) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg4 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr4 ->Ptr TextBuffer
-> Ptr CChar -> Ptr TextIter -> Ptr TextIter -> IO ()
gtk_text_buffer_apply_tag_by_name Ptr TextBuffer
argPtr1 Ptr CChar
arg2 Ptr TextIter
argPtr3 Ptr TextIter
argPtr4)
{-# LINE 790 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
namePtr
TextIter
start
TextIter
end
textBufferRemoveTagByName :: TextBufferClass self => self
-> TagName
-> TextIter
-> TextIter
-> IO ()
textBufferRemoveTagByName :: forall self.
TextBufferClass self =>
self -> MarkName -> TextIter -> TextIter -> IO ()
textBufferRemoveTagByName self
self MarkName
name TextIter
start TextIter
end =
MarkName -> (Ptr CChar -> IO ()) -> IO ()
forall s a. GlibString s => s -> (Ptr CChar -> IO a) -> IO a
forall a. MarkName -> (Ptr CChar -> IO a) -> IO a
withUTFString MarkName
name ((Ptr CChar -> IO ()) -> IO ()) -> (Ptr CChar -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr CChar
namePtr ->
(\(TextBuffer ForeignPtr TextBuffer
arg1) Ptr CChar
arg2 (TextIter ForeignPtr TextIter
arg3) (TextIter ForeignPtr TextIter
arg4) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg4 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr4 ->Ptr TextBuffer
-> Ptr CChar -> Ptr TextIter -> Ptr TextIter -> IO ()
gtk_text_buffer_remove_tag_by_name Ptr TextBuffer
argPtr1 Ptr CChar
arg2 Ptr TextIter
argPtr3 Ptr TextIter
argPtr4)
{-# LINE 806 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Ptr CChar
namePtr
TextIter
start
TextIter
end
textBufferRemoveAllTags :: TextBufferClass self => self
-> TextIter
-> TextIter
-> IO ()
textBufferRemoveAllTags :: forall self.
TextBufferClass self =>
self -> TextIter -> TextIter -> IO ()
textBufferRemoveAllTags self
self TextIter
start TextIter
end =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr TextIter -> Ptr TextIter -> IO ()
gtk_text_buffer_remove_all_tags Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3)
{-# LINE 822 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
start
TextIter
end
textBufferGetIterAtLineOffset :: TextBufferClass self => self
-> Int
-> Int
-> IO TextIter
textBufferGetIterAtLineOffset :: forall self.
TextBufferClass self =>
self -> Int -> Int -> IO TextIter
textBufferGetIterAtLineOffset self
self Int
lineNumber Int
charOffset = do
TextIter
iter <- IO TextIter
makeEmptyTextIter
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) CInt
arg3 CInt
arg4 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer -> Ptr TextIter -> CInt -> CInt -> IO ()
gtk_text_buffer_get_iter_at_line_offset Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 CInt
arg3 CInt
arg4)
{-# LINE 836 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
lineNumber)
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
charOffset)
TextIter -> IO TextIter
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return TextIter
iter
textBufferGetIterAtOffset :: TextBufferClass self => self
-> Int
-> IO TextIter
textBufferGetIterAtOffset :: forall self. TextBufferClass self => self -> Int -> IO TextIter
textBufferGetIterAtOffset self
self Int
charOffset = do
TextIter
iter <- IO TextIter
makeEmptyTextIter
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) CInt
arg3 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer -> Ptr TextIter -> CInt -> IO ()
gtk_text_buffer_get_iter_at_offset Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 CInt
arg3)
{-# LINE 854 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
charOffset)
TextIter -> IO TextIter
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return TextIter
iter
textBufferGetIterAtLine :: TextBufferClass self => self
-> Int
-> IO TextIter
textBufferGetIterAtLine :: forall self. TextBufferClass self => self -> Int -> IO TextIter
textBufferGetIterAtLine self
self Int
lineNumber = do
TextIter
iter <- IO TextIter
makeEmptyTextIter
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) CInt
arg3 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer -> Ptr TextIter -> CInt -> IO ()
gtk_text_buffer_get_iter_at_line Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 CInt
arg3)
{-# LINE 867 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
(Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral Int
lineNumber)
TextIter -> IO TextIter
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return TextIter
iter
textBufferGetIterAtMark :: (TextBufferClass self, TextMarkClass mark) => self
-> mark
-> IO TextIter
textBufferGetIterAtMark :: forall self mark.
(TextBufferClass self, TextMarkClass mark) =>
self -> mark -> IO TextIter
textBufferGetIterAtMark self
self mark
mark = do
TextIter
iter <- IO TextIter
makeEmptyTextIter
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextMark ForeignPtr TextMark
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextMark -> (Ptr TextMark -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextMark
arg3 ((Ptr TextMark -> IO ()) -> IO ())
-> (Ptr TextMark -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextMark
argPtr3 ->Ptr TextBuffer -> Ptr TextIter -> Ptr TextMark -> IO ()
gtk_text_buffer_get_iter_at_mark Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextMark
argPtr3)
{-# LINE 881 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
(mark -> TextMark
forall o. TextMarkClass o => o -> TextMark
toTextMark mark
mark)
TextIter -> IO TextIter
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return TextIter
iter
textBufferGetStartIter :: TextBufferClass self => self -> IO TextIter
textBufferGetStartIter :: forall self. TextBufferClass self => self -> IO TextIter
textBufferGetStartIter self
self = do
TextIter
iter <- IO TextIter
makeEmptyTextIter
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer -> Ptr TextIter -> IO ()
gtk_text_buffer_get_start_iter Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2)
{-# LINE 894 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
TextIter -> IO TextIter
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return TextIter
iter
textBufferGetEndIter :: TextBufferClass self => self -> IO TextIter
textBufferGetEndIter :: forall self. TextBufferClass self => self -> IO TextIter
textBufferGetEndIter self
self = do
TextIter
iter <- IO TextIter
makeEmptyTextIter
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer -> Ptr TextIter -> IO ()
gtk_text_buffer_get_end_iter Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2)
{-# LINE 909 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
TextIter -> IO TextIter
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return TextIter
iter
textBufferGetModified :: TextBufferClass self => self
-> IO Bool
textBufferGetModified :: forall self. TextBufferClass self => self -> IO Bool
textBufferGetModified self
self =
(CInt -> Bool) -> IO CInt -> IO Bool
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Bool
forall a. (Eq a, Num a) => a -> Bool
toBool (IO CInt -> IO Bool) -> IO CInt -> IO Bool
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> IO CInt
gtk_text_buffer_get_modified Ptr TextBuffer
argPtr1)
{-# LINE 924 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
textBufferSetModified :: TextBufferClass self => self -> Bool -> IO ()
textBufferSetModified :: forall self. TextBufferClass self => self -> Bool -> IO ()
textBufferSetModified self
self Bool
setting =
(\(TextBuffer ForeignPtr TextBuffer
arg1) CInt
arg2 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> CInt -> IO ()
gtk_text_buffer_set_modified Ptr TextBuffer
argPtr1 CInt
arg2)
{-# LINE 935 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
setting)
textBufferDeleteSelection :: TextBufferClass self => self
-> Bool
-> Bool
-> IO Bool
textBufferDeleteSelection :: forall self.
TextBufferClass self =>
self -> Bool -> Bool -> IO Bool
textBufferDeleteSelection self
self Bool
interactive Bool
defaultEditable =
(CInt -> Bool) -> IO CInt -> IO Bool
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Bool
forall a. (Eq a, Num a) => a -> Bool
toBool (IO CInt -> IO Bool) -> IO CInt -> IO Bool
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) CInt
arg2 CInt
arg3 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> CInt -> CInt -> IO CInt
gtk_text_buffer_delete_selection Ptr TextBuffer
argPtr1 CInt
arg2 CInt
arg3)
{-# LINE 951 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
interactive)
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
defaultEditable)
textBufferHasSelection :: TextBufferClass self => self -> IO Bool
textBufferHasSelection :: forall self. TextBufferClass self => self -> IO Bool
textBufferHasSelection self
self =
(CInt -> Bool) -> IO CInt -> IO Bool
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Bool
forall a. (Eq a, Num a) => a -> Bool
toBool (IO CInt -> IO Bool) -> IO CInt -> IO Bool
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr TextIter -> Ptr TextIter -> IO CInt
gtk_text_buffer_get_selection_bounds Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3)
{-# LINE 961 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
(ForeignPtr TextIter -> TextIter
TextIter ForeignPtr TextIter
forall a. ForeignPtr a
nullForeignPtr)
(ForeignPtr TextIter -> TextIter
TextIter ForeignPtr TextIter
forall a. ForeignPtr a
nullForeignPtr)
textBufferGetSelectionBounds :: TextBufferClass self => self
-> IO (TextIter, TextIter)
textBufferGetSelectionBounds :: forall self.
TextBufferClass self =>
self -> IO (TextIter, TextIter)
textBufferGetSelectionBounds self
self = do
TextIter
start <- IO TextIter
makeEmptyTextIter
TextIter
end <- IO TextIter
makeEmptyTextIter
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr TextIter -> Ptr TextIter -> IO CInt
gtk_text_buffer_get_selection_bounds Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3)
{-# LINE 976 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
start
TextIter
end
(TextIter, TextIter) -> IO (TextIter, TextIter)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return (TextIter
start, TextIter
end)
textBufferBeginUserAction :: TextBufferClass self => self -> IO ()
textBufferBeginUserAction :: forall self. TextBufferClass self => self -> IO ()
textBufferBeginUserAction self
self =
(\(TextBuffer ForeignPtr TextBuffer
arg1) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> IO ()
gtk_text_buffer_begin_user_action Ptr TextBuffer
argPtr1)
{-# LINE 999 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
textBufferEndUserAction :: TextBufferClass self => self -> IO ()
textBufferEndUserAction :: forall self. TextBufferClass self => self -> IO ()
textBufferEndUserAction self
self =
(\(TextBuffer ForeignPtr TextBuffer
arg1) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->Ptr TextBuffer -> IO ()
gtk_text_buffer_end_user_action Ptr TextBuffer
argPtr1)
{-# LINE 1007 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
textBufferBackspace :: TextBufferClass self => self
-> TextIter
-> Bool
-> Bool
-> IO Bool
textBufferBackspace :: forall self.
TextBufferClass self =>
self -> TextIter -> Bool -> Bool -> IO Bool
textBufferBackspace self
self TextIter
iter Bool
interactive Bool
defaultEditable =
(CInt -> Bool) -> IO CInt -> IO Bool
forall (m :: * -> *) a1 r. Monad m => (a1 -> r) -> m a1 -> m r
liftM CInt -> Bool
forall a. (Eq a, Num a) => a -> Bool
toBool (IO CInt -> IO Bool) -> IO CInt -> IO Bool
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) CInt
arg3 CInt
arg4 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO CInt) -> IO CInt)
-> (Ptr TextBuffer -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO CInt) -> IO CInt)
-> (Ptr TextIter -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer -> Ptr TextIter -> CInt -> CInt -> IO CInt
gtk_text_buffer_backspace Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 CInt
arg3 CInt
arg4)
{-# LINE 1032 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
interactive)
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
defaultEditable)
textBufferInsertChildAnchor :: TextBufferClass self => self
-> TextIter
-> TextChildAnchor
-> IO ()
textBufferInsertChildAnchor :: forall self.
TextBufferClass self =>
self -> TextIter -> TextChildAnchor -> IO ()
textBufferInsertChildAnchor self
self TextIter
iter TextChildAnchor
anchor =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextChildAnchor ForeignPtr TextChildAnchor
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextChildAnchor
-> (Ptr TextChildAnchor -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextChildAnchor
arg3 ((Ptr TextChildAnchor -> IO ()) -> IO ())
-> (Ptr TextChildAnchor -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextChildAnchor
argPtr3 ->Ptr TextBuffer -> Ptr TextIter -> Ptr TextChildAnchor -> IO ()
gtk_text_buffer_insert_child_anchor Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextChildAnchor
argPtr3)
{-# LINE 1054 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
TextChildAnchor
anchor
textBufferCreateChildAnchor :: TextBufferClass self => self
-> TextIter
-> IO TextChildAnchor
textBufferCreateChildAnchor :: forall self.
TextBufferClass self =>
self -> TextIter -> IO TextChildAnchor
textBufferCreateChildAnchor self
self TextIter
iter =
(ForeignPtr TextChildAnchor -> TextChildAnchor,
FinalizerPtr TextChildAnchor)
-> IO (Ptr TextChildAnchor) -> IO TextChildAnchor
forall obj.
GObjectClass obj =>
(ForeignPtr obj -> obj, FinalizerPtr obj) -> IO (Ptr obj) -> IO obj
makeNewGObject (ForeignPtr TextChildAnchor -> TextChildAnchor,
FinalizerPtr TextChildAnchor)
forall {a}.
(ForeignPtr TextChildAnchor -> TextChildAnchor, FinalizerPtr a)
mkTextChildAnchor (IO (Ptr TextChildAnchor) -> IO TextChildAnchor)
-> IO (Ptr TextChildAnchor) -> IO TextChildAnchor
forall a b. (a -> b) -> a -> b
$
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) -> ForeignPtr TextBuffer
-> (Ptr TextBuffer -> IO (Ptr TextChildAnchor))
-> IO (Ptr TextChildAnchor)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO (Ptr TextChildAnchor))
-> IO (Ptr TextChildAnchor))
-> (Ptr TextBuffer -> IO (Ptr TextChildAnchor))
-> IO (Ptr TextChildAnchor)
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter
-> (Ptr TextIter -> IO (Ptr TextChildAnchor))
-> IO (Ptr TextChildAnchor)
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO (Ptr TextChildAnchor))
-> IO (Ptr TextChildAnchor))
-> (Ptr TextIter -> IO (Ptr TextChildAnchor))
-> IO (Ptr TextChildAnchor)
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->Ptr TextBuffer -> Ptr TextIter -> IO (Ptr TextChildAnchor)
gtk_text_buffer_create_child_anchor Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2)
{-# LINE 1068 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
textBufferSelectRange :: TextBufferClass self => self
-> TextIter
-> TextIter
-> IO ()
textBufferSelectRange :: forall self.
TextBufferClass self =>
self -> TextIter -> TextIter -> IO ()
textBufferSelectRange self
self TextIter
ins TextIter
bound =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr TextIter -> Ptr TextIter -> IO ()
gtk_text_buffer_select_range Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3)
{-# LINE 1087 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
ins
TextIter
bound
textBufferGetIterAtChildAnchor :: TextBufferClass self => self
-> TextIter
-> TextChildAnchor
-> IO ()
textBufferGetIterAtChildAnchor :: forall self.
TextBufferClass self =>
self -> TextIter -> TextChildAnchor -> IO ()
textBufferGetIterAtChildAnchor self
self TextIter
iter TextChildAnchor
anchor =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextChildAnchor ForeignPtr TextChildAnchor
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextChildAnchor
-> (Ptr TextChildAnchor -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextChildAnchor
arg3 ((Ptr TextChildAnchor -> IO ()) -> IO ())
-> (Ptr TextChildAnchor -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextChildAnchor
argPtr3 ->Ptr TextBuffer -> Ptr TextIter -> Ptr TextChildAnchor -> IO ()
gtk_text_buffer_get_iter_at_child_anchor Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextChildAnchor
argPtr3)
{-# LINE 1100 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
iter
TextChildAnchor
anchor
textBufferGetBounds :: TextBufferClass self => self
-> IO (TextIter, TextIter)
textBufferGetBounds :: forall self.
TextBufferClass self =>
self -> IO (TextIter, TextIter)
textBufferGetBounds self
self = do
TextIter
start <- IO TextIter
makeEmptyTextIter
TextIter
end <- IO TextIter
makeEmptyTextIter
(\(TextBuffer ForeignPtr TextBuffer
arg1) (TextIter ForeignPtr TextIter
arg2) (TextIter ForeignPtr TextIter
arg3) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg2 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr TextIter -> Ptr TextIter -> IO ()
gtk_text_buffer_get_bounds Ptr TextBuffer
argPtr1 Ptr TextIter
argPtr2 Ptr TextIter
argPtr3)
{-# LINE 1113 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
TextIter
start
TextIter
end
(TextIter, TextIter) -> IO (TextIter, TextIter)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return (TextIter
start, TextIter
end)
textBufferPasteClipboard :: TextBufferClass self => self
-> Clipboard
-> TextIter
-> Bool
-> IO ()
textBufferPasteClipboard :: forall self.
TextBufferClass self =>
self -> Clipboard -> TextIter -> Bool -> IO ()
textBufferPasteClipboard self
self Clipboard
clipboard TextIter
overrideLocation Bool
defaultEditable =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (Clipboard ForeignPtr Clipboard
arg2) (TextIter ForeignPtr TextIter
arg3) CInt
arg4 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr Clipboard -> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr Clipboard
arg2 ((Ptr Clipboard -> IO ()) -> IO ())
-> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr Clipboard
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr Clipboard -> Ptr TextIter -> CInt -> IO ()
gtk_text_buffer_paste_clipboard Ptr TextBuffer
argPtr1 Ptr Clipboard
argPtr2 Ptr TextIter
argPtr3 CInt
arg4)
{-# LINE 1130 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Clipboard
clipboard
TextIter
overrideLocation
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
defaultEditable)
textBufferPasteClipboardAtCursor :: TextBufferClass self => self
-> Clipboard
-> Bool
-> IO ()
textBufferPasteClipboardAtCursor :: forall self.
TextBufferClass self =>
self -> Clipboard -> Bool -> IO ()
textBufferPasteClipboardAtCursor self
self Clipboard
clipboard Bool
defaultEditable =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (Clipboard ForeignPtr Clipboard
arg2) (TextIter ForeignPtr TextIter
arg3) CInt
arg4 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr Clipboard -> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr Clipboard
arg2 ((Ptr Clipboard -> IO ()) -> IO ())
-> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr Clipboard
argPtr2 ->ForeignPtr TextIter -> (Ptr TextIter -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextIter
arg3 ((Ptr TextIter -> IO ()) -> IO ())
-> (Ptr TextIter -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextIter
argPtr3 ->Ptr TextBuffer -> Ptr Clipboard -> Ptr TextIter -> CInt -> IO ()
gtk_text_buffer_paste_clipboard Ptr TextBuffer
argPtr1 Ptr Clipboard
argPtr2 Ptr TextIter
argPtr3 CInt
arg4)
{-# LINE 1145 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Clipboard
clipboard
(ForeignPtr TextIter -> TextIter
TextIter ForeignPtr TextIter
forall a. ForeignPtr a
nullForeignPtr)
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
defaultEditable)
textBufferCopyClipboard :: TextBufferClass self => self
-> Clipboard
-> IO ()
textBufferCopyClipboard :: forall self. TextBufferClass self => self -> Clipboard -> IO ()
textBufferCopyClipboard self
self Clipboard
clipboard =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (Clipboard ForeignPtr Clipboard
arg2) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr Clipboard -> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr Clipboard
arg2 ((Ptr Clipboard -> IO ()) -> IO ())
-> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr Clipboard
argPtr2 ->Ptr TextBuffer -> Ptr Clipboard -> IO ()
gtk_text_buffer_copy_clipboard Ptr TextBuffer
argPtr1 Ptr Clipboard
argPtr2)
{-# LINE 1156 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Clipboard
clipboard
textBufferCutClipboard :: TextBufferClass self => self
-> Clipboard
-> Bool
-> IO ()
textBufferCutClipboard :: forall self.
TextBufferClass self =>
self -> Clipboard -> Bool -> IO ()
textBufferCutClipboard self
self Clipboard
clipboard Bool
defaultEditable =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (Clipboard ForeignPtr Clipboard
arg2) CInt
arg3 -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr Clipboard -> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr Clipboard
arg2 ((Ptr Clipboard -> IO ()) -> IO ())
-> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr Clipboard
argPtr2 ->Ptr TextBuffer -> Ptr Clipboard -> CInt -> IO ()
gtk_text_buffer_cut_clipboard Ptr TextBuffer
argPtr1 Ptr Clipboard
argPtr2 CInt
arg3)
{-# LINE 1167 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
(toTextBuffer self)
Clipboard
clipboard
(Bool -> CInt
forall a. Num a => Bool -> a
fromBool Bool
defaultEditable)
textBufferAddSelectionClipboard :: TextBufferClass self => self
-> Clipboard
-> IO ()
textBufferAddSelectionClipboard :: forall self. TextBufferClass self => self -> Clipboard -> IO ()
textBufferAddSelectionClipboard self
self Clipboard
clipboard =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (Clipboard ForeignPtr Clipboard
arg2) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr Clipboard -> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr Clipboard
arg2 ((Ptr Clipboard -> IO ()) -> IO ())
-> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr Clipboard
argPtr2 ->Ptr TextBuffer -> Ptr Clipboard -> IO ()
gtk_text_buffer_add_selection_clipboard Ptr TextBuffer
argPtr1 Ptr Clipboard
argPtr2) (self -> TextBuffer
forall o. TextBufferClass o => o -> TextBuffer
toTextBuffer self
self) Clipboard
clipboard
textBufferRemoveSelectionClipboard :: TextBufferClass self => self
-> Clipboard
-> IO ()
textBufferRemoveSelectionClipboard :: forall self. TextBufferClass self => self -> Clipboard -> IO ()
textBufferRemoveSelectionClipboard self
self Clipboard
clipboard =
(\(TextBuffer ForeignPtr TextBuffer
arg1) (Clipboard ForeignPtr Clipboard
arg2) -> ForeignPtr TextBuffer -> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr TextBuffer
arg1 ((Ptr TextBuffer -> IO ()) -> IO ())
-> (Ptr TextBuffer -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr TextBuffer
argPtr1 ->ForeignPtr Clipboard -> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. ForeignPtr a -> (Ptr a -> IO b) -> IO b
withForeignPtr ForeignPtr Clipboard
arg2 ((Ptr Clipboard -> IO ()) -> IO ())
-> (Ptr Clipboard -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Ptr Clipboard
argPtr2 ->Ptr TextBuffer -> Ptr Clipboard -> IO ()
gtk_text_buffer_remove_selection_clipboard Ptr TextBuffer
argPtr1 Ptr Clipboard
argPtr2) (self -> TextBuffer
forall o. TextBufferClass o => o -> TextBuffer
toTextBuffer self
self) Clipboard
clipboard
textBufferTagTable :: (TextBufferClass self, TextTagTableClass textTagTable)
=> ReadWriteAttr self TextTagTable textTagTable
textBufferTagTable :: forall self textTagTable.
(TextBufferClass self, TextTagTableClass textTagTable) =>
ReadWriteAttr self TextTagTable textTagTable
textBufferTagTable = String -> GType -> ReadWriteAttr self TextTagTable textTagTable
forall gobj gobj' gobj''.
(GObjectClass gobj, GObjectClass gobj', GObjectClass gobj'') =>
String -> GType -> ReadWriteAttr gobj gobj' gobj''
newAttrFromObjectProperty String
"tag-table"
GType
gtk_text_tag_table_get_type
{-# LINE 1198 "./Graphics/UI/Gtk/Multiline/TextBuffer.chs" #-}
textBufferText :: (TextBufferClass self, GlibString string) => Attr self string
textBufferText :: forall self string.
(TextBufferClass self, GlibString string) =>
Attr self string
textBufferText = String -> Attr self string
forall gobj string.
(GObjectClass gobj, GlibString string) =>
String -> Attr gobj string
newAttrFromStringProperty String
"text"
textBufferModified :: TextBufferClass self => Attr self Bool
textBufferModified :: forall self. TextBufferClass self => Attr self Bool
textBufferModified = (self -> IO Bool)
-> (self -> Bool -> IO ()) -> ReadWriteAttr self Bool Bool
forall o a b.
(o -> IO a) -> (o -> b -> IO ()) -> ReadWriteAttr o a b
newAttr
self -> IO Bool
forall self. TextBufferClass self => self -> IO Bool
textBufferGetModified
self -> Bool -> IO ()
forall self. TextBufferClass self => self -> Bool -> IO ()
textBufferSetModified
applyTag :: TextBufferClass self => Signal self (TextTag -> TextIter -> TextIter -> IO ())
applyTag :: forall self.
TextBufferClass self =>
Signal self (TextTag -> TextIter -> TextIter -> IO ())
applyTag = (Bool
-> self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self))
-> Signal self (TextTag -> TextIter -> TextIter -> IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String
-> (Ptr TextIter -> IO TextIter)
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
forall a' obj b' b c' c.
(GObjectClass a', GObjectClass obj) =>
String
-> (Ptr b' -> IO b)
-> (Ptr c' -> IO c)
-> Bool
-> obj
-> (a' -> b -> c -> IO ())
-> IO (ConnectId obj)
connect_OBJECT_BOXED_BOXED__NONE String
"apply-tag" Ptr TextIter -> IO TextIter
mkTextIterCopy Ptr TextIter -> IO TextIter
mkTextIterCopy)
beginUserAction :: TextBufferClass self => Signal self (IO ())
beginUserAction :: forall self. TextBufferClass self => Signal self (IO ())
beginUserAction = (Bool -> self -> IO () -> IO (ConnectId self))
-> Signal self (IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"begin-user-action")
bufferChanged :: TextBufferClass self => Signal self (IO ())
bufferChanged :: forall self. TextBufferClass self => Signal self (IO ())
bufferChanged = (Bool -> self -> IO () -> IO (ConnectId self))
-> Signal self (IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"changed")
deleteRange :: TextBufferClass self => Signal self (TextIter -> TextIter -> IO ())
deleteRange :: forall self.
TextBufferClass self =>
Signal self (TextIter -> TextIter -> IO ())
deleteRange = (Bool
-> self -> (TextIter -> TextIter -> IO ()) -> IO (ConnectId self))
-> Signal self (TextIter -> TextIter -> IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String
-> (Ptr TextIter -> IO TextIter)
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
forall obj a' a b' b.
GObjectClass obj =>
String
-> (Ptr a' -> IO a)
-> (Ptr b' -> IO b)
-> Bool
-> obj
-> (a -> b -> IO ())
-> IO (ConnectId obj)
connect_BOXED_BOXED__NONE String
"delete-range" Ptr TextIter -> IO TextIter
mkTextIterCopy Ptr TextIter -> IO TextIter
mkTextIterCopy)
endUserAction :: TextBufferClass self => Signal self (IO ())
endUserAction :: forall self. TextBufferClass self => Signal self (IO ())
endUserAction = (Bool -> self -> IO () -> IO (ConnectId self))
-> Signal self (IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"end-user-action")
insertPixbuf :: TextBufferClass self => Signal self (TextIter -> Pixbuf -> IO ())
insertPixbuf :: forall self.
TextBufferClass self =>
Signal self (TextIter -> Pixbuf -> IO ())
insertPixbuf = (Bool
-> self -> (TextIter -> Pixbuf -> IO ()) -> IO (ConnectId self))
-> Signal self (TextIter -> Pixbuf -> IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> Pixbuf -> IO ())
-> IO (ConnectId self)
forall b' obj a' a.
(GObjectClass b', GObjectClass obj) =>
String
-> (Ptr a' -> IO a)
-> Bool
-> obj
-> (a -> b' -> IO ())
-> IO (ConnectId obj)
connect_BOXED_OBJECT__NONE String
"insert-pixbuf" Ptr TextIter -> IO TextIter
mkTextIterCopy)
insertChildAnchor :: TextBufferClass self => Signal self (TextIter -> TextChildAnchor -> IO ())
insertChildAnchor :: forall self.
TextBufferClass self =>
Signal self (TextIter -> TextChildAnchor -> IO ())
insertChildAnchor = (Bool
-> self
-> (TextIter -> TextChildAnchor -> IO ())
-> IO (ConnectId self))
-> Signal self (TextIter -> TextChildAnchor -> IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> TextChildAnchor -> IO ())
-> IO (ConnectId self)
forall b' obj a' a.
(GObjectClass b', GObjectClass obj) =>
String
-> (Ptr a' -> IO a)
-> Bool
-> obj
-> (a -> b' -> IO ())
-> IO (ConnectId obj)
connect_BOXED_OBJECT__NONE String
"insert-child-anchor" Ptr TextIter -> IO TextIter
mkTextIterCopy)
bufferInsertText :: (TextBufferClass self, GlibString string) => Signal self (TextIter -> string -> IO ())
bufferInsertText :: forall self string.
(TextBufferClass self, GlibString string) =>
Signal self (TextIter -> string -> IO ())
bufferInsertText = (Bool
-> self -> (TextIter -> string -> IO ()) -> IO (ConnectId self))
-> Signal self (TextIter -> string -> IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal ((Bool
-> self -> (TextIter -> string -> IO ()) -> IO (ConnectId self))
-> Signal self (TextIter -> string -> IO ()))
-> (Bool
-> self -> (TextIter -> string -> IO ()) -> IO (ConnectId self))
-> Signal self (TextIter -> string -> IO ())
forall a b. (a -> b) -> a -> b
$ \Bool
after self
obj TextIter -> string -> IO ()
handler ->
String
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> Ptr CChar -> Int -> IO ())
-> IO (ConnectId self)
forall obj a' a b.
GObjectClass obj =>
String
-> (Ptr a' -> IO a)
-> Bool
-> obj
-> (a -> Ptr b -> Int -> IO ())
-> IO (ConnectId obj)
connect_BOXED_PTR_INT__NONE String
"insert-text" Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
after self
obj
(\TextIter
iter Ptr CChar
strPtr Int
strLen -> CStringLen -> IO string
forall s. GlibString s => CStringLen -> IO s
peekUTFStringLen (Ptr CChar
strPtr, Int
strLen) IO string -> (string -> IO ()) -> IO ()
forall a b. IO a -> (a -> IO b) -> IO b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= TextIter -> string -> IO ()
handler TextIter
iter)
markDeleted :: TextBufferClass self => Signal self (TextMark -> IO ())
markDeleted :: forall self.
TextBufferClass self =>
Signal self (TextMark -> IO ())
markDeleted = (Bool -> self -> (TextMark -> IO ()) -> IO (ConnectId self))
-> Signal self (TextMark -> IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String
-> Bool -> self -> (TextMark -> IO ()) -> IO (ConnectId self)
forall a' obj.
(GObjectClass a', GObjectClass obj) =>
String -> Bool -> obj -> (a' -> IO ()) -> IO (ConnectId obj)
connect_OBJECT__NONE String
"mark-deleted")
markSet :: TextBufferClass self => Signal self (TextIter -> TextMark -> IO ())
markSet :: forall self.
TextBufferClass self =>
Signal self (TextIter -> TextMark -> IO ())
markSet = (Bool
-> self -> (TextIter -> TextMark -> IO ()) -> IO (ConnectId self))
-> Signal self (TextIter -> TextMark -> IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> TextMark -> IO ())
-> IO (ConnectId self)
forall b' obj a' a.
(GObjectClass b', GObjectClass obj) =>
String
-> (Ptr a' -> IO a)
-> Bool
-> obj
-> (a -> b' -> IO ())
-> IO (ConnectId obj)
connect_BOXED_OBJECT__NONE String
"mark-set" Ptr TextIter -> IO TextIter
mkTextIterCopy)
modifiedChanged :: TextBufferClass self => Signal self (IO ())
modifiedChanged :: forall self. TextBufferClass self => Signal self (IO ())
modifiedChanged = (Bool -> self -> IO () -> IO (ConnectId self))
-> Signal self (IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"modified-changed")
pasteDone :: TextBufferClass self => Signal self (Clipboard -> IO ())
pasteDone :: forall self.
TextBufferClass self =>
Signal self (Clipboard -> IO ())
pasteDone = (Bool -> self -> (Clipboard -> IO ()) -> IO (ConnectId self))
-> Signal self (Clipboard -> IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String
-> Bool -> self -> (Clipboard -> IO ()) -> IO (ConnectId self)
forall a' obj.
(GObjectClass a', GObjectClass obj) =>
String -> Bool -> obj -> (a' -> IO ()) -> IO (ConnectId obj)
connect_OBJECT__NONE String
"paste-done")
removeTag :: TextBufferClass self => Signal self (TextTag -> TextIter -> TextIter -> IO ())
removeTag :: forall self.
TextBufferClass self =>
Signal self (TextTag -> TextIter -> TextIter -> IO ())
removeTag = (Bool
-> self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self))
-> Signal self (TextTag -> TextIter -> TextIter -> IO ())
forall object handler.
(Bool -> object -> handler -> IO (ConnectId object))
-> Signal object handler
Signal (String
-> (Ptr TextIter -> IO TextIter)
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
forall a' obj b' b c' c.
(GObjectClass a', GObjectClass obj) =>
String
-> (Ptr b' -> IO b)
-> (Ptr c' -> IO c)
-> Bool
-> obj
-> (a' -> b -> c -> IO ())
-> IO (ConnectId obj)
connect_OBJECT_BOXED_BOXED__NONE String
"remove-tag" Ptr TextIter -> IO TextIter
mkTextIterCopy Ptr TextIter -> IO TextIter
mkTextIterCopy)
onApplyTag, afterApplyTag :: TextBufferClass self => self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
onApplyTag :: forall self.
TextBufferClass self =>
self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
onApplyTag = String
-> (Ptr TextIter -> IO TextIter)
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
forall a' obj b' b c' c.
(GObjectClass a', GObjectClass obj) =>
String
-> (Ptr b' -> IO b)
-> (Ptr c' -> IO c)
-> Bool
-> obj
-> (a' -> b -> c -> IO ())
-> IO (ConnectId obj)
connect_OBJECT_BOXED_BOXED__NONE String
"apply-tag"
Ptr TextIter -> IO TextIter
mkTextIterCopy Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
False
afterApplyTag :: forall self.
TextBufferClass self =>
self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
afterApplyTag = String
-> (Ptr TextIter -> IO TextIter)
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
forall a' obj b' b c' c.
(GObjectClass a', GObjectClass obj) =>
String
-> (Ptr b' -> IO b)
-> (Ptr c' -> IO c)
-> Bool
-> obj
-> (a' -> b -> c -> IO ())
-> IO (ConnectId obj)
connect_OBJECT_BOXED_BOXED__NONE String
"apply-tag"
Ptr TextIter -> IO TextIter
mkTextIterCopy Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
True
onBeginUserAction, afterBeginUserAction :: TextBufferClass self => self
-> IO ()
-> IO (ConnectId self)
onBeginUserAction :: forall self.
TextBufferClass self =>
self -> IO () -> IO (ConnectId self)
onBeginUserAction = String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"begin-user-action" Bool
False
afterBeginUserAction :: forall self.
TextBufferClass self =>
self -> IO () -> IO (ConnectId self)
afterBeginUserAction = String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"begin-user-action" Bool
True
onBufferChanged, afterBufferChanged :: TextBufferClass self => self
-> IO ()
-> IO (ConnectId self)
onBufferChanged :: forall self.
TextBufferClass self =>
self -> IO () -> IO (ConnectId self)
onBufferChanged = String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"changed" Bool
False
afterBufferChanged :: forall self.
TextBufferClass self =>
self -> IO () -> IO (ConnectId self)
afterBufferChanged = String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"changed" Bool
True
onDeleteRange, afterDeleteRange :: TextBufferClass self => self
-> (TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
onDeleteRange :: forall self.
TextBufferClass self =>
self -> (TextIter -> TextIter -> IO ()) -> IO (ConnectId self)
onDeleteRange = String
-> (Ptr TextIter -> IO TextIter)
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
forall obj a' a b' b.
GObjectClass obj =>
String
-> (Ptr a' -> IO a)
-> (Ptr b' -> IO b)
-> Bool
-> obj
-> (a -> b -> IO ())
-> IO (ConnectId obj)
connect_BOXED_BOXED__NONE String
"delete-range"
Ptr TextIter -> IO TextIter
mkTextIterCopy Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
False
afterDeleteRange :: forall self.
TextBufferClass self =>
self -> (TextIter -> TextIter -> IO ()) -> IO (ConnectId self)
afterDeleteRange = String
-> (Ptr TextIter -> IO TextIter)
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
forall obj a' a b' b.
GObjectClass obj =>
String
-> (Ptr a' -> IO a)
-> (Ptr b' -> IO b)
-> Bool
-> obj
-> (a -> b -> IO ())
-> IO (ConnectId obj)
connect_BOXED_BOXED__NONE String
"delete-range"
Ptr TextIter -> IO TextIter
mkTextIterCopy Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
True
onEndUserAction, afterEndUserAction :: TextBufferClass self => self
-> IO ()
-> IO (ConnectId self)
onEndUserAction :: forall self.
TextBufferClass self =>
self -> IO () -> IO (ConnectId self)
onEndUserAction = String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"end-user-action" Bool
False
afterEndUserAction :: forall self.
TextBufferClass self =>
self -> IO () -> IO (ConnectId self)
afterEndUserAction = String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"end-user-action" Bool
True
onInsertPixbuf, afterInsertPixbuf :: TextBufferClass self => self
-> (TextIter -> Pixbuf -> IO ())
-> IO (ConnectId self)
onInsertPixbuf :: forall self.
TextBufferClass self =>
self -> (TextIter -> Pixbuf -> IO ()) -> IO (ConnectId self)
onInsertPixbuf = String
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> Pixbuf -> IO ())
-> IO (ConnectId self)
forall b' obj a' a.
(GObjectClass b', GObjectClass obj) =>
String
-> (Ptr a' -> IO a)
-> Bool
-> obj
-> (a -> b' -> IO ())
-> IO (ConnectId obj)
connect_BOXED_OBJECT__NONE String
"insert-pixbuf" Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
False
afterInsertPixbuf :: forall self.
TextBufferClass self =>
self -> (TextIter -> Pixbuf -> IO ()) -> IO (ConnectId self)
afterInsertPixbuf = String
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> Pixbuf -> IO ())
-> IO (ConnectId self)
forall b' obj a' a.
(GObjectClass b', GObjectClass obj) =>
String
-> (Ptr a' -> IO a)
-> Bool
-> obj
-> (a -> b' -> IO ())
-> IO (ConnectId obj)
connect_BOXED_OBJECT__NONE String
"insert-pixbuf" Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
True
onBufferInsertText, afterBufferInsertText :: (TextBufferClass self, GlibString string) => self
-> (TextIter -> string -> IO ())
-> IO (ConnectId self)
onBufferInsertText :: forall self string.
(TextBufferClass self, GlibString string) =>
self -> (TextIter -> string -> IO ()) -> IO (ConnectId self)
onBufferInsertText self
self TextIter -> string -> IO ()
user =
String
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> Ptr CChar -> Int -> IO ())
-> IO (ConnectId self)
forall obj a' a b.
GObjectClass obj =>
String
-> (Ptr a' -> IO a)
-> Bool
-> obj
-> (a -> Ptr b -> Int -> IO ())
-> IO (ConnectId obj)
connect_BOXED_PTR_INT__NONE String
"insert-text" Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
False self
self ((TextIter -> Ptr CChar -> Int -> IO ()) -> IO (ConnectId self))
-> (TextIter -> Ptr CChar -> Int -> IO ()) -> IO (ConnectId self)
forall a b. (a -> b) -> a -> b
$
\TextIter
iter Ptr CChar
strP Int
strLen -> do
string
str <- CStringLen -> IO string
forall s. GlibString s => CStringLen -> IO s
peekUTFStringLen (Ptr CChar
strP,Int
strLen)
TextIter -> string -> IO ()
user TextIter
iter string
str
afterBufferInsertText :: forall self string.
(TextBufferClass self, GlibString string) =>
self -> (TextIter -> string -> IO ()) -> IO (ConnectId self)
afterBufferInsertText self
self TextIter -> string -> IO ()
user =
String
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> Ptr CChar -> Int -> IO ())
-> IO (ConnectId self)
forall obj a' a b.
GObjectClass obj =>
String
-> (Ptr a' -> IO a)
-> Bool
-> obj
-> (a -> Ptr b -> Int -> IO ())
-> IO (ConnectId obj)
connect_BOXED_PTR_INT__NONE String
"insert-text" Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
True self
self ((TextIter -> Ptr CChar -> Int -> IO ()) -> IO (ConnectId self))
-> (TextIter -> Ptr CChar -> Int -> IO ()) -> IO (ConnectId self)
forall a b. (a -> b) -> a -> b
$
\TextIter
iter Ptr CChar
strP Int
strLen -> do
string
str <- CStringLen -> IO string
forall s. GlibString s => CStringLen -> IO s
peekUTFStringLen (Ptr CChar
strP,Int
strLen)
TextIter -> string -> IO ()
user TextIter
iter string
str
onMarkDeleted, afterMarkDeleted :: TextBufferClass self => self
-> (TextMark -> IO ())
-> IO (ConnectId self)
onMarkDeleted :: forall self.
TextBufferClass self =>
self -> (TextMark -> IO ()) -> IO (ConnectId self)
onMarkDeleted = String
-> Bool -> self -> (TextMark -> IO ()) -> IO (ConnectId self)
forall a' obj.
(GObjectClass a', GObjectClass obj) =>
String -> Bool -> obj -> (a' -> IO ()) -> IO (ConnectId obj)
connect_OBJECT__NONE String
"mark-deleted" Bool
False
afterMarkDeleted :: forall self.
TextBufferClass self =>
self -> (TextMark -> IO ()) -> IO (ConnectId self)
afterMarkDeleted = String
-> Bool -> self -> (TextMark -> IO ()) -> IO (ConnectId self)
forall a' obj.
(GObjectClass a', GObjectClass obj) =>
String -> Bool -> obj -> (a' -> IO ()) -> IO (ConnectId obj)
connect_OBJECT__NONE String
"mark-deleted" Bool
True
onMarkSet, afterMarkSet :: TextBufferClass self => self ->
(TextIter -> TextMark -> IO ()) ->
IO (ConnectId self)
onMarkSet :: forall self.
TextBufferClass self =>
self -> (TextIter -> TextMark -> IO ()) -> IO (ConnectId self)
onMarkSet = String
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> TextMark -> IO ())
-> IO (ConnectId self)
forall b' obj a' a.
(GObjectClass b', GObjectClass obj) =>
String
-> (Ptr a' -> IO a)
-> Bool
-> obj
-> (a -> b' -> IO ())
-> IO (ConnectId obj)
connect_BOXED_OBJECT__NONE String
"mark-set" Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
False
afterMarkSet :: forall self.
TextBufferClass self =>
self -> (TextIter -> TextMark -> IO ()) -> IO (ConnectId self)
afterMarkSet = String
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextIter -> TextMark -> IO ())
-> IO (ConnectId self)
forall b' obj a' a.
(GObjectClass b', GObjectClass obj) =>
String
-> (Ptr a' -> IO a)
-> Bool
-> obj
-> (a -> b' -> IO ())
-> IO (ConnectId obj)
connect_BOXED_OBJECT__NONE String
"mark-set" Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
True
onModifiedChanged, afterModifiedChanged :: TextBufferClass self => self
-> IO ()
-> IO (ConnectId self)
onModifiedChanged :: forall self.
TextBufferClass self =>
self -> IO () -> IO (ConnectId self)
onModifiedChanged = String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"modified-changed" Bool
False
afterModifiedChanged :: forall self.
TextBufferClass self =>
self -> IO () -> IO (ConnectId self)
afterModifiedChanged = String -> Bool -> self -> IO () -> IO (ConnectId self)
forall obj.
GObjectClass obj =>
String -> Bool -> obj -> IO () -> IO (ConnectId obj)
connect_NONE__NONE String
"modified-changed" Bool
True
onRemoveTag, afterRemoveTag :: TextBufferClass self => self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
onRemoveTag :: forall self.
TextBufferClass self =>
self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
onRemoveTag = String
-> (Ptr TextIter -> IO TextIter)
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
forall a' obj b' b c' c.
(GObjectClass a', GObjectClass obj) =>
String
-> (Ptr b' -> IO b)
-> (Ptr c' -> IO c)
-> Bool
-> obj
-> (a' -> b -> c -> IO ())
-> IO (ConnectId obj)
connect_OBJECT_BOXED_BOXED__NONE String
"remove-tag"
Ptr TextIter -> IO TextIter
mkTextIterCopy Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
False
afterRemoveTag :: forall self.
TextBufferClass self =>
self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
afterRemoveTag = String
-> (Ptr TextIter -> IO TextIter)
-> (Ptr TextIter -> IO TextIter)
-> Bool
-> self
-> (TextTag -> TextIter -> TextIter -> IO ())
-> IO (ConnectId self)
forall a' obj b' b c' c.
(GObjectClass a', GObjectClass obj) =>
String
-> (Ptr b' -> IO b)
-> (Ptr c' -> IO c)
-> Bool
-> obj
-> (a' -> b -> c -> IO ())
-> IO (ConnectId obj)
connect_OBJECT_BOXED_BOXED__NONE String
"remove-tag"
Ptr TextIter -> IO TextIter
mkTextIterCopy Ptr TextIter -> IO TextIter
mkTextIterCopy Bool
True
foreign import ccall unsafe "gtk_text_buffer_new"
gtk_text_buffer_new :: ((Ptr TextTagTable) -> (IO (Ptr TextBuffer)))
foreign import ccall unsafe "gtk_text_buffer_get_line_count"
gtk_text_buffer_get_line_count :: ((Ptr TextBuffer) -> (IO CInt))
foreign import ccall unsafe "gtk_text_buffer_get_char_count"
gtk_text_buffer_get_char_count :: ((Ptr TextBuffer) -> (IO CInt))
foreign import ccall unsafe "gtk_text_buffer_get_tag_table"
gtk_text_buffer_get_tag_table :: ((Ptr TextBuffer) -> (IO (Ptr TextTagTable)))
foreign import ccall safe "gtk_text_buffer_insert"
gtk_text_buffer_insert :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr CChar) -> (CInt -> (IO ())))))
foreign import ccall safe "gtk_text_buffer_insert_at_cursor"
gtk_text_buffer_insert_at_cursor :: ((Ptr TextBuffer) -> ((Ptr CChar) -> (CInt -> (IO ()))))
foreign import ccall safe "gtk_text_buffer_insert_interactive"
gtk_text_buffer_insert_interactive :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr CChar) -> (CInt -> (CInt -> (IO CInt))))))
foreign import ccall safe "gtk_text_buffer_insert_interactive_at_cursor"
gtk_text_buffer_insert_interactive_at_cursor :: ((Ptr TextBuffer) -> ((Ptr CChar) -> (CInt -> (CInt -> (IO CInt)))))
foreign import ccall safe "gtk_text_buffer_insert_range"
gtk_text_buffer_insert_range :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (IO ())))))
foreign import ccall safe "gtk_text_buffer_insert_range_interactive"
gtk_text_buffer_insert_range_interactive :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (CInt -> (IO CInt))))))
foreign import ccall safe "gtk_text_buffer_delete"
gtk_text_buffer_delete :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (IO ()))))
foreign import ccall safe "gtk_text_buffer_delete_interactive"
gtk_text_buffer_delete_interactive :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (CInt -> (IO CInt)))))
foreign import ccall safe "gtk_text_buffer_set_text"
gtk_text_buffer_set_text :: ((Ptr TextBuffer) -> ((Ptr CChar) -> (CInt -> (IO ()))))
foreign import ccall unsafe "gtk_text_buffer_get_text"
gtk_text_buffer_get_text :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (CInt -> (IO (Ptr CChar))))))
foreign import ccall unsafe "gtk_text_buffer_get_slice"
gtk_text_buffer_get_slice :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (CInt -> (IO (Ptr CChar))))))
foreign import ccall unsafe "g_free"
g_free :: ((Ptr ()) -> (IO ()))
foreign import ccall safe "gtk_text_buffer_insert_pixbuf"
gtk_text_buffer_insert_pixbuf :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr Pixbuf) -> (IO ()))))
foreign import ccall safe "gtk_text_buffer_create_mark"
gtk_text_buffer_create_mark :: ((Ptr TextBuffer) -> ((Ptr CChar) -> ((Ptr TextIter) -> (CInt -> (IO (Ptr TextMark))))))
foreign import ccall safe "gtk_text_buffer_add_mark"
gtk_text_buffer_add_mark :: ((Ptr TextBuffer) -> ((Ptr TextMark) -> ((Ptr TextIter) -> (IO ()))))
foreign import ccall safe "gtk_text_buffer_move_mark"
gtk_text_buffer_move_mark :: ((Ptr TextBuffer) -> ((Ptr TextMark) -> ((Ptr TextIter) -> (IO ()))))
foreign import ccall safe "gtk_text_buffer_move_mark_by_name"
gtk_text_buffer_move_mark_by_name :: ((Ptr TextBuffer) -> ((Ptr CChar) -> ((Ptr TextIter) -> (IO ()))))
foreign import ccall safe "gtk_text_buffer_delete_mark"
gtk_text_buffer_delete_mark :: ((Ptr TextBuffer) -> ((Ptr TextMark) -> (IO ())))
foreign import ccall safe "gtk_text_buffer_delete_mark_by_name"
gtk_text_buffer_delete_mark_by_name :: ((Ptr TextBuffer) -> ((Ptr CChar) -> (IO ())))
foreign import ccall unsafe "gtk_text_buffer_get_mark"
gtk_text_buffer_get_mark :: ((Ptr TextBuffer) -> ((Ptr CChar) -> (IO (Ptr TextMark))))
foreign import ccall unsafe "gtk_text_buffer_get_insert"
gtk_text_buffer_get_insert :: ((Ptr TextBuffer) -> (IO (Ptr TextMark)))
foreign import ccall unsafe "gtk_text_buffer_get_selection_bound"
gtk_text_buffer_get_selection_bound :: ((Ptr TextBuffer) -> (IO (Ptr TextMark)))
foreign import ccall safe "gtk_text_buffer_place_cursor"
gtk_text_buffer_place_cursor :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> (IO ())))
foreign import ccall safe "gtk_text_buffer_apply_tag"
gtk_text_buffer_apply_tag :: ((Ptr TextBuffer) -> ((Ptr TextTag) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (IO ())))))
foreign import ccall safe "gtk_text_buffer_remove_tag"
gtk_text_buffer_remove_tag :: ((Ptr TextBuffer) -> ((Ptr TextTag) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (IO ())))))
foreign import ccall safe "gtk_text_buffer_apply_tag_by_name"
gtk_text_buffer_apply_tag_by_name :: ((Ptr TextBuffer) -> ((Ptr CChar) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (IO ())))))
foreign import ccall safe "gtk_text_buffer_remove_tag_by_name"
gtk_text_buffer_remove_tag_by_name :: ((Ptr TextBuffer) -> ((Ptr CChar) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (IO ())))))
foreign import ccall safe "gtk_text_buffer_remove_all_tags"
gtk_text_buffer_remove_all_tags :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (IO ()))))
foreign import ccall unsafe "gtk_text_buffer_get_iter_at_line_offset"
gtk_text_buffer_get_iter_at_line_offset :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> (CInt -> (CInt -> (IO ())))))
foreign import ccall unsafe "gtk_text_buffer_get_iter_at_offset"
gtk_text_buffer_get_iter_at_offset :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> (CInt -> (IO ()))))
foreign import ccall unsafe "gtk_text_buffer_get_iter_at_line"
gtk_text_buffer_get_iter_at_line :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> (CInt -> (IO ()))))
foreign import ccall unsafe "gtk_text_buffer_get_iter_at_mark"
gtk_text_buffer_get_iter_at_mark :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextMark) -> (IO ()))))
foreign import ccall unsafe "gtk_text_buffer_get_start_iter"
gtk_text_buffer_get_start_iter :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> (IO ())))
foreign import ccall unsafe "gtk_text_buffer_get_end_iter"
gtk_text_buffer_get_end_iter :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> (IO ())))
foreign import ccall unsafe "gtk_text_buffer_get_modified"
gtk_text_buffer_get_modified :: ((Ptr TextBuffer) -> (IO CInt))
foreign import ccall safe "gtk_text_buffer_set_modified"
gtk_text_buffer_set_modified :: ((Ptr TextBuffer) -> (CInt -> (IO ())))
foreign import ccall safe "gtk_text_buffer_delete_selection"
gtk_text_buffer_delete_selection :: ((Ptr TextBuffer) -> (CInt -> (CInt -> (IO CInt))))
foreign import ccall unsafe "gtk_text_buffer_get_selection_bounds"
gtk_text_buffer_get_selection_bounds :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (IO CInt))))
foreign import ccall safe "gtk_text_buffer_begin_user_action"
gtk_text_buffer_begin_user_action :: ((Ptr TextBuffer) -> (IO ()))
foreign import ccall safe "gtk_text_buffer_end_user_action"
gtk_text_buffer_end_user_action :: ((Ptr TextBuffer) -> (IO ()))
foreign import ccall safe "gtk_text_buffer_backspace"
gtk_text_buffer_backspace :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> (CInt -> (CInt -> (IO CInt)))))
foreign import ccall safe "gtk_text_buffer_insert_child_anchor"
gtk_text_buffer_insert_child_anchor :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextChildAnchor) -> (IO ()))))
foreign import ccall safe "gtk_text_buffer_create_child_anchor"
gtk_text_buffer_create_child_anchor :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> (IO (Ptr TextChildAnchor))))
foreign import ccall safe "gtk_text_buffer_select_range"
gtk_text_buffer_select_range :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (IO ()))))
foreign import ccall safe "gtk_text_buffer_get_iter_at_child_anchor"
gtk_text_buffer_get_iter_at_child_anchor :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextChildAnchor) -> (IO ()))))
foreign import ccall unsafe "gtk_text_buffer_get_bounds"
gtk_text_buffer_get_bounds :: ((Ptr TextBuffer) -> ((Ptr TextIter) -> ((Ptr TextIter) -> (IO ()))))
foreign import ccall safe "gtk_text_buffer_paste_clipboard"
gtk_text_buffer_paste_clipboard :: ((Ptr TextBuffer) -> ((Ptr Clipboard) -> ((Ptr TextIter) -> (CInt -> (IO ())))))
foreign import ccall safe "gtk_text_buffer_copy_clipboard"
gtk_text_buffer_copy_clipboard :: ((Ptr TextBuffer) -> ((Ptr Clipboard) -> (IO ())))
foreign import ccall safe "gtk_text_buffer_cut_clipboard"
gtk_text_buffer_cut_clipboard :: ((Ptr TextBuffer) -> ((Ptr Clipboard) -> (CInt -> (IO ()))))
foreign import ccall safe "gtk_text_buffer_add_selection_clipboard"
gtk_text_buffer_add_selection_clipboard :: ((Ptr TextBuffer) -> ((Ptr Clipboard) -> (IO ())))
foreign import ccall safe "gtk_text_buffer_remove_selection_clipboard"
gtk_text_buffer_remove_selection_clipboard :: ((Ptr TextBuffer) -> ((Ptr Clipboard) -> (IO ())))
foreign import ccall unsafe "gtk_text_tag_table_get_type"
gtk_text_tag_table_get_type :: CULong