changeset 6414 | 8474b7fa84d6 |
parent 6412 | 4b9a59116535 |
child 6417 | eae5900fd8a4 |
6413:6714531e7bd2 | 6414:8474b7fa84d6 |
---|---|
572 name <- choice $ map (\s -> try $ caseInsensitiveString s >>= \i -> notFollowedBy alphaNum >> return i) builtin |
572 name <- choice $ map (\s -> try $ caseInsensitiveString s >>= \i -> notFollowedBy alphaNum >> return i) builtin |
573 spaces |
573 spaces |
574 exprs <- parens pas $ commaSep1 pas $ e |
574 exprs <- parens pas $ commaSep1 pas $ e |
575 spaces |
575 spaces |
576 return (name, exprs) |
576 return (name, exprs) |
577 |