diff options
| author | Eduardo Julian | 2019-02-11 00:28:08 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2019-02-11 00:28:08 -0400 |
| commit | 6eadb8ba7c8a5eb268cd7a8d13bd63dcaa5f449f (patch) | |
| tree | f6f936c09e20147a8577b47c7c55e29e1ac10a2e /stdlib/source/lux/data/format/json.lux | |
| parent | a7ee9bfcaf9d85105b2ee0e34c203bfc86d1ce15 (diff) | |
Added the special # syntax for referring to the module's alias when opening structures.
Diffstat (limited to 'stdlib/source/lux/data/format/json.lux')
| -rw-r--r-- | stdlib/source/lux/data/format/json.lux | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/stdlib/source/lux/data/format/json.lux b/stdlib/source/lux/data/format/json.lux index e06948838..f2f7eef35 100644 --- a/stdlib/source/lux/data/format/json.lux +++ b/stdlib/source/lux/data/format/json.lux @@ -5,7 +5,7 @@ ["." monad (#+ Monad do)] [equivalence (#+ Equivalence)] codec - ["p" parser (#+ Parser) ("parser/." monad)] + ["p" parser (#+ Parser) ("#/." monad)] ["ex" exception (#+ exception:)]] [data ["." bit] @@ -14,12 +14,12 @@ ["." sum] ["." product] [number - ["." frac ("frac/." decimal)]] - ["." text ("text/." equivalence monoid) + ["." frac ("#/." decimal)]] + ["." text ("#/." equivalence monoid) ["l" lexer]] [collection - ["." list ("list/." fold monad)] - ["." row (#+ Row row) ("row/." monad)] + ["." list ("#/." fold monad)] + ["." row (#+ Row row) ("#/." monad)] ["." dictionary (#+ Dictionary)]]] ["." macro (#+ monad with-gensyms) ["s" syntax (#+ syntax:)] @@ -468,19 +468,19 @@ (l.Lexer Text) ($_ p.either (p.after (l.this "\t") - (parser/wrap text.tab)) + (p/wrap text.tab)) (p.after (l.this "\b") - (parser/wrap text.back-space)) + (p/wrap text.back-space)) (p.after (l.this "\n") - (parser/wrap text.new-line)) + (p/wrap text.new-line)) (p.after (l.this "\r") - (parser/wrap text.carriage-return)) + (p/wrap text.carriage-return)) (p.after (l.this "\f") - (parser/wrap text.form-feed)) + (p/wrap text.form-feed)) (p.after (l.this (text/compose "\" text.double-quote)) - (parser/wrap text.double-quote)) + (p/wrap text.double-quote)) (p.after (l.this "\\") - (parser/wrap "\")))) + (p/wrap "\")))) (def: string~ (l.Lexer String) |