Commit 5a8468b139db385a795893110fe1d8334e3617f0

Thomas de Grivel 2023-11-30T20:04:31

fix tests

diff --git a/libc3/file.c b/libc3/file.c
index 82a8a60..6de4296 100644
--- a/libc3/file.c
+++ b/libc3/file.c
@@ -144,7 +144,7 @@ s_str * file_search (const s_str *suffix, const s_sym *mode,
           (r = buf_write_str(&buf, suffix)) < 0)
         return NULL;
       buf_read_to_str(&buf, &tmp);
-      io_inspect_str(&tmp);
+      /* io_inspect_str(&tmp); */
       file_access(&tmp, mode, &access);
       if (access) {
         *dest = tmp;
diff --git a/libc3/tuple.c b/libc3/tuple.c
index 3a18120..0aea6ee 100644
--- a/libc3/tuple.c
+++ b/libc3/tuple.c
@@ -59,6 +59,7 @@ s_tuple * tuple_init_1 (s_tuple *tuple, const s8 *p)
   assert(p);
   len = strlen(p);
   buf_init(&buf, false, len, (s8 *) p);
+  buf.wpos = len;
   r = buf_parse_tuple(&buf, tuple);
   if (r < 0 || (uw) r != len) {
     warnx("tuple_init_1: invalid tuple: \"%s\", %lu != %ld",