aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/data/format/json.lux
diff options
context:
space:
mode:
authorEduardo Julian2022-03-15 07:24:35 -0400
committerEduardo Julian2022-03-15 07:24:35 -0400
commitbc36487224f670c23002cc4575c0dba3e5dc1be1 (patch)
tree01601f7e5d992ace77a16cfa90240ffc4511a7af /stdlib/source/library/lux/data/format/json.lux
parent4ef1ac1dfe0edd1a11bb7f1fd13c8b6cb8f1bab4 (diff)
De-sigil-ification: ^
Diffstat (limited to 'stdlib/source/library/lux/data/format/json.lux')
-rw-r--r--stdlib/source/library/lux/data/format/json.lux7
1 files changed, 4 insertions, 3 deletions
diff --git a/stdlib/source/library/lux/data/format/json.lux b/stdlib/source/library/lux/data/format/json.lux
index aee3310cd..d5eafa15d 100644
--- a/stdlib/source/library/lux/data/format/json.lux
+++ b/stdlib/source/library/lux/data/format/json.lux
@@ -24,6 +24,7 @@
["[0]" dictionary {"+" Dictionary}]]]
[macro
[syntax {"+" syntax:}]
+ ["^" pattern]
["[0]" code]]
[math
[number
@@ -100,7 +101,7 @@
{#Null' _}
(` {..#Null})
- (^template [<ctor> <input_tag> <output_tag>]
+ (^.template [<ctor> <input_tag> <output_tag>]
[{<input_tag> value}
(` {<output_tag> (~ (<ctor> value))})])
([code.bit ..#Boolean' ..#Boolean]
@@ -184,7 +185,7 @@
[{#Null} {#Null}]
#1
- (^template [<tag> <struct>]
+ (^.template [<tag> <struct>]
[[{<tag> x'} {<tag> y'}]
(# <struct> = x' y')])
([#Boolean bit.equivalence]
@@ -290,7 +291,7 @@
(def: .public (format json)
(-> JSON Text)
(case json
- (^template [<tag> <format>]
+ (^.template [<tag> <format>]
[{<tag> value}
(<format> value)])
([#Null ..null_format]