xref: /netbsd-src/external/gpl3/gcc/dist/libstdc++-v3/include/debug/macros.h (revision b1e838363e3c6fc78a55519254d99869742dd33c)
1 // Debugging support implementation -*- C++ -*-
2 
3 // Copyright (C) 2003-2022 Free Software Foundation, Inc.
4 //
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
7 // terms of the GNU General Public License as published by the
8 // Free Software Foundation; either version 3, or (at your option)
9 // any later version.
10 
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 // GNU General Public License for more details.
15 
16 // Under Section 7 of GPL version 3, you are granted additional
17 // permissions described in the GCC Runtime Library Exception, version
18 // 3.1, as published by the Free Software Foundation.
19 
20 // You should have received a copy of the GNU General Public License and
21 // a copy of the GCC Runtime Library Exception along with this program;
22 // see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
23 // <http://www.gnu.org/licenses/>.
24 
25 /** @file debug/macros.h
26  *  This file is a GNU debug extension to the Standard C++ Library.
27  */
28 
29 #ifndef _GLIBCXX_DEBUG_MACROS_H
30 #define _GLIBCXX_DEBUG_MACROS_H 1
31 
32 /**
33  * Macros used by the implementation to verify certain
34  * properties. These macros may only be used directly by the debug
35  * wrappers. Note that these are macros (instead of the more obviously
36  * @a correct choice of making them functions) because we need line and
37  * file information at the call site, to minimize the distance between
38  * the user error and where the error is reported.
39  *
40  */
41 #define _GLIBCXX_DEBUG_VERIFY_COND_AT(_Cond,_ErrMsg,_File,_Line,_Func)	\
42   if (__builtin_expect(!bool(_Cond), false))				\
43     __gnu_debug::_Error_formatter::_S_at(_File, _Line, _Func)		\
44       ._ErrMsg._M_error()
45 
46 #define _GLIBCXX_DEBUG_VERIFY_AT_F(_Cond,_ErrMsg,_File,_Line,_Func)	\
47   do {									\
48     __glibcxx_constexpr_assert(_Cond);					\
49     _GLIBCXX_DEBUG_VERIFY_COND_AT(_Cond,_ErrMsg,_File,_Line,_Func);	\
50   } while (false)
51 
52 #define _GLIBCXX_DEBUG_VERIFY_AT(_Cond,_ErrMsg,_File,_Line)		\
53   _GLIBCXX_DEBUG_VERIFY_AT_F(_Cond,_ErrMsg,_File,_Line,__PRETTY_FUNCTION__)
54 
55 #define _GLIBCXX_DEBUG_VERIFY(_Cond,_ErrMsg)				\
56   _GLIBCXX_DEBUG_VERIFY_AT_F(_Cond, _ErrMsg, __FILE__, __LINE__,	\
57 			     __PRETTY_FUNCTION__)
58 
59 // Verify that [_First, _Last) forms a valid iterator range.
60 #define __glibcxx_check_valid_range(_First,_Last)			\
61 _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__valid_range(_First, _Last),	\
62 		      _M_message(__gnu_debug::__msg_valid_range)	\
63 		      ._M_iterator(_First, #_First)			\
64 		      ._M_iterator(_Last, #_Last))
65 
66 #define __glibcxx_check_valid_range_at(_First,_Last,_File,_Line,_Func)	\
67 _GLIBCXX_DEBUG_VERIFY_AT_F(__gnu_debug::__valid_range(_First, _Last),	\
68 			   _M_message(__gnu_debug::__msg_valid_range)	\
69 			   ._M_iterator(_First, #_First)		\
70 			   ._M_iterator(_Last, #_Last),			\
71 			   _File,_Line,_Func)
72 
73 #define __glibcxx_check_valid_range2(_First,_Last,_Dist)		\
74 _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__valid_range(_First, _Last, _Dist),	\
75 		      _M_message(__gnu_debug::__msg_valid_range)	\
76 		      ._M_iterator(_First, #_First)			\
77 		      ._M_iterator(_Last, #_Last))
78 
79 #define __glibcxx_check_valid_constructor_range(_First,_Last)		\
80   __gnu_debug::__check_valid_range(_First, _Last,			\
81 				   __FILE__, __LINE__, __PRETTY_FUNCTION__)
82 
83 // Verify that [_First, _Last) forms a non-empty iterator range.
84 #define __glibcxx_check_non_empty_range(_First,_Last)			\
85 _GLIBCXX_DEBUG_VERIFY(_First != _Last,					\
86 		      _M_message(__gnu_debug::__msg_non_empty_range)	\
87 		      ._M_iterator(_First, #_First)			\
88 		      ._M_iterator(_Last, #_Last))
89 
90 // Verify that [_First, _First + _Size) forms a valid range.
91 #define __glibcxx_check_can_increment(_First,_Size)			\
92 _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__can_advance(_First, _Size),	\
93 		      _M_message(__gnu_debug::__msg_iter_subscript_oob)	\
94 		      ._M_iterator(_First, #_First)			\
95 		      ._M_integer(_Size, #_Size))
96 
97 #define __glibcxx_check_can_increment_dist(_First,_Dist,_Way)		\
98   _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__can_advance(_First, _Dist, _Way), \
99 		      _M_message(__gnu_debug::__msg_iter_subscript_oob)	\
100 		      ._M_iterator(_First, #_First)			\
101 		      ._M_integer(_Way * _Dist.first, #_Dist))
102 
103 #define __glibcxx_check_can_increment_range(_First1,_Last1,_First2)	\
104   do									\
105   {									\
106     typename __gnu_debug::_Distance_traits<__decltype(_First1)>::__type __dist;\
107     _GLIBCXX_DEBUG_VERIFY_AT_F(						\
108 			__gnu_debug::__valid_range(_First1, _Last1, __dist),\
109 			_M_message(__gnu_debug::__msg_valid_range)	\
110 			._M_iterator(_First1, #_First1)			\
111 			._M_iterator(_Last1, #_Last1),			\
112 			__FILE__,__LINE__,__PRETTY_FUNCTION__);		\
113     _GLIBCXX_DEBUG_VERIFY_AT_F(						\
114 			__gnu_debug::__can_advance(_First2, __dist, 1), \
115 			_M_message(__gnu_debug::__msg_iter_subscript_oob)\
116 			._M_iterator(_First2, #_First2)			\
117 			._M_integer(__dist.first),			\
118 			__FILE__,__LINE__,__PRETTY_FUNCTION__);		\
119   } while(false)
120 
121 #define __glibcxx_check_can_decrement_range(_First1,_Last1,_First2)	\
122   do									\
123   {									\
124     typename __gnu_debug::_Distance_traits<__decltype(_First1)>::__type __dist;\
125     _GLIBCXX_DEBUG_VERIFY_AT_F(						\
126 			__gnu_debug::__valid_range(_First1, _Last1, __dist),\
127 			_M_message(__gnu_debug::__msg_valid_range)	\
128 			._M_iterator(_First1, #_First1)			\
129 			._M_iterator(_Last1, #_Last1),			\
130 			__FILE__,__LINE__,__PRETTY_FUNCTION__);		\
131     _GLIBCXX_DEBUG_VERIFY_AT_F(						\
132 			__gnu_debug::__can_advance(_First2, __dist, -1), \
133 			_M_message(__gnu_debug::__msg_iter_subscript_oob)\
134 			._M_iterator(_First2, #_First2)			\
135 			._M_integer(-__dist.first),			\
136 			__FILE__,__LINE__,__PRETTY_FUNCTION__);		\
137   } while(false)
138 
139 /** Verify that we can insert into *this with the iterator _Position.
140  *  Insertion into a container at a specific position requires that
141  *  the iterator be nonsingular, either dereferenceable or past-the-end,
142  *  and that it reference the sequence we are inserting into. Note that
143  *  this macro is only valid when the container is a_Safe_sequence and
144  *  the iterator is a _Safe_iterator.
145 */
146 #define __glibcxx_check_insert(_Position)				\
147 _GLIBCXX_DEBUG_VERIFY(!_Position._M_singular(),				\
148 		      _M_message(__gnu_debug::__msg_insert_singular)	\
149 		      ._M_sequence(*this, "this")			\
150 		      ._M_iterator(_Position, #_Position));		\
151 _GLIBCXX_DEBUG_VERIFY(_Position._M_attached_to(this),			\
152 		      _M_message(__gnu_debug::__msg_insert_different)	\
153 		      ._M_sequence(*this, "this")			\
154 		      ._M_iterator(_Position, #_Position))
155 
156 /** Verify that we can insert into *this after the iterator _Position.
157  *  Insertion into a container after a specific position requires that
158  *  the iterator be nonsingular, either dereferenceable or before-begin,
159  *  and that it reference the sequence we are inserting into. Note that
160  *  this macro is only valid when the container is a_Safe_sequence and
161  *  the iterator is a _Safe_iterator.
162 */
163 #define __glibcxx_check_insert_after(_Position)				\
164 __glibcxx_check_insert(_Position);					\
165 _GLIBCXX_DEBUG_VERIFY(!_Position._M_is_end(),				\
166 		      _M_message(__gnu_debug::__msg_insert_after_end)	\
167 		      ._M_sequence(*this, "this")			\
168 		      ._M_iterator(_Position, #_Position))
169 
170 /** Verify that we can insert the values in the iterator range
171  *  [_First, _Last) into *this with the iterator _Position.  Insertion
172  *  into a container at a specific position requires that the iterator
173  *  be nonsingular (i.e., either dereferenceable or past-the-end),
174  *  that it reference the sequence we are inserting into, and that the
175  *  iterator range [_First, _Last) is a valid (possibly empty)
176  *  range which does not reference the sequence we are inserting into.
177  *  Note that this macro is only valid when the container is a
178  *  _Safe_sequence and the _Position iterator is a _Safe_iterator.
179 */
180 #define __glibcxx_check_insert_range(_Position,_First,_Last,_Dist)	\
181 __glibcxx_check_valid_range2(_First,_Last,_Dist);			\
182 __glibcxx_check_insert(_Position);					\
183 _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__foreign_iterator(_Position,_First,_Last),\
184 		      _M_message(__gnu_debug::__msg_insert_range_from_self)\
185 		      ._M_iterator(_First, #_First)			\
186 		      ._M_iterator(_Last, #_Last)			\
187 		      ._M_sequence(*this, "this"))
188 
189 /** Verify that we can insert the values in the iterator range
190  *  [_First, _Last) into *this after the iterator _Position.  Insertion
191  *  into a container after a specific position requires that the iterator
192  *  be nonsingular (i.e., either dereferenceable or past-the-end),
193  *  that it reference the sequence we are inserting into, and that the
194  *  iterator range [_First, _Last) is a valid (possibly empty)
195  *  range which does not reference the sequence we are inserting into.
196  *  Note that this macro is only valid when the container is a
197  *  _Safe_sequence and the _Position iterator is a _Safe_iterator.
198 */
199 #define __glibcxx_check_insert_range_after(_Position,_First,_Last,_Dist)\
200 __glibcxx_check_valid_range2(_First,_Last,_Dist);			\
201 __glibcxx_check_insert_after(_Position);				\
202 _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__foreign_iterator(_Position,_First,_Last),\
203 		      _M_message(__gnu_debug::__msg_insert_range_from_self)\
204 		      ._M_iterator(_First, #_First)			\
205 		      ._M_iterator(_Last, #_Last)			\
206 		      ._M_sequence(*this, "this"))
207 
208 /** Verify that we can erase the element referenced by the iterator
209  * _Position. We can erase the element if the _Position iterator is
210  * dereferenceable and references this sequence.
211 */
212 #define __glibcxx_check_erase(_Position)				\
213 _GLIBCXX_DEBUG_VERIFY(_Position._M_dereferenceable(),			\
214 		      _M_message(__gnu_debug::__msg_erase_bad)		\
215 		      ._M_sequence(*this, "this")			\
216 		      ._M_iterator(_Position, #_Position));		\
217 _GLIBCXX_DEBUG_VERIFY(_Position._M_attached_to(this),			\
218 		      _M_message(__gnu_debug::__msg_erase_different)    \
219 		      ._M_sequence(*this, "this")			\
220 		      ._M_iterator(_Position, #_Position))
221 
222 #if __cplusplus >= 201103L
223 # define __glibcxx_check_erase2(_CPosition)				\
224 _GLIBCXX_DEBUG_VERIFY(_CPosition != _M_base().cend(),			\
225 		      _M_message(__gnu_debug::__msg_erase_bad)		\
226 		      ._M_sequence(*this, "this")			\
227 		      ._M_iterator(_CPosition, #_CPosition));
228 #endif
229 
230 /** Verify that we can erase the element after the iterator
231  * _Position. We can erase the element if the _Position iterator is
232  * before a dereferenceable one and references this sequence.
233 */
234 #define __glibcxx_check_erase_after(_Position)				\
235 _GLIBCXX_DEBUG_VERIFY(_Position._M_before_dereferenceable(),		\
236 		      _M_message(__gnu_debug::__msg_erase_after_bad)	\
237 		      ._M_sequence(*this, "this")			\
238 		      ._M_iterator(_Position, #_Position));		\
239 _GLIBCXX_DEBUG_VERIFY(_Position._M_attached_to(this),			\
240 		      _M_message(__gnu_debug::__msg_erase_different)	\
241 		      ._M_sequence(*this, "this")			\
242 		      ._M_iterator(_Position, #_Position))
243 
244 /** Verify that we can erase the elements in the iterator range
245  *  [_First, _Last). We can erase the elements if [_First, _Last) is a
246  *  valid iterator range within this sequence.
247 */
248 #define __glibcxx_check_erase_range(_First,_Last)			\
249 __glibcxx_check_valid_range(_First,_Last);				\
250 _GLIBCXX_DEBUG_VERIFY(_First._M_attached_to(this),			\
251 		      _M_message(__gnu_debug::__msg_erase_different)    \
252 		      ._M_sequence(*this, "this")			\
253 		      ._M_iterator(_First, #_First)			\
254 		      ._M_iterator(_Last, #_Last))
255 
256 /** Verify that we can erase the elements in the iterator range
257  *  (_First, _Last). We can erase the elements if (_First, _Last) is a
258  *  valid iterator range within this sequence.
259 */
260 #define __glibcxx_check_erase_range_after(_First,_Last)			\
261 _GLIBCXX_DEBUG_VERIFY(!_First._M_singular() && !_Last._M_singular(),	\
262 		      _M_message(__gnu_debug::__msg_erase_different)	\
263 		      ._M_sequence(*this, "this")			\
264 		      ._M_iterator(_First, #_First)			\
265 		      ._M_iterator(_Last, #_Last));			\
266 _GLIBCXX_DEBUG_VERIFY(_First._M_can_compare(_Last),			\
267 		      _M_message(__gnu_debug::__msg_erase_different)	\
268 		      ._M_sequence(*this, "this")			\
269 		      ._M_iterator(_First, #_First)			\
270 		      ._M_iterator(_Last, #_Last));			\
271 _GLIBCXX_DEBUG_VERIFY(_First._M_attached_to(this),			\
272 		      _M_message(__gnu_debug::__msg_erase_different)	\
273 		      ._M_sequence(*this, "this")			\
274 		      ._M_iterator(_First, #_First));			\
275 _GLIBCXX_DEBUG_VERIFY(_First != _Last,					\
276 		      _M_message(__gnu_debug::__msg_valid_range2)	\
277 		      ._M_sequence(*this, "this")			\
278 		      ._M_iterator(_First, #_First)			\
279 		      ._M_iterator(_Last, #_Last));			\
280 _GLIBCXX_DEBUG_VERIFY(_First._M_incrementable(),			\
281 		      _M_message(__gnu_debug::__msg_valid_range2)	\
282 		      ._M_sequence(*this, "this")			\
283 		      ._M_iterator(_First, #_First)			\
284 		      ._M_iterator(_Last, #_Last));			\
285 _GLIBCXX_DEBUG_VERIFY(!_Last._M_is_before_begin(),			\
286 		      _M_message(__gnu_debug::__msg_valid_range2)	\
287 		      ._M_sequence(*this, "this")			\
288 		      ._M_iterator(_First, #_First)			\
289 		      ._M_iterator(_Last, #_Last))			\
290 
291 // Verify that the subscript _N is less than the container's size.
292 #define __glibcxx_check_subscript(_N)					\
293 _GLIBCXX_DEBUG_VERIFY(_N < this->size(),				\
294 		      _M_message(__gnu_debug::__msg_subscript_oob)	\
295 		      ._M_sequence(*this, "this")			\
296 		      ._M_integer(_N, #_N)				\
297 		      ._M_integer(this->size(), "size"))
298 
299 // Verify that the bucket _N is less than the container's buckets count.
300 #define __glibcxx_check_bucket_index(_N)				\
301 _GLIBCXX_DEBUG_VERIFY(_N < this->bucket_count(),			\
302 		      _M_message(__gnu_debug::__msg_bucket_index_oob)	\
303 		      ._M_sequence(*this, "this")			\
304 		      ._M_integer(_N, #_N)				\
305 		      ._M_integer(this->bucket_count(), "size"))
306 
307 // Verify that the container is nonempty
308 #define __glibcxx_check_nonempty()					\
309 _GLIBCXX_DEBUG_VERIFY(! this->empty(),					\
310 		      _M_message(__gnu_debug::__msg_empty)		\
311 		      ._M_sequence(*this, "this"))
312 
313 // Verify that a predicate is irreflexive
314 #define __glibcxx_check_irreflexive(_First,_Last)			\
315   _GLIBCXX_DEBUG_VERIFY(_First == _Last || !(*_First < *_First),	\
316 			_M_message(__gnu_debug::__msg_irreflexive_ordering) \
317 			._M_iterator_value_type(_First, "< operator type"))
318 
319 #if __cplusplus >= 201103L
320 # define __glibcxx_check_irreflexive2(_First,_Last)			\
321   _GLIBCXX_DEBUG_VERIFY(_First == _Last					\
322 			|| __gnu_debug::__is_irreflexive(_First),	\
323 			_M_message(__gnu_debug::__msg_irreflexive_ordering) \
324 			._M_iterator_value_type(_First, "< operator type"))
325 #else
326 # define __glibcxx_check_irreflexive2(_First,_Last)
327 #endif
328 
329 #define __glibcxx_check_irreflexive_pred(_First,_Last,_Pred)		\
330   _GLIBCXX_DEBUG_VERIFY(_First == _Last || !_Pred(*_First, *_First),	\
331 			_M_message(__gnu_debug::__msg_irreflexive_ordering) \
332 			._M_instance(_Pred, "functor")			\
333 			._M_iterator_value_type(_First, "ordered type"))
334 
335 #if __cplusplus >= 201103L
336 # define __glibcxx_check_irreflexive_pred2(_First,_Last,_Pred)		\
337   _GLIBCXX_DEBUG_VERIFY(_First == _Last					\
338 			||__gnu_debug::__is_irreflexive_pred(_First, _Pred), \
339 			_M_message(__gnu_debug::__msg_irreflexive_ordering) \
340 			._M_instance(_Pred, "functor")			\
341 			._M_iterator_value_type(_First, "ordered type"))
342 #else
343 # define __glibcxx_check_irreflexive_pred2(_First,_Last,_Pred)
344 #endif
345 
346 // Verify that the iterator range [_First, _Last) is sorted
347 #define __glibcxx_check_sorted(_First,_Last)				\
348 __glibcxx_check_valid_range(_First,_Last);				\
349 __glibcxx_check_irreflexive(_First,_Last);				\
350  _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__check_sorted(			\
351 			__gnu_debug::__base(_First),			\
352 			__gnu_debug::__base(_Last)),			\
353 		      _M_message(__gnu_debug::__msg_unsorted)		\
354 		      ._M_iterator(_First, #_First)			\
355 		      ._M_iterator(_Last, #_Last))
356 
357 /** Verify that the iterator range [_First, _Last) is sorted by the
358     predicate _Pred. */
359 #define __glibcxx_check_sorted_pred(_First,_Last,_Pred)			\
360 __glibcxx_check_valid_range(_First,_Last);				\
361 __glibcxx_check_irreflexive_pred(_First,_Last,_Pred);			\
362 _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__check_sorted(			\
363 			__gnu_debug::__base(_First),			\
364 			__gnu_debug::__base(_Last), _Pred),		\
365 		      _M_message(__gnu_debug::__msg_unsorted_pred)      \
366 		      ._M_iterator(_First, #_First)			\
367 		      ._M_iterator(_Last, #_Last)			\
368 		      ._M_string(#_Pred))
369 
370 // Special variant for std::merge, std::includes, std::set_*
371 #define __glibcxx_check_sorted_set(_First1,_Last1,_First2)		\
372 __glibcxx_check_valid_range(_First1,_Last1);				\
373 _GLIBCXX_DEBUG_VERIFY(							\
374   __gnu_debug::__check_sorted_set(__gnu_debug::__base(_First1),		\
375 				  __gnu_debug::__base(_Last1), _First2),\
376   _M_message(__gnu_debug::__msg_unsorted)				\
377   ._M_iterator(_First1, #_First1)					\
378   ._M_iterator(_Last1, #_Last1))
379 
380 // Likewise with a _Pred.
381 #define __glibcxx_check_sorted_set_pred(_First1,_Last1,_First2,_Pred)	\
382 __glibcxx_check_valid_range(_First1,_Last1);				\
383 _GLIBCXX_DEBUG_VERIFY(							\
384   __gnu_debug::__check_sorted_set(__gnu_debug::__base(_First1),		\
385 				  __gnu_debug::__base(_Last1),		\
386 				  _First2, _Pred),			\
387   _M_message(__gnu_debug::__msg_unsorted_pred)				\
388   ._M_iterator(_First1, #_First1)					\
389   ._M_iterator(_Last1, #_Last1)						\
390   ._M_string(#_Pred))
391 
392 /** Verify that the iterator range [_First, _Last) is partitioned
393     w.r.t. the value _Value. */
394 #define __glibcxx_check_partitioned_lower(_First,_Last,_Value)		\
395 __glibcxx_check_valid_range(_First,_Last);				\
396 _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__check_partitioned_lower(		\
397 			__gnu_debug::__base(_First),			\
398 			__gnu_debug::__base(_Last), _Value),		\
399 		      _M_message(__gnu_debug::__msg_unpartitioned)      \
400 		      ._M_iterator(_First, #_First)			\
401 		      ._M_iterator(_Last, #_Last)			\
402 		      ._M_string(#_Value))
403 
404 #define __glibcxx_check_partitioned_upper(_First,_Last,_Value)		\
405 __glibcxx_check_valid_range(_First,_Last);				\
406 _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__check_partitioned_upper(		\
407 			__gnu_debug::__base(_First),			\
408 			__gnu_debug::__base(_Last), _Value),		\
409 		      _M_message(__gnu_debug::__msg_unpartitioned)      \
410 		      ._M_iterator(_First, #_First)			\
411 		      ._M_iterator(_Last, #_Last)			\
412 		      ._M_string(#_Value))
413 
414 /** Verify that the iterator range [_First, _Last) is partitioned
415     w.r.t. the value _Value and predicate _Pred. */
416 #define __glibcxx_check_partitioned_lower_pred(_First,_Last,_Value,_Pred) \
417 __glibcxx_check_valid_range(_First,_Last);				\
418 _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__check_partitioned_lower(		\
419 			__gnu_debug::__base(_First),			\
420 			__gnu_debug::__base(_Last), _Value, _Pred),	\
421 		      _M_message(__gnu_debug::__msg_unpartitioned_pred) \
422 		      ._M_iterator(_First, #_First)			\
423 		      ._M_iterator(_Last, #_Last)			\
424 		      ._M_string(#_Pred)				\
425 		      ._M_string(#_Value))
426 
427 /** Verify that the iterator range [_First, _Last) is partitioned
428     w.r.t. the value _Value and predicate _Pred. */
429 #define __glibcxx_check_partitioned_upper_pred(_First,_Last,_Value,_Pred) \
430 __glibcxx_check_valid_range(_First,_Last);				\
431 _GLIBCXX_DEBUG_VERIFY(__gnu_debug::__check_partitioned_upper(		\
432 			__gnu_debug::__base(_First),			\
433 			__gnu_debug::__base(_Last), _Value, _Pred),	\
434 		      _M_message(__gnu_debug::__msg_unpartitioned_pred) \
435 		      ._M_iterator(_First, #_First)			\
436 		      ._M_iterator(_Last, #_Last)			\
437 		      ._M_string(#_Pred)				\
438 		      ._M_string(#_Value))
439 
440 // Verify that the iterator range [_First, _Last) is a heap
441 #define __glibcxx_check_heap(_First,_Last)				\
442   _GLIBCXX_DEBUG_VERIFY(std::__is_heap(__gnu_debug::__base(_First),	\
443 				       __gnu_debug::__base(_Last)),	\
444 		      _M_message(__gnu_debug::__msg_not_heap)		\
445 		      ._M_iterator(_First, #_First)			\
446 		      ._M_iterator(_Last, #_Last))
447 
448 /** Verify that the iterator range [_First, _Last) is a heap
449     w.r.t. the predicate _Pred. */
450 #define __glibcxx_check_heap_pred(_First,_Last,_Pred)			\
451   _GLIBCXX_DEBUG_VERIFY(std::__is_heap(__gnu_debug::__base(_First),	\
452 				       __gnu_debug::__base(_Last),	\
453 				       _Pred),				\
454 		      _M_message(__gnu_debug::__msg_not_heap_pred)      \
455 		      ._M_iterator(_First, #_First)			\
456 		      ._M_iterator(_Last, #_Last)			\
457 		      ._M_string(#_Pred))
458 
459 // Verify that load factor is positive
460 #define __glibcxx_check_max_load_factor(_F)				\
461 _GLIBCXX_DEBUG_VERIFY(_F > 0.0f,					\
462 		      _M_message(__gnu_debug::__msg_valid_load_factor)	\
463 		      ._M_sequence(*this, "this"))
464 
465 #define __glibcxx_check_equal_allocs(_This, _Other)			\
466 _GLIBCXX_DEBUG_VERIFY(_This.get_allocator() == _Other.get_allocator(),	\
467 		      _M_message(__gnu_debug::__msg_equal_allocs)	\
468 		      ._M_sequence(_This, "this"))
469 
470 #define __glibcxx_check_string(_String) _GLIBCXX_DEBUG_PEDASSERT(_String != 0)
471 #define __glibcxx_check_string_len(_String,_Len) \
472   _GLIBCXX_DEBUG_PEDASSERT(_String != 0 || _Len == 0)
473 
474 #endif
475