module GI.Gio.Structs.OutputMessage
(
OutputMessage(..) ,
noOutputMessage ,
outputMessageReadAddress ,
outputMessageReadBytesSent ,
outputMessageReadNumControlMessages ,
outputMessageReadNumVectors ,
outputMessageReadVectors ,
) where
import Prelude ()
import Data.GI.Base.ShortPrelude
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import GI.Gio.Types
import GI.Gio.Callbacks
newtype OutputMessage = OutputMessage (ForeignPtr OutputMessage)
noOutputMessage :: Maybe OutputMessage
noOutputMessage = Nothing
outputMessageReadAddress :: OutputMessage -> IO SocketAddress
outputMessageReadAddress s = withManagedPtr s $ \ptr -> do
val <- peek (ptr `plusPtr` 0) :: IO (Ptr SocketAddress)
val' <- (newObject SocketAddress) val
return val'
outputMessageReadVectors :: OutputMessage -> IO OutputVector
outputMessageReadVectors s = withManagedPtr s $ \ptr -> do
val <- peek (ptr `plusPtr` 8) :: IO (Ptr OutputVector)
val' <- (newPtr 16 OutputVector) val
return val'
outputMessageReadNumVectors :: OutputMessage -> IO Word32
outputMessageReadNumVectors s = withManagedPtr s $ \ptr -> do
val <- peek (ptr `plusPtr` 16) :: IO Word32
return val
outputMessageReadBytesSent :: OutputMessage -> IO Word32
outputMessageReadBytesSent s = withManagedPtr s $ \ptr -> do
val <- peek (ptr `plusPtr` 20) :: IO Word32
return val
outputMessageReadNumControlMessages :: OutputMessage -> IO Word32
outputMessageReadNumControlMessages s = withManagedPtr s $ \ptr -> do
val <- peek (ptr `plusPtr` 32) :: IO Word32
return val