     ) where
 
 import Control.Monad (liftM)
+import Data.Bits
 import Foreign
 import Foreign.C
 

 ,withAudioPort* `AudioPort'
 ,withVideoPort* `VideoPort'} -> `(Maybe Stream)' peekStream*#}

-- | Open a stream.
--
-- Header declaration:

    xine_close_audio_driver, xine_close_video_driver, xine_exit,
    -- * Stream handling
    Stream, StreamParam(..), Speed(..), NormalSpeed(..), Zoom(..),
    AspectRatio(..), MRL, EngineParam(..), Affection(..),
    xine_stream_new, xine_stream_master_slave, xine_open, xine_play,
    xine_stop, xine_close, xine_engine_set_param, xine_engine_get_param,
    xine_set_param, xine_get_param,
    -- * Information retrieval
    EngineStatus(..), XineError(..),
