Make Text.Parser.between lazy (#385)

This commit is contained in:
Mark Barbone 2020-07-14 09:33:22 -04:00 committed by GitHub
parent de00ff74d5
commit acda3b44a9
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -254,7 +254,7 @@ endBy1' {c} sep p = some' $ rewrite sym (orTrueTrue c) in
export
between : {c : _} ->
(left : Grammar tok True l) ->
(right : Grammar tok True r) ->
(p : Grammar tok c a) ->
(right : Inf (Grammar tok True r)) ->
(p : Inf (Grammar tok c a)) ->
Grammar tok True a
between left right contents = left *> contents <* right