1 files changed, 0 insertions, 9 deletions
diff --git a/lib.h b/lib.h
index 83437b61..a8c2b9b9 100644
--- a/lib.h
+++ b/lib.h
@@ -556,7 +556,6 @@ extern val rplaca_s, rplacd_s, seq_iter_s;
 extern val nothrow_k, args_k, colon_k, auto_k, fun_k;
 
 extern val null_string;
-extern val null_list; /* (nil) */
 
 extern val identity_f, identity_star_f;
 extern val equal_f, eql_f, eq_f, car_f, cdr_f, null_f;
@@ -748,7 +747,6 @@ val make_lazy_cons_pub(val func, val car, val cdr);
 val lcons_car(val lcons);
 val lcons_cdr(val lcons);
 void rcyc_cons(val cons);
-void rcyc_list(val list);
 void rcyc_empty(void);
 val lcons_fun(val lcons);
 INLINE val us_lcons_fun(val lcons) { return lcons->lc.func; }
@@ -940,7 +938,6 @@ val flo_int(val i);
 val less(val left, val right);
 val greater(val left, val right);
 val lequal(val left, val right);
-val gequal(val left, val right);
 val lessv(val first, struct args *rest);
 val greaterv(val first, struct args *rest);
 val lequalv(val first, struct args *rest);
@@ -1032,9 +1029,6 @@ val func_n2v(val (*fun)(val, val, varg));
 val func_n3v(val (*fun)(val, val, val, varg));
 val func_n4v(val (*fun)(val, val, val, val, varg));
 val func_n5v(val (*fun)(val, val, val, val, val, varg));
-val func_n6v(val (*fun)(val, val, val, val, val, val, varg));
-val func_n7v(val (*fun)(val, val, val, val, val, val, val, varg));
-val func_n8v(val (*fun)(val, val, val, val, val, val, val, val, varg));
 val func_n1o(val (*fun)(val), int reqargs);
 val func_n2o(val (*fun)(val, val), int reqargs);
 val func_n3o(val (*fun)(val, val, val), int reqargs);
@@ -1078,7 +1072,6 @@ val pa_12_1(val fun2, val arg2);
 val pa_123_3(val fun3, val arg1, val arg2);
 val pa_123_2(val fun3, val arg1, val arg3);
 val pa_123_1(val fun3, val arg2, val arg3);
-val pa_123_23(val fun3, val arg1);
 val pa_1234_1(val fun4, val arg2, val arg3, val arg4);
 val pa_1234_34(val fun3, val arg1, val arg2);
 val chain(val first_fun, ...);
@@ -1087,7 +1080,6 @@ val chandv(struct args *funlist);
 val juxtv(struct args *funlist);
 val andf(val first_fun, ...);
 val andv(struct args *funlist);
-val orf(val first_fun, ...);
 val orv(struct args *funlist);
 val notf(val fun);
 val nandv(struct args *funlist);
@@ -1158,7 +1150,6 @@ val acons(val car, val cdr, val list);
 val acons_new(val key, val value, val list);
 val acons_new_c(val key, loc new_p, loc list);
 val aconsql_new(val key, val value, val list);
-val aconsql_new_c(val key, loc new_p, loc list);
 val alist_remove(val list, val keys);
 val alist_removev(val list, struct args *keys);
 val alist_remove1(val list, val key);