Proposal: instance MonadIO Q