From f791ed11cf3a801990f26a0ed7c0455c05df59df Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Tue, 8 Jun 2021 07:46:05 -0700
Subject: lib: new function, fill-vec.

* eval.c (eval_init): Register fill-vec intrinsic.

* lib.c (fill_vec): New function.

* lib.h (fill_vec): Declared.

* tests/010/vec.tl: New file.

* txr.1: Documented.

* share/txr/stdlib/doc-syms.tl: Updated.
---
 lib.h | 1 +
 1 file changed, 1 insertion(+)

(limited to 'lib.h')

diff --git a/lib.h b/lib.h
index a3fe1dd4..a91a2f9b 100644
--- a/lib.h
+++ b/lib.h
@@ -1069,6 +1069,7 @@ val copy_vec(val vec);
 val sub_vec(val vec_in, val from, val to);
 val replace_vec(val vec_in, val items, val from, val to);
 val replace_obj(val obj, val items, val from, val to);
+val fill_vec(val vec, val item, val from_in, val to_in);
 val cat_vec(val list);
 val lazy_stream_cons(val stream);
 val lazy_str(val list, val term, val limit);
-- 
cgit v1.2.3