kc3-lang/kc3

diff --git a/libkc3/buf_inspect.c b/libkc3/buf_inspect.c
index c0accef..1d07fde 100644
--- a/libkc3/buf_inspect.c
+++ b/libkc3/buf_inspect.c
@@ -3827,8 +3827,8 @@ sw buf_inspect_var_size (s_pretty *pretty, const s_var *var)
     if ((r = buf_write_1_size(pretty, "0x")) < 0)
       return r;
     result += r;
-    if ((r = buf_inspect_uw_hexadecimal
-         _size(pretty, (uw *) &var->ptr)) < 0)
+    if ((r = buf_inspect_uw_hexadecimal_size
+         (pretty, (uw *) &var->ptr)) < 0)
       return r;
     result += r;
   }
diff --git a/test/ikc3/defoperator.kc3 b/test/ikc3/defoperator.kc3
index c3ed84c..8121e94 100644
--- a/test/ikc3/defoperator.kc3
+++ b/test/ikc3/defoperator.kc3
@@ -8,3 +8,5 @@ quote 4 **** 4 **** 4
 4 **** 4 **** 4
 quote 4 **** 4 + 4
 4 **** 4 + 4
+quote to_lisp(quote 4 **** 4 + 4)
+to_lisp(quote 4 **** 4 + 4)