[Boost-commit] svn:boost r60997 - trunk/libs/spirit/example/scheme/input

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;