Add a new function to retrieve the list of current listeners (originally added using `addListener`): ```haskell getListeners :: MonadIO m => LVar a -> m [ListenerId] ```