oreodave/alisp
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

reader: fix issue with read_list of infinite loop

Browse Source
This commit is contained in:
Aryadev Chavali
2026-02-11 08:41:42 +00:00
committed by oreodave
parent 4936460b39
commit e60a7459e0
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/reader.c
View File

@@ -124,7 +124,7 @@ read_err_t read_list(sys_t *sys, stream_t *stream, lisp_t **ret)
lisp_t *top = NIL; lisp_t *top = NIL;
lisp_t *cur = NIL; lisp_t *cur = NIL;
while (stream_peek(stream) != ')') while (!stream_eoc(stream) && stream_peek(stream) != ')')
{ {
lisp_t *item = NIL; lisp_t *item = NIL;
read_err_t err = read(sys, stream, &item); read_err_t err = read(sys, stream, &item);