diff options
| author | Eduardo Julian | 2018-07-13 22:01:32 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2018-07-13 22:01:32 -0400 |
| commit | 69fefab57c40f323d759dc444dbcebad15071585 (patch) | |
| tree | db08a3ea37c7818c8a98fc995d3c19440141b700 /stdlib/source/lux/data/text/lexer.lux | |
| parent | 6acf4ffc362c0f8ef77d96f8cfe991adb2d9a0eb (diff) | |
Re-named "Bool" type to "Bit".
Diffstat (limited to 'stdlib/source/lux/data/text/lexer.lux')
| -rw-r--r-- | stdlib/source/lux/data/text/lexer.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/lux/data/text/lexer.lux b/stdlib/source/lux/data/text/lexer.lux index 13c49ef8f..d9b07db1e 100644 --- a/stdlib/source/lux/data/text/lexer.lux +++ b/stdlib/source/lux/data/text/lexer.lux @@ -78,7 +78,7 @@ (def: #export (this? reference) {#.doc "Lex a text if it matches the given sample."} - (-> Text (Lexer Bool)) + (-> Text (Lexer Bit)) (function (_ (^@ input [offset tape])) (case (text.index-of' reference offset tape) (^multi (#.Some where) (n/= offset where)) @@ -97,7 +97,7 @@ (def: #export end? {#.doc "Ask if the lexer's input is empty."} - (Lexer Bool) + (Lexer Bit) (function (_ (^@ input [offset tape])) (#e.Success [input (n/= offset (text.size tape))]))) @@ -190,7 +190,7 @@ (def: #export (satisfies p) {#.doc "Only lex characters that satisfy a predicate."} - (-> (-> Nat Bool) (Lexer Text)) + (-> (-> Nat Bit) (Lexer Text)) (function (_ [offset tape]) (case (text.nth offset tape) (#.Some output) |