Re: Generators (iterators) for Gnu Emacs

[David Kastrup]

Stefan Monnier <address@hidden> writes:

>> (defmacro gen-make (&rest body)
>>   "Return a generator that evaluates BODY to generate elements.
>> For each call of `gen-next' with the the returned generator, BODY
>> will be evaluated to produce an element."
>>   (let ((this-element (make-symbol "this-element")))
>>     `(let (,this-element)
>>        (lambda ()
>
> AFAICT this requires lexical-binding in the caller, so we might want to
> signal an error if lexical-binding is nil.

Uh what?  The whole point of the make-symbol abomination is to get a
symbol uniquely used by only one instance of the lambda function.  This
is _exactly_ in order to _not_ require lexical binding.

>>          (if (eq ,this-element 'gen-done)
>>              'gen-done
>>            (setq ,this-element (progn ,@body)))))))

With lexical binding, this would look something like

(defmacro gen-mane (&rest body)
  `(let (this-element)
    (lambda ()
      (if (eq this-element 'gen-done)
          'gen-done
          (setq this-element (progn ,@body))))))

And one would be tempted to see whether this really needs to be a macro.

-- 
David Kastrup