OSDN Git Service

2010-05-06 Jonathan Wakely <jwakely.gcc@gmail.com>
[pf3gnuchains/gcc-fork.git] / libstdc++-v3 / include / bits / forward_list.tcc
index 02b1a0d..7468a90 100644 (file)
@@ -1,11 +1,11 @@
 // <forward_list.tcc> -*- C++ -*-
 
-// Copyright (C) 2008 Free Software Foundation, Inc.
+// Copyright (C) 2008, 2009, 2010 Free Software Foundation, Inc.
 //
 // This file is part of the GNU ISO C++ Library.  This library is free
 // software; you can redistribute it and/or modify it under the
 // terms of the GNU General Public License as published by the
-// Free Software Foundation; either version 2, or (at your option)
+// Free Software Foundation; either version 3, or (at your option)
 // any later version.
 
 // This library is distributed in the hope that it will be useful,
 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 // GNU General Public License for more details.
 
-// You should have received a copy of the GNU General Public License
-// along with this library; see the file COPYING.  If not, write to
-// the Free Software Foundation, 51 Franklin Street, Fifth Floor,
-// Boston, MA 02110-1301, USA.
+// Under Section 7 of GPL version 3, you are granted additional
+// permissions described in the GCC Runtime Library Exception, version
+// 3.1, as published by the Free Software Foundation.
 
-// As a special exception, you may use this file as part of a free software
-// library without restriction.  Specifically, if other files instantiate
-// templates or use macros or inline functions from this file, or you compile
-// this file and link it with other files to produce an executable, this
-// file does not by itself cause the resulting executable to be covered by
-// the GNU General Public License.  This exception does not however
-// invalidate any other reasons why the executable file might be covered by
-// the GNU General Public License.
+// You should have received a copy of the GNU General Public License and
+// a copy of the GCC Runtime Library Exception along with this program;
+// see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
+// <http://www.gnu.org/licenses/>.
 
 /** @file forward_list.tcc
  *  This is a Standard C++ Library header.
 
 _GLIBCXX_BEGIN_NAMESPACE(std)
 
- /**
-  *  @brief  Sort the singly linked list starting after this node.
-  *          This node is assumed to be an empty head node (of type
-  *          _Fwd_list_node_base).
-  */
-  template<typename _Tp>
-    template<typename _Comp>
-      void
-      _Fwd_list_node<_Tp>::
-      _M_sort_after(_Comp __comp)
-      {
-       // If `next' is 0, return immediately.
-       _Fwd_list_node* __list = static_cast<_Fwd_list_node*>(this->_M_next);
-       if (!__list)
-         return;
-
-       unsigned long __insize = 1;
-
-       while (1)
-         {
-           _Fwd_list_node* __p = __list;
-           __list = 0;
-           _Fwd_list_node* __tail = 0;
-
-           // Count number of merges we do in this pass.
-           unsigned long __nmerges = 0;
-
-           while (__p)
-             {
-               ++__nmerges;
-               // There exists a merge to be done.
-               // Step `insize' places along from p.
-               _Fwd_list_node* __q = __p;
-               unsigned long __psize = 0;
-               for (unsigned long __i = 0; __i < __insize; ++__i)
-                 {
-                   ++__psize;
-                   __q = static_cast<_Fwd_list_node*>(__q->_M_next);
-                   if (!__q)
-                     break;
-                 }
-
-               // If q hasn't fallen off end, we have two lists to merge.
-               unsigned long __qsize = __insize;
-
-               // Now we have two lists; merge them.
-               while (__psize > 0 || (__qsize > 0 && __q))
-                 {
-                   // Decide whether next node of merge comes from p or q.
-                   _Fwd_list_node<_Tp>* __e;
-                   if (__psize == 0)
-                     {
-                       // p is empty; e must come from q.
-                       __e = __q;
-                       __q = static_cast<_Fwd_list_node*>(__q->_M_next);
-                       --__qsize;
-                     }
-                   else if (__qsize == 0 || !__q)
-                     {
-                       // q is empty; e must come from p.
-                       __e = __p;
-                       __p = static_cast<_Fwd_list_node*>(__p->_M_next);
-                       --__psize;
-                     }
-                   else if (__comp(__p->_M_value, __q->_M_value))
-                     {
-                       // First node of p is lower; e must come from p.
-                       __e = __p;
-                       __p = static_cast<_Fwd_list_node*>(__p->_M_next);
-                       --__psize;
-                     }
-                   else
-                     {
-                       // First node of q is lower; e must come from q.
-                       __e = __q;
-                       __q = static_cast<_Fwd_list_node*>(__q->_M_next);
-                       --__qsize;
-                     }
-
-                   // Add the next node to the merged list.
-                   if (__tail)
-                     __tail->_M_next = __e;
-                   else
-                     __list = __e;
-                   __tail = __e;
-                 }
-
-               // Now p has stepped `insize' places along, and q has too.
-               __p = __q;
-             }
-           __tail->_M_next = 0;
-
-           // If we have done only one merge, we're finished.
-           // Allow for nmerges == 0, the empty list case.
-           if (__nmerges <= 1)
-             {
-               this->_M_next = __list;
-               return;
-             }
-
-           // Otherwise repeat, merging lists twice the size.
-           __insize *= 2;
-         }
-      }
   template<typename _Tp, typename _Alloc>
     _Fwd_list_base<_Tp, _Alloc>::
     _Fwd_list_base(const _Fwd_list_base& __lst, const _Alloc& __a)
