Add a test helper function for test scaffolding cleanup

This is of most use at the REPL when you want to invoke a
function (such as expectations/run-tests) and have the test
scaffolding available and cleanup after itself.

test/metabase/test_setup.clj

@@ -99,3 +99,17 @@
   []
   (log/info "Shutting down Metabase unit test runner")
   (core/stop-jetty!))
+
+(defn call-with-test-scaffolding
+  "Runs `test-startup` and ensures `test-teardown` is always
+  called. This function is useful for running a test (or test
+  namespace) at the repl with the appropriate environment setup for
+  the test to pass."
+  [f]
+  (try
+    (test-startup)
+    (f)
+    (catch Exception e
+      (throw e))
+    (finally
+      (test-teardown))))