aboutsummaryrefslogtreecommitdiffhomepage
path: root/gtwiwtg.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'gtwiwtg.lisp')
-rw-r--r--gtwiwtg.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/gtwiwtg.lisp b/gtwiwtg.lisp
index 3cf1871..a9460ec 100644
--- a/gtwiwtg.lisp
+++ b/gtwiwtg.lisp
@@ -63,7 +63,7 @@
(at 0) to (by 1) inclusive (comparator #'<))
(defmethod has-next-p ((g range-backed-generator!))
- (with-slots (to current comparator by at) g
+ (with-slots (to comparator by at) g
(or (not to)
(funcall comparator
(+ by at)