@@ -149,12 +39,13 @@ _GLIBCXX_BEGIN_NAMESPACE(std)
       this->_M_impl._M_head._M_next = 0;
       _Fwd_list_node_base* __to = &this->_M_impl._M_head;
       _Node* __curr = static_cast<_Node*>(__lst._M_impl._M_head._M_next);
+
       while (__curr)
-       {
-         __to->_M_next = _M_create_node(__curr->_M_value);
-         __to = __to->_M_next;
-         __curr = static_cast<_Node*>(__curr->_M_next);
-       }
+        {
+          __to->_M_next = _M_create_node(__curr->_M_value);
+          __to = __to->_M_next;
+          __curr = static_cast<_Node*>(__curr->_M_next);
+        }
     }
 
   template<typename _Tp, typename _Alloc>
@@ -163,47 +54,40 @@ _GLIBCXX_BEGIN_NAMESPACE(std)
       _Fwd_list_base<_Tp, _Alloc>::
       _M_insert_after(const_iterator __pos, _Args&&... __args)
       {
-       _Fwd_list_node_base* __to
+        _Fwd_list_node_base* __to
          = const_cast<_Fwd_list_node_base*>(__pos._M_node);
        _Node* __thing = _M_create_node(std::forward<_Args>(__args)...);
-       __thing->_M_next = __to->_M_next;
-       __to->_M_next = __thing;
-       return __to->_M_next;
+        __thing->_M_next = __to->_M_next;
+        __to->_M_next = __thing;
+        return __to->_M_next;
       }
 
   template<typename _Tp, typename _Alloc>
-    _Fwd_list_node_base*
+    void
     _Fwd_list_base<_Tp, _Alloc>::
     _M_erase_after(_Fwd_list_node_base* __pos)
     {
       _Node* __curr = static_cast<_Node*>(__pos->_M_next);
-      if (__curr)
-       {
-         _Fwd_list_node_base* __next = __curr->_M_next;
-         __pos->_M_next = __next;
-         _M_get_Node_allocator().destroy(__curr);
-         _M_put_node(__curr);
-       }
-      return __pos;
+      __pos->_M_next = __curr->_M_next;
+      _M_get_Node_allocator().destroy(__curr);
+      _M_put_node(__curr);
     }
 
   template<typename _Tp, typename _Alloc>
-    _Fwd_list_node_base*
+    void
     _Fwd_list_base<_Tp, _Alloc>::
-    _M_erase_after(_Fwd_list_node_base* __pos, _Fwd_list_node_base* __last)
+    _M_erase_after(_Fwd_list_node_base* __pos, 
+                   _Fwd_list_node_base* __last)
     {
       _Node* __curr = static_cast<_Node*>(__pos->_M_next);
-      while (__curr)
-       {
-         _Node* __temp = __curr;
-         __curr = static_cast<_Node*>(__curr->_M_next);
-         _M_get_Node_allocator().destroy(__temp);
-         _M_put_node(__temp);
-         __pos->_M_next = __curr;
-         if (__temp == __last)
-           break;
-       }
-      return __pos;
+      while (__curr != __last)
+        {
+          _Node* __temp = __curr;
+          __curr = static_cast<_Node*>(__curr->_M_next);
+          _M_get_Node_allocator().destroy(__temp);
+          _M_put_node(__temp);
+        }
+      __pos->_M_next = __last;
     }
   
   // Called by the range constructor to implement [23.1.1]/9
