kc3-lang/kc3

diff --git a/libkc3/buf_inspect_s.c.in b/libkc3/buf_inspect_s.c.in
index 16a9768..948255e 100644
--- a/libkc3/buf_inspect_s.c.in
+++ b/libkc3/buf_inspect_s.c.in
@@ -46,14 +46,14 @@ sw buf_inspect_s_bits$ (s_buf *buf, const s_bits$ *s)
   return result;
 }
 
-sw buf_inspect_s_bits$_size (const s_bits$ *s)
+sw buf_inspect_s_bits$_size (s_pretty *pretty, const s_bits$ *s)
 {
   sw r;
   sw result = 0;
   u_bits$ u;
   if (g_buf_inspect_type != &g_sym_S_bits$ &&
       cast_needed_s_bits$(*s)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_S_bits$)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_S_bits$)) < 0)
       return r;
     result += r;
     result += strlen(" ");
diff --git a/libkc3/buf_inspect_s16.c b/libkc3/buf_inspect_s16.c
index b0e05fe..1d22cdd 100644
--- a/libkc3/buf_inspect_s16.c
+++ b/libkc3/buf_inspect_s16.c
@@ -46,14 +46,14 @@ sw buf_inspect_s16 (s_buf *buf, const s16 *s)
   return result;
 }
 
-sw buf_inspect_s16_size (const s16 *s)
+sw buf_inspect_s16_size (s_pretty *pretty, const s16 *s)
 {
   sw r;
   sw result = 0;
   u16 u;
   if (g_buf_inspect_type != &g_sym_S16 &&
       cast_needed_s16(*s)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_S16)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_S16)) < 0)
       return r;
     result += r;
     result += strlen(" ");
diff --git a/libkc3/buf_inspect_s32.c b/libkc3/buf_inspect_s32.c
index 73a36ad..5e9b075 100644
--- a/libkc3/buf_inspect_s32.c
+++ b/libkc3/buf_inspect_s32.c
@@ -46,14 +46,14 @@ sw buf_inspect_s32 (s_buf *buf, const s32 *s)
   return result;
 }
 
-sw buf_inspect_s32_size (const s32 *s)
+sw buf_inspect_s32_size (s_pretty *pretty, const s32 *s)
 {
   sw r;
   sw result = 0;
   u32 u;
   if (g_buf_inspect_type != &g_sym_S32 &&
       cast_needed_s32(*s)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_S32)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_S32)) < 0)
       return r;
     result += r;
     result += strlen(" ");
diff --git a/libkc3/buf_inspect_s64.c b/libkc3/buf_inspect_s64.c
index 1cc1f25..54bf247 100644
--- a/libkc3/buf_inspect_s64.c
+++ b/libkc3/buf_inspect_s64.c
@@ -46,14 +46,14 @@ sw buf_inspect_s64 (s_buf *buf, const s64 *s)
   return result;
 }
 
-sw buf_inspect_s64_size (const s64 *s)
+sw buf_inspect_s64_size (s_pretty *pretty, const s64 *s)
 {
   sw r;
   sw result = 0;
   u64 u;
   if (g_buf_inspect_type != &g_sym_S64 &&
       cast_needed_s64(*s)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_S64)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_S64)) < 0)
       return r;
     result += r;
     result += strlen(" ");
diff --git a/libkc3/buf_inspect_s8.c b/libkc3/buf_inspect_s8.c
index c7644ee..33682a3 100644
--- a/libkc3/buf_inspect_s8.c
+++ b/libkc3/buf_inspect_s8.c
@@ -46,14 +46,14 @@ sw buf_inspect_s8 (s_buf *buf, const s8 *s)
   return result;
 }
 
-sw buf_inspect_s8_size (const s8 *s)
+sw buf_inspect_s8_size (s_pretty *pretty, const s8 *s)
 {
   sw r;
   sw result = 0;
   u8 u;
   if (g_buf_inspect_type != &g_sym_S8 &&
       cast_needed_s8(*s)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_S8)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_S8)) < 0)
       return r;
     result += r;
     result += strlen(" ");
diff --git a/libkc3/buf_inspect_sw.c b/libkc3/buf_inspect_sw.c
index 5db60af..59df1ab 100644
--- a/libkc3/buf_inspect_sw.c
+++ b/libkc3/buf_inspect_sw.c
@@ -46,14 +46,14 @@ sw buf_inspect_sw (s_buf *buf, const sw *s)
   return result;
 }
 
-sw buf_inspect_sw_size (const sw *s)
+sw buf_inspect_sw_size (s_pretty *pretty, const sw *s)
 {
   sw r;
   sw result = 0;
   uw u;
   if (g_buf_inspect_type != &g_sym_Sw &&
       cast_needed_sw(*s)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_Sw)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_Sw)) < 0)
       return r;
     result += r;
     result += strlen(" ");
diff --git a/libkc3/buf_inspect_u.c.in b/libkc3/buf_inspect_u.c.in
index 9ed7851..cf71184 100644
--- a/libkc3/buf_inspect_u.c.in
+++ b/libkc3/buf_inspect_u.c.in
@@ -21,26 +21,26 @@
 #include "str.h"
 #include "sym.h"
 
