From 760c77bd3936f1c655fb1886eb312aa6e9d89d9c Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sat, 16 Apr 2022 09:00:18 -0700
Subject: cons: mapcar, mappend: doc, tests.

---
 cppawk-include/fun-priv.h | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'cppawk-include/fun-priv.h')

diff --git a/cppawk-include/fun-priv.h b/cppawk-include/fun-priv.h
index 173e6d0..17fef9b 100644
--- a/cppawk-include/fun-priv.h
+++ b/cppawk-include/fun-priv.h
@@ -40,7 +40,7 @@
 #warning "<fun.h> requires an Awk with function indirection like newer GNU Awk"
 #endif
 
-#define __bind(fname, env)    __cons(#fname, env)
+#define __bind(fname, env)    __cons(__xstr(fname), env)
 #define __fun_(fname)         __xstr(fname)
 #define __call(fobj, ...)     (__consp(fobj)                                  \
                               ? __progn(__g(f) = __car(fobj),                 \
-- 
cgit v1.2.3