{-# LINE 1 "src/KB/Text/Shape/FFI/Iterators.hsc" #-}
module KB.Text.Shape.FFI.Iterators where

import Prelude hiding (id, error)

import Foreign
import Foreign.C

import KB.Text.Shape.FFI.Structs



-- | @int kbts_GlyphIteratorNext(kbts_glyph_iterator *It, kbts_glyph **Glyph);@
foreign import ccall "kbts_GlyphIteratorNext" kbts_GlyphIteratorNext
  :: Ptr GlyphIterator
  -> Ptr (Ptr Glyph)
  -> IO Int

-- | @int kbts_GlyphIteratorIsValid(kbts_glyph_iterator *It);@
foreign import ccall "kbts_GlyphIteratorIsValid" kbts_GlyphIteratorIsValid
  :: Ptr GlyphIterator
  -> CInt