 (ns obb-rules.actions.move-test
   (:use clojure.test
+        midje.sweet
         obb-rules.action
         obb-rules.actions.move
         obb-rules.board

            result (move-down board)]
        (is (failed? result))
        (is (= "EmptyCoordinate" (result-message result)))))))

    (is (not old-element))
    (is new-element)))

(deftest movement-restrictions

  (testing "all-movement does not have restrictions"
    (test-complete-move board [2 2] [1 1])
    (test-complete-move board [2 2] [1 2])
    (test-complete-move board [2 2] [1 3])