@@ -214,7 +98,7 @@ _GLIBCXX_BEGIN_NAMESPACE(std)
       _M_initialize_dispatch(_InputIterator __first, _InputIterator __last,
                              __false_type)
       {
-        _Fwd_list_node_base* __to = &this->_M_impl._M_head;
+        _Node_base* __to = &this->_M_impl._M_head;
         for (; __first != __last; ++__first)
           {
             __to->_M_next = this->_M_create_node(*__first);
@@ -229,7 +113,7 @@ _GLIBCXX_BEGIN_NAMESPACE(std)
     forward_list<_Tp, _Alloc>::
     _M_fill_initialize(size_type __n, const value_type& __value)
     {
-      _Fwd_list_node_base* __to = &this->_M_impl._M_head;
+      _Node_base* __to = &this->_M_impl._M_head;
       for (; __n > 0; --__n)
         {
           __to->_M_next = this->_M_create_node(__value);
@@ -238,78 +122,147 @@ _GLIBCXX_BEGIN_NAMESPACE(std)
     }
 
   template<typename _Tp, typename _Alloc>
+    forward_list<_Tp, _Alloc>::
+    forward_list(size_type __n)
+    : _Base()
+    {
+      _Node_base* __to = &this->_M_impl._M_head;
+      for (; __n > 0; --__n)
+        {
+          __to->_M_next = this->_M_create_node();
+          __to = __to->_M_next;
+        }
+    }
+
+  template<typename _Tp, typename _Alloc>
     forward_list<_Tp, _Alloc>&
     forward_list<_Tp, _Alloc>::
     operator=(const forward_list& __list)
     {
       if (&__list != this)
-       {
-         iterator __prev1 = before_begin();
-         iterator __curr1 = begin();
-         iterator __last1 = end();
-         const_iterator __first2 = __list.cbegin();
-         const_iterator __last2 = __list.cend();
-         while (__curr1 != __last1 && __first2 != __last2)
-           {
-             *__curr1 = *__first2;
-             ++__prev1;
-             ++__curr1;
-             ++__first2;
-           }
-         if (__first2 == __last2)
-           erase_after(__prev1, __last1);
-         else
-           insert_after(__prev1, __first2, __last2);
-       }
+        {
+          iterator __prev1 = before_begin();
+          iterator __curr1 = begin();
+          iterator __last1 = end();
+          const_iterator __first2 = __list.cbegin();
+          const_iterator __last2 = __list.cend();
+          while (__curr1 != __last1 && __first2 != __last2)
+            {
+              *__curr1 = *__first2;
+              ++__prev1;
+              ++__curr1;
+              ++__first2;
+            }
+          if (__first2 == __last2)
+            erase_after(__prev1, __last1);
+          else
+            insert_after(__prev1, __first2, __last2);
+        }
       return *this;
     }
 
   template<typename _Tp, typename _Alloc>
     void
     forward_list<_Tp, _Alloc>::
-    resize(size_type __sz, value_type __val)
+    resize(size_type __sz)
     {
       iterator __k = before_begin();
 
       size_type __len = 0;
       while (__k._M_next() != end() && __len < __sz)
+        {
+          ++__k;
+          ++__len;
+        }
+      if (__len == __sz)
+        erase_after(__k, end());
+      else
        {
-         ++__k;
-         ++__len;
+         forward_list __tmp(__sz - __len);
+         splice_after(__k, std::move(__tmp));
        }
+    }
+
+  template<typename _Tp, typename _Alloc>
+    void
+    forward_list<_Tp, _Alloc>::
+    resize(size_type __sz, value_type __val)
+    {
+      iterator __k = before_begin();
+
+      size_type __len = 0;
+      while (__k._M_next() != end() && __len < __sz)
+        {
+          ++__k;
+          ++__len;
+        }
       if (__len == __sz)
-       erase_after(__k, end());
+        erase_after(__k, end());
       else
-       insert_after(__k, __sz - __len, __val);
+        insert_after(__k, __sz - __len, __val);
+    }
+
+  template<typename _Tp, typename _Alloc>
+    typename forward_list<_Tp, _Alloc>::iterator
+    forward_list<_Tp, _Alloc>::
+    _M_splice_after(const_iterator __pos, forward_list&& __list)
+    {
+      _Node_base* __tmp = const_cast<_Node_base*>(__pos._M_node);
+      iterator __before = __list.before_begin();
+      return iterator(__tmp->_M_transfer_after(__before._M_node));
     }
 
   template<typename _Tp, typename _Alloc>
     void
     forward_list<_Tp, _Alloc>::
-    splice_after(const_iterator __pos, forward_list&& __list)
+    splice_after(const_iterator __pos, forward_list&&,
+                 const_iterator __before, const_iterator __last)
+    {
+      _Node_base* __tmp = const_cast<_Node_base*>(__pos._M_node);
+      __tmp->_M_transfer_after(const_cast<_Node_base*>(__before._M_node),
+                               const_cast<_Node_base*>(__last._M_node));
+    }
+
+  template<typename _Tp, typename _Alloc>
+    typename forward_list<_Tp, _Alloc>::iterator
+    forward_list<_Tp, _Alloc>::
+    insert_after(const_iterator __pos, size_type __n, const _Tp& __val)
     {
-      if (!__list.empty() && &__list != this)
+      if (__n)
        {
-         _Fwd_list_node_base* __tmp
-           = const_cast<_Fwd_list_node_base*>(__pos._M_node);
-         const_iterator __before = __list.cbefore_begin();
-         __tmp->_M_transfer_after(const_cast<_Fwd_list_node_base*>
-                                  (__before._M_node));
+         forward_list __tmp(__n, __val, this->_M_get_Node_allocator());
+         return _M_splice_after(__pos, std::move(__tmp));
        }
+      else
+       return iterator(const_cast<_Node_base*>(__pos._M_node));
     }
 
   template<typename _Tp, typename _Alloc>
-    void
+    template<typename _InputIterator>
+      typename forward_list<_Tp, _Alloc>::iterator
+      forward_list<_Tp, _Alloc>::
+      insert_after(const_iterator __pos,
+                  _InputIterator __first, _InputIterator __last)
+      {
+       forward_list __tmp(__first, __last, this->_M_get_Node_allocator());
+       if (!__tmp.empty())
+         return _M_splice_after(__pos, std::move(__tmp));
+       else
+         return iterator(const_cast<_Node_base*>(__pos._M_node));
+      }
+
+  template<typename _Tp, typename _Alloc>
+    typename forward_list<_Tp, _Alloc>::iterator
     forward_list<_Tp, _Alloc>::
-    splice_after(const_iterator __pos, forward_list&& __list,
-                const_iterator __before, const_iterator __last)
+    insert_after(const_iterator __pos, std::initializer_list<_Tp> __il)
     {
-      _Fwd_list_node_base* __tmp
-       = const_cast<_Fwd_list_node_base*>(__pos._M_node);
-      __tmp->_M_transfer_after(const_cast<_Fwd_list_node_base*>
-                              (__before._M_node),
-                              const_cast<_Fwd_list_node_base*>
-                              (__last._M_node));
+      if (__il.size())
+       {
+         forward_list __tmp(__il, this->_M_get_Node_allocator());
+         return _M_splice_after(__pos, std::move(__tmp));
+       }
+      else
+       return iterator(const_cast<_Node_base*>(__pos._M_node));
     }
 
   template<typename _Tp, typename _Alloc>
@@ -319,12 +272,12 @@ _GLIBCXX_BEGIN_NAMESPACE(std)
     {
       _Node* __curr = static_cast<_Node*>(&this->_M_impl._M_head);
       while (_Node* __temp = static_cast<_Node*>(__curr->_M_next))
-       {
-         if (__temp->_M_value == __val)
-           this->_M_erase_after(__curr);
-         else
-           __curr = static_cast<_Node*>(__curr->_M_next);
-       }
+        {
+          if (__temp->_M_value == __val)
+            this->_M_erase_after(__curr);
+          else
+            __curr = static_cast<_Node*>(__curr->_M_next);
+        }
     }
 
   template<typename _Tp, typename _Alloc>
@@ -334,13 +287,13 @@ _GLIBCXX_BEGIN_NAMESPACE(std)
       remove_if(_Pred __pred)
       {
        _Node* __curr = static_cast<_Node*>(&this->_M_impl._M_head);
-       while (_Node* __temp = static_cast<_Node*>(__curr->_M_next))
-         {
-           if (__pred(__temp->_M_value))
-             this->_M_erase_after(__curr);
-           else
-             __curr = static_cast<_Node*>(__curr->_M_next);
-         }
+        while (_Node* __temp = static_cast<_Node*>(__curr->_M_next))
+          {
+            if (__pred(__temp->_M_value))
+              this->_M_erase_after(__curr);
+            else
+              __curr = static_cast<_Node*>(__curr->_M_next);
+          }
       }
 
   template<typename _Tp, typename _Alloc>
@@ -352,16 +305,16 @@ _GLIBCXX_BEGIN_NAMESPACE(std)
         iterator __first = begin();
         iterator __last = end();
         if (__first == __last)
-         return;
+          return;
         iterator __next = __first;
         while (++__next != __last)
-       {
-         if (__binary_pred(*__first, *__next))
-           erase_after(__first);
-         else
-           __first = __next;
-         __next = __first;
-       }
+        {
+          if (__binary_pred(*__first, *__next))
+            erase_after(__first);
+          else
+            __first = __next;
+          __next = __first;
+        }
       }
 
   template<typename _Tp, typename _Alloc>
@@ -370,13 +323,13 @@ _GLIBCXX_BEGIN_NAMESPACE(std)
       forward_list<_Tp, _Alloc>::
       merge(forward_list&& __list, _Comp __comp)
       {
-        _Fwd_list_node_base* __node = &this->_M_impl._M_head;
+        _Node_base* __node = &this->_M_impl._M_head;
         while (__node->_M_next && __list._M_impl._M_head._M_next)
           {
             if (__comp(static_cast<_Node*>
-                      (__list._M_impl._M_head._M_next)->_M_value,
+                       (__list._M_impl._M_head._M_next)->_M_value,
                        static_cast<_Node*>
-                      (__node->_M_next)->_M_value))
+                       (__node->_M_next)->_M_value))
               __node->_M_transfer_after(&__list._M_impl._M_head,
                                         __list._M_impl._M_head._M_next);
             __node = __node->_M_next;
@@ -389,12 +342,6 @@ _GLIBCXX_BEGIN_NAMESPACE(std)
       }
 
   template<typename _Tp, typename _Alloc>
-    void
-    forward_list<_Tp, _Alloc>::
-    reverse()
-    { this->_M_impl._M_head._M_reverse_after(); }
-
-  template<typename _Tp, typename _Alloc>
     bool
     operator==(const forward_list<_Tp, _Alloc>& __lx,
                const forward_list<_Tp, _Alloc>& __ly)
@@ -416,6 +363,106 @@ _GLIBCXX_BEGIN_NAMESPACE(std)
         return false;
     }
 
