check for AssertionError in tests

2 files changed, 3 insertions, 3 deletions

diff --git a/src/clojure/contrib/datalog/tests/test_database.clj b/src/clojure/contrib/datalog/tests/test_database.clj
index 06649611..77719008 100644
--- a/src/clojure/contrib/datalog/tests/test_database.clj
+++ b/src/clojure/contrib/datalog/tests/test_database.clj
@@ -44,12 +44,12 @@
 (deftest test-ensure-relation
   (is (contains? (ensure-relation test-db :bob [:sam :george] [:sam]) :bob))
   (is (contains? (ensure-relation test-db :fred [:mary :sue] [:mary]) :fred))
-  (is (thrown? Exception (ensure-relation test-db :fred [:bob :joe] []))))
+  (is (thrown? AssertionError (ensure-relation test-db :fred [:bob :joe] []))))
 
 (deftest test-add-tuple
   (let [new-db (add-tuple test-db :fred {:mary 1 :sue 2})]
     (is (= (select new-db :fred {:mary 1}) [{:mary 1 :sue 2}])))
-  (is (thrown? Exception (add-tuple test-db :fred {:mary 1}))))
+  (is (thrown? AssertionError (add-tuple test-db :fred {:mary 1}))))
 
 (def test-db-1
      (add-tuples test-db
diff --git a/src/clojure/contrib/test_contrib/test_dataflow.clj b/src/clojure/contrib/test_contrib/test_dataflow.clj
index 991e7f2e..8b934dc3 100644
--- a/src/clojure/contrib/test_contrib/test_dataflow.clj
+++ b/src/clojure/contrib/test_contrib/test_dataflow.clj
@@ -32,7 +32,7 @@
           (= (get-value df-1 'product) 0)))
   (is (do (update-values df-1 {'base 2})
           (= (get-value df-1 'product) 18)))
-  (is (thrown? Exception (update-values df-1 {'base 0})))
+  (is (thrown? AssertionError (update-values df-1 {'base 0})))
   (is (= (get-value df-1 'product) 18)))
 
 (def df-2