From 684f80f6f119a3234aeefd1ceaa7120b6b995b1e Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Thu, 12 Jan 2012 16:15:16 -0800 Subject: * eval.c (eval_init): Make lazy_appendv function available as append*. * txr.1: Documented. --- eval.c | 1 + 1 file changed, 1 insertion(+) (limited to 'eval.c') diff --git a/eval.c b/eval.c index b721dab7..dcca5a6d 100644 --- a/eval.c +++ b/eval.c @@ -1555,6 +1555,7 @@ void eval_init(void) reg_fun(intern(lit("first"), user_package), func_n1(car)); reg_fun(intern(lit("rest"), user_package), func_n1(cdr)); reg_fun(append_s, func_n0v(appendv)); + reg_fun(intern(lit("append*"), user_package), func_n0v(lazy_appendv)); reg_fun(list_s, func_n0v(identity)); reg_fun(intern(lit("identity"), user_package), identity_f); reg_fun(intern(lit("typeof"), user_package), func_n1(typeof)); -- cgit v1.2.3