kc3-lang/kc3

diff --git a/lib/c3/0.1/c3.facts b/lib/c3/0.1/c3.facts
index 79bc09f..ce821f5 100644
--- a/lib/c3/0.1/c3.facts
+++ b/lib/c3/0.1/c3.facts
@@ -178,3 +178,5 @@ replace {C3.first, :fn, fn {
  ({a, _b, _c}) { a }
  ({a, _b, _c, _d}) { a }
 }}
+add {C3, :symbol, C3.license}
+replace {C3.license, :cfn, cfn Void "c3_license" ()}
diff --git a/libc3/c3.c b/libc3/c3.c
index 86a9e43..61aa390 100644
--- a/libc3/c3.c
+++ b/libc3/c3.c
@@ -49,7 +49,8 @@ void c3_init (s_env *env)
     exit(1);
 }
 
-void c3_license ()
+s_tag * c3_license (s_tag *dest)
 {
-  buf_write_1(&g_c3_env.out, g_c3_license);
+  return sym_1(g_c3_license);
+  buf_flush(&g_c3_env.out);
 }