diff options
author | Eduardo Julian | 2021-09-08 23:14:59 -0400 |
---|---|---|
committer | Eduardo Julian | 2021-09-08 23:14:59 -0400 |
commit | 085c9a6ef151531cb01b842ed2f4366a49b78367 (patch) | |
tree | 01d5671061f1c688fe74319196f8da0e8aa95e4c /stdlib/source/library/lux/data/text/encoding | |
parent | 54ab659064990ff37a9234c9792102a3b88277d6 (diff) |
De-bracing | part 2
Diffstat (limited to 'stdlib/source/library/lux/data/text/encoding')
-rw-r--r-- | stdlib/source/library/lux/data/text/encoding/utf8.lux | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/library/lux/data/text/encoding/utf8.lux b/stdlib/source/library/lux/data/text/encoding/utf8.lux index 19867bae4..817288316 100644 --- a/stdlib/source/library/lux/data/text/encoding/utf8.lux +++ b/stdlib/source/library/lux/data/text/encoding/utf8.lux @@ -15,7 +15,7 @@ ["[1]::[0]" (new [[byte] java/lang/String]) (getBytes [java/lang/String] [byte])]))] - (for {@.old (as_is <jvm>) + (for [@.old (as_is <jvm>) @.jvm (as_is <jvm>) @.js @@ -59,12 +59,12 @@ @.scheme ... https://srfi.schemers.org/srfi-140/srfi-140.html (as_is (ffi.import: (string->utf8 [Text] Binary)) - (ffi.import: (utf8->string [Binary] Text)))} + (ffi.import: (utf8->string [Binary] Text)))] (as_is))) (def: (encoded value) (-> Text Binary) - (for {@.old + (for [@.old (java/lang/String::getBytes (//.name //.utf_8) ... TODO: Remove coercion below. ... The coercion below may seem @@ -109,12 +109,12 @@ (:as Binary)) @.scheme - (..string->utf8 value)})) + (..string->utf8 value)])) (def: (decoded value) (-> Binary (Try Text)) (with_expansions [<jvm> (#try.Success (java/lang/String::new value (//.name //.utf_8)))] - (for {@.old <jvm> + (for [@.old <jvm> @.jvm <jvm> @.js @@ -155,7 +155,7 @@ @.scheme (|> value ..utf8->string - #try.Success)}))) + #try.Success)]))) (implementation: .public codec (Codec Binary Text) |