Implementing second through tenth as places.

* eval.c (eval_init): Register second through tenth as intrinsic.

* gencadr.txr: New cadr.c changes encoded.

* lib.c (second, third, fourth, fifth, sixth): Functions
reimplemented using ref, so they are much more efficient
for vectors and strings.
(seventh, eighth, ninth, tenth): New functions.

* lib.h (seventh, eighth, ninth, tenth): Declared.

* share/txr/stdlib/place.tl: place macros defined for
second through tenth.

* txr.1: Documented.

1 files changed, 4 insertions, 0 deletions

diff --git a/lib.h b/lib.h
index 9ffdcbc5..7a37030a 100644
--- a/lib.h
+++ b/lib.h
@@ -445,6 +445,10 @@ val third(val cons);
 val fourth(val cons);
 val fifth(val cons);
 val sixth(val cons);
+val seventh(val cons);
+val eighth(val cons);
+val ninth(val cons);
+val tenth(val cons);
 val conses(val list);
 val lazy_conses(val list);
 val listref(val list, val ind);