Change the IRC monad to ReaderT instead of StateT