From 420a230dbae897ee32c03297f7e4bb18f683a8b1 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Wed, 22 Jul 2015 07:37:22 -0700 Subject: 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. --- lib.h | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'lib.h') 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); -- cgit v1.2.3