New function: path-components-safe.

* autoload.c (path_test_set_entries): Autoload on
path-components-safe symbol.

* stdlib/path-test.tl (if-windows, if-native-windows):
New system macros.
(path-safe-sticky-dir): New system function.
(path-components-safe): New function.

* tests/018/path-safe.tl: New file.'

* txr.1: Documented.

* stdlib/doc-syms.tl: Updated.

1 files changed, 1 insertions, 0 deletions

diff --git a/autoload.c b/autoload.c
index f2ecfb11..b646f914 100644
--- a/autoload.c
+++ b/autoload.c
@@ -192,6 +192,7 @@ static val path_test_set_entries(val fun)
     lit("path-mine-p"), lit("path-my-group-p"), lit("path-executable-to-me-p"),
     lit("path-writable-to-me-p"), lit("path-readable-to-me-p"),
     lit("path-read-writable-to-me-p"),
+    lit("path-safe-sticky-dir"), lit("path-components-safe"),
     lit("path-newer"), lit("path-older"),
     lit("path-same-object"), lit("path-private-to-me-p"),
     lit("path-strictly-private-to-me-p"),