summaryrefslogtreecommitdiff
path: root/src/PGF/Macros.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/PGF/Macros.hs')
-rw-r--r--src/PGF/Macros.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/PGF/Macros.hs b/src/PGF/Macros.hs
index 604f3c35d..839c781e3 100644
--- a/src/PGF/Macros.hs
+++ b/src/PGF/Macros.hs
@@ -146,8 +146,9 @@ combinations t = case t of
aa:uu -> [a:u | a <- aa, u <- combinations uu]
isLiteralCat :: CId -> Bool
-isLiteralCat = (`elem` [cidString, cidFloat, cidInt])
+isLiteralCat = (`elem` [cidString, cidFloat, cidInt, cidVar])
cidString = mkCId "String"
cidInt = mkCId "Int"
cidFloat = mkCId "Float"
+cidVar = mkCId "#Var"