Weaken MonadBaseControl to MonadBase