Make INIT_SET and SET operators optionals for deque

Author: P-p-H-d

README.md

@@ -2394,20 +2394,20 @@ The following methods of the common interface are defined (See [Common interface
 
 ```C
 void name_init(name_t deque)
-void name_init_set(name_t deque, const name_t ref)
-void name_set(name_t deque, const name_t ref)
+void name_init_set(name_t deque, const name_t ref) /* If INIT_SET operator is defined */
+void name_set(name_t deque, const name_t ref) /* If INIT_SET operator is defined */
 void name_init_move(name_t deque, name_t ref)
 void name_move(name_t deque, name_t ref)
 void name_clear(name_t deque)
 void name_reset(name_t deque)
 type *name_back(const name_t deque)
-void name_push_back(name_t deque, type value)
+void name_push_back(name_t deque, type value) /* If INIT_SET operator is defined */
 type *name_push_back_raw(name_t deque)
 type *name_push_back_new(name_t deque)
 void name_emplace_back[suffix](name_t list, args...)
 void name_pop_back(type *data, name_t deque)
 type *name_front(const name_t deque)
-void name_push_front(name_t deque, type value)
+void name_push_front(name_t deque, type value) /* If INIT_SET operator is defined */
 type *name_push_front_raw(name_t deque)
 type *name_push_front_new(name_t deque)
 void name_emplace_front[suffix](name_t list, args...)
@@ -2426,6 +2426,7 @@ const type *name_cref(const name_it_t it)
 void name_remove(name_t deque, name_it_t it)
 type *name_get(const name_t deque, size_t i)
 const type *name_cget(const name_t deque, size_t i)
+void name_set_at(name_t deque, size_t i, type const value) /* If SET operator is defined */
 size_t name_size(const name_t deque)
 void name_get_str(string_t str, const name_t deque, bool append)
 bool name_parse_str(name_t deque, const char str[], const char **endp)

m-deque.h

@@ -280,13 +280,15 @@
     return ret;                                                               \
   }                                                                           \
                                                                               \
+  M_IF_METHOD(INIT_SET, oplist)(                                              \
   M_P(void, name, _push_back, deque_t d, type const x)                        \
   {                                                                           \
     type *p = M_F(name, _push_back_raw)M_R(d);                                \
     M_ON_EXCEPTION(d->back->index --, d->count--) {                           \
       M_CALL_INIT_SET(oplist, *p, x);                                         \
     }                                                                         \
   }                                                                           \
+  , /* No INIT_SET */ )                                                       \
                                                                               \
   M_IF_METHOD(INIT, oplist)(                                                  \
   M_P(type *, name, _push_back_new, deque_t d)                                \
@@ -329,13 +331,15 @@
     return ret;                                                               \
   }                                                                           \
                                                                               \
+  M_IF_METHOD(INIT_SET, oplist)(                                              \
   M_P(void, name, _push_front, deque_t d, type const x)                       \
   {                                                                           \
     type *p = M_F(name, _push_front_raw)M_R(d);                               \
     M_ON_EXCEPTION(d->front->index ++, d->count--) {                          \
       M_CALL_INIT_SET(oplist, *p, x);                                         \
     }                                                                         \
   }                                                                           \
+  , /* No INIT_SET */ )                                                       \
                                                                               \
   M_IF_METHOD(INIT, oplist)(                                                  \
   M_P(type *, name, _push_front_new, deque_t d)                               \
@@ -713,6 +717,7 @@
     M_D3QU3_CONTRACT(d);                                                      \
   }                                                                           \
                                                                               \
+  M_IF_METHOD(INIT_SET, oplist)(                                              \
   M_P(void, name, _init_set, deque_t d, const deque_t src)                    \
   {                                                                           \
     M_D3QU3_CONTRACT(src);                                                    \
@@ -749,6 +754,7 @@
       M_F(name, _init_set)M_R(d, src);                                        \
     }                                                                         \
   }                                                                           \
+  , /* No INIT_SET */ )                                                       \
                                                                               \
   M_INLINE void                                                               \
   M_F(name, _init_move)(deque_t d, deque_t src)                               \
@@ -816,6 +822,7 @@
     return M_CONST_CAST(type, M_F(name, _get)(d, key));                       \
   }                                                                           \
                                                                               \
+  M_IF_METHOD(SET, oplist)(                                                   \
   M_P(void, name, _set_at, deque_t d, size_t key, type const x)               \
   {                                                                           \
     M_D3QU3_CONTRACT(d);                                                      \
@@ -825,6 +832,7 @@
     M_CALL_SET(oplist, *p, x);                                                \
     M_D3QU3_CONTRACT(d);                                                      \
   }                                                                           \
+  , /* No SET */ )                                                            \
                                                                               \
   M_IF_METHOD(EQUAL, oplist)(                                                 \
   M_INLINE bool                                                               \

tests/test-mdeque.c

@@ -48,6 +48,8 @@ DEQUE_DEF(deque_retcode, ReturnCode_t, M_ENUM_OPLIST(ReturnCode_t, SUCCESS))
 DEQUE_DEF_AS(DequeDouble, DequeDouble, DequeDoubleIt, double)
 #define M_OPL_DequeDouble() DEQUE_OPLIST(DequeDouble, M_BASIC_OPLIST)
 
+DEQUE_DEF(DequeInt2, int, M_OPEXTEND(M_BASIC_OPLIST, INIT_SET(0), SET(0)))
+
 ARRAY_DEF(array, int)
 
 static void test_ti1(int n)