Commit eb50b0542e72a445141dc929e994a09bb71da246

Thomas de Grivel 2024-11-13T11:46:43

shorter stacktrace

diff --git a/libkc3/buf_inspect.c b/libkc3/buf_inspect.c
index 1535b46..13e624f 100644
--- a/libkc3/buf_inspect.c
+++ b/libkc3/buf_inspect.c
@@ -2848,12 +2848,19 @@ sw buf_inspect_stacktrace (s_buf *buf, const s_list *stacktrace)
     if ((r = buf_write_1(buf, " ")) < 0)
       return r;
     result += r;
-    if ((r = buf_inspect_tag(buf, &s->tag)) < 0)
-      return r;
-    result += r;
-    if ((r = buf_write_1(buf, "\n")) < 0)
-      return r;    
-    result += r;
+    if (s->tag.type == TAG_LIST) {
+      if ((r = buf_inspect_tag(buf, &s->tag.data.list->tag)) < 0)
+        return r;
+      result += r;
+      if ((r = buf_write_1(buf, "\n")) < 0)
+        return r;    
+      result += r;
+    }
+    else {
+      if ((r = buf_write_1(buf, "???\n")) < 0)
+        return r;    
+      result += r;
+    }
     s = list_next(s);
   }
   pretty_save_clean(&pretty_save, &buf->pretty);