From b2504afe717520444c7c8f04d31f7b1f872d28b9 Mon Sep 17 00:00:00 2001
From: Zachary Snow <zach@zachjs.com>
Date: Fri, 21 Feb 2020 21:17:47 -0500
Subject: [PATCH] package convertion perf tweak

---
 src/Convert/Package.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Convert/Package.hs b/src/Convert/Package.hs
index 379e3e3d..a9a1bc72 100644
--- a/src/Convert/Package.hs
+++ b/src/Convert/Package.hs
@@ -84,7 +84,7 @@ prefixPackageItem packageName idents item =
         prefix :: Identifier -> Identifier
         prefix x =
             if Set.member x idents
-                then packageName ++ "_" ++ x
+                then packageName ++ '_' : x
                 else x
         item' = case item of
             Function       a b x c d  -> Function       a b (prefix x) c d