azur/bobbylisp
1
1
Fork 0
mirror of https://github.com/azur1s/bobbylisp.git synced 2024-10-16 02:37:40 -05:00
Code Issues Projects Releases Wiki Activity

use delimited_by instead

Browse source
This commit is contained in:
Natapat Samutpong 2022-03-19 08:56:06 +07:00
parent 419d152cf7
commit 8c63304acf
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
crates/parser/src/lib.rs
View file

@ -251,13 +251,13 @@ fn expr_parser() -> impl Parser<Token, Vec<Spanned<Expr>>, Error = Simple<Token>
) )
}); });
let do_block = just(Token::KwDo) let do_block = expr.clone()
.ignore_then( .then_ignore(just(Token::SemiColon))
expr.clone() .repeated()
.then_ignore(just(Token::SemiColon)) .delimited_by(
.repeated() just(Token::KwDo),
just(Token::KwEnd),
) )
.then_ignore(just(Token::KwEnd))
.map_with_span(|body, span| { .map_with_span(|body, span| {
( (
Expr::Do { Expr::Do {