3 // Copyright (C) 2005, 2006 Free Software Foundation, Inc.
5 // This file is part of the GNU ISO C++ Library. This library is free
6 // software; you can redistribute it and/or modify it under the terms
7 // of the GNU General Public License as published by the Free Software
8 // Foundation; either version 2, or (at your option) any later
11 // This library is distributed in the hope that it will be useful, but
12 // WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // General Public License for more details.
16 // You should have received a copy of the GNU General Public License
17 // along with this library; see the file COPYING. If not, write to
18 // the Free Software Foundation, 59 Temple Place - Suite 330, Boston,
19 // MA 02111-1307, USA.
21 // As a special exception, you may use this file as part of a free
22 // software library without restriction. Specifically, if other files
23 // instantiate templates or use macros or inline functions from this
24 // file, or you compile this file and link it with other files to
25 // produce an executable, this file does not by itself cause the
26 // resulting executable to be covered by the GNU General Public
27 // License. This exception does not however invalidate any other
28 // reasons why the executable file might be covered by the GNU General
31 // Copyright (C) 2004 Ami Tavory and Vladimir Dreizin, IBM-HRL.
33 // Permission to use, copy, modify, sell, and distribute this software
34 // is hereby granted without fee, provided that the above copyright
35 // notice appears in all copies, and that both that copyright notice
36 // and this permission notice appear in supporting documentation. None
37 // of the above authors, nor IBM Haifa Research Laboratories, make any
38 // representation about the suitability of this software for any
39 // purpose. It is provided "as is" without express or implied
43 * @file split_join_fn_imps.hpp
44 * Contains an implementation class for a base of binomial heaps.
48 template<typename Pred
>
51 split(Pred pred
, PB_DS_CLASS_C_DEC
& other
)
53 _GLIBCXX_DEBUG_ONLY(assert_valid(true);)
54 _GLIBCXX_DEBUG_ONLY(other
.assert_valid(true);)
58 if (base_type::empty())
60 _GLIBCXX_DEBUG_ONLY(assert_valid(true);)
61 _GLIBCXX_DEBUG_ONLY(other
.assert_valid(true);)
66 base_type::to_linked_list();
68 node_pointer p_out
= base_type::prune(pred
);
72 _GLIBCXX_DEBUG_ASSERT(base_type::m_size
> 0);
77 node_pointer p_next
= p_out
->m_p_next_sibling
;
79 p_out
->m_p_l_child
= p_out
->m_p_prev_or_parent
= NULL
;
81 p_out
->m_metadata
= 0;
83 p_out
->m_p_next_sibling
= other
.m_p_root
;
85 if (other
.m_p_root
!= NULL
)
86 other
.m_p_root
->m_p_prev_or_parent
= p_out
;
88 other
.m_p_root
= p_out
;
90 other
.m_p_root
= other
.fix(other
.m_p_root
);
95 _GLIBCXX_DEBUG_ONLY(other
.assert_valid(true);)
97 node_pointer p_cur
= base_type::m_p_root
;
99 base_type::m_p_root
= NULL
;
101 while (p_cur
!= NULL
)
103 node_pointer p_next
= p_cur
->m_p_next_sibling
;
105 p_cur
->m_p_l_child
= p_cur
->m_p_prev_or_parent
= NULL
;
107 p_cur
->m_metadata
= 0;
109 p_cur
->m_p_next_sibling
= base_type::m_p_root
;
111 if (base_type::m_p_root
!= NULL
)
112 base_type::m_p_root
->m_p_prev_or_parent
= p_cur
;
114 base_type::m_p_root
= p_cur
;
116 base_type::m_p_root
= fix(base_type::m_p_root
);
123 _GLIBCXX_DEBUG_ONLY(assert_valid(true);)
124 _GLIBCXX_DEBUG_ONLY(other
.assert_valid(true);)
130 join(PB_DS_CLASS_C_DEC
& other
)
132 _GLIBCXX_DEBUG_ONLY(assert_valid(true);)
133 _GLIBCXX_DEBUG_ONLY(other
.assert_valid(true);)
135 node_pointer p_other
= other
.m_p_root
;
140 node_pointer p_next
= p_other
->m_p_next_sibling
;
142 std::swap(p_other
->m_p_next_sibling
, p_other
->m_p_prev_or_parent
);
146 while (p_other
!= NULL
);
148 base_type::m_p_root
= join(base_type::m_p_root
, other
.m_p_root
);
149 base_type::m_size
+= other
.m_size
;
152 other
.m_p_root
= NULL
;
154 other
.m_p_max
= NULL
;
156 _GLIBCXX_DEBUG_ONLY(assert_valid(true);)
157 _GLIBCXX_DEBUG_ONLY(other
.assert_valid(true);)
161 inline typename
PB_DS_CLASS_C_DEC::node_pointer
163 join(node_pointer p_lhs
, node_pointer p_rhs
) const
165 node_pointer p_ret
= NULL
;
167 node_pointer p_cur
= NULL
;
169 while (p_lhs
!= NULL
|| p_rhs
!= NULL
)
174 p_ret
= p_cur
= p_lhs
;
177 p_cur
->m_p_next_sibling
= p_lhs
;
179 p_lhs
->m_p_prev_or_parent
= p_cur
;
182 p_cur
= p_lhs
= NULL
;
184 else if (p_lhs
== NULL
|| p_rhs
->m_metadata
< p_lhs
->m_metadata
)
188 p_ret
= p_cur
= p_rhs
;
190 p_rhs
= p_rhs
->m_p_prev_or_parent
;
194 p_cur
->m_p_next_sibling
= p_rhs
;
196 p_rhs
= p_rhs
->m_p_prev_or_parent
;
198 p_cur
->m_p_next_sibling
->m_p_prev_or_parent
= p_cur
;
200 p_cur
= p_cur
->m_p_next_sibling
;
203 else if (p_lhs
->m_metadata
< p_rhs
->m_metadata
)
206 p_ret
= p_cur
= p_lhs
;
209 p_cur
->m_p_next_sibling
= p_lhs
;
211 p_lhs
->m_p_prev_or_parent
= p_cur
;
213 p_cur
= p_cur
->m_p_next_sibling
;
216 p_lhs
= p_cur
->m_p_next_sibling
;
220 node_pointer p_next_rhs
= p_rhs
->m_p_prev_or_parent
;
222 p_rhs
->m_p_next_sibling
= p_lhs
;
231 p_cur
->m_p_next_sibling
= NULL
;
234 p_ret
->m_p_prev_or_parent
= NULL
;