kc3-lang/kc3

diff --git a/libkc3/data.c b/libkc3/data.c
index 3723996..9bb4025 100644
--- a/libkc3/data.c
+++ b/libkc3/data.c
@@ -642,6 +642,8 @@ void * data_init_copy (const s_sym *type, void *data, const void *src)
     return sw_init_copy(data, src);
   if (type == &g_sym_Sym)
     return sym_init_copy(data, src);
+  if (type == &g_sym_Tag)
+    return tag_init_copy(data, src);
   if (type == &g_sym_Tuple)
     return tuple_init_copy(data, src);
   if (type == &g_sym_U8)
diff --git a/libkc3/env.c b/libkc3/env.c
index a8dc831..a2c1fe7 100644
--- a/libkc3/env.c
+++ b/libkc3/env.c
@@ -549,7 +549,7 @@ bool env_eval_call_arguments (s_env *env, const s_list *args,
                               s_list **dest)
 {
   s_list **tail;
-  s_list *tmp;
+  s_list *tmp = NULL;
   tail = &tmp;
   while (args) {
     *tail = list_new(NULL);