Retourner au contenu associé (journal : Portage de TapTempo en Clojure (v2))
Posté par mzf (site web personnel) le 15 mars 2018 à 14:21. En réponse au journal Portage de TapTempo en Clojure (v2). Évalué à 4.
Bravo pour cette nouvelle version, surtout pour les tests unitaires !
J'ai regardé les fichiers du dossier test, et j'ai du mal à comprendre ce qui est fait. Par exemple :
(deftest calc-tempo-test (testing "calc-tempo from 0" (is (= (calc-tempo [1]) [nil 1])) (is (= (calc-tempo [60000 0]) [1N 2])) (is (= (calc-tempo [120000 60000 0]) [1N 3])) (is (= (calc-tempo [180000 120000 60000 0]) [1N 4])) (is (= (calc-tempo [240000 180000 120000 60000 0]) [1N 5])) (is (= (calc-tempo [300000 240000 180000 120000 60000 0]) [1N 6])) (is (= (calc-tempo [360000 300000 240000 180000 120000 60000 0]) [1N 7]))) (testing "calc-tempo from 0 quicker" (is (= (calc-tempo [36000 30000 24000 18000 12000 6000 0]) [10N 7]))) (testing "calcl-tempo from 1000" (is (= (calc-tempo [361000 301000 241000 181000 121000 61000 1000]) [1N 7]))) (testing "calc-tempo from 1000 quiker" (is (= (calc-tempo [37000 31000 25000 19000 13000 7000 1000]) [10N 7]))) (testing "calc-tempo for some validated entries" (is (= (calc-tempo [1521057817004]) [nil 1])) (is (= (calc-tempo [1521057820183 1521057817004]) [60000/3179 2])) (is (= (calc-tempo [1521057820602 1521057820183 1521057817004]) [60000/1799 3])) (is (= (calc-tempo [1521057821046 1521057820602 1521057820183 1521057817004]) [90000/2021 4])) (is (= (calc-tempo [1521057821469 1521057821046 1521057820602 1521057820183 1521057817004]) [48000/893 5])) (is (= (calc-tempo [1521057821914 1521057821469 1521057821046 1521057820602 1521057820183 1521057817004]) [30000/491 6])) (is (= (calc-tempo [1521057822350 1521057821914 1521057821469 1521057821046 1521057820602 1521057820183]) [300000/2167 6])) (is (= (calc-tempo [1521057822807 1521057822350 1521057821914 1521057821469 1521057821046 1521057820602]) [20000/147 6])) (is (= (calc-tempo [1521057823243 1521057822807 1521057822350 1521057821914 1521057821469 1521057821046]) [300000/2197 6])) (is (= (calc-tempo [1521057823700 1521057823243 1521057822807 1521057822350 1521057821914 1521057821469]) [300000/2231 6])) (is (= (calc-tempo [1521057824167 1521057823700 1521057823243 1521057822807 1521057822350 1521057821914]) [100000/751 6])) (is (= (calc-tempo [1521057824633 1521057824167 1521057823700 1521057823243 1521057822807 1521057822350]) [100000/761 6]))))
Tu passes les timestamps en entrée du programme ?
AltStyle によって変換されたページ (->オリジナル) / アドレス: モード: デフォルト 音声ブラウザ ルビ付き 配色反転 文字拡大 モバイル
# Tests
Posté par mzf (site web personnel) . En réponse au journal Portage de TapTempo en Clojure (v2). Évalué à 4.
Bravo pour cette nouvelle version, surtout pour les tests unitaires !
J'ai regardé les fichiers du dossier test, et j'ai du mal à comprendre ce qui est fait. Par exemple :
Tu passes les timestamps en entrée du programme ?