/[svn]/parser/parser.ml
ViewVC logotype

Diff of /parser/parser.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 241 by abate, Tue Jul 10 17:18:24 2007 UTC revision 242 by abate, Tue Jul 10 17:18:33 2007 UTC
# Line 123  Line 123 
123      ]      ]
124    
125      |      |
126      [ e1 = expr; op = ["+" | "-" | "@" | "++"]; e2 = expr ->      [ e1 = expr; op = ["+" | "-" | "@" ]; e2 = expr ->
127          mk loc (Op (op,[e1;e2]))          mk loc (Op (op,[e1;e2]))
128      | e = expr; "--"; l = [LIDENT | UIDENT] ->      | e = expr; "\\"; l = [LIDENT | UIDENT] ->
129          mk loc (RemoveField (e,LabelPool.mk l))          mk loc (RemoveField (e,LabelPool.mk l))
130      ]      ]
131      |      |
Legend:
Removed from v.241  
changed lines
  Added in v.242
CVS Admin">CVS Admin
 ViewVC Help
Powered by ViewVC 1.1.5