summaryrefslogtreecommitdiff
path: root/src/compiler/GF/Grammar/MMacros.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/compiler/GF/Grammar/MMacros.hs')
-rw-r--r--src/compiler/GF/Grammar/MMacros.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/compiler/GF/Grammar/MMacros.hs b/src/compiler/GF/Grammar/MMacros.hs
index c52ee4ce2..f1d2f172a 100644
--- a/src/compiler/GF/Grammar/MMacros.hs
+++ b/src/compiler/GF/Grammar/MMacros.hs
@@ -215,7 +215,7 @@ freeVarsExp e = case e of
_ -> [] --- thus applies to abstract syntax only
int2var :: Int -> Ident
-int2var = identC . BS.pack . ('$':) . show
+int2var = identS . ('$':) . show
meta0 :: MetaId
meta0 = 0