Convert pair of mutations into a try/finally

Author: gfredericks

src/main/cljs/cljs/test.clj

@@ -194,9 +194,10 @@
   ([string & body]
    `(do
       (cljs.test/update-current-env! [:testing-contexts] conj ~string)
-      (let [ret# (do ~@body)]
-        (cljs.test/update-current-env! [:testing-contexts] rest)
-        ret#))))
+      (try
+        ~@body
+        (finally
+          (cljs.test/update-current-env! [:testing-contexts] rest))))))
 
 ;; =============================================================================
 ;; Defining Tests