(assert (= ((guard (fn () (+ 1 (raise 2)))
                   (fn (e x) x))
            2)
           3))