From 76608ef5169803434747fbb6d2fc88a05bd6ba55 Mon Sep 17 00:00:00 2001 From: Miloslav Nenadal Date: Sat, 27 Feb 2016 21:51:18 +0100 Subject: [PATCH] Fix clojure.core/= comparison --- src/pjstadig/assert_expr.cljc | 2 +- test/fixtures/test_output_cljs | 7 +++++-- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/src/pjstadig/assert_expr.cljc b/src/pjstadig/assert_expr.cljc index adda9a7..f530764 100644 --- a/src/pjstadig/assert_expr.cljc +++ b/src/pjstadig/assert_expr.cljc @@ -22,6 +22,6 @@ #?(:clj (defmethod assert-expr '= [menv msg [_ a & more]] (=-body msg a more))) -#?(:clj (defmethod assert-expr 'cljs.core/= [menv msg [_ a & more]] +#?(:clj (defmethod assert-expr 'clojure.core/= [menv msg [_ a & more]] (=-body msg a more))) diff --git a/test/fixtures/test_output_cljs b/test/fixtures/test_output_cljs index d499aa6..abc915a 100644 --- a/test/fixtures/test_output_cljs +++ b/test/fixtures/test_output_cljs @@ -77,8 +77,11 @@ expected: (list? foo) FAIL in (t-macro-wrapping) (:) THIS ONE SHOULD ALSO FAIL -expected: (clojure.core/= 1 2) - actual: (not (clojure.core/= 1 2)) +expected: 1 + actual: 2 + + diff: - 1 + + 2 Testing pjstadig.humane-test-output.records-test