diff options
| author | Eduardo Julian | 2020-06-11 00:28:20 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2020-06-11 00:28:20 -0400 |
| commit | def9629b35a434b3441aa15b89746b21d6c298ec (patch) | |
| tree | 1b7f6ef8cc76a0d9f4e3c74d4d20239a43955873 /stdlib/source/lux/data/format/json.lux | |
| parent | bbb6356a4a4f853dc48a54f1668c6712f0ef659f (diff) | |
Updated test for function optimization.
Diffstat (limited to 'stdlib/source/lux/data/format/json.lux')
| -rw-r--r-- | stdlib/source/lux/data/format/json.lux | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/stdlib/source/lux/data/format/json.lux b/stdlib/source/lux/data/format/json.lux index 11aa27d3c..e0975d02d 100644 --- a/stdlib/source/lux/data/format/json.lux +++ b/stdlib/source/lux/data/format/json.lux @@ -154,7 +154,9 @@ [get-object #Object Object "objects"] ) -(structure: #export equivalence (Equivalence JSON) +(structure: #export equivalence + (Equivalence JSON) + (def: (= x y) (case [x y] [#Null #Null] @@ -361,6 +363,8 @@ (-> Any (Parser JSON)) ($_ p.or null~ boolean~ number~ string~ (array~ json~') (object~ json~'))) -(structure: #export codec (Codec Text JSON) +(structure: #export codec + (Codec Text JSON) + (def: encode ..format) (def: decode (l.run (json~' [])))) |