From def9629b35a434b3441aa15b89746b21d6c298ec Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Thu, 11 Jun 2020 00:28:20 -0400 Subject: Updated test for function optimization. --- stdlib/source/lux/data/format/json.lux | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'stdlib/source/lux/data/format/json.lux') 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~' [])))) -- cgit v1.2.3