Define a class RMonadIO to use instead of monad-control