703 lines
		
	
	
		
			26 KiB
		
	
	
	
		
			C++
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			703 lines
		
	
	
		
			26 KiB
		
	
	
	
		
			C++
		
	
	
		
			Executable File
		
	
	
	
	
| /*-----------------------------------------------------------------------------+
 | |
| Copyright (c) 2007-2011: Joachim Faulhaber
 | |
| +------------------------------------------------------------------------------+
 | |
|    Distributed under the Boost Software License, Version 1.0.
 | |
|       (See accompanying file LICENCE.txt or copy at
 | |
|            http://www.boost.org/LICENSE_1_0.txt)
 | |
| +-----------------------------------------------------------------------------*/
 | |
| #ifndef BOOST_ICL_MAP_HPP_JOFA_070519
 | |
| #define BOOST_ICL_MAP_HPP_JOFA_070519
 | |
| 
 | |
| #include <boost/icl/impl_config.hpp>
 | |
| 
 | |
| #if defined(ICL_USE_BOOST_MOVE_IMPLEMENTATION)
 | |
| #   include <boost/container/map.hpp>
 | |
| #   include <boost/container/set.hpp>
 | |
| #elif defined(ICL_USE_STD_IMPLEMENTATION)
 | |
| #   include <map>
 | |
| #   include <set>
 | |
| #else // Default for implementing containers
 | |
| #   include <map>
 | |
| #   include <set>
 | |
| #endif
 | |
| 
 | |
| #include <string>
 | |
| #include <boost/call_traits.hpp>
 | |
| #include <boost/icl/detail/notate.hpp>
 | |
| #include <boost/icl/detail/design_config.hpp>
 | |
| #include <boost/icl/detail/concept_check.hpp>
 | |
| #include <boost/icl/detail/on_absorbtion.hpp>
 | |
| #include <boost/icl/type_traits/is_map.hpp>
 | |
| #include <boost/icl/type_traits/absorbs_identities.hpp>
 | |
| #include <boost/icl/type_traits/is_total.hpp>
 | |
| #include <boost/icl/type_traits/is_element_container.hpp>
 | |
| #include <boost/icl/type_traits/has_inverse.hpp>
 | |
| 
 | |
| #include <boost/icl/associative_element_container.hpp>
 | |
| #include <boost/icl/functors.hpp>
 | |
| #include <boost/icl/type_traits/to_string.hpp>
 | |
| 
 | |
