From d91ec2847464c7a7dc6b3a3f94ae77cbfde36428 Mon Sep 17 00:00:00 2001
From: Yuichi Nishiwaki <yuichi.nishiwaki@gmail.com>
Date: Sat, 20 Feb 2016 16:02:34 +0900
Subject: [PATCH] cosmetic change

---
 extlib/benz/macro.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extlib/benz/macro.c b/extlib/benz/macro.c
index ff05c71b..c9f69ec0 100644
--- a/extlib/benz/macro.c
+++ b/extlib/benz/macro.c
@@ -252,7 +252,7 @@ expand_defmacro(pic_state *pic, pic_value expr, struct pic_env *env)
 
   val = pic_call(pic, pic_compile(pic, pic_expand(pic, pic_list_ref(pic, expr, 2), env)), 0);
   if (! pic_proc_p(pic, val)) {
-    pic_errorf(pic, "macro definition \"%s\" evaluates to non-procedure object", pic_str(pic, pic_id_name(pic, id)));
+    pic_errorf(pic, "macro definition \"~s\" evaluates to non-procedure object", id);
   }
 
   define_macro(pic, uid, val);