[Series-users] collect-series ?

[Chris D. <ct...@so...>]

Is there a way to use gathering to collect a series?  For example,
here's a function that uses gathering and scan to produce a series as
a result:

    (defun foo ()
      (scan (gathering ((res collect))
              (next-out res 1)
              (next-out res 2)
              (next-out res 3))))

Even if it just syntactic sugar, I'd rather type something like

    (defun foo2 ()
      (gathering ((res collect-series))
        (next-out res 1)
        (next-out res 2)
        (next-out res 3)))

Thanks for any pointers.

Regards,
Chris Dean