diff options
| -rw-r--r-- | gtwiwtg.lisp | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gtwiwtg.lisp b/gtwiwtg.lisp index a9460ec..fe60d53 100644 --- a/gtwiwtg.lisp +++ b/gtwiwtg.lisp @@ -60,7 +60,7 @@ ;;; Generator Classes ;;; (a-generator-class range-backed-generator! () - (at 0) to (by 1) inclusive (comparator #'<)) + (at 0) to (by 1) (comparator #'<)) (defmethod has-next-p ((g range-backed-generator!)) (with-slots (to comparator by at) g @@ -162,7 +162,6 @@ If TO is NIL, then the generator produces an infinite sequence. (if inclusive #'>= #'>)))) (make-instance 'range-backed-generator! :comparator comparator - :inclusive inclusive :at (- from by) :to to :by by))) |