* stream.c (remove_path, rename_path): New functions.

* stream.h (remove_path, rename_path): Declared.

* utf8.c (w_remove, w_rename): New functions.

* utf8.h (w_remove, w_rename): Declared.

* eval.c (eval_init): Registered remove_path and rename_path
as intrinsics.

1 files changed, 2 insertions, 0 deletions

diff --git a/stream.h b/stream.h
index 6a76d6b8..2f4eec6c 100644
--- a/stream.h
+++ b/stream.h
@@ -99,5 +99,7 @@ val open_tail(val path, val mode_str, val seek_end_p);
 val open_command(val path, val mode_str);
 val open_process(val path, val mode_str, val args);
 val make_catenated_stream(val stream_list);
+val remove_path(val path);
+val rename_path(val from, val to);
 
 void stream_init(void);