KKlochko/cipher-analytical-machine
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases 3 Wiki Activity

Update the Caesar to be case-insensitive and skip unknown symbols.
continuous-integration/drone/push Build is passing
Details

Browse Source
This commit is contained in:
KKlochko
2023-09-21 21:05:22 +03:00
parent 20c1d1ef1b
commit 79e316c51b
2 changed files with 23 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files
test/cipher_analytical_machine/caesar_test.clj
+8 -2
View File
@@ -51,14 +51,20 @@
(testing "The message 'abc' is encrypted to 'bca'"
(is (= "bca" (encrypt-message "abc" 1 symbols))))
(testing "The message 'ABC' is encrypted to 'bca', because of case-insensitive."
(is (= "bca" (encrypt-message "ABC" 1 symbols))))
(testing "The message 'bca' is decrypted to 'abc'"
(is (= "abc" (encrypt-message "bca" -1 symbols))))))
(deftest decrypt-message-text
(let [symbols "abc"]
(testing "The message 'bca' is decrypted to 'abc'"
(is (= "abc" (decrypt-message "bca" 1 symbols)))
(is (= "abc" (decrypt-message "bca" 1 symbols))))
(testing "The message 'BCA' is decrypted to 'abc', because of case-insensitive."
(is (= "abc" (decrypt-message "BCA" 1 symbols))))
(testing "The message 'abc' is encrypted to 'bca'"
(is (= "bca" (decrypt-message "abc" -1 symbols)))))))
(is (= "bca" (decrypt-message "abc" -1 symbols))))))