Error using iterators: cps-internal-yield

Error using iterators: cps-internal-yield

[Elias Mårtenson]

[-- Attachment #1: Type: text/plain, Size: 626 bytes --]

I was trying out the new iterator feature, and managed to write a small
test program that gives an error. I presume there is a problem with how the
macro interacts with cl-labels.

Here's the test code:

(iter-defun bar ()
  (cl-labels ((foo ()
                (iter-yield 'a)
                (iter-yield 'b)
                (iter-yield 'c)
                (iter-yield 'd)))
    (foo)
    (foo)))

(let ((x (bar)))
  (loop repeat 8
        collect (iter-next x)))

When run, it gives the following error:

*** Eval error ***  Symbol’s function definition is void: cps-internal-yield

Regards,
Elias

[-- Attachment #2: Type: text/html, Size: 945 bytes --]

Re: Error using iterators: cps-internal-yield

[Noam Postavsky]

On 1 June 2018 at 12:37, Elias Mårtenson <lokedhs@gmail.com> wrote:
> I was trying out the new iterator feature, and managed to write a small test
> program that gives an error. I presume there is a problem with how the macro
> interacts with cl-labels.

I think it just doesn't handle iter-yield inside lambda, e.g., this
gives the same error:

(iter-defun bar ()
  (funcall #'(lambda () (iter-yield 'a))))

(iter-next (bar))