remove saving of old_tailcall

dragoncoder047 · dragoncoder047 · commit 5abc6efab221 · 2024-06-15T12:32:08.000-04:00
in the enclosed code, there was nothing that branched on, accessed,
or modified tailcall or old_tailcall, so saving/restoring it was rather
pointless
diff --git a/ulisp.hpp b/ulisp.hpp
@@ -7326,7 +7326,6 @@ object* eval (object* form, object* env) {
         builtin_t name = builtin(function->name);
 
         if ((name == LET) || (name == LETSTAR)) {
-            bool old_tailcall = tailcall;
             if (args == NULL) error2(noargument);
             object* assigns = first(args);
             if (!listp(assigns)) error(notalist, assigns);
@@ -7348,7 +7347,6 @@ object* eval (object* form, object* env) {
             form = sp_progn(forms, env);
             if (tstflag(TAILCALL)) {
                 clrflag(TAILCALL);
-                tailcall = old_tailcall;
                 goto EVAL;
             }
             return form;
