Add missing tests

Author: brandonwillard

cons/core.py

@@ -122,7 +122,7 @@ def cons_merge(cls, car_part, cdr_part):
         return chain((car_part,), cdr_part)
 
     def __hash__(self):
-        return hash([self.car, self.cdr])
+        return hash((self.car, self.cdr))
 
     def __eq__(self, other):
         return (

tests/test_cons.py

@@ -1,6 +1,5 @@
 import pytest
 
-from functools import reduce
 from itertools import chain, cycle
 from collections import OrderedDict, UserList
 from collections.abc import Iterator
@@ -11,14 +10,6 @@
 from cons.core import ConsPair, MaybeCons, ConsNull, ConsError, NonCons
 
 
-def assert_all_equal(*tests):
-    def _equal(x, y):
-        assert x, y
-        return y
-
-    reduce(_equal, tests)
-
-
 def test_noncons_type():
 
     with pytest.raises(TypeError):
@@ -83,8 +74,7 @@ def test_cons_join():
         cons("a")
 
     assert cons(1, 2, 3, 4) == cons(1, cons(2, cons(3, 4)))
-
-    assert_all_equal(cons("a", None), cons("a", []), ["a"])
+    assert cons("a", None) == cons("a", []) == ["a"]
     assert cons("a", ()) == ("a",)
     assert cons("a", []) == ["a"]
     assert cons(None, "a").car is None
@@ -124,7 +114,9 @@ def __add__(self, a):
     assert cons(1, CustomList([2, 3])) is clist_res
 
 
-def test_cons_str():
+def test_cons_class():
+    c = cons(1, 2)
+    assert {c: 1}[c] == 1
     assert repr(cons(1, 2)) == "ConsPair(1, 2)"
     assert str(cons(1, 2, 3)) == "(1 . (2 . 3))"
 
@@ -257,6 +249,10 @@ def test_unification():
     assert res[car_lv] == 1
     assert list(res[cdr_lv]) == []
 
+    res = unify(cons(car_lv, cdr_lv), iter([1]), {})
+    assert res[car_lv] == 1
+    assert list(res[cdr_lv]) == []
+
     res = unify(OrderedDict([("a", 1), ("b", 2)]), cons(car_lv, cdr_lv), {})
     assert res[car_lv] == ("a", 1)
     assert res[cdr_lv] == [("b", 2)]