Ticket #7621: qi_bool.patch

D:\

@@ -143 +143 @@
     struct any_bool_parser
       : primitive_parser<any_bool_parser<T, BoolPolicies> >
     {
+        any_bool_parser(BoolPolicies const& p = BoolPolicies())
+          : p_(p) {}
+
         template <typename Context, typename Iterator>
         struct attribute
         {
@@ -157 +160 @@
         {
             typedef detail::bool_impl<T, BoolPolicies> extract;
             qi::skip_over(first, last, skipper);
-            return extract::parse(first, last, attr, BoolPolicies());
+            return extract::parse(first, last, attr, p_);
         }
 
         template <typename Context>
@@ -165 +168 @@
         {
             return info("boolean");
         }
+
+        BoolPolicies p_;
     };
 
     template <typename T, typename BoolPolicies = bool_policies<T>
@@ -173 +178 @@
       : primitive_parser<literal_bool_parser<T, BoolPolicies, no_attribute> >
     {
         template <typename Value>
-        literal_bool_parser(Value const& n) : n_(n) {}
+        literal_bool_parser(Value const& n
+            , BoolPolicies const& p = BoolPolicies())
+          : n_(n), p_(p) {}
 
         template <typename Context, typename Iterator>
         struct attribute
@@ -188 +195 @@
         {
             typedef detail::bool_impl<T, BoolPolicies> extract;
             qi::skip_over(first, last, skipper);
-            return extract::parse(first, last, attr, BoolPolicies(), n_, n_);
+            return extract::parse(first, last, attr, p_, n_, n_);
         }
 
         template <typename Context>
@@ -198 +205 @@
         }
 
         T n_;
+        BoolPolicies p_;
     };
 
     ///////////////////////////////////////////////////////////////////////////
@@ -218 +226 @@
           , any_bool_parser<T, no_case_bool_policies<T> >
           , any_bool_parser<T, Policies> >::type
         result_type;
-
-        result_type operator()(unused_type, unused_type) const
+        
+        template <typename Terminal>
+        result_type operator()(Terminal const& term, unused_type) const
         {
-            return result_type();
+            typedef tag::stateful_tag<Policies, tag::bool_, T> tag_type;
+            using spirit::detail::get_stateful_data;
+            return result_type(get_stateful_data<tag_type>::call(term));
         }
     };
 
@@ -244 +255 @@
         template <typename Terminal>
         result_type operator()(Terminal const& term, unused_type) const
         {
-            return result_type(fusion::at_c<0>(term.args));
+            typedef tag::stateful_tag<Policies, tag::bool_, T> tag_type;
+            using spirit::detail::get_stateful_data;
+            return result_type(fusion::at_c<0>(term.args)
+                , get_stateful_data<tag_type>::call(term.term));
         }
     };