diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/poly/lux/data/format/json.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/poly/lux/data/format/json.lux b/stdlib/source/poly/lux/data/format/json.lux index 5fed388e2..e556c2ac6 100644 --- a/stdlib/source/poly/lux/data/format/json.lux +++ b/stdlib/source/poly/lux/data/format/json.lux @@ -59,8 +59,8 @@ (def: (encoded input) (let [high (|> input (i64.and high_mask) (i64.right_shifted 32)) low (i64.and low_mask input)] - (#/.Array (row (|> high .int int.frac #/.Number) - (|> low .int int.frac #/.Number))))) + {#/.Array (row (|> high .int int.frac #/.Number) + (|> low .int int.frac #/.Number))})) (def: decoded (</>.result (</>.array (do <>.monad @@ -83,7 +83,7 @@ (function (_ elem) (case elem #.None #/.Null - (#.Some value) (writer value)))) + {#.Some value} (writer value)))) (implementation: qty_codec (All (_ unit) |