From 06a2b09e69475106f269026fb1e175a624833d1d Mon Sep 17 00:00:00 2001
From: "Sunrin SHIMURA (keen)" <3han5chou7@gmail.com>
Date: Wed, 4 Feb 2015 13:46:29 +0000
Subject: [PATCH] display proc name in error message raised from `pic_get_args`

---
 extlib/benz/vm.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/extlib/benz/vm.c b/extlib/benz/vm.c
index 20165127..9db86c38 100644
--- a/extlib/benz/vm.c
+++ b/extlib/benz/vm.c
@@ -96,7 +96,8 @@ pic_get_args(pic_state *pic, const char *format, ...)
   /* check argc. */
   if (argc < paramc || (paramc + optc < argc && ! rest)) {
     pic_errorf(pic, "%s: wrong number of arguments (%d for %s%d)",
-               "procname", argc,
+               pic_symbol_name(pic, pic_proc_name(pic_proc_ptr(GET_OPERAND(pic, 0)))) ,
+               argc,
                rest? "at least " : "",
                paramc);
   }