fix for technoblogy/ulisp#65

dragoncoder047 · dragoncoder047 · commit efa583165a61 · 2024-06-14T08:43:25.000-04:00
diff --git a/ulisp.hpp b/ulisp.hpp
@@ -1616,7 +1616,7 @@ object* apropos (object* arg, bool print) {
                 uint8_t ft = fntype(getminmax(i));
                 pbuiltin((builtin_t)i, pserial); pserial(' '); pserial('(');
                 if (ft == FUNCTIONS) pfstring("function", pserial);
-                else if (ft == SPECIAL_FORMS) pfstring("special form", pserial);
+                else if (ft == SPECIAL_FORMS || ft == TAIL_FORMS) pfstring("special form", pserial);
                 else pfstring("symbol/keyword", pserial);
                 pserial(')'); pln(pserial);
             } else {
