Control.Exception.evaluate x
とか。