lassik
/
upscheme
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fix part of #53, assertion failure on invalid dotted list

This commit is contained in:
Jeff Bezanson 2019-06-06 19:48:54 -04:00 committed by Lassi Kortela
parent 245d472567
commit f3137447c8
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
read.c
View File

@ -539,8 +539,10 @@ static void read_list(value_t *pval, value_t label)
t = peek();
if (ios_eof(F))
lerror(ParseError, "read: unexpected end of input");
if (t != TOK_CLOSE)
if (t != TOK_CLOSE) {
take();
lerror(ParseError, "read: expected ')'");
}
}
}
take();