Boost logo

Boost-Commit :

Subject: [Boost-commit] svn:boost r60997 - trunk/libs/spirit/example/scheme/input
From: joel_at_[hidden]
Date: 2010-04-02 08:43:34


Author: djowel
Date: 2010-04-02 08:43:33 EDT (Fri, 02 Apr 2010)
New Revision: 60997
URL: http://svn.boost.org/trac/boost/changeset/60997

Log:
no more actions
Text files modified:
   trunk/libs/spirit/example/scheme/input/sexpr.hpp | 21 +++++++++++----------
   1 files changed, 11 insertions(+), 10 deletions(-)

Modified: trunk/libs/spirit/example/scheme/input/sexpr.hpp
==============================================================================
--- trunk/libs/spirit/example/scheme/input/sexpr.hpp (original)
+++ trunk/libs/spirit/example/scheme/input/sexpr.hpp 2010-04-02 08:43:33 EDT (Fri, 02 Apr 2010)
@@ -136,27 +136,28 @@
 
             list = '(' >> *start >> ')';
 
- atom = number [_val = _1]
- | bool_ [_val = _1]
- | string [_val = _1]
- | byte_str [_val = _1]
- | symbol [_val = _1]
+ atom = strict_double
+ | integer
+ | bool_
+ | string
+ | byte_str
+ | symbol
                     ;
 
             char const* exclude = " ();\"\0-\31\127";
             symbol = lexeme[+(~char_(exclude))];
 
- number = strict_double [_val = _1]
- | lexeme[no_case["0x"] >> hex] [_val = _1]
- | lexeme['0' >> oct] [_val = _1]
- | int_ [_val = _1]
+ integer = lexeme[no_case["0x"] >> hex]
+ | lexeme['0' >> oct]
+ | int_
                     ;
 
             byte_str = lexeme[no_case['b'] >> +hex2];
         }
 
         rule<Iterator, white_space<Iterator>, utree()> start, list;
- rule<Iterator, utree()> atom, number;
+ rule<Iterator, int()> integer;
+ rule<Iterator, utree()> atom;
         rule<Iterator, utf8_symbol()> symbol;
         rule<Iterator, binary_string()> byte_str;
         scheme::input::string<Iterator> string;


Boost-Commit list run by bdawes at acm.org, david.abrahams at rcn.com, gregod at cs.rpi.edu, cpdaniel at pacbell.net, john at johnmaddock.co.uk