-#define gras_dynar_foreach(_dynar,_cursor,_data) \
- for (gras_dynar_cursor_first(_dynar,&(_cursor)) ; \
- gras_dynar_cursor_get(_dynar,&(_cursor),&_data) ; \
- gras_dynar_cursor_step(_dynar,&(_cursor)) )
-/*
- for (gras_dynar_length(_dynar) && (_gras_dynar_cursor_first(_dynar,&_cursor), \
- 1); \
- gras_dynar_length(_dynar) && gras_dynar_cursor_get(_dynar,&_cursor,&_data); \
- gras_dynar_cursor_step(_dynar,&_cursor))
-*/
-void gras_dynar_cursor_rm(gras_dynar_t * dynar,
- int * const cursor);
-
-#endif /* _GRAS_DYNAR_H */
+
+ void *xbt_dynar_get_ptr(const xbt_dynar_t dynar, const int idx);
+ void *xbt_dynar_insert_at_ptr(xbt_dynar_t const dynar, const int idx);
+ void *xbt_dynar_push_ptr(xbt_dynar_t dynar);
+ void *xbt_dynar_pop_ptr(xbt_dynar_t dynar);
+
+/** @} */
+/** @name 4. Speed optimized functions for scalars
+ *
+ * While the other functions use a memcpy to retrive the content into the
+ * user provided area, those ones use a regular affectation. It only works
+ * for scalar values, but should be a little faster.
+ *
+ * @{
+ */
+
+ /** @brief Quick retrieval of scalar content
+ * @hideinitializer */
+# define xbt_dynar_get_as(dynar,idx,type) \
+ *(type*)xbt_dynar_get_ptr(dynar,idx)
+ /** @brief Quick insertion of scalar content
+ * @hideinitializer */
+# define xbt_dynar_insert_at_as(dynar,idx,type,value) \
+ *(type*)xbt_dynar_insert_at_ptr(dynar,idx)=value
+ /** @brief Quick insertion of scalar content
+ * @hideinitializer */
+# define xbt_dynar_push_as(dynar,type,value) \
+ *(type*)xbt_dynar_push_ptr(dynar)=value
+ /** @brief Quick insertion of scalar content
+ * @hideinitializer */
+# define xbt_dynar_pop_as(dynar,type) \
+ *(type*)xbt_dynar_pop_ptr(dynar)
+
+/** @} */
+/** @name 5. Cursors on DynArr
+ *
+ * Cursors are used to iterate over the structure. Never add elements to the
+ * DynArr during the traversal. To remove elements, use the
+ * xbt_dynar_cursor_rm() function
+ *
+ * @{
+ */
+
+ void xbt_dynar_cursor_first (const xbt_dynar_t dynar, int *cursor);
+ void xbt_dynar_cursor_step (const xbt_dynar_t dynar, int *cursor);
+ int xbt_dynar_cursor_get (const xbt_dynar_t dynar, int *cursor,
+ void *whereto);
+ void xbt_dynar_cursor_rm(xbt_dynar_t dynar,
+ int *const cursor);
+
+
+/** @brief Iterates over the whole dynar.
+ *
+ * @param _dynar what to iterate over
+ * @param _cursor an integer used as cursor
+ * @param _data
+ * @hideinitializer
+ *
+ * \note An example of usage:
+ * \code
+xbt_dynar_t dyn;
+int cpt;
+string *str;
+xbt_dynar_foreach (dyn,cpt,str) {
+ printf("Seen %s\n",str);
+}
+\endcode
+ */
+#define xbt_dynar_foreach(_dynar,_cursor,_data) \
+ for (xbt_dynar_cursor_first(_dynar,&(_cursor)) ; \
+ xbt_dynar_cursor_get(_dynar,&(_cursor),&_data) ; \
+ xbt_dynar_cursor_step(_dynar,&(_cursor)) )
+
+
+END_DECL()
+
+/* @} */
+#endif /* _XBT_DYNAR_H */