|
2 | 2 | (:require [clojure.test :refer :all] |
3 | 3 | [elyses-destructured-enchantments :refer :all])) |
4 | 4 |
|
5 | | -(deftest ^{:task 1} first-card-single-test |
| 5 | +(deftest ^{:task 1 :task-1 true :first-card true} first-card-single-test |
6 | 6 | (is (= 3 (first-card [3])))) |
7 | 7 |
|
8 | | -(deftest ^{:task 1} first-card-multiple-test |
| 8 | +(deftest ^{:task 1 :task-1 true :first-card true} first-card-multiple-test |
9 | 9 | (is (= 8 (first-card [8 3 9 5])))) |
10 | 10 |
|
11 | | -(deftest ^{:task 2} second-card-2-test |
| 11 | +(deftest ^{:task 2 :task-2 true :second-card true} second-card-2-test |
12 | 12 | (is (= 4 (second-card [10 4])))) |
13 | 13 |
|
14 | | -(deftest ^{:task 2} second-card-4-test |
| 14 | +(deftest ^{:task 2 :task-2 true :second-card true} second-card-4-test |
15 | 15 | (is (= 5 (second-card [2 5 1 6])))) |
16 | 16 |
|
17 | | -(deftest ^{:task 2} second-card-empty-test |
| 17 | +(deftest ^{:task 2 :task-2 true :second-card true} second-card-empty-test |
18 | 18 | (is (nil? (second-card [])))) |
19 | 19 |
|
20 | | -(deftest ^{:task 2} second-card-single-test |
| 20 | +(deftest ^{:task 2 :task-2 true :second-card true} second-card-single-test |
21 | 21 | (is (nil? (second-card [8])))) |
22 | 22 |
|
23 | | -(deftest ^{:task 3} swap-top-two-cards-2-test |
| 23 | +(deftest ^{:task 3 :task-3 true :swap-top-two-cards true} swap-top-two-cards-2-test |
24 | 24 | (is (= [6 3] (swap-top-two-cards [3 6])))) |
25 | 25 |
|
26 | | -(deftest ^{:task 3} swap-top-two-cards-5-test |
| 26 | +(deftest ^{:task 3 :task-3 true :swap-top-two-cards true} swap-top-two-cards-5-test |
27 | 27 | (is (= [4 10 3 7 8] (swap-top-two-cards [10 4 3 7 8])))) |
28 | 28 |
|
29 | | -(deftest ^{:task 4} discard-top-card-single-test |
| 29 | +(deftest ^{:task 4 :task-4 true :discard-top-card true} discard-top-card-single-test |
30 | 30 | (is (= [7 nil] (discard-top-card [7])))) |
31 | 31 |
|
32 | | -(deftest ^{:task 4} discard-top-card-4-test |
| 32 | +(deftest ^{:task 4 :task-4 true :discard-top-card true} discard-top-card-4-test |
33 | 33 | (is (= [9 [2 10 4]] (discard-top-card [9 2 10 4])))) |
34 | 34 |
|
35 | | -(deftest ^{:task 5} insert-face-cards-3-test |
| 35 | +(deftest ^{:task 5 :task-5 true :insert-face-cards true} insert-face-cards-3-test |
36 | 36 | (is (= [3 "jack" "queen" "king" 10 7] (insert-face-cards [3 10 7])))) |
37 | 37 |
|
38 | | -(deftest ^{:task 5} insert-face-cards-1-test |
| 38 | +(deftest ^{:task 5 :task-5 true :insert-face-cards true} insert-face-cards-1-test |
39 | 39 | (is (= [9 "jack" "queen" "king"] (insert-face-cards [9])))) |
40 | 40 |
|
41 | | -(deftest ^{:task 5} insert-face-cards-empty-test |
| 41 | +(deftest ^{:task 5 :task-5 true :insert-face-cards true} insert-face-cards-empty-test |
42 | 42 | (is (= ["jack" "queen" "king"] (insert-face-cards [])))) |
0 commit comments