package convertion perf tweak

b2504afe · Zachary Snow · 95524c46 · b2504afe
Commit b2504afe authored Feb 21, 2020 by Zachary Snow
Hide whitespace changes
Inline Side-by-side

Showing with 1 additions and 1 deletions

src/Convert/Package.hs
+1 -1

No files found.
--- 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