remove unreachable error condition

dragoncoder047 · dragoncoder047 · commit 9a2c3eb32fe7 · 2024-06-29T10:06:51.000-04:00
diff --git a/ulisp.hpp b/ulisp.hpp
@@ -7397,7 +7397,6 @@ object* eval (object* form, object* env) {
     }
     if (bfunctionp(function)) {
         builtin_t bname = builtin(function->name);
-        if (!builtinp(function->name)) error("can't call a symbol", function);
         Context = bname;
         checkminmax(bname, nargs);
         object* result = ((fn_ptr_type)lookupfn(bname))(args, env);

Original file line number	Diff line number	Diff line change
`@@ -7397,7 +7397,6 @@ object* eval (object* form, object* env) {`
`7397`	`7397`	`}`
`7398`	`7398`	`if (bfunctionp(function)) {`
`7399`	`7399`	`builtin_t bname = builtin(function->name);`
`7400`		`- if (!builtinp(function->name)) error("can't call a symbol", function);`
`7401`	`7400`	`Context = bname;`
`7402`	`7401`	`checkminmax(bname, nargs);`
`7403`	`7402`	`object* result = ((fn_ptr_type)lookupfn(bname))(args, env);`