   \"Returns true if x is nil, false otherwise.\"
   [x]
   (coercive-= x nil))"]
-    (is (success? @_res_) "(source nil?) should succeed.")
-    (is (valid-eval-result? source-string) "(source nil?) should be a valid result")
-    (is (= expected source-string) "(source nil?) should return valid source")))
+    (is (success? @_res_) (str _msg_ "should succeed."))
+    (is (valid-eval-result? source-string) (str _msg_ "should be a valid result"))
+    (is (= expected source-string) (str _msg_ "should return valid source"))))
 
 (h/read-eval-call-test e/*target-opts*
   ["(source not-existing)"]
   (let [source-string (unwrap-result @_res_)]
-    (is (success? @_res_) "(source not-existing) should succeed.")
-    (is (valid-eval-result? source-string) "(source not-existing) should be a valid result")
-    (is (= "nil" source-string) "(source not-existing) should return nil")))
+    (is (success? @_res_) (str _msg_ "should succeed."))
+    (is (valid-eval-result? source-string) (str _msg_ "should be a valid result"))
+    (is (= "nil" source-string) (str _msg_ "should return nil"))))
 
 ;; AR - when bundling and https://github.com/ScalaConsultants/replumb/issues/69
 ;; will be hacked together, this will work. The reason is that we need

(h/read-eval-call-test e/*target-opts*
  ["(source or)"]
  (let [source-string (unwrap-result @_res_)]
    (is (success? @_res_) "(source or) should succeed.")
    (is (valid-eval-result? source-string) "(source or) should be a valid result")
    (is (re-find #"core/defmacro or" source-string) "(source or) should return correct source")))

(h/read-eval-call-test e/*target-opts*
  ["(require 'clojure.set)"

   "(source baz/a)"]
  (let [source-string (unwrap-result @_res_)
        expected "(def a \"whatever\")"]
    (is (success? @_res_) (str _msg_ "should succeed."))
    (is (valid-eval-result? source-string) (str _msg_ "should be a valid result"))
    (is (= expected source-string) (str _msg_ "should return valid source"))))
