Re: Back & Forth - Co-routines

On Sun, 9 Feb 2025 22:30:28 +0000, Paul Rubin wrote:

minforth@gmx.net (minforth) writes:

FWIW a single quotation-based counter in another Forth:
>
MinForth 3.6 (32 bit)
# defer ctr  ok
# : init { n } [: n 1+ dup to n ;] ;  ok
# 4 init is ctr  ok
# ctr . 5  ok

>
Questions:
>
1) where does the storage cell for n live, after init has returned?
>
2) what if you make more than one counter?
>
3) why did you use defer instead of something like CONSTANT?
>
thanks

1) Briefly, details omitted: a copy of the locals stack frame of the
outer function is inlined. Before execution of the quotation, this
copy is inserted into the quotation's locals stack frame.
2) Won't work because there is only one copy per quotation
3) Convenience