summaryrefslogtreecommitdiff
path: root/2d
diff options
context:
space:
mode:
Diffstat (limited to '2d')
-rw-r--r--2d/helpers.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/2d/helpers.scm b/2d/helpers.scm
index a8bf0cf..153b4b5 100644
--- a/2d/helpers.scm
+++ b/2d/helpers.scm
@@ -29,7 +29,7 @@
(define (any-equal? elem . args)
"Returns true if elem equals any of the arguments and returns false
otherwise."
- (any (lambda (e) (= elem e)) args))
+ (any (lambda (e) (equal? elem e)) args))
(define (logand? . args)
"Returns true if the result of a bitwise AND of the integer