Prepended all namespaces with 'cc.journeyman'; tests run, 4 don't pass.

This commit is contained in:
Simon Brooke 2020-11-15 21:09:18 +00:00
parent 37dbb767ac
commit 310896cc95
No known key found for this signature in database
GPG key ID: A7A4F18D1D4DF987
34 changed files with 107 additions and 81 deletions

View file

@ -0,0 +1,4 @@
(ns cc.journeyman.the-great-game.gossip.gossip-test
(:require [clojure.test :refer :all]
[cc.journeyman.the-great-game.gossip.gossip :refer :all]))

View file

@ -1,7 +1,8 @@
(ns the-great-game.gossip.news-items-test
(ns cc.journeyman.the-great-game.gossip.news-items-test
(:require [clojure.test :refer :all]
[the-great-game.gossip.news-items :refer :all]))
[cc.journeyman.the-great-game.gossip.news-items :refer
[degrade-location infer interest-in-location interesting-location?
learn-news-item make-all-inferences]]))
(deftest location-test
(testing "Interest in locations"

View file

@ -1,8 +1,8 @@
(ns the-great-game.merchants.markets-test
(ns cc.journeyman.the-great-game.merchants.markets-test
(:require [clojure.test :refer :all]
[the-great-game.utils :refer [deep-merge]]
[the-great-game.world.world :refer [default-world]]
[the-great-game.merchants.markets :refer :all]))
[cc.journeyman.the-great-game.utils :refer [deep-merge]]
[cc.journeyman.the-great-game.world.world :refer [default-world]]
[cc.journeyman.the-great-game.merchants.markets :refer [adjust-quantity-and-price new-price run]]))
(deftest new-price-test
@ -23,7 +23,7 @@
"The greater the relative oversupply, the more prices should fall")
))
(deftest adjust-qunatity-and-price-test
(deftest adjust-quantity-and-price-test
(testing "Adjustment in quantity and price: supply only."
(let [world (deep-merge
default-world

View file

@ -1,8 +1,9 @@
(ns the-great-game.merchants.merchant-utils-test
(ns cc.journeyman.the-great-game.merchants.merchant-utils-test
(:require [clojure.test :refer :all]
[the-great-game.utils :refer [deep-merge]]
[the-great-game.world.world :refer [default-world]]
[the-great-game.merchants.merchant-utils :refer :all]))
[cc.journeyman.the-great-game.utils :refer [deep-merge]]
[cc.journeyman.the-great-game.world.world :refer [default-world]]
[cc.journeyman.the-great-game.merchants.merchant-utils :refer
[add-stock burden can-afford can-carry expected-price]]))
(deftest expected-price-test
(testing "Anticipated prices in markets"

View file

@ -1,8 +1,8 @@
(ns the-great-game.merchants.planning-test
(ns cc.journeyman.the-great-game.merchants.planning-test
(:require [clojure.test :refer :all]
[the-great-game.utils :refer [deep-merge]]
[the-great-game.world.world :refer [default-world]]
[the-great-game.merchants.planning :refer :all]))
[cc.journeyman.the-great-game.utils :refer [deep-merge]]
[cc.journeyman.the-great-game.world.world :refer [default-world]]
[cc.journeyman.the-great-game.merchants.planning :refer [plan-trade select-cargo]]))
(deftest plan-trade-test

View file

@ -1,7 +1,9 @@
(ns the-great-game.time-test
(ns cc.journeyman.the-great-game.time-test
(:require [clojure.test :refer :all]
;; [clojure.core.async :refer [thread <!]]
[the-great-game.time :refer :all]))
[cc.journeyman.the-great-game.time :refer
[date-string day days-in-season days-in-week game-day-length
game-time game-start-time now season week]]))
(deftest now-tests
(testing "Time progresses"

View file

@ -1,6 +1,6 @@
(ns the-great-game.utils-test
(ns cc.journeyman.the-great-game.utils-test
(:require [clojure.test :refer :all]
[the-great-game.utils :refer :all]))
[cc.journeyman.the-great-game.utils :refer [cyclic?]]))
(deftest cyclic-tests
(testing "Detecting cyclic routes"

View file

@ -1,6 +1,6 @@
(ns the-great-game.world.location-test
(ns cc.journeyman.the-great-game.world.location-test
(:require [clojure.test :refer :all]
[the-great-game.world.location :refer :all]))
[cc.journeyman.the-great-game.world.location :refer :all]))
(deftest get-coords-test
(testing "Get coordinates of location"

View file

@ -1,7 +1,7 @@
(ns the-great-game.world.routes-test
(ns cc.journeyman.the-great-game.world.routes-test
(:require [clojure.test :refer :all]
[the-great-game.world.routes :refer :all]
[the-great-game.world.world :refer [default-world]]))
[cc.journeyman.the-great-game.world.routes :refer :all]
[cc.journeyman.the-great-game.world.world :refer [default-world]]))
(deftest routing-test

View file

@ -0,0 +1,4 @@
(ns cc.journeyman.the-great-game.world.world-test
(:require [clojure.test :refer :all]
[cc.journeyman.the-great-game.world.world :refer :all]))

View file

@ -1,4 +0,0 @@
(ns the-great-game.gossip.gossip-test
(:require [clojure.test :refer :all]
[the-great-game.gossip.gossip :refer :all]))

View file

@ -1,4 +0,0 @@
(ns the-great-game.world.world-test
(:require [clojure.test :refer :all]
[the-great-game.world.world :refer :all]))