Avoid unnecessary evaluation in argument defaulting.

* lib.h (default_arg): Inline function becomes macro,
so we can avoid evaluating the default value expression
when it is not needed.

* lib.c (default_arg): Declaration removed.

1 files changed, 1 insertions, 4 deletions

diff --git a/lib.h b/lib.h
index 3dc75d61..18f7f6d9 100644
--- a/lib.h
+++ b/lib.h
@@ -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)
 {