bjoli/goof-loop
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fixed named update and a bug in accumulating

Browse source 
* goof.scm: Removed positional updates and fixed named updates
 * iterators.scm: Fixed bug in accumulating where only lists were supported.
This commit is contained in:
Linus 2020-11-04 11:58:58 +01:00
parent b3efccb4aa
commit f2496604d5
3 changed files with 55 additions and 61 deletions
Download patch file Download diff file Expand all files Collapse all files

4
iterators.scm
View file

@ -268,7 +268,7 @@
(accumulating (kons final i) ((var cursor) x) n . rest))
((accumulating (kons final init) ((var cursor) (expr (if check))) n . rest)
(n ((tmp-kons kons))
((cursor '() (if check (tmp-kons expr cursor) cursor)))
((cursor init (if check (tmp-kons expr cursor) cursor)))
()
()
()
@ -276,7 +276,7 @@
. rest))
((accumulating (kons final init) ((var cursor) (expr)) n . rest)
(n ((tmp-kons kons))
((cursor '() (tmp-kons expr cursor)))
((cursor init (tmp-kons expr cursor)))
()
()
()