kc3-lang/kc3

diff --git a/libc3/buf_parse.c b/libc3/buf_parse.c
index 6420d84..3096e00 100644
--- a/libc3/buf_parse.c
+++ b/libc3/buf_parse.c
@@ -266,9 +266,7 @@ sw buf_parse_call_op_rec (s_buf *buf, s_call *dest, u8 min_precedence)
         break;
       }
       result += r;
-      bzero(right, sizeof(s_tag));
-      right->type.type = TAG_CALL;
-      right->data.call = tmp2;
+      tag_init_call(right, &tmp2);
       if ((r = buf_ignore_spaces(buf)) < 0)
         break;
       result += r;