Contents

(ns queen-attack-test
  (:require [clojure.test :refer [deftest is]]
            queen-attack))

(def empty-board
  (str "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ _ _ _ _\n"))

(def board
  (str "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ W _ _ _\n"
       "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ _ _ _ _\n"
       "_ _ _ _ _ _ B _\n"
       "_ _ _ _ _ _ _ _\n"))

(deftest handles-empty-board
  (is (= empty-board (queen-attack/board-string {}))))
(deftest build-board
  (is (= board (queen-attack/board-string {:w [2 4] :b [6 6]}))))

(deftest finds-attack-positions
  (is (= false (queen-attack/can-attack {:w [2 3] :b [4 7]})))
  (is (= true  (queen-attack/can-attack {:w [2 4] :b [2 7]})))
  (is (= true  (queen-attack/can-attack {:w [5 4] :b [2 4]})))
  (is (= true  (queen-attack/can-attack {:w [1 1] :b [6 6]})))
  (is (= true  (queen-attack/can-attack {:w [0 6] :b [1 7]})))
  (is (= true  (queen-attack/can-attack {:w [4 1] :b [6 3]}))))

Version data entries

396 entries across 396 versions & 1 rubygems

Version	Path
trackler-2.2.1.180	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.179	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.178	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.177	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.176	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.175	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.174	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.173	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.172	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.171	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.170	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.169	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.167	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.166	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.165	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.164	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.163	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.162	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.161	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj
trackler-2.2.1.160	tracks/clojure/exercises/queen-attack/test/queen_attack_test.clj