aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/data/text/encoding
diff options
context:
space:
mode:
authorEduardo Julian2021-09-08 23:14:59 -0400
committerEduardo Julian2021-09-08 23:14:59 -0400
commit085c9a6ef151531cb01b842ed2f4366a49b78367 (patch)
tree01d5671061f1c688fe74319196f8da0e8aa95e4c /stdlib/source/library/lux/data/text/encoding
parent54ab659064990ff37a9234c9792102a3b88277d6 (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.lux12
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)