From 4d72f1cb5343157bc33b46fa19095208b32b21ff Mon Sep 17 00:00:00 2001 From: Anastasios Chatzialexiou <16361161+tasxatzial@users.noreply.github.com> Date: Fri, 3 Apr 2026 00:18:38 +0300 Subject: [PATCH] elyses-destructured-enchantments: Add the ability to select which tests to run --- .../project.clj | 12 ++++++++- .../elyses_destructured_enchantments_test.clj | 26 +++++++++---------- 2 files changed, 24 insertions(+), 14 deletions(-) diff --git a/exercises/concept/elyses-destructured-enchantments/project.clj b/exercises/concept/elyses-destructured-enchantments/project.clj index 43890c239..4bbaf7b5c 100644 --- a/exercises/concept/elyses-destructured-enchantments/project.clj +++ b/exercises/concept/elyses-destructured-enchantments/project.clj @@ -1,4 +1,14 @@ (defproject elyses-destructured-enchantments "0.1.0-SNAPSHOT" :description "elyses-destructured-enchantments exercise." :url "https://github.com/exercism/clojure/tree/main/exercises/concept/elyses-destructured-enchantments" - :dependencies [[org.clojure/clojure "1.12.0"]]) + :dependencies [[org.clojure/clojure "1.12.0"]] + :test-selectors {:task-1 :task-1 + :task-2 :task-2 + :task-3 :task-3 + :task-4 :task-4 + :task-5 :task-5 + :first-card :first-card + :second-card :second-card + :swap-top-two-cards :swap-top-two-cards + :discard-top-card :discard-top-card + :insert-face-cards :insert-face-cards}) diff --git a/exercises/concept/elyses-destructured-enchantments/test/elyses_destructured_enchantments_test.clj b/exercises/concept/elyses-destructured-enchantments/test/elyses_destructured_enchantments_test.clj index 844bbd744..c9c0447f5 100644 --- a/exercises/concept/elyses-destructured-enchantments/test/elyses_destructured_enchantments_test.clj +++ b/exercises/concept/elyses-destructured-enchantments/test/elyses_destructured_enchantments_test.clj @@ -2,41 +2,41 @@ (:require [clojure.test :refer :all] [elyses-destructured-enchantments :refer :all])) -(deftest ^{:task 1} first-card-single-test +(deftest ^{:task 1 :task-1 true :first-card true} first-card-single-test (is (= 3 (first-card [3])))) -(deftest ^{:task 1} first-card-multiple-test +(deftest ^{:task 1 :task-1 true :first-card true} first-card-multiple-test (is (= 8 (first-card [8 3 9 5])))) -(deftest ^{:task 2} second-card-2-test +(deftest ^{:task 2 :task-2 true :second-card true} second-card-2-test (is (= 4 (second-card [10 4])))) -(deftest ^{:task 2} second-card-4-test +(deftest ^{:task 2 :task-2 true :second-card true} second-card-4-test (is (= 5 (second-card [2 5 1 6])))) -(deftest ^{:task 2} second-card-empty-test +(deftest ^{:task 2 :task-2 true :second-card true} second-card-empty-test (is (nil? (second-card [])))) -(deftest ^{:task 2} second-card-single-test +(deftest ^{:task 2 :task-2 true :second-card true} second-card-single-test (is (nil? (second-card [8])))) -(deftest ^{:task 3} swap-top-two-cards-2-test +(deftest ^{:task 3 :task-3 true :swap-top-two-cards true} swap-top-two-cards-2-test (is (= [6 3] (swap-top-two-cards [3 6])))) -(deftest ^{:task 3} swap-top-two-cards-5-test +(deftest ^{:task 3 :task-3 true :swap-top-two-cards true} swap-top-two-cards-5-test (is (= [4 10 3 7 8] (swap-top-two-cards [10 4 3 7 8])))) -(deftest ^{:task 4} discard-top-card-single-test +(deftest ^{:task 4 :task-4 true :discard-top-card true} discard-top-card-single-test (is (= [7 nil] (discard-top-card [7])))) -(deftest ^{:task 4} discard-top-card-4-test +(deftest ^{:task 4 :task-4 true :discard-top-card true} discard-top-card-4-test (is (= [9 [2 10 4]] (discard-top-card [9 2 10 4])))) -(deftest ^{:task 5} insert-face-cards-3-test +(deftest ^{:task 5 :task-5 true :insert-face-cards true} insert-face-cards-3-test (is (= [3 "jack" "queen" "king" 10 7] (insert-face-cards [3 10 7])))) -(deftest ^{:task 5} insert-face-cards-1-test +(deftest ^{:task 5 :task-5 true :insert-face-cards true} insert-face-cards-1-test (is (= [9 "jack" "queen" "king"] (insert-face-cards [9])))) -(deftest ^{:task 5} insert-face-cards-empty-test +(deftest ^{:task 5 :task-5 true :insert-face-cards true} insert-face-cards-empty-test (is (= ["jack" "queen" "king"] (insert-face-cards []))))