A couple of little comments.

This commit is contained in:
Simon Forman 2022-09-24 08:59:38 -07:00
parent 4ff78dd65c
commit c96cd6e296
1 changed files with 2 additions and 0 deletions

View File

@ -81,7 +81,9 @@ let rec expect_right_bracket tokens acc =
match head with
| Right_bracket -> acc, tail
| Left_bracket ->
(* extract the sub-list *)
let sub_list, rest = expect_right_bracket tail [] in
(* continue looking for the expected "]" *)
let el, rrest = expect_right_bracket rest acc in
JoyList sub_list :: el, rrest
| Token tok ->