--- a/progs/parser-combinators/comb2.sc Thu Nov 26 02:20:13 2020 +0000
+++ b/progs/parser-combinators/comb2.sc Fri Nov 27 13:53:06 2020 +0000
@@ -155,7 +155,8 @@
(p"write(" ~ IdParser ~ p")").map[Stmt]{ case _ ~ y ~ _ => Write(y) } ||
(p"if" ~ BExp ~ p"then" ~ Block ~ p"else" ~ Block)
.map[Stmt]{ case _ ~ y ~ _ ~ u ~ _ ~ w => If(y, u, w) } ||
- (p"while" ~ BExp ~ p"do" ~ Block).map[Stmt]{ case _ ~ y ~ _ ~ w => While(y, w) })
+ (p"while" ~ BExp ~ p"do" ~ Block).map[Stmt]{ case _ ~ y ~ _ ~ w => While(y, w) })
+
// statements
lazy val Stmts: Parser[String, Block] =