summaryrefslogtreecommitdiff
path: root/2d
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2013-06-25 19:47:59 -0400
committerDavid Thompson <dthompson2@worcester.edu>2013-06-25 19:47:59 -0400
commitc68182413ed510ee5a93a14a39c618d2ef346d90 (patch)
tree6facc196b1a2fa5740a9bddfb2bbe0ec8c9cf6ce /2d
parentca6fb9be56a883061603dd699f84cc475a7c47d9 (diff)
Change = to equal?
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