diff options
-rw-r--r-- | lib.c | 1 | ||||
-rw-r--r-- | lib.h | 5 |
2 files changed, 1 insertions, 5 deletions
@@ -140,7 +140,6 @@ val chr(wchar_t ch); val eq(val a, val b); val null(val v); int null_or_missing_p(val v); -val default_arg(val arg, val dfl); val default_bool_arg(val arg); #endif @@ -1024,10 +1024,7 @@ INLINE int null_or_missing_p(val v) { return (nilp(v) || missingp(v)); } #define tnil(c_cond) ((c_cond) ? t : nil) -INLINE val default_arg(val arg, val dfl) -{ - return if3(null_or_missing_p(arg), dfl, arg); -} +#define default_arg(arg, dfl) if3(null_or_missing_p(arg), dfl, arg) INLINE val default_bool_arg(val arg) { |