diff options
| author | Eduardo Julian | 2021-07-13 02:41:45 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2021-07-13 02:41:45 -0400 |
| commit | 2431e767a09894c2f685911ba7f1ba0b7de2a165 (patch) | |
| tree | f5c79fb04af80b8418e9de0a5e668f29403dd7fd /stdlib/source/program/aedifex/artifact/snapshot/build.lux | |
| parent | 86bcfadb774618defaa27bbb9361a93d288fb985 (diff) | |
Improved the XML parsing library.
Diffstat (limited to 'stdlib/source/program/aedifex/artifact/snapshot/build.lux')
| -rw-r--r-- | stdlib/source/program/aedifex/artifact/snapshot/build.lux | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/stdlib/source/program/aedifex/artifact/snapshot/build.lux b/stdlib/source/program/aedifex/artifact/snapshot/build.lux index d9a8b729e..cd87c283e 100644 --- a/stdlib/source/program/aedifex/artifact/snapshot/build.lux +++ b/stdlib/source/program/aedifex/artifact/snapshot/build.lux @@ -36,8 +36,6 @@ (def: #export parser (Parser Build) - (do <>.monad - [_ (<xml>.node ..tag)] - (<text>.embed (<>.codec nat.decimal - (<text>.many <text>.decimal)) - (<xml>.children <xml>.text)))) + (<| (<xml>.node ..tag) + (<text>.embed (<>.codec nat.decimal (<text>.many <text>.decimal))) + <xml>.text)) |