Permalink
Browse files

MATCH-91: Correct a test that cannot fail

  • Loading branch information...
1 parent 7408c58 commit e3d2c9dff4645833c851fc366a6b7876c194a8f4 @jafingerhut jafingerhut committed with swannodette Dec 23, 2013
@@ -664,8 +664,8 @@
(is (= (match [[:plus 1 2 3]]
[[:pow arg pow]] 0
[[:plus & args]] 1
- :else 2))
- 1))
+ :else 2)
+ 1)))
(deftest map-pattern-match-only-2
(is (= (let [x {:a 1 :b 2 :c 10 :d 30}]
@@ -79,14 +79,6 @@
[1 2] 1
:else 1))))
-(deftest match-differing-patterns
- (is (thrown-with-msg?
- AssertionError
- #"Pattern row 1: Pattern row has differing number of patterns. \[1 2\] has 2 pattern/s, expecting 1 for occurrences \[x\]"
- (m-to-clj [x]
- [1 2] 1
- :else 1))))
-
(deftest match-duplicate-wildcards
(is (thrown-with-msg?
AssertionError

0 comments on commit e3d2c9d

Please sign in to comment.