     (testing "the function clouseau.core/get-port."
         (is (thrown? AssertionError (get-port "0")))
         (is (thrown? AssertionError (get-port "-1")))
+        (is (thrown? AssertionError (get-port "-2")))
         (is (thrown? AssertionError (get-port "65536")))
+        (is (thrown? AssertionError (get-port "65537")))
         (is (thrown? AssertionError (get-port "1000000")))))
 
 (deftest test-get-and-check-port

        (is (thrown? AssertionError (get-and-check-port "-1")))
        (is (thrown? AssertionError (get-and-check-port "0")))
        (is (thrown? AssertionError (get-and-check-port "65536")))
        (is (thrown? AssertionError (get-and-check-port "1000000")))))



(ns clouseau.test-core
  (:require [clojure.test :refer :all]
            [clouseau.core :refer :all]
            [ring.adapter.jetty :as jetty]))

;
; Common functions used by tests.
