kc3-lang/kc3

diff --git a/libc3/tag.c b/libc3/tag.c
index 7a46be9..130e178 100644
--- a/libc3/tag.c
+++ b/libc3/tag.c
@@ -715,6 +715,7 @@ s_tag * tag_add (const s_tag *a, const s_tag *b, s_tag *dest)
       integer_add(&tmp, &tmp2, &tmp);
       tag_init_integer(dest, &tmp);
       integer_clean(&tmp);
+      integer_clean(&tmp2);
       return dest;
     case TAG_S32:
       integer_init_u64(&tmp, a->data.u64);
@@ -722,6 +723,7 @@ s_tag * tag_add (const s_tag *a, const s_tag *b, s_tag *dest)
       integer_add(&tmp, &tmp2, &tmp);
       tag_init_integer(dest, &tmp);
       integer_clean(&tmp);
+      integer_clean(&tmp2);
       return dest;
     case TAG_S64:
       integer_init_u64(&tmp, a->data.u64);