summaryrefslogtreecommitdiff
path: root/sieve-of-eratosthenes
diff options
context:
space:
mode:
Diffstat (limited to 'sieve-of-eratosthenes')
-rw-r--r--sieve-of-eratosthenes/soe.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/sieve-of-eratosthenes/soe.scm b/sieve-of-eratosthenes/soe.scm
index 4b83a97..f0067c4 100644
--- a/sieve-of-eratosthenes/soe.scm
+++ b/sieve-of-eratosthenes/soe.scm
@@ -15,7 +15,7 @@
(size (length buffer)))
(sieve
(filter
- (lambda (x) (not (eq? (remainder x curr) 0)))
+ (lambda (x) (not (zero? (remainder x curr))))
buffer)
(cons curr accept)
size))))