admin/mlib
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add methods _find_again, _find_again_if, _mismatch_again and _mismatch_again_if

Browse Source
This commit is contained in:
Patrick Pelissier committed 2018-07-15 23:06:22 +02:00
1 parent 6721a86768
commit 4aca0664ef
1 file changed
+47 -22
Download Patch File Download Diff File Expand all files Collapse all files
m-algo.h
+47 -22
View File
@@ -92,16 +92,22 @@
\
/* It supposes that the container is not sorted */ \
static inline void \
M_C(name, _find) (it_t it, container_t l, type_t const data) \
M_C(name, _find_again) (it_t it, type_t const data) \
{ \
for (M_GET_IT_FIRST cont_oplist (it, l); \
!M_GET_IT_END_P cont_oplist (it) ; \
M_GET_IT_NEXT cont_oplist (it)) { \
for ( /*nothing*/ ; !M_GET_IT_END_P cont_oplist (it) ; \
M_GET_IT_NEXT cont_oplist (it)) { \
if (M_GET_EQUAL type_oplist (*M_GET_IT_CREF cont_oplist (it), data)) \
return ; \
} \
} \
\
static inline void \
M_C(name, _find) (it_t it, container_t l, type_t const data) \
{ \
M_GET_IT_FIRST cont_oplist (it, l); \
M_C(name, _find_again)(it, data); \
} \
\
static inline bool \
M_C(name, _contain_p) (container_t l, type_t const data) \
{ \
@@ -111,16 +117,22 @@
} \
\
static inline void \
M_C(name, _find_if) (it_t it, container_t l, bool (*func)(type_t const)) \
M_C(name, _find_again_if) (it_t it, bool (*func)(type_t const)) \
{ \
for (M_GET_IT_FIRST cont_oplist (it, l); \
!M_GET_IT_END_P cont_oplist (it) ; \
M_GET_IT_NEXT cont_oplist (it)) { \
for (/*nothing */ ; !M_GET_IT_END_P cont_oplist (it) ; \
M_GET_IT_NEXT cont_oplist (it)) { \
if (func (*M_GET_IT_CREF cont_oplist (it))) \
return ; \
} \
} \
\
static inline void \
M_C(name, _find_if) (it_t it, container_t l, bool (*func)(type_t const)) \
{ \
M_GET_IT_FIRST cont_oplist (it, l); \
M_C(name, _find_again_if)(it, func); \
} \
\
/* For the definition of _find_last, if the methods \
PREVIOUS & IT_LAST are defined, then search backwards */ \
M_IF_METHOD2(PREVIOUS, IT_LAST, cont_oplist) \
@@ -182,14 +194,12 @@
} \
\
static inline void \
M_C(name, _mismatch) (it_t it1, it_t it2, container_t l1, container_t l2 ) \
M_C(name, _mismatch_again) (it_t it1, it_t it2) \
{ \
for (M_GET_IT_FIRST cont_oplist (it1, l1), \
M_GET_IT_FIRST cont_oplist (it2, l2); \
!M_GET_IT_END_P cont_oplist (it1) && \
!M_GET_IT_END_P cont_oplist (it2); \
M_GET_IT_NEXT cont_oplist (it1), \
M_GET_IT_NEXT cont_oplist (it2)) { \
for (/* nothing */ ; !M_GET_IT_END_P cont_oplist (it1) && \
!M_GET_IT_END_P cont_oplist (it2); \
M_GET_IT_NEXT cont_oplist (it1), \
M_GET_IT_NEXT cont_oplist (it2)) { \
if (!M_GET_EQUAL type_oplist (*M_GET_IT_CREF cont_oplist (it1), \
*M_GET_IT_CREF cont_oplist (it2))) \
break; \
@@ -197,14 +207,20 @@
} \
\
static inline void \
M_C(name, _mismatch_if) (it_t it1, it_t it2, container_t l1, container_t l2, bool (*func)(type_t const, type_t const) ) \
M_C(name, _mismatch) (it_t it1, it_t it2, container_t l1, container_t l2 ) \
{ \
for (M_GET_IT_FIRST cont_oplist (it1, l1), \
M_GET_IT_FIRST cont_oplist (it2, l2); \
!M_GET_IT_END_P cont_oplist (it1) && \
!M_GET_IT_END_P cont_oplist (it2); \
M_GET_IT_NEXT cont_oplist (it1), \
M_GET_IT_NEXT cont_oplist (it2)) { \
M_GET_IT_FIRST cont_oplist (it1, l1); \
M_GET_IT_FIRST cont_oplist (it2, l2); \
M_C(name, _mismatch_again)(it1, it2); \
} \
\
static inline void \
M_C(name, _mismatch_again_if) (it_t it1, it_t it2, bool (*func)(type_t const, type_t const) ) \
{ \
for (/*nothing */ ; !M_GET_IT_END_P cont_oplist (it1) && \
!M_GET_IT_END_P cont_oplist (it2); \
M_GET_IT_NEXT cont_oplist (it1), \
M_GET_IT_NEXT cont_oplist (it2)) { \
if (!func (*M_GET_IT_CREF cont_oplist (it1), \
*M_GET_IT_CREF cont_oplist (it2))) \
break; \
@@ -212,6 +228,15 @@
} \
\
static inline void \
M_C(name, _mismatch_if) (it_t it1, it_t it2, container_t l1, \
container_t l2, bool (*func)(type_t const, type_t const) ) \
{ \
M_GET_IT_FIRST cont_oplist (it1, l1); \
M_GET_IT_FIRST cont_oplist (it2, l2); \
M_C(name, _mismatch_again_if)(it1, it2, func); \
} \
\
static inline void \
M_C(name, _map) (container_t l, void (*f)(type_t const) ) \
{ \
for M_EACH(item, l, cont_oplist) { \