diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/lux/control/parser/code.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/lux/control/parser/code.lux b/stdlib/source/lux/control/parser/code.lux index 5ea2247d6..30344aaa0 100644 --- a/stdlib/source/lux/control/parser/code.lux +++ b/stdlib/source/lux/control/parser/code.lux @@ -152,9 +152,9 @@ {#.doc "Checks whether there are no more inputs."} (Parser Bit) (function (_ tokens) - (case tokens - #.Nil (#try.Success [tokens #1]) - _ (#try.Success [tokens #0])))) + (#try.Success [tokens (case tokens + #.Nil true + _ false)]))) (def: #export (run syntax inputs) (All [a] (-> (Parser a) (List Code) (Try a))) |