New sspl function.

* eval (eval_init): Register sspl, an argument-reversed
interface to split-str-set.

* lib.c (sspl): New function.

* lib.h (sspl): Declared.

* txr.1: Documented.

1 files changed, 5 insertions, 0 deletions

diff --git a/lib.c b/lib.c
index 4fcd12cc..fb9b24fc 100644
--- a/lib.c
+++ b/lib.c
@@ -5060,6 +5060,11 @@ val split_str_set(val str, val set)
   return out;
 }
 
+val sspl(val set, val str)
+{
+  return split_str_set(str, set);
+}
+
 val tok_str(val str, val tok_regex, val keep_sep)
 {
   list_collect_decl (out, iter);