diff --git a/src/mw_engine/utils.clj b/src/mw_engine/utils.clj index c8ced6a..3ad2b1f 100644 --- a/src/mw_engine/utils.clj +++ b/src/mw_engine/utils.clj @@ -1,4 +1,5 @@ -;; Utility functions needed by MicroWorld and, specifically, in the interpretation of MicroWorld rule. +;; Utility functions needed by MicroWorld and, specifically, in the +;; interpretation of MicroWorld rule. (ns mw-engine.utils (:require diff --git a/test/mw_engine/drainage_test.clj b/test/mw_engine/drainage_test.clj index 574e7bf..ba2c95a 100644 --- a/test/mw_engine/drainage_test.clj +++ b/test/mw_engine/drainage_test.clj @@ -11,7 +11,7 @@ (world/make-world 3 3) #(merge %2 {:altitude 100})) 1 1 :altitude 90)] - (is (is-hollow (utils/get-cell world 1 1) world) + (is (is-hollow world (utils/get-cell world 1 1)) "Cell at 1, 1 should be a hollow")))) (deftest flood-hollow-test