-sw buf_inspect_u_bits$ (s_buf *buf, const u_bits$ *u)
+sw buf_inspect_u_bits$ (s_pretty *pretty, s_buf *buf, const u_bits$ *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_U_bits$ &&
       cast_needed_u_bits$(*u)) {
-    if ((r = buf_inspect_paren_sym(buf, &g_sym_U_bits$)) < 0)
+    if ((r = buf_inspect_paren_sym(pretty, buf, &g_sym_U_bits$)) < 0)
       return r;
     result += r;
     if ((r = buf_write_1(buf, " ")) < 0)
       return r;
     result += r;
   }
-  if ((r = buf_inspect_u_bits$_base(buf, &g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_u_bits$_base(pretty, buf, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
 }
 
-sw buf_inspect_u_bits$_base (s_buf *buf,
+sw buf_inspect_u_bits$_base (s_pretty *pretty, s_buf *buf,
                              const s_str *base,
                              const u_bits$ *u)
 {
@@ -60,7 +60,7 @@ sw buf_inspect_u_bits$_base (s_buf *buf,
       return -1;
     return buf_write_character_utf8(buf, zero);
   }
-  size = buf_inspect_u_bits$_base_digits(base, u);
+  size = buf_inspect_u_bits$_base_digits(pretty, base, u);
   c = alloc(size * sizeof(character));
   buf_save_init(buf, &save);
   radix = base->size;
@@ -89,7 +89,7 @@ sw buf_inspect_u_bits$_base (s_buf *buf,
   return r;
 }
 
-sw buf_inspect_u_bits$_base_digits (const s_str *base,
+sw buf_inspect_u_bits$_base_digits (s_pretty *pretty, const s_str *base,
                                     const u_bits$ *u)
 {
   uw radix;
@@ -106,7 +106,7 @@ sw buf_inspect_u_bits$_base_digits (const s_str *base,
   return size;
 }
 
-sw buf_inspect_u_bits$_base_size (const s_str *base,
+sw buf_inspect_u_bits$_base_size (s_pretty *pretty, const s_str *base,
                                   const u_bits$ *u)
 {
   character c;
@@ -123,23 +123,23 @@ sw buf_inspect_u_bits$_base_size (const s_str *base,
     u_ /= radix;
     if (str_character(base, digit, &c) < 0)
       return -1;
-    result += buf_inspect_str_character_size(&c);
+    result += buf_inspect_str_character_size(pretty, &c);
   }
   return result;
 }
 
-sw buf_inspect_u_bits$_size (const u_bits$ *u)
+sw buf_inspect_u_bits$_size (s_pretty *pretty, const u_bits$ *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_U_bits$ &&
       cast_needed_u_bits$(*u)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_U_bits$)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_U_bits$)) < 0)
       return r;
     result += r;
     result += strlen(" ");
   }
-  if ((r = buf_inspect_u_bits$_base_size(&g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_u_bits$_base_size(pretty, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
diff --git a/libkc3/buf_inspect_u16.c b/libkc3/buf_inspect_u16.c
index d4358be..4cbc7e0 100644
--- a/libkc3/buf_inspect_u16.c
+++ b/libkc3/buf_inspect_u16.c
@@ -21,26 +21,26 @@
 #include "str.h"
 #include "sym.h"
 
-sw buf_inspect_u16 (s_buf *buf, const u16 *u)
+sw buf_inspect_u16 (s_pretty *pretty, s_buf *buf, const u16 *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_U16 &&
       cast_needed_u16(*u)) {
-    if ((r = buf_inspect_paren_sym(buf, &g_sym_U16)) < 0)
+    if ((r = buf_inspect_paren_sym(pretty, buf, &g_sym_U16)) < 0)
       return r;
     result += r;
     if ((r = buf_write_1(buf, " ")) < 0)
       return r;
     result += r;
   }
-  if ((r = buf_inspect_u16_base(buf, &g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_u16_base(pretty, buf, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
 }
 
-sw buf_inspect_u16_base (s_buf *buf,
+sw buf_inspect_u16_base (s_pretty *pretty, s_buf *buf,
                              const s_str *base,
                              const u16 *u)
 {
@@ -60,7 +60,7 @@ sw buf_inspect_u16_base (s_buf *buf,
       return -1;
     return buf_write_character_utf8(buf, zero);
   }
-  size = buf_inspect_u16_base_digits(base, u);
+  size = buf_inspect_u16_base_digits(pretty, base, u);
   c = alloc(size * sizeof(character));
   buf_save_init(buf, &save);
   radix = base->size;
@@ -89,7 +89,7 @@ sw buf_inspect_u16_base (s_buf *buf,
   return r;
 }
 
-sw buf_inspect_u16_base_digits (const s_str *base,
+sw buf_inspect_u16_base_digits (s_pretty *pretty, const s_str *base,
                                     const u16 *u)
 {
   uw radix;
@@ -106,7 +106,7 @@ sw buf_inspect_u16_base_digits (const s_str *base,
   return size;
 }
 
-sw buf_inspect_u16_base_size (const s_str *base,
+sw buf_inspect_u16_base_size (s_pretty *pretty, const s_str *base,
                                   const u16 *u)
 {
   character c;
@@ -123,23 +123,23 @@ sw buf_inspect_u16_base_size (const s_str *base,
     u_ /= radix;
     if (str_character(base, digit, &c) < 0)
       return -1;
-    result += buf_inspect_str_character_size(&c);
+    result += buf_inspect_str_character_size(pretty, &c);
   }
   return result;
 }
 
-sw buf_inspect_u16_size (const u16 *u)
+sw buf_inspect_u16_size (s_pretty *pretty, const u16 *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_U16 &&
       cast_needed_u16(*u)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_U16)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_U16)) < 0)
       return r;
     result += r;
     result += strlen(" ");
   }
-  if ((r = buf_inspect_u16_base_size(&g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_u16_base_size(pretty, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
diff --git a/libkc3/buf_inspect_u16_binary.c b/libkc3/buf_inspect_u16_binary.c
index f3df679..7d742f9 100644
--- a/libkc3/buf_inspect_u16_binary.c
+++ b/libkc3/buf_inspect_u16_binary.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u16_binary (s_buf *buf, const u16 *u)
+sw buf_inspect_u16_binary (s_pretty *pretty, s_buf *buf, const u16 *u)
 {
-  return buf_inspect_u16_base(buf,
+  return buf_inspect_u16_base(pretty, buf,
                                   &g_kc3_base_binary,
                                   u);
 }
 
-sw buf_inspect_u16_binary_size (const u16 *u)
+sw buf_inspect_u16_binary_size (s_pretty *pretty, const u16 *u)
 {
-  return buf_inspect_u16_base_size(&g_kc3_base_binary,
+  return buf_inspect_u16_base_size(pretty, &g_kc3_base_binary,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u16_decimal.c b/libkc3/buf_inspect_u16_decimal.c
index f03e14d..46e0030 100644
--- a/libkc3/buf_inspect_u16_decimal.c
+++ b/libkc3/buf_inspect_u16_decimal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u16_decimal (s_buf *buf, const u16 *u)
+sw buf_inspect_u16_decimal (s_pretty *pretty, s_buf *buf, const u16 *u)
 {
-  return buf_inspect_u16_base(buf,
+  return buf_inspect_u16_base(pretty, buf,
                                   &g_kc3_base_decimal,
                                   u);
 }
 
-sw buf_inspect_u16_decimal_size (const u16 *u)
+sw buf_inspect_u16_decimal_size (s_pretty *pretty, const u16 *u)
 {
-  return buf_inspect_u16_base_size(&g_kc3_base_decimal,
+  return buf_inspect_u16_base_size(pretty, &g_kc3_base_decimal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u16_hexadecimal.c b/libkc3/buf_inspect_u16_hexadecimal.c
index eb4214f..dd496d1 100644
--- a/libkc3/buf_inspect_u16_hexadecimal.c
+++ b/libkc3/buf_inspect_u16_hexadecimal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u16_hexadecimal (s_buf *buf, const u16 *u)
+sw buf_inspect_u16_hexadecimal (s_pretty *pretty, s_buf *buf, const u16 *u)
 {
-  return buf_inspect_u16_base(buf,
+  return buf_inspect_u16_base(pretty, buf,
                                   &g_kc3_base_hexadecimal,
                                   u);
 }
 
-sw buf_inspect_u16_hexadecimal_size (const u16 *u)
+sw buf_inspect_u16_hexadecimal_size (s_pretty *pretty, const u16 *u)
 {
-  return buf_inspect_u16_base_size(&g_kc3_base_hexadecimal,
+  return buf_inspect_u16_base_size(pretty, &g_kc3_base_hexadecimal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u16_octal.c b/libkc3/buf_inspect_u16_octal.c
index 366bbff..1e16660 100644
--- a/libkc3/buf_inspect_u16_octal.c
+++ b/libkc3/buf_inspect_u16_octal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u16_octal (s_buf *buf, const u16 *u)
+sw buf_inspect_u16_octal (s_pretty *pretty, s_buf *buf, const u16 *u)
 {
-  return buf_inspect_u16_base(buf,
+  return buf_inspect_u16_base(pretty, buf,
                                   &g_kc3_base_octal,
                                   u);
 }
 
-sw buf_inspect_u16_octal_size (const u16 *u)
+sw buf_inspect_u16_octal_size (s_pretty *pretty, const u16 *u)
 {
-  return buf_inspect_u16_base_size(&g_kc3_base_octal,
+  return buf_inspect_u16_base_size(pretty, &g_kc3_base_octal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u32.c b/libkc3/buf_inspect_u32.c
index 4425abe..84b632d 100644
--- a/libkc3/buf_inspect_u32.c
+++ b/libkc3/buf_inspect_u32.c
@@ -21,26 +21,26 @@
 #include "str.h"
 #include "sym.h"
 
-sw buf_inspect_u32 (s_buf *buf, const u32 *u)
+sw buf_inspect_u32 (s_pretty *pretty, s_buf *buf, const u32 *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_U32 &&
       cast_needed_u32(*u)) {
-    if ((r = buf_inspect_paren_sym(buf, &g_sym_U32)) < 0)
+    if ((r = buf_inspect_paren_sym(pretty, buf, &g_sym_U32)) < 0)
       return r;
     result += r;
     if ((r = buf_write_1(buf, " ")) < 0)
       return r;
     result += r;
   }
-  if ((r = buf_inspect_u32_base(buf, &g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_u32_base(pretty, buf, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
 }
 
-sw buf_inspect_u32_base (s_buf *buf,
+sw buf_inspect_u32_base (s_pretty *pretty, s_buf *buf,
                              const s_str *base,
                              const u32 *u)
 {
@@ -60,7 +60,7 @@ sw buf_inspect_u32_base (s_buf *buf,
       return -1;
     return buf_write_character_utf8(buf, zero);
   }
-  size = buf_inspect_u32_base_digits(base, u);
+  size = buf_inspect_u32_base_digits(pretty, base, u);
   c = alloc(size * sizeof(character));
   buf_save_init(buf, &save);
   radix = base->size;
@@ -89,7 +89,7 @@ sw buf_inspect_u32_base (s_buf *buf,
   return r;
 }
 
-sw buf_inspect_u32_base_digits (const s_str *base,
+sw buf_inspect_u32_base_digits (s_pretty *pretty, const s_str *base,
                                     const u32 *u)
 {
   uw radix;
@@ -106,7 +106,7 @@ sw buf_inspect_u32_base_digits (const s_str *base,
   return size;
 }
 
-sw buf_inspect_u32_base_size (const s_str *base,
+sw buf_inspect_u32_base_size (s_pretty *pretty, const s_str *base,
                                   const u32 *u)
 {
   character c;
@@ -123,23 +123,23 @@ sw buf_inspect_u32_base_size (const s_str *base,
     u_ /= radix;
     if (str_character(base, digit, &c) < 0)
       return -1;
-    result += buf_inspect_str_character_size(&c);
+    result += buf_inspect_str_character_size(pretty, &c);
   }
   return result;
 }
 
-sw buf_inspect_u32_size (const u32 *u)
+sw buf_inspect_u32_size (s_pretty *pretty, const u32 *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_U32 &&
       cast_needed_u32(*u)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_U32)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_U32)) < 0)
       return r;
     result += r;
     result += strlen(" ");
   }
-  if ((r = buf_inspect_u32_base_size(&g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_u32_base_size(pretty, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
diff --git a/libkc3/buf_inspect_u32_binary.c b/libkc3/buf_inspect_u32_binary.c
index d9b673e..7449fb9 100644
--- a/libkc3/buf_inspect_u32_binary.c
+++ b/libkc3/buf_inspect_u32_binary.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u32_binary (s_buf *buf, const u32 *u)
+sw buf_inspect_u32_binary (s_pretty *pretty, s_buf *buf, const u32 *u)
 {
-  return buf_inspect_u32_base(buf,
+  return buf_inspect_u32_base(pretty, buf,
                                   &g_kc3_base_binary,
                                   u);
 }
 
-sw buf_inspect_u32_binary_size (const u32 *u)
+sw buf_inspect_u32_binary_size (s_pretty *pretty, const u32 *u)
 {
-  return buf_inspect_u32_base_size(&g_kc3_base_binary,
+  return buf_inspect_u32_base_size(pretty, &g_kc3_base_binary,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u32_decimal.c b/libkc3/buf_inspect_u32_decimal.c
index cfd0db4..91efb35 100644
--- a/libkc3/buf_inspect_u32_decimal.c
+++ b/libkc3/buf_inspect_u32_decimal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u32_decimal (s_buf *buf, const u32 *u)
+sw buf_inspect_u32_decimal (s_pretty *pretty, s_buf *buf, const u32 *u)
 {
-  return buf_inspect_u32_base(buf,
+  return buf_inspect_u32_base(pretty, buf,
                                   &g_kc3_base_decimal,
                                   u);
 }
 
-sw buf_inspect_u32_decimal_size (const u32 *u)
+sw buf_inspect_u32_decimal_size (s_pretty *pretty, const u32 *u)
 {
-  return buf_inspect_u32_base_size(&g_kc3_base_decimal,
+  return buf_inspect_u32_base_size(pretty, &g_kc3_base_decimal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u32_hexadecimal.c b/libkc3/buf_inspect_u32_hexadecimal.c
index 019107a..5f2b768 100644
--- a/libkc3/buf_inspect_u32_hexadecimal.c
+++ b/libkc3/buf_inspect_u32_hexadecimal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u32_hexadecimal (s_buf *buf, const u32 *u)
+sw buf_inspect_u32_hexadecimal (s_pretty *pretty, s_buf *buf, const u32 *u)
 {
-  return buf_inspect_u32_base(buf,
+  return buf_inspect_u32_base(pretty, buf,
                                   &g_kc3_base_hexadecimal,
                                   u);
 }
 
-sw buf_inspect_u32_hexadecimal_size (const u32 *u)
+sw buf_inspect_u32_hexadecimal_size (s_pretty *pretty, const u32 *u)
 {
-  return buf_inspect_u32_base_size(&g_kc3_base_hexadecimal,
+  return buf_inspect_u32_base_size(pretty, &g_kc3_base_hexadecimal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u32_octal.c b/libkc3/buf_inspect_u32_octal.c
index 45ffb78..ff22ef2 100644
--- a/libkc3/buf_inspect_u32_octal.c
+++ b/libkc3/buf_inspect_u32_octal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u32_octal (s_buf *buf, const u32 *u)
+sw buf_inspect_u32_octal (s_pretty *pretty, s_buf *buf, const u32 *u)
 {
-  return buf_inspect_u32_base(buf,
+  return buf_inspect_u32_base(pretty, buf,
                                   &g_kc3_base_octal,
                                   u);
 }
 
-sw buf_inspect_u32_octal_size (const u32 *u)
+sw buf_inspect_u32_octal_size (s_pretty *pretty, const u32 *u)
 {
-  return buf_inspect_u32_base_size(&g_kc3_base_octal,
+  return buf_inspect_u32_base_size(pretty, &g_kc3_base_octal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u64.c b/libkc3/buf_inspect_u64.c
index c4692d1..1e060c4 100644
--- a/libkc3/buf_inspect_u64.c
+++ b/libkc3/buf_inspect_u64.c
@@ -21,26 +21,26 @@
 #include "str.h"
 #include "sym.h"
 
-sw buf_inspect_u64 (s_buf *buf, const u64 *u)
+sw buf_inspect_u64 (s_pretty *pretty, s_buf *buf, const u64 *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_U64 &&
       cast_needed_u64(*u)) {
-    if ((r = buf_inspect_paren_sym(buf, &g_sym_U64)) < 0)
+    if ((r = buf_inspect_paren_sym(pretty, buf, &g_sym_U64)) < 0)
       return r;
     result += r;
     if ((r = buf_write_1(buf, " ")) < 0)
       return r;
     result += r;
   }
-  if ((r = buf_inspect_u64_base(buf, &g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_u64_base(pretty, buf, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
 }
 
-sw buf_inspect_u64_base (s_buf *buf,
+sw buf_inspect_u64_base (s_pretty *pretty, s_buf *buf,
                              const s_str *base,
                              const u64 *u)
 {
@@ -60,7 +60,7 @@ sw buf_inspect_u64_base (s_buf *buf,
       return -1;
     return buf_write_character_utf8(buf, zero);
   }
-  size = buf_inspect_u64_base_digits(base, u);
+  size = buf_inspect_u64_base_digits(pretty, base, u);
   c = alloc(size * sizeof(character));
   buf_save_init(buf, &save);
   radix = base->size;
@@ -89,7 +89,7 @@ sw buf_inspect_u64_base (s_buf *buf,
   return r;
 }
 
-sw buf_inspect_u64_base_digits (const s_str *base,
+sw buf_inspect_u64_base_digits (s_pretty *pretty, const s_str *base,
                                     const u64 *u)
 {
   uw radix;
@@ -106,7 +106,7 @@ sw buf_inspect_u64_base_digits (const s_str *base,
   return size;
 }
 
-sw buf_inspect_u64_base_size (const s_str *base,
+sw buf_inspect_u64_base_size (s_pretty *pretty, const s_str *base,
                                   const u64 *u)
 {
   character c;
@@ -123,23 +123,23 @@ sw buf_inspect_u64_base_size (const s_str *base,
     u_ /= radix;
     if (str_character(base, digit, &c) < 0)
       return -1;
-    result += buf_inspect_str_character_size(&c);
+    result += buf_inspect_str_character_size(pretty, &c);
   }
   return result;
 }
 
-sw buf_inspect_u64_size (const u64 *u)
+sw buf_inspect_u64_size (s_pretty *pretty, const u64 *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_U64 &&
       cast_needed_u64(*u)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_U64)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_U64)) < 0)
       return r;
     result += r;
     result += strlen(" ");
   }
-  if ((r = buf_inspect_u64_base_size(&g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_u64_base_size(pretty, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
diff --git a/libkc3/buf_inspect_u64_binary.c b/libkc3/buf_inspect_u64_binary.c
index c09ac5c..edc0363 100644
--- a/libkc3/buf_inspect_u64_binary.c
+++ b/libkc3/buf_inspect_u64_binary.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u64_binary (s_buf *buf, const u64 *u)
+sw buf_inspect_u64_binary (s_pretty *pretty, s_buf *buf, const u64 *u)
 {
-  return buf_inspect_u64_base(buf,
+  return buf_inspect_u64_base(pretty, buf,
                                   &g_kc3_base_binary,
                                   u);
 }
 
-sw buf_inspect_u64_binary_size (const u64 *u)
+sw buf_inspect_u64_binary_size (s_pretty *pretty, const u64 *u)
 {
-  return buf_inspect_u64_base_size(&g_kc3_base_binary,
+  return buf_inspect_u64_base_size(pretty, &g_kc3_base_binary,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u64_decimal.c b/libkc3/buf_inspect_u64_decimal.c
index 9b98ab3..c525598 100644
--- a/libkc3/buf_inspect_u64_decimal.c
+++ b/libkc3/buf_inspect_u64_decimal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u64_decimal (s_buf *buf, const u64 *u)
+sw buf_inspect_u64_decimal (s_pretty *pretty, s_buf *buf, const u64 *u)
 {
-  return buf_inspect_u64_base(buf,
+  return buf_inspect_u64_base(pretty, buf,
                                   &g_kc3_base_decimal,
                                   u);
 }
 
-sw buf_inspect_u64_decimal_size (const u64 *u)
+sw buf_inspect_u64_decimal_size (s_pretty *pretty, const u64 *u)
 {
-  return buf_inspect_u64_base_size(&g_kc3_base_decimal,
+  return buf_inspect_u64_base_size(pretty, &g_kc3_base_decimal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u64_hexadecimal.c b/libkc3/buf_inspect_u64_hexadecimal.c
index ae9f76a..8c22a73 100644
--- a/libkc3/buf_inspect_u64_hexadecimal.c
+++ b/libkc3/buf_inspect_u64_hexadecimal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u64_hexadecimal (s_buf *buf, const u64 *u)
+sw buf_inspect_u64_hexadecimal (s_pretty *pretty, s_buf *buf, const u64 *u)
 {
-  return buf_inspect_u64_base(buf,
+  return buf_inspect_u64_base(pretty, buf,
                                   &g_kc3_base_hexadecimal,
                                   u);
 }
 
-sw buf_inspect_u64_hexadecimal_size (const u64 *u)
+sw buf_inspect_u64_hexadecimal_size (s_pretty *pretty, const u64 *u)
 {
-  return buf_inspect_u64_base_size(&g_kc3_base_hexadecimal,
+  return buf_inspect_u64_base_size(pretty, &g_kc3_base_hexadecimal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u64_octal.c b/libkc3/buf_inspect_u64_octal.c
index 93a15a2..56495bf 100644
--- a/libkc3/buf_inspect_u64_octal.c
+++ b/libkc3/buf_inspect_u64_octal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u64_octal (s_buf *buf, const u64 *u)
+sw buf_inspect_u64_octal (s_pretty *pretty, s_buf *buf, const u64 *u)
 {
-  return buf_inspect_u64_base(buf,
+  return buf_inspect_u64_base(pretty, buf,
                                   &g_kc3_base_octal,
                                   u);
 }
 
-sw buf_inspect_u64_octal_size (const u64 *u)
+sw buf_inspect_u64_octal_size (s_pretty *pretty, const u64 *u)
 {
-  return buf_inspect_u64_base_size(&g_kc3_base_octal,
+  return buf_inspect_u64_base_size(pretty, &g_kc3_base_octal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u8.c b/libkc3/buf_inspect_u8.c
index e4b1d6e..79c69b2 100644
--- a/libkc3/buf_inspect_u8.c
+++ b/libkc3/buf_inspect_u8.c
@@ -21,26 +21,26 @@
 #include "str.h"
 #include "sym.h"
 
-sw buf_inspect_u8 (s_buf *buf, const u8 *u)
+sw buf_inspect_u8 (s_pretty *pretty, s_buf *buf, const u8 *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_U8 &&
       cast_needed_u8(*u)) {
-    if ((r = buf_inspect_paren_sym(buf, &g_sym_U8)) < 0)
+    if ((r = buf_inspect_paren_sym(pretty, buf, &g_sym_U8)) < 0)
       return r;
     result += r;
     if ((r = buf_write_1(buf, " ")) < 0)
       return r;
     result += r;
   }
-  if ((r = buf_inspect_u8_base(buf, &g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_u8_base(pretty, buf, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
 }
 
-sw buf_inspect_u8_base (s_buf *buf,
+sw buf_inspect_u8_base (s_pretty *pretty, s_buf *buf,
                              const s_str *base,
                              const u8 *u)
 {
@@ -60,7 +60,7 @@ sw buf_inspect_u8_base (s_buf *buf,
       return -1;
     return buf_write_character_utf8(buf, zero);
   }
-  size = buf_inspect_u8_base_digits(base, u);
+  size = buf_inspect_u8_base_digits(pretty, base, u);
   c = alloc(size * sizeof(character));
   buf_save_init(buf, &save);
   radix = base->size;
@@ -89,7 +89,7 @@ sw buf_inspect_u8_base (s_buf *buf,
   return r;
 }
 
-sw buf_inspect_u8_base_digits (const s_str *base,
+sw buf_inspect_u8_base_digits (s_pretty *pretty, const s_str *base,
                                     const u8 *u)
 {
   uw radix;
@@ -106,7 +106,7 @@ sw buf_inspect_u8_base_digits (const s_str *base,
   return size;
 }
 
-sw buf_inspect_u8_base_size (const s_str *base,
+sw buf_inspect_u8_base_size (s_pretty *pretty, const s_str *base,
                                   const u8 *u)
 {
   character c;
@@ -123,23 +123,23 @@ sw buf_inspect_u8_base_size (const s_str *base,
     u_ /= radix;
     if (str_character(base, digit, &c) < 0)
       return -1;
-    result += buf_inspect_str_character_size(&c);
+    result += buf_inspect_str_character_size(pretty, &c);
   }
   return result;
 }
 
-sw buf_inspect_u8_size (const u8 *u)
+sw buf_inspect_u8_size (s_pretty *pretty, const u8 *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_U8 &&
       cast_needed_u8(*u)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_U8)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_U8)) < 0)
       return r;
     result += r;
     result += strlen(" ");
   }
-  if ((r = buf_inspect_u8_base_size(&g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_u8_base_size(pretty, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
diff --git a/libkc3/buf_inspect_u8_binary.c b/libkc3/buf_inspect_u8_binary.c
index 5eb04c8..dbb2e25 100644
--- a/libkc3/buf_inspect_u8_binary.c
+++ b/libkc3/buf_inspect_u8_binary.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u8_binary (s_buf *buf, const u8 *u)
+sw buf_inspect_u8_binary (s_pretty *pretty, s_buf *buf, const u8 *u)
 {
-  return buf_inspect_u8_base(buf,
+  return buf_inspect_u8_base(pretty, buf,
                                   &g_kc3_base_binary,
                                   u);
 }
 
-sw buf_inspect_u8_binary_size (const u8 *u)
+sw buf_inspect_u8_binary_size (s_pretty *pretty, const u8 *u)
 {
-  return buf_inspect_u8_base_size(&g_kc3_base_binary,
+  return buf_inspect_u8_base_size(pretty, &g_kc3_base_binary,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u8_decimal.c b/libkc3/buf_inspect_u8_decimal.c
index 7b812dc..c7fe7f6 100644
--- a/libkc3/buf_inspect_u8_decimal.c
+++ b/libkc3/buf_inspect_u8_decimal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u8_decimal (s_buf *buf, const u8 *u)
+sw buf_inspect_u8_decimal (s_pretty *pretty, s_buf *buf, const u8 *u)
 {
-  return buf_inspect_u8_base(buf,
+  return buf_inspect_u8_base(pretty, buf,
                                   &g_kc3_base_decimal,
                                   u);
 }
 
-sw buf_inspect_u8_decimal_size (const u8 *u)
+sw buf_inspect_u8_decimal_size (s_pretty *pretty, const u8 *u)
 {
-  return buf_inspect_u8_base_size(&g_kc3_base_decimal,
+  return buf_inspect_u8_base_size(pretty, &g_kc3_base_decimal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u8_hexadecimal.c b/libkc3/buf_inspect_u8_hexadecimal.c
index 42a2062..34dc3f9 100644
--- a/libkc3/buf_inspect_u8_hexadecimal.c
+++ b/libkc3/buf_inspect_u8_hexadecimal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u8_hexadecimal (s_buf *buf, const u8 *u)
+sw buf_inspect_u8_hexadecimal (s_pretty *pretty, s_buf *buf, const u8 *u)
 {
-  return buf_inspect_u8_base(buf,
+  return buf_inspect_u8_base(pretty, buf,
                                   &g_kc3_base_hexadecimal,
                                   u);
 }
 
-sw buf_inspect_u8_hexadecimal_size (const u8 *u)
+sw buf_inspect_u8_hexadecimal_size (s_pretty *pretty, const u8 *u)
 {
-  return buf_inspect_u8_base_size(&g_kc3_base_hexadecimal,
+  return buf_inspect_u8_base_size(pretty, &g_kc3_base_hexadecimal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u8_octal.c b/libkc3/buf_inspect_u8_octal.c
index 6bcbcc7..d44ee4f 100644
--- a/libkc3/buf_inspect_u8_octal.c
+++ b/libkc3/buf_inspect_u8_octal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u8_octal (s_buf *buf, const u8 *u)
+sw buf_inspect_u8_octal (s_pretty *pretty, s_buf *buf, const u8 *u)
 {
-  return buf_inspect_u8_base(buf,
+  return buf_inspect_u8_base(pretty, buf,
                                   &g_kc3_base_octal,
                                   u);
 }
 
-sw buf_inspect_u8_octal_size (const u8 *u)
+sw buf_inspect_u8_octal_size (s_pretty *pretty, const u8 *u)
 {
-  return buf_inspect_u8_base_size(&g_kc3_base_octal,
+  return buf_inspect_u8_base_size(pretty, &g_kc3_base_octal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_u_base.c.in b/libkc3/buf_inspect_u_base.c.in
index 158e46f..363084e 100644
--- a/libkc3/buf_inspect_u_base.c.in
+++ b/libkc3/buf_inspect_u_base.c.in
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_u_bits$__BASE$ (s_buf *buf, const u_bits$ *u)
+sw buf_inspect_u_bits$__BASE$ (s_pretty *pretty, s_buf *buf, const u_bits$ *u)
 {
-  return buf_inspect_u_bits$_base(buf,
+  return buf_inspect_u_bits$_base(pretty, buf,
                                   &g_kc3_base__BASE$,
                                   u);
 }
 
-sw buf_inspect_u_bits$__BASE$_size (const u_bits$ *u)
+sw buf_inspect_u_bits$__BASE$_size (s_pretty *pretty, const u_bits$ *u)
 {
-  return buf_inspect_u_bits$_base_size(&g_kc3_base__BASE$,
+  return buf_inspect_u_bits$_base_size(pretty, &g_kc3_base__BASE$,
                                        u);
 }
diff --git a/libkc3/buf_inspect_uw.c b/libkc3/buf_inspect_uw.c
index b0ca264..4339bb2 100644
--- a/libkc3/buf_inspect_uw.c
+++ b/libkc3/buf_inspect_uw.c
@@ -21,26 +21,26 @@
 #include "str.h"
 #include "sym.h"
 
-sw buf_inspect_uw (s_buf *buf, const uw *u)
+sw buf_inspect_uw (s_pretty *pretty, s_buf *buf, const uw *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_Uw &&
       cast_needed_uw(*u)) {
-    if ((r = buf_inspect_paren_sym(buf, &g_sym_Uw)) < 0)
+    if ((r = buf_inspect_paren_sym(pretty, buf, &g_sym_Uw)) < 0)
       return r;
     result += r;
     if ((r = buf_write_1(buf, " ")) < 0)
       return r;
     result += r;
   }
-  if ((r = buf_inspect_uw_base(buf, &g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_uw_base(pretty, buf, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
 }
 
-sw buf_inspect_uw_base (s_buf *buf,
+sw buf_inspect_uw_base (s_pretty *pretty, s_buf *buf,
                              const s_str *base,
                              const uw *u)
 {
@@ -60,7 +60,7 @@ sw buf_inspect_uw_base (s_buf *buf,
       return -1;
     return buf_write_character_utf8(buf, zero);
   }
-  size = buf_inspect_uw_base_digits(base, u);
+  size = buf_inspect_uw_base_digits(pretty, base, u);
   c = alloc(size * sizeof(character));
   buf_save_init(buf, &save);
   radix = base->size;
@@ -89,7 +89,7 @@ sw buf_inspect_uw_base (s_buf *buf,
   return r;
 }
 
-sw buf_inspect_uw_base_digits (const s_str *base,
+sw buf_inspect_uw_base_digits (s_pretty *pretty, const s_str *base,
                                     const uw *u)
 {
   uw radix;
@@ -106,7 +106,7 @@ sw buf_inspect_uw_base_digits (const s_str *base,
   return size;
 }
 
-sw buf_inspect_uw_base_size (const s_str *base,
+sw buf_inspect_uw_base_size (s_pretty *pretty, const s_str *base,
                                   const uw *u)
 {
   character c;
@@ -123,23 +123,23 @@ sw buf_inspect_uw_base_size (const s_str *base,
     u_ /= radix;
     if (str_character(base, digit, &c) < 0)
       return -1;
-    result += buf_inspect_str_character_size(&c);
+    result += buf_inspect_str_character_size(pretty, &c);
   }
   return result;
 }
 
-sw buf_inspect_uw_size (const uw *u)
+sw buf_inspect_uw_size (s_pretty *pretty, const uw *u)
 {
   sw r;
   sw result = 0;
   if (g_buf_inspect_type != &g_sym_Uw &&
       cast_needed_uw(*u)) {
-    if ((r = buf_inspect_paren_sym_size(&g_sym_Uw)) < 0)
+    if ((r = buf_inspect_paren_sym_size(pretty, &g_sym_Uw)) < 0)
       return r;
     result += r;
     result += strlen(" ");
   }
-  if ((r = buf_inspect_uw_base_size(&g_kc3_base_decimal, u)) < 0)
+  if ((r = buf_inspect_uw_base_size(pretty, &g_kc3_base_decimal, u)) < 0)
     return r;
   result += r;
   return result;
diff --git a/libkc3/buf_inspect_uw_binary.c b/libkc3/buf_inspect_uw_binary.c
index af649bf..30c05cc 100644
--- a/libkc3/buf_inspect_uw_binary.c
+++ b/libkc3/buf_inspect_uw_binary.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_uw_binary (s_buf *buf, const uw *u)
+sw buf_inspect_uw_binary (s_pretty *pretty, s_buf *buf, const uw *u)
 {
-  return buf_inspect_uw_base(buf,
+  return buf_inspect_uw_base(pretty, buf,
                                   &g_kc3_base_binary,
                                   u);
 }
 
-sw buf_inspect_uw_binary_size (const uw *u)
+sw buf_inspect_uw_binary_size (s_pretty *pretty, const uw *u)
 {
-  return buf_inspect_uw_base_size(&g_kc3_base_binary,
+  return buf_inspect_uw_base_size(pretty, &g_kc3_base_binary,
                                        u);
 }
diff --git a/libkc3/buf_inspect_uw_decimal.c b/libkc3/buf_inspect_uw_decimal.c
index eaca546..593e005 100644
--- a/libkc3/buf_inspect_uw_decimal.c
+++ b/libkc3/buf_inspect_uw_decimal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_uw_decimal (s_buf *buf, const uw *u)
+sw buf_inspect_uw_decimal (s_pretty *pretty, s_buf *buf, const uw *u)
 {
-  return buf_inspect_uw_base(buf,
+  return buf_inspect_uw_base(pretty, buf,
                                   &g_kc3_base_decimal,
                                   u);
 }
 
-sw buf_inspect_uw_decimal_size (const uw *u)
+sw buf_inspect_uw_decimal_size (s_pretty *pretty, const uw *u)
 {
-  return buf_inspect_uw_base_size(&g_kc3_base_decimal,
+  return buf_inspect_uw_base_size(pretty, &g_kc3_base_decimal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_uw_hexadecimal.c b/libkc3/buf_inspect_uw_hexadecimal.c
index 6644397..23bbbe4 100644
--- a/libkc3/buf_inspect_uw_hexadecimal.c
+++ b/libkc3/buf_inspect_uw_hexadecimal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_uw_hexadecimal (s_buf *buf, const uw *u)
+sw buf_inspect_uw_hexadecimal (s_pretty *pretty, s_buf *buf, const uw *u)
 {
-  return buf_inspect_uw_base(buf,
+  return buf_inspect_uw_base(pretty, buf,
                                   &g_kc3_base_hexadecimal,
                                   u);
 }
 
-sw buf_inspect_uw_hexadecimal_size (const uw *u)
+sw buf_inspect_uw_hexadecimal_size (s_pretty *pretty, const uw *u)
 {
-  return buf_inspect_uw_base_size(&g_kc3_base_hexadecimal,
+  return buf_inspect_uw_base_size(pretty, &g_kc3_base_hexadecimal,
                                        u);
 }
diff --git a/libkc3/buf_inspect_uw_octal.c b/libkc3/buf_inspect_uw_octal.c
index c87243a..488348c 100644
--- a/libkc3/buf_inspect_uw_octal.c
+++ b/libkc3/buf_inspect_uw_octal.c
@@ -14,15 +14,15 @@
 #include "buf_inspect.h"
 #include "kc3_main.h"
 
-sw buf_inspect_uw_octal (s_buf *buf, const uw *u)
+sw buf_inspect_uw_octal (s_pretty *pretty, s_buf *buf, const uw *u)
 {
-  return buf_inspect_uw_base(buf,
+  return buf_inspect_uw_base(pretty, buf,
                                   &g_kc3_base_octal,
                                   u);
 }
 
-sw buf_inspect_uw_octal_size (const uw *u)
+sw buf_inspect_uw_octal_size (s_pretty *pretty, const uw *u)
 {
-  return buf_inspect_uw_base_size(&g_kc3_base_octal,
+  return buf_inspect_uw_base_size(pretty, &g_kc3_base_octal,
                                        u);
 }