From 8e597897978e9ad1045a89bedce4c58525d54aeb Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 17 May 2019 01:30:25 -0400
Subject: Fixed an accidentally introduced bug (due to OLD compiler JVM interop
 issues).

---
 stdlib/source/lux/data/text/encoding.lux | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'stdlib')

diff --git a/stdlib/source/lux/data/text/encoding.lux b/stdlib/source/lux/data/text/encoding.lux
index 1ce536436..e1066bbcd 100644
--- a/stdlib/source/lux/data/text/encoding.lux
+++ b/stdlib/source/lux/data/text/encoding.lux
@@ -184,7 +184,11 @@
 (def: #export (to-utf8 value)
   (-> Text Binary)
   (`` (for {(~~ (static @.old))
-            (java/lang/String::getBytes (..name ..utf-8) value)
+            (java/lang/String::getBytes (..name ..utf-8)
+                                        ## The coercion below may seem
+                                        ## gratuitous, but removing it
+                                        ## causes a grave compilation problem.
+                                        (:coerce java/lang/String value))
 
             (~~ (static @.jvm))
             (java/lang/String::getBytes (..name ..utf-8) value)})))
-- 
cgit v1.2.3