+  template<typename _Tp, class _Alloc>
+    template<typename _Comp>
+      void
+      forward_list<_Tp, _Alloc>::
+      sort(_Comp __comp)
+      {
+        // If `next' is 0, return immediately.
+        _Node* __list = static_cast<_Node*>(this->_M_impl._M_head._M_next);
+        if (!__list)
+          return;
+
+        unsigned long __insize = 1;
+
+        while (1)
+          {
+            _Node* __p = __list;
+            __list = 0;
+            _Node* __tail = 0;
+
+            // Count number of merges we do in this pass.
+            unsigned long __nmerges = 0;
+
+            while (__p)
+              {
+                ++__nmerges;
+                // There exists a merge to be done.
+                // Step `insize' places along from p.
+                _Node* __q = __p;
+                unsigned long __psize = 0;
+                for (unsigned long __i = 0; __i < __insize; ++__i)
+                  {
+                    ++__psize;
+                    __q = static_cast<_Node*>(__q->_M_next);
+                    if (!__q)
+                      break;
+                  }
+
+                // If q hasn't fallen off end, we have two lists to merge.
+                unsigned long __qsize = __insize;
+
+                // Now we have two lists; merge them.
+                while (__psize > 0 || (__qsize > 0 && __q))
+                  {
+                    // Decide whether next node of merge comes from p or q.
+                    _Node* __e;
+                    if (__psize == 0)
+                      {
+                        // p is empty; e must come from q.
+                        __e = __q;
+                        __q = static_cast<_Node*>(__q->_M_next);
+                        --__qsize;
+                      }
+                    else if (__qsize == 0 || !__q)
+                      {
+                        // q is empty; e must come from p.
+                        __e = __p;
+                        __p = static_cast<_Node*>(__p->_M_next);
+                        --__psize;
+                      }
+                    else if (__comp(__p->_M_value, __q->_M_value))
+                      {
+                        // First node of p is lower; e must come from p.
+                        __e = __p;
+                        __p = static_cast<_Node*>(__p->_M_next);
+                        --__psize;
+                      }
+                    else
+                      {
+                        // First node of q is lower; e must come from q.
+                        __e = __q;
+                        __q = static_cast<_Node*>(__q->_M_next);
+                        --__qsize;
+                      }
+
+                    // Add the next node to the merged list.
+                    if (__tail)
+                      __tail->_M_next = __e;
+                    else
+                      __list = __e;
+                    __tail = __e;
+                  }
+
+                // Now p has stepped `insize' places along, and q has too.
+                __p = __q;
+              }
+            __tail->_M_next = 0;
+
+            // If we have done only one merge, we're finished.
+            // Allow for nmerges == 0, the empty list case.
+            if (__nmerges <= 1)
+              {
+                this->_M_impl._M_head._M_next = __list;
+                return;
+              }
+
+            // Otherwise repeat, merging lists twice the size.
+            __insize *= 2;
+          }
+      }
 _GLIBCXX_END_NAMESPACE // namespace std
 
 #endif /* _FORWARD_LIST_TCC */