Reorder MonadBaseControl IO instance