| namespace boost{namespace icl
 | |
| {
 | |
| 
 | |
| struct partial_absorber
 | |
| {
 | |
|     enum { absorbs_identities = true };
 | |
|     enum { is_total = false };
 | |
| };
 | |
| 
 | |
| template<>
 | |
| inline std::string type_to_string<partial_absorber>::apply() { return "@0"; }
 | |
| 
 | |
| struct partial_enricher
 | |
| {
 | |
|     enum { absorbs_identities = false };
 | |
|     enum { is_total = false };
 | |
| };
 | |
| 
 | |
| template<>
 | |
| inline std::string type_to_string<partial_enricher>::apply() { return "e0"; }
 | |
| 
 | |
| struct total_absorber
 | |
| {
 | |
|     enum { absorbs_identities = true };
 | |
|     enum { is_total = true };
 | |
| };
 | |
| 
 | |
| template<>
 | |
| inline std::string type_to_string<total_absorber>::apply() { return "^0"; }
 | |
| 
 | |
| struct total_enricher
 | |
| {
 | |
|     enum { absorbs_identities = false };
 | |
|     enum { is_total = true };
 | |
| };
 | |
| 
 | |
| template<>
 | |
| inline std::string type_to_string<total_enricher>::apply() { return "e^0"; }
 | |
| 
 | |
| 
 | |
| 
 | |
| /** \brief Addable, subractable and intersectable maps */
 | |
| template
 | |
| <
 | |
|     typename DomainT,
 | |
|     typename CodomainT,
 | |
|     class Traits = icl::partial_absorber,
 | |
|     ICL_COMPARE Compare = ICL_COMPARE_INSTANCE(ICL_COMPARE_DEFAULT, DomainT),
 | |
|     ICL_COMBINE Combine = ICL_COMBINE_INSTANCE(icl::inplace_plus, CodomainT),
 | |
|     ICL_SECTION Section = ICL_SECTION_INSTANCE(icl::inter_section, CodomainT),
 | |
|     ICL_ALLOC   Alloc   = std::allocator
 | |
| >
 | |
| class map: private ICL_IMPL_SPACE::map<DomainT, CodomainT, ICL_COMPARE_DOMAIN(Compare,DomainT),
 | |
|                                        Alloc<std::pair<const DomainT, CodomainT> > >
 | |
| {
 | |
| public:
 | |
|     typedef Alloc<typename std::pair<const DomainT, CodomainT> >  allocator_type;
 | |
| 
 | |
|     typedef typename icl::map<DomainT,CodomainT,Traits, Compare,Combine,Section,Alloc> type;
 | |
|     typedef typename ICL_IMPL_SPACE::map<DomainT, CodomainT, ICL_COMPARE_DOMAIN(Compare,DomainT),
 | |
|                                          allocator_type>   base_type;
 | |
| 
 | |
|     typedef Traits traits;
 | |
| 
 | |
| public:
 | |
|     typedef DomainT                                     domain_type;
 | |
|     typedef typename boost::call_traits<DomainT>::param_type domain_param;
 | |
|     typedef DomainT                                     key_type;
 | |
|     typedef CodomainT                                   codomain_type;
 | |
|     typedef CodomainT                                   mapped_type;
 | |
|     typedef CodomainT                                   data_type;
 | |
|     typedef std::pair<const DomainT, CodomainT>         element_type;
 | |
|     typedef std::pair<const DomainT, CodomainT>         value_type;
 | |
|     typedef ICL_COMPARE_DOMAIN(Compare,DomainT)         domain_compare;
 | |
|     typedef ICL_COMBINE_CODOMAIN(Combine,CodomainT)     codomain_combine;
 | |
|     typedef domain_compare                              key_compare;
 | |
|     typedef ICL_COMPARE_DOMAIN(Compare,element_type)    element_compare;
 | |
|     typedef typename inverse<codomain_combine >::type   inverse_codomain_combine;
 | |
|     typedef typename mpl::if_
 | |
|         <has_set_semantics<codomain_type>
 | |
|         , ICL_SECTION_CODOMAIN(Section,CodomainT)
 | |
|         , codomain_combine
 | |
|         >::type                                         codomain_intersect;
 | |
|     typedef typename inverse<codomain_intersect>::type  inverse_codomain_intersect;
 | |
|     typedef typename base_type::value_compare           value_compare;
 | |
| 
 | |
|     typedef typename ICL_IMPL_SPACE::set<DomainT, domain_compare, Alloc<DomainT> > set_type;
 | |
|     typedef set_type                                       key_object_type;
 | |
| 
 | |
| 
 | |
|     BOOST_STATIC_CONSTANT(bool, _total   = (Traits::is_total));
 | |
|     BOOST_STATIC_CONSTANT(bool, _absorbs = (Traits::absorbs_identities));
 | |
|     BOOST_STATIC_CONSTANT(bool,
 | |
|         total_invertible = (mpl::and_<is_total<type>, has_inverse<codomain_type> >::value));
 | |
| 
 | |
|     typedef on_absorbtion<type,codomain_combine,Traits::absorbs_identities>
 | |
|                                                         on_identity_absorbtion;
 | |
| 
 | |
| public:
 | |
|     typedef typename base_type::pointer                 pointer;
 | |
|     typedef typename base_type::const_pointer           const_pointer;
 | |
|     typedef typename base_type::reference               reference;
 | |
|     typedef typename base_type::const_reference         const_reference;
 | |
|     typedef typename base_type::iterator                iterator;
 | |
|     typedef typename base_type::const_iterator          const_iterator;
 | |
|     typedef typename base_type::size_type               size_type;
 | |
|     typedef typename base_type::difference_type         difference_type;
 | |
|     typedef typename base_type::reverse_iterator        reverse_iterator;
 | |
|     typedef typename base_type::const_reverse_iterator  const_reverse_iterator;
 | |
| 
 | |
| public:
 | |
|     BOOST_STATIC_CONSTANT(bool,
 | |
|         is_total_invertible = (   Traits::is_total
 | |
|                                && has_inverse<codomain_type>::value));
 | |
| 
 | |
|     BOOST_STATIC_CONSTANT(int, fineness = 4);
 | |
| 
 | |
| public:
 | |
|     //==========================================================================
 | |
|     //= Construct, copy, destruct
 | |
|     //==========================================================================
 | |
|     map()
 | |
|     {
 | |
|         BOOST_CONCEPT_ASSERT((DefaultConstructibleConcept<DomainT>));
 | |
|         BOOST_CONCEPT_ASSERT((LessThanComparableConcept<DomainT>));
 | |
|         BOOST_CONCEPT_ASSERT((DefaultConstructibleConcept<CodomainT>));
 | |
|         BOOST_CONCEPT_ASSERT((EqualComparableConcept<CodomainT>));
 | |
|     }
 | |
| 
 | |
|     map(const key_compare& comp): base_type(comp){}
 | |
| 
 | |
|     template <class InputIterator>
 | |
|     map(InputIterator first, InputIterator past)
 | |
|         : base_type(first,past){}
 | |
| 
 | |
|     template <class InputIterator>
 | |
|     map(InputIterator first, InputIterator past, const key_compare& comp)
 | |
|         : base_type(first,past,comp)
 | |
|     {}
 | |
| 
 | |
|     map(const map& src)
 | |
|         : base_type(src)
 | |
|     {
 | |
|         BOOST_CONCEPT_ASSERT((DefaultConstructibleConcept<DomainT>));
 | |
|         BOOST_CONCEPT_ASSERT((LessThanComparableConcept<DomainT>));
 | |
|         BOOST_CONCEPT_ASSERT((DefaultConstructibleConcept<CodomainT>));
 | |
|         BOOST_CONCEPT_ASSERT((EqualComparableConcept<CodomainT>));
 | |
|     }
 | |
| 
 | |
|     explicit map(const element_type& key_value_pair): base_type::map()
 | |
|     {
 | |
|         insert(key_value_pair);
 | |
|     }
 | |
| 
 | |
| #   ifndef BOOST_ICL_NO_CXX11_RVALUE_REFERENCES
 | |
|     //==========================================================================
 | |
|     //= Move semantics
 | |
|     //==========================================================================
 | |
| 
 | |
|     map(map&& src)
 | |
|         : base_type(boost::move(src))
 | |
|     {
 | |
|         BOOST_CONCEPT_ASSERT((DefaultConstructibleConcept<DomainT>));
 | |
|         BOOST_CONCEPT_ASSERT((LessThanComparableConcept<DomainT>));
 | |
|         BOOST_CONCEPT_ASSERT((DefaultConstructibleConcept<CodomainT>));
 | |
|         BOOST_CONCEPT_ASSERT((EqualComparableConcept<CodomainT>));
 | |
|     }
 | |
| 
 | |
|     map& operator = (map src)
 | |
|     {
 | |
|         base_type::operator=(boost::move(src));
 | |
|         return *this;
 | |
|     }
 | |
|     //==========================================================================
 | |
| #   else
 | |
| 
 | |
|     map& operator = (const map& src)
 | |
|     {
 | |
|         base_type::operator=(src);
 | |
|         return *this;
 | |
|     }
 | |
| 
 | |
| #   endif // BOOST_ICL_NO_CXX11_RVALUE_REFERENCES
 | |
| 
 | |
|     void swap(map& src) { base_type::swap(src); }
 | |
| 
 | |
|     //==========================================================================
 | |
|     using base_type::empty;
 | |
|     using base_type::clear;
 | |
| 
 | |
|     using base_type::begin;
 | |
|     using base_type::end;
 | |
|     using base_type::rbegin;
 | |
|     using base_type::rend;
 | |
| 
 | |
|     using base_type::size;
 | |
|     using base_type::max_size;
 | |
| 
 | |
|     using base_type::key_comp;
 | |
|     using base_type::value_comp;
 | |
| 
 | |
|     using base_type::erase;
 | |
|     using base_type::find;
 | |
|     using base_type::count;
 | |
| 
 | |
|     using base_type::lower_bound;
 | |
|     using base_type::upper_bound;
 | |
|     using base_type::equal_range;
 | |
| 
 | |
|     using base_type::operator[];
 | |
| 
 | |
| public:
 | |
|     //==========================================================================
 | |
|     //= Containedness
 | |
|     //==========================================================================
 | |
| 
 | |
|     template<class SubObject>
 | |
|     bool contains(const SubObject& sub)const
 | |
|     { return icl::contains(*this, sub); }
 | |
| 
 | |
|     bool within(const map& super)const
 | |
|     { return icl::contains(super, *this); }
 | |
| 
 | |
|     //==========================================================================
 | |
|     //= Size
 | |
|     //==========================================================================
 | |
|     /** \c iterative_size() yields the number of elements that is visited
 | |
|         throu complete iteration. For interval sets \c iterative_size() is
 | |
|         different from \c size(). */
 | |
|     std::size_t iterative_size()const { return base_type::size(); }
 | |
| 
 | |
|     //==========================================================================
 | |
|     //= Selection
 | |
|     //==========================================================================
 | |
| 
 | |
|     /** Total select function. */
 | |
|     codomain_type operator()(const domain_type& key)const
 | |
|     {
 | |
|         const_iterator it = find(key);
 | |
|         return it==end() ? identity_element<codomain_type>::value()
 | |
|                          : it->second;
 | |
|     }
 | |
| 
 | |
|     //==========================================================================
 | |
|     //= Addition
 | |
|     //==========================================================================
 | |
|     /** \c add inserts \c value_pair into the map if it's key does
 | |
|         not exist in the map.
 | |
|         If \c value_pairs's key value exists in the map, it's data
 | |
|         value is added to the data value already found in the map. */
 | |
|     map& add(const value_type& value_pair)
 | |
|     {
 | |
|         return _add<codomain_combine>(value_pair);
 | |
|     }
 | |
| 
 | |
|     /** \c add add \c value_pair into the map using \c prior as a hint to
 | |
|         insert \c value_pair after the position \c prior is pointing to. */
 | |
|     iterator add(iterator prior, const value_type& value_pair)
 | |
|     {
 | |
|         return _add<codomain_combine>(prior, value_pair);
 | |
|     }
 | |
| 
 | |
|     //==========================================================================
 | |
|     //= Subtraction
 | |
|     //==========================================================================
 | |
|     /** If the \c value_pair's key value is in the map, it's data value is
 | |
|         subtraced from the data value stored in the map. */
 | |
|     map& subtract(const element_type& value_pair)
 | |
|     {
 | |
|         on_invertible<type, is_total_invertible>
 | |
|             ::subtract(*this, value_pair);
 | |
|         return *this;
 | |
|     }
 | |
| 
 | |
|     map& subtract(const domain_type& key)
 | |
|     {
 | |
|         icl::erase(*this, key);
 | |
|         return *this;
 | |
|     }
 | |
| 
 | |
|     //==========================================================================
 | |
|     //= Insertion, erasure
 | |
|     //==========================================================================
 | |
|     std::pair<iterator,bool> insert(const value_type& value_pair)
 | |
|     {
 | |
|         if(on_identity_absorbtion::is_absorbable(value_pair.second))
 | |
|             return std::pair<iterator,bool>(end(),true);
 | |
|         else
 | |
|             return base_type::insert(value_pair);
 | |
|     }
 | |
| 
 | |
|     iterator insert(iterator prior, const value_type& value_pair)
 | |
|     {
 | |
|         if(on_identity_absorbtion::is_absorbable(value_pair.second))
 | |
|             return end();
 | |
|         else
 | |
|             return base_type::insert(prior, value_pair);
 | |
|     }
 | |
| 
 | |
|     template<class Iterator>
 | |
|     iterator insert(Iterator first, Iterator last)
 | |
|     {
 | |
|         iterator prior = end(), it = first;
 | |
|         while(it != last)
 | |
|             prior = this->insert(prior, *it++);
 | |
|     }
 | |
| 
 | |
|     /** With <tt>key_value_pair = (k,v)</tt> set value \c v for key \c k */
 | |
|     map& set(const element_type& key_value_pair)
 | |
|     {
 | |
|         return icl::set_at(*this, key_value_pair);
 | |
|     }
 | |
| 
 | |
|     /** erase \c key_value_pair from the map.
 | |
|         Erase only if, the exact value content \c val is stored for the given key. */
 | |
|     size_type erase(const element_type& key_value_pair)
 | |
|     {
 | |
|         return icl::erase(*this, key_value_pair);
 | |
|     }
 | |
| 
 | |
|     //==========================================================================
 | |
|     //= Intersection
 | |
|     //==========================================================================
 | |
|     /** The intersection of \c key_value_pair and \c *this map is added to \c section. */
 | |
|     void add_intersection(map& section, const element_type& key_value_pair)const
 | |
|     {
 | |
|         on_definedness<type, Traits::is_total>
 | |
|             ::add_intersection(section, *this, key_value_pair);
 | |
|     }
 | |
| 
 | |
|     //==========================================================================
 | |
|     //= Symmetric difference
 | |
|     //==========================================================================
 | |
| 
 | |
|     map& flip(const element_type& operand)
 | |
|     {
 | |
|         on_total_absorbable<type,_total,_absorbs>::flip(*this, operand);
 | |
|         return *this;
 | |
|     }
 | |
| 
 | |
| private:
 | |
|     template<class Combiner>
 | |
|     map& _add(const element_type& value_pair);
 | |
| 
 | |
|     template<class Combiner>
 | |
|     iterator _add(iterator prior, const element_type& value_pair);
 | |
| 
 | |
|     template<class Combiner>
 | |
|     map& _subtract(const element_type& value_pair);
 | |
| 
 | |
|     template<class FragmentT>
 | |
|     void total_add_intersection(type& section, const FragmentT& fragment)const
 | |
|     {
 | |
|         section += *this;
 | |
|         section.add(fragment);
 | |
|     }
 | |
| 
 | |
|     void partial_add_intersection(type& section, const element_type& operand)const
 | |
|     {
 | |
|         const_iterator it_ = find(operand.first);
 | |
|         if(it_ != end())
 | |
|         {
 | |
|             section.template _add<codomain_combine  >(*it_);
 | |
|             section.template _add<codomain_intersect>(operand);
 | |
|         }
 | |
|     }
 | |
| 
 | |
| 
 | |
| private:
 | |
|     //--------------------------------------------------------------------------
 | |
|     template<class Type, bool is_total_invertible>
 | |
|     struct on_invertible;
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_invertible<Type, true>
 | |
|     {
 | |
|         typedef typename Type::element_type element_type;
 | |
|         typedef typename Type::inverse_codomain_combine inverse_codomain_combine;
 | |
| 
 | |
|         static void subtract(Type& object, const element_type& operand)
 | |
|         { object.template _add<inverse_codomain_combine>(operand); }
 | |
|     };
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_invertible<Type, false>
 | |
|     {
 | |
|         typedef typename Type::element_type element_type;
 | |
|         typedef typename Type::inverse_codomain_combine inverse_codomain_combine;
 | |
| 
 | |
|         static void subtract(Type& object, const element_type& operand)
 | |
|         { object.template _subtract<inverse_codomain_combine>(operand); }
 | |
|     };
 | |
| 
 | |
|     friend struct on_invertible<type, true>;
 | |
|     friend struct on_invertible<type, false>;
 | |
|     //--------------------------------------------------------------------------
 | |
| 
 | |
|     //--------------------------------------------------------------------------
 | |
|     template<class Type, bool is_total>
 | |
|     struct on_definedness;
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_definedness<Type, true>
 | |
|     {
 | |
|         static void add_intersection(Type& section, const Type& object,
 | |
|                                      const element_type& operand)
 | |
|         { object.total_add_intersection(section, operand); }
 | |
|     };
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_definedness<Type, false>
 | |
|     {
 | |
|         static void add_intersection(Type& section, const Type& object,
 | |
|                                      const element_type& operand)
 | |
|         { object.partial_add_intersection(section, operand); }
 | |
|     };
 | |
| 
 | |
|     friend struct on_definedness<type, true>;
 | |
|     friend struct on_definedness<type, false>;
 | |
|     //--------------------------------------------------------------------------
 | |
| 
 | |
|     //--------------------------------------------------------------------------
 | |
|     template<class Type, bool has_set_semantics, bool absorbs_identities>
 | |
|     struct on_codomain_model;
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_codomain_model<Type, false, false>
 | |
|     {                // !codomain_is_set, !absorbs_identities
 | |
|         static void subtract(Type&, typename Type::iterator it_,
 | |
|                               const typename Type::codomain_type& )
 | |
|         { (*it_).second = identity_element<typename Type::codomain_type>::value(); }
 | |
|     };
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_codomain_model<Type, false, true>
 | |
|     {                // !codomain_is_set, absorbs_identities
 | |
|         static void subtract(Type& object, typename Type::iterator       it_,
 | |
|                                      const typename Type::codomain_type&     )
 | |
|         { object.erase(it_); }
 | |
|     };
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_codomain_model<Type, true, false>
 | |
|     {               // !codomain_is_set, !absorbs_identities
 | |
|         typedef typename Type::inverse_codomain_intersect inverse_codomain_intersect;
 | |
|         static void subtract(Type&, typename Type::iterator       it_,
 | |
|                               const typename Type::codomain_type& co_value)
 | |
|         {
 | |
|             inverse_codomain_intersect()((*it_).second, co_value);
 | |
|         }
 | |
|     };
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_codomain_model<Type, true, true>
 | |
|     {               // !codomain_is_set, absorbs_identities
 | |
|         typedef typename Type::inverse_codomain_intersect inverse_codomain_intersect;
 | |
|         static void subtract(Type& object, typename Type::iterator       it_,
 | |
|                                      const typename Type::codomain_type& co_value)
 | |
|         {
 | |
|             inverse_codomain_intersect()((*it_).second, co_value);
 | |
|             if((*it_).second == identity_element<codomain_type>::value())
 | |
|                 object.erase(it_);
 | |
|         }
 | |
|     };
 | |
|     //--------------------------------------------------------------------------
 | |
| 
 | |
|     //--------------------------------------------------------------------------
 | |
|     template<class Type, bool is_total, bool absorbs_identities>
 | |
|     struct on_total_absorbable;
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_total_absorbable<Type, true, true>
 | |
|     {
 | |
|         typedef typename Type::element_type  element_type;
 | |
|         static void flip(Type& object, const typename Type::element_type&)
 | |
|         { icl::clear(object); }
 | |
|     };
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_total_absorbable<Type, true, false>
 | |
|     {
 | |
|         typedef typename Type::element_type  element_type;
 | |
|         typedef typename Type::codomain_type codomain_type;
 | |
| 
 | |
|         static void flip(Type& object, const element_type& operand)
 | |
|         {
 | |
|             object.add(operand);
 | |
|             ICL_FORALL(typename Type, it_, object)
 | |
|                 (*it_).second = identity_element<codomain_type>::value();
 | |
|         }
 | |
|     };
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_total_absorbable<Type, false, true>
 | |
|     {                         // !is_total, absorbs_identities
 | |
|         typedef typename Type::element_type   element_type;
 | |
|         typedef typename Type::codomain_type  codomain_type;
 | |
|         typedef typename Type::iterator       iterator;
 | |
|         typedef typename Type::inverse_codomain_intersect inverse_codomain_intersect;
 | |
| 
 | |
|         static void flip(Type& object, const element_type& operand)
 | |
|         {
 | |
|             std::pair<iterator,bool> insertion = object.insert(operand);
 | |
|             if(!insertion.second)
 | |
|                 on_codomain_model<Type, has_set_semantics<codomain_type>::value, true>
 | |
|                 ::subtract(object, insertion.first, operand.second);
 | |
|         }
 | |
|     };
 | |
| 
 | |
|     template<class Type>
 | |
|     struct on_total_absorbable<Type, false, false>
 | |
|     {                         // !is_total  !absorbs_identities
 | |
|         typedef typename Type::element_type   element_type;
 | |
|         typedef typename Type::codomain_type  codomain_type;
 | |
|         typedef typename Type::iterator       iterator;
 | |
|         typedef typename Type::inverse_codomain_intersect inverse_codomain_intersect;
 | |
| 
 | |
|         static void flip(Type& object, const element_type& operand)
 | |
|         {
 | |
|             std::pair<iterator,bool> insertion = object.insert(operand);
 | |
|             if(!insertion.second)
 | |
|                 on_codomain_model<Type, has_set_semantics<codomain_type>::value, false>
 | |
|                 ::subtract(object, insertion.first, operand.second);
 | |
|         }
 | |
|     };
 | |
| 
 | |
|     friend struct on_total_absorbable<type, true,  true >;
 | |
|     friend struct on_total_absorbable<type, false, true >;
 | |
|     friend struct on_total_absorbable<type, true,  false>;
 | |
|     friend struct on_total_absorbable<type, false, false>;
 | |
|     //--------------------------------------------------------------------------
 | |
| };
 | |
| 
 | |
| 
 | |
| 
 | |
| //==============================================================================
 | |
| //= Addition<ElementMap>
 | |
| //==============================================================================
 | |
| template <class DomainT, class CodomainT, class Traits, ICL_COMPARE Compare, ICL_COMBINE Combine, ICL_SECTION Section, ICL_ALLOC Alloc>
 | |
|     template <class Combiner>
 | |
| map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc>&
 | |
|     map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc>
 | |
|     ::_add(const element_type& addend)
 | |
| {
 | |
|     typedef typename on_absorbtion
 | |
|         <type,Combiner,absorbs_identities<type>::value>::type on_absorbtion_;
 | |
| 
 | |
|     const codomain_type& co_val    = addend.second;
 | |
|     if(on_absorbtion_::is_absorbable(co_val))
 | |
|         return *this;
 | |
| 
 | |
|     std::pair<iterator,bool> insertion
 | |
|         = base_type::insert(value_type(addend.first, version<Combiner>()(co_val)));
 | |
| 
 | |
|     if(!insertion.second)
 | |
|     {
 | |
|         iterator it = insertion.first;
 | |
|         Combiner()((*it).second, co_val);
 | |
| 
 | |
|         if(on_absorbtion_::is_absorbable((*it).second))
 | |
|             erase(it);
 | |
|     }
 | |
|     return *this;
 | |
| }
 | |
| 
 | |
| 
 | |
| template <class DomainT, class CodomainT, class Traits, ICL_COMPARE Compare, ICL_COMBINE Combine, ICL_SECTION Section, ICL_ALLOC Alloc>
 | |
|     template <class Combiner>
 | |
| typename map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc>::iterator
 | |
|     map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc>
 | |
|     ::_add(iterator prior_, const value_type& addend)
 | |
| {
 | |
|     typedef typename on_absorbtion
 | |
|         <type,Combiner,absorbs_identities<type>::value>::type on_absorbtion_;
 | |
| 
 | |
|     const codomain_type& co_val    = addend.second;
 | |
|     if(on_absorbtion_::is_absorbable(co_val))
 | |
|         return end();
 | |
| 
 | |
|     iterator inserted_
 | |
|         = base_type::insert(prior_,
 | |
|                             value_type(addend.first, Combiner::identity_element()));
 | |
|     Combiner()((*inserted_).second, addend.second);
 | |
| 
 | |
|     if(on_absorbtion_::is_absorbable((*inserted_).second))
 | |
|     {
 | |
|         erase(inserted_);
 | |
|         return end();
 | |
|     }
 | |
|     else
 | |
|         return inserted_;
 | |
| }
 | |
| 
 | |
| 
 | |
| //==============================================================================
 | |
| //= Subtraction<ElementMap>
 | |
| //==============================================================================
 | |
| template <class DomainT, class CodomainT, class Traits, ICL_COMPARE Compare, ICL_COMBINE Combine, ICL_SECTION Section, ICL_ALLOC Alloc>
 | |
|     template <class Combiner>
 | |
| map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc>&
 | |
|     map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc>::_subtract(const value_type& minuend)
 | |
| {
 | |
|     typedef typename on_absorbtion
 | |
|         <type,Combiner,absorbs_identities<type>::value>::type on_absorbtion_;
 | |
| 
 | |
|     iterator it_ = find(minuend.first);
 | |
|     if(it_ != end())
 | |
|     {
 | |
|         Combiner()((*it_).second, minuend.second);
 | |
|         if(on_absorbtion_::is_absorbable((*it_).second))
 | |
|             erase(it_);
 | |
|     }
 | |
|     return *this;
 | |
| }
 | |
| 
 | |
| 
 | |
| //-----------------------------------------------------------------------------
 | |
| // type traits
 | |
| //-----------------------------------------------------------------------------
 | |
| template <class DomainT, class CodomainT, class Traits, ICL_COMPARE Compare, ICL_COMBINE Combine, ICL_SECTION Section, ICL_ALLOC Alloc>
 | |
| struct is_map<icl::map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc> >
 | |
| {
 | |
|     typedef is_map<icl::map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc> > type;
 | |
|     BOOST_STATIC_CONSTANT(bool, value = true);
 | |
| };
 | |
| 
 | |
| template <class DomainT, class CodomainT, class Traits, ICL_COMPARE Compare, ICL_COMBINE Combine, ICL_SECTION Section, ICL_ALLOC Alloc>
 | |
| struct has_inverse<icl::map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc> >
 | |
| {
 | |
|     typedef has_inverse<icl::map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc> > type;
 | |
|     BOOST_STATIC_CONSTANT(bool, value = (has_inverse<CodomainT>::value));
 | |
| };
 | |
| 
 | |
| template <class DomainT, class CodomainT, class Traits, ICL_COMPARE Compare, ICL_COMBINE Combine, ICL_SECTION Section, ICL_ALLOC Alloc>
 | |
| struct absorbs_identities<icl::map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc> >
 | |
| {
 | |
|     typedef absorbs_identities type;
 | |
|     BOOST_STATIC_CONSTANT(int, value = Traits::absorbs_identities);
 | |
| };
 | |
| 
 | |
| template <class DomainT, class CodomainT, class Traits, ICL_COMPARE Compare, ICL_COMBINE Combine, ICL_SECTION Section, ICL_ALLOC Alloc>
 | |
| struct is_total<icl::map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc> >
 | |
| {
 | |
|     typedef is_total type;
 | |
|     BOOST_STATIC_CONSTANT(int, value = Traits::is_total);
 | |
| };
 | |
| 
 | |
| template <class DomainT, class CodomainT, class Traits, ICL_COMPARE Compare, ICL_COMBINE Combine, ICL_SECTION Section, ICL_ALLOC Alloc>
 | |
| struct type_to_string<icl::map<DomainT,CodomainT,Traits,Compare,Combine,Section,Alloc> >
 | |
| {
 | |
|     static std::string apply()
 | |
|     {
 | |
|         return "map<"+ type_to_string<DomainT>::apply()  + ","
 | |
|                      + type_to_string<CodomainT>::apply() + ","
 | |
|                      + type_to_string<Traits>::apply() +">";
 | |
|     }
 | |
| };
 | |
| 
 | |
| 
 | |
| 
 | |
| }} // namespace icl boost
 | |
| 
 | |
| #endif // BOOST_ICL_MAP_HPP_JOFA_070519
 |