diff options
| -rw-r--r-- | tests/run.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/run.scm b/tests/run.scm index 8ec1a5a..ab09e46 100644 --- a/tests/run.scm +++ b/tests/run.scm @@ -73,7 +73,7 @@ (test-group "slset-contains?" (test-group "some examples" (test #t (slset-contains? '(a b c d a c e) 'a)) - (test #t (slset-contains? '(a b c d a c e) 'a)) + (test #t (slset-contains? '(a b c d a c e) 'd)) (test #f (slset-contains? '(a b c d a c e) 'i))) (test-group "all symbols used here still clean" (test-assert (clean? '(a b c d e i))))) |