Changeset 14626 for src/Pugs/Parser
- Timestamp:
- 11/05/06 03:38:03 (2 years ago)
- svk:copy_cache_prev:
- 41990
- Files:
-
- 1 modified
-
src/Pugs/Parser/Literal.hs (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
src/Pugs/Parser/Literal.hs
r14297 r14626 623 623 pseudoAssignment = verbatimRule "infix assignment" $ do 624 624 ahead <- lookAhead (string ".=" <|> ruleInfixAssignment <|> string "=") 625 insertIntoPosition '_' 626 insertIntoPosition '$' 625 insertIntoPosition "$_" 627 626 item <- parseExpWithTightOps 628 627 return $ case ahead of
