tools/PascalParser.hs
changeset 6414 8474b7fa84d6
parent 6412 4b9a59116535
child 6417 eae5900fd8a4
equal deleted inserted replaced
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