* eval.c (eval_init): Register new functions posqual, posql,

posq, pos, and pos_if as intrinsics.

* lib.c (posqual, posql, posq, pos, pos_if): New functions.

* lib.h (posqual, posql, posq, pos, pos_if): Declared.

* txr.1: Documented

1 files changed, 5 insertions, 0 deletions

diff --git a/lib.h b/lib.h
index 869d3c31..77ca800d 100644
--- a/lib.h
+++ b/lib.h
@@ -679,6 +679,11 @@ val sort(val seq, val lessfun, val keyfun);
 val multi_sort(val lists, val funcs, val key_funcs);
 val find(val list, val key, val testfun, val keyfun);
 val find_if(val pred, val list, val key);
+val posqual(val obj, val list);
+val posql(val obj, val list);
+val posq(val obj, val list);
+val pos(val list, val key, val testfun, val keyfun);
+val pos_if(val pred, val list, val key);
 val set_diff(val list1, val list2, val testfun, val keyfun);
 val length(val seq);
 val sub(val seq, val from, val to);