 --   of whatever object posted the message; the 'busMessage' signal is
 --   marshalled to the main thread via the main loop.
 busEnableSyncMessageEmission :: BusClass busT
-                             => busT
+                             => busT  -- ^ @bus@ - a 'Bus'
                              -> IO ()
 busEnableSyncMessageEmission =
     {# call bus_enable_sync_message_emission #} . toBus

--   This signal will not be emitted by default, you must first call
--   'busUseSyncSignalHandler' if you want this signal to be emitted
--   when a message is posted on the bus.
busSyncMessage :: BusClass bus
               => Signal bus (Message -> IO ())
busSyncMessage =
    Signal $ connect_BOXED__NONE "sync-message" peekMiniObject


-- * Types
  Bus,
  BusClass,
  -- | The result of a 'BusSyncHandler'.
  BusSyncReply,
  -- | A handler that will be invoked synchronously when a new message
  --   is injected into the bus. This function is mostly used internally.
  --   Only one sync handler may be attached to a given bus.
  BusSyncHandler,
  castToBus,
  toBus,
-- * Bus Operations
