shithub: femtolisp

Info  •  Files  •  Log  •  Branches

no idea what this assert is about tbh

--- a/print.c

+++ b/print.c

@@ -104,8 +104,7 @@

         print_traverse(f->vals);

         print_traverse(f->env);

     }

-    else {

-        assert(iscvalue(v));

+    else if (iscvalue(v)) {

         cvalue_t *cv = (cvalue_t*)ptr(v);

         // don't consider shared references to ""

         if (!cv_isstr(cv) || cv_len(cv)!=0)