 -- Portability : not portable
 --
 -- A simple binding to xine-lib. Low-level bindings.
+-- Made for xine-lib version 1.1.18.1
 
 module Xine.Foreign (
     -- * Version information

{#pointer *xine_video_port_t as VideoPort foreign newtype#}
{#pointer *xine_stream_t as Stream foreign newtype#}

newtype Data = Data (Ptr Data)

-- | Media Resource Locator.


peekStream = maybeForeignPtr_ Stream

-- XXX: just a temporary hack until we can actually support
-- passing a custom struct to functions which support it.
withData f = f nullPtr

-- Handle strings which may be NULL.
withMaybeString :: Maybe String -> (CString -> IO a) -> IO a
withMaybeString Nothing f  = f nullPtr
withMaybeString (Just s) f = withCString s f
