diff options
author | Eduardo Julian | 2021-08-13 04:18:57 -0400 |
---|---|---|
committer | Eduardo Julian | 2021-08-13 04:18:57 -0400 |
commit | e53c1a090eb9cfac3cb23d10d981648d02518ed1 (patch) | |
tree | 6c92c186525b6e73032ebea68765b791bcc27516 /stdlib/source/program/aedifex/parser.lux | |
parent | 17629d66062b88b040a2397032f6c08361a5f3a7 (diff) |
Made program: specify its bindings the same way as syntax:.
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/program/aedifex/parser.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/program/aedifex/parser.lux b/stdlib/source/program/aedifex/parser.lux index 37ce2c46b..6d4d05b92 100644 --- a/stdlib/source/program/aedifex/parser.lux +++ b/stdlib/source/program/aedifex/parser.lux @@ -39,12 +39,12 @@ (def: (singular input tag parser) (All [a] (-> (Dictionary Text Code) Text (Parser a) (Parser a))) - (<code>.local (..as_input (dictionary.get tag input)) + (<code>.local (..as_input (dictionary.value tag input)) parser)) (def: (plural input tag parser) (All [a] (-> (Dictionary Text Code) Text (Parser a) (Parser (List a)))) - (<code>.local (..as_input (dictionary.get tag input)) + (<code>.local (..as_input (dictionary.value tag input)) (<code>.tuple (<>.some parser)))) (def: group |