diff options
| author |  Peter McGoron
| 2025-07-16 11:10:53 -0400 |
|---|---|---|
| committer | Peter McGoron
| 2025-07-16 11:10:53 -0400 |
| commit | 6dafb95155f2125a4bc2c81a4a1bb191b8eca828 (patch) | |
| tree | e850ae64e9b7668a86b74f62b439f5850b652b2e /tests | |
| parent | fix forgejo breakage (diff) | |
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/run.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/run.scm b/tests/run.scm index 5681733..e1dfc9a 100644 --- a/tests/run.scm +++ b/tests/run.scm @@ -38,6 +38,11 @@ (make-person "Tom" "Smith") (make-person "John" "Smith")))) +(test-group "hashing" + (test-assert + (= (comparator-hash person-name-comparator (make-person "Tom" "Smith")) + (comparator-hash person-name-comparator (make-person "Tom" "smith"))))) + (define-record-type Book (make-book author title) book? |