|
31 | 31 | (is (false? (isbn-verifier/isbn? "3-598-2X507-9"))))) |
32 | 32 |
|
33 | 33 | (deftest isbn?_test_8 |
| 34 | + (testing "X is not substituted by the value 10" |
| 35 | + (is (false? (isbn-verifier/isbn? "3-598-2X507-5"))))) |
| 36 | + |
| 37 | +(deftest isbn?_test_9 |
34 | 38 | (testing "valid isbn without separating dashes" |
35 | 39 | (is (true? (isbn-verifier/isbn? "3598215088"))))) |
36 | 40 |
|
37 | | -(deftest isbn?_test_9 |
| 41 | +(deftest isbn?_test_10 |
38 | 42 | (testing "isbn without separating dashes and X as check digit" |
39 | 43 | (is (true? (isbn-verifier/isbn? "359821507X"))))) |
40 | 44 |
|
41 | | -(deftest isbn?_test_10 |
| 45 | +(deftest isbn?_test_11 |
42 | 46 | (testing "isbn without check digit and dashes" |
43 | 47 | (is (false? (isbn-verifier/isbn? "359821507"))))) |
44 | 48 |
|
45 | | -(deftest isbn?_test_11 |
| 49 | +(deftest isbn?_test_12 |
46 | 50 | (testing "too long isbn and no dashes" |
47 | 51 | (is (false? (isbn-verifier/isbn? "3598215078X"))))) |
48 | 52 |
|
49 | | -(deftest isbn?_test_12 |
| 53 | +(deftest isbn?_test_13 |
50 | 54 | (testing "too short isbn" |
51 | 55 | (is (false? (isbn-verifier/isbn? "00"))))) |
52 | 56 |
|
53 | | -(deftest isbn?_test_13 |
| 57 | +(deftest isbn?_test_14 |
54 | 58 | (testing "isbn without check digit" |
55 | 59 | (is (false? (isbn-verifier/isbn? "3-598-21507"))))) |
56 | 60 |
|
57 | | -(deftest isbn?_test_14 |
| 61 | +(deftest isbn?_test_15 |
58 | 62 | (testing "check digit of X should not be used for 0" |
59 | 63 | (is (false? (isbn-verifier/isbn? "3-598-21515-X"))))) |
60 | 64 |
|
61 | | -(deftest isbn?_test_15 |
| 65 | +(deftest isbn?_test_16 |
62 | 66 | (testing "empty isbn" |
63 | 67 | (is (false? (isbn-verifier/isbn? ""))))) |
64 | 68 |
|
65 | | -(deftest isbn?_test_16 |
| 69 | +(deftest isbn?_test_17 |
66 | 70 | (testing "input is 9 characters" |
67 | 71 | (is (false? (isbn-verifier/isbn? "134456729"))))) |
68 | 72 |
|
69 | | -(deftest isbn?_test_17 |
| 73 | +(deftest isbn?_test_18 |
70 | 74 | (testing "invalid characters are not ignored after checking length" |
71 | 75 | (is (false? (isbn-verifier/isbn? "3132P34035"))))) |
72 | 76 |
|
73 | | -(deftest isbn?_test_18 |
| 77 | +(deftest isbn?_test_19 |
74 | 78 | (testing "invalid characters are not ignored before checking length" |
75 | 79 | (is (false? (isbn-verifier/isbn? "3598P215088"))))) |
76 | 80 |
|
77 | | -(deftest isbn?_test_19 |
| 81 | +(deftest isbn?_test_20 |
78 | 82 | (testing "input is too long but contains a valid isbn" |
79 | 83 | (is (false? (isbn-verifier/isbn? "98245726788"))))) |
0 commit comments