Pretty print readable unicode characters

swarm-game · Jul 14, 2024 · c6416e4 · c6416e4
1 parent 37ecbc0
commit c6416e4
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/src/swarm-lang/Swarm/Language/Pretty.hs b/src/swarm-lang/Swarm/Language/Pretty.hs
@@ -36,6 +36,7 @@ import Swarm.Language.Syntax.Direction
 import Swarm.Language.Typecheck
 import Swarm.Language.Types
 import Swarm.Util (number, showEnum, showLowT, unsnocNE)
+import Text.Show.Unicode (ushow)
 import Witch
 
 ------------------------------------------------------------
@@ -271,7 +272,7 @@ instance PrettyPrec (Term' ty) where
     TDir d -> ppr d
     TInt n -> pretty n
     TAntiInt v -> "$int:" <> pretty v
-    TText s -> fromString (show s)
+    TText s -> fromString (ushow s)
     TAntiText v -> "$str:" <> pretty v
     TBool b -> bool "false" "true" b
     TRobot r -> "<a" <> pretty r <> ">"

diff --git a/swarm.cabal b/swarm.cabal
@@ -191,6 +191,7 @@ library swarm-lang
     terminal-size >=0.3 && <1.0,
     text,
     text-rope >=0.2 && <0.3,
+    unicode-show,
     vector,
     vty,
     witch,