# HG changeset patch
# User unc0rr
# Date 1321720220 -10800
# Node ID 6eb58ae8b51022516366c840d51b8adb7e96a99c
# Parent  71dd6b8494e5361eaa31943fb47fc180178edf57
Oops, function call has parens

diff -r 71dd6b8494e5 -r 6eb58ae8b510 tools/PascalParser.hs
--- a/tools/PascalParser.hs	Fri Nov 18 12:47:40 2011 -0500
+++ b/tools/PascalParser.hs	Sat Nov 19 19:30:20 2011 +0300
@@ -630,6 +630,6 @@
 builtInFunction e = do
     name <- choice $ map (\s -> try $ caseInsensitiveString s >>= \i -> notFollowedBy alphaNum >> return i) builtin
     spaces
-    exprs <- many1 e
+    exprs <- parens pas $ commaSep1 pas $ e
     spaces
     return (name, exprs)