Changeset 8722 for src/Pugs/Lexer.hs

Show
Ignore:
Timestamp:
01/17/06 11:56:03 (3 years ago)
Author:
audreyt
Message:

* numbers.t: all underscore-related subtests now pass.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • src/Pugs/Lexer.hs

    r8153 r8722  
    151151    aheadSym x   '=' = not (x `elem` "!~+-*&/|.%^") 
    152152    aheadSym '?' y   = not (y `elem` "&|^?") 
    153     aheadSym '+' y   = not (y `elem` "&|^<>+") 
    154     aheadSym '~' y   = not (y `elem` "&|^<>~") 
     153    aheadSym '+' y   = not (y `elem` "&|^+") 
     154    aheadSym '~' y   = not (y `elem` "&|^~") 
    155155    aheadSym '^' y   = not (y `elem` "^.") 
    156156    aheadSym x   y   = y `elem` ";!" || x /= y