Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Define macro _XBT_IF_ONE_ARG.
authoragiersch <agiersch@48e7efb5-ca39-0410-a469-dd3cf9ba447f>
Tue, 22 Feb 2011 13:51:08 +0000 (13:51 +0000)
committeragiersch <agiersch@48e7efb5-ca39-0410-a469-dd3cf9ba447f>
Tue, 22 Feb 2011 13:51:08 +0000 (13:51 +0000)
Useful to test if the __VA_ARGS__ of a variadic macro is made of one or
more arguments, and to use a different expansion in each case.

It is used to remove the extra argument introduced in XBT_CLOG() with
XBT_LOG_MAYDAY, and in XBT_IN().

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@9686 48e7efb5-ca39-0410-a469-dd3cf9ba447f

include/xbt/log.h
include/xbt/misc.h

index 1f5159d..6181f59 100644 (file)
@@ -402,9 +402,12 @@ extern xbt_log_layout_t xbt_log_default_layout;
 /* Logging Macros */
 
 #ifdef XBT_LOG_MAYDAY
-# define XBT_CLOG_(cat, prio, f, ...) \
-  fprintf(stderr,"%s:%d:" f "%c", __FILE__, __LINE__, __VA_ARGS__)
-# define XBT_CLOG(cat, prio, ...) XBT_CLOG_(cat, prio, __VA_ARGS__, '\n')
+# define XBT_CLOG(cat, prio, ...) \
+  _XBT_IF_ONE_ARG(_XBT_CLOG_ARG1, _XBT_CLOG_ARGN, __VA_ARGS__)(__VA_ARGS__)
+# define _XBT_CLOG_ARG1(f) \
+  fprintf(stderr,"%s:%d:" f, __FILE__, __LINE__)
+# define _XBT_CLOG_ARGN(f, ...) \
+  fprintf(stderr,"%s:%d:" f, __FILE__, __LINE__, __VA_ARGS__)
 # define XBT_LOG(...) XBT_CLOG(0, __VA_ARGS__)
 #else
 # define XBT_CLOG_(catv, prio, ...)                                     \
@@ -505,10 +508,12 @@ extern xbt_log_layout_t xbt_log_default_layout;
  *  @hideinitializer
  *  @brief Log at TRACE priority that we entered in current function, appending a user specified format.
  */
-#define XBT_IN(...) XBT_IN_(__VA_ARGS__, "")
-#define XBT_IN_(fmt, ...) \
-  XBT_LOG(xbt_log_priority_trace, ">> begin of %s" fmt "%s", \
-          _XBT_FUNCTION, __VA_ARGS__)
+#define XBT_IN(...) \
+  _XBT_IF_ONE_ARG(_XBT_IN_ARG1, _XBT_IN_ARGN, __VA_ARGS__)(__VA_ARGS__)
+#define _XBT_IN_ARG1(fmt) \
+  XBT_LOG(xbt_log_priority_trace, ">> begin of %s" fmt, _XBT_FUNCTION)
+#define _XBT_IN_ARGN(fmt, ...) \
+  XBT_LOG(xbt_log_priority_trace, ">> begin of %s" fmt, _XBT_FUNCTION, __VA_ARGS__)
 
 /** @ingroup XBT_log
  *  @hideinitializer
index cefbc2f..058341a 100644 (file)
 #endif
 #define MAX(a,b) ((a)>(b)?(a):(b))
 
+/*
+ * Expands to `one' if there is only one argument for the variadic part.
+ * Otherwise, expands to `more'.
+ * Works with up to 63 arguments, which is the maximum mandated by the C99
+ * standard.
+ */
+#define _XBT_IF_ONE_ARG(one, more, ...)                                 \
+    _XBT_IF_ONE_ARG_(__VA_ARGS__,                                       \
+                     more, more, more, more, more, more, more, more,    \
+                     more, more, more, more, more, more, more, more,    \
+                     more, more, more, more, more, more, more, more,    \
+                     more, more, more, more, more, more, more, more,    \
+                     more, more, more, more, more, more, more, more,    \
+                     more, more, more, more, more, more, more, more,    \
+                     more, more, more, more, more, more, more, more,    \
+                     more, more, more, more, more, more, more, one)
+#define _XBT_IF_ONE_ARG_(a64, a63, a62, a61, a60, a59, a58, a57,        \
+                         a56, a55, a54, a53, a52, a51, a50, a49,        \
+                         a48, a47, a46, a45, a44, a43, a42, a41,        \
+                         a40, a39, a38, a37, a36, a35, a34, a33,        \
+                         a32, a31, a30, a29, a28, a27, a26, a25,        \
+                         a24, a23, a22, a21, a20, a19, a18, a17,        \
+                         a16, a15, a14, a13, a12, a11, a10, a9,         \
+                         a8, a7, a6, a5, a4, a3, a2, a1, N, ...) N
 
 /* 
  * Function calling convention (not used for now)