New function: tailp.

* eval.c (eval_init): Register tailp intrinsic.

* lib.c (tailp): New function.

* lib.h (tailp): Declared.

* txr.1: Documented.

1 files changed, 1 insertions, 0 deletions

diff --git a/lib.h b/lib.h
index a3e0fe82..403a18de 100644
--- a/lib.h
+++ b/lib.h
@@ -613,6 +613,7 @@ val partition(val seq, val indices);
 val split(val seq, val indices);
 val partition_star(val seq, val indices);
 val split_star(val seq, val indices);
+val tailp(val obj, val list);
 val memq(val obj, val list);
 val rmemq(val obj, val list);
 val memql(val obj, val list);