Merge branch 'master' of git.martlubbers.net:clean-tests

[clean-tests.git] / parseclass / pc.icl

diff --git a/parseclass/pc.icl b/parseclass/pc.icl
index d9b5959..8b4d5ec 100644 (file)
--- a/parseclass/pc.icl
+++ b/parseclass/pc.icl
@@ -70,8 +70,7 @@ pBracket p = pToken '(' *> p <* pToken ')'
 
 eparser :: Parser Char (v T) | lit v
 eparser
-       = litparser
-
+       = lit <$> litparser
 
 litparser :: Parser Char T
 litparser