{- | Copyright : Will Thompson, Iñaki García Etxebarria and Jonas Platte License : LGPL-2.1 Maintainer : Iñaki García Etxebarria (garetxe@gmail.com) The #PangoRectangle structure represents a rectangle. It is frequently used to represent the logical or ink extents of a single glyph or section of text. (See, for instance, pango_font_get_glyph_extents()) -} module GI.Pango.Structs.Rectangle ( -- * Exported types Rectangle(..) , noRectangle , -- * Properties -- ** Height rectangleReadHeight , -- ** Width rectangleReadWidth , -- ** X rectangleReadX , -- ** Y rectangleReadY , ) 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.Pango.Types import GI.Pango.Callbacks newtype Rectangle = Rectangle (ForeignPtr Rectangle) noRectangle :: Maybe Rectangle noRectangle = Nothing rectangleReadX :: Rectangle -> IO Int32 rectangleReadX s = withManagedPtr s $ \ptr -> do val <- peek (ptr `plusPtr` 0) :: IO Int32 return val rectangleReadY :: Rectangle -> IO Int32 rectangleReadY s = withManagedPtr s $ \ptr -> do val <- peek (ptr `plusPtr` 4) :: IO Int32 return val rectangleReadWidth :: Rectangle -> IO Int32 rectangleReadWidth s = withManagedPtr s $ \ptr -> do val <- peek (ptr `plusPtr` 8) :: IO Int32 return val rectangleReadHeight :: Rectangle -> IO Int32 rectangleReadHeight s = withManagedPtr s $ \ptr -> do val <- peek (ptr `plusPtr` 12) :: IO Int32 return val