From ff7c7432e48776dbfc970d19bb81c6fe6075c117 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Thu, 12 Jun 2014 07:08:41 -0700
Subject: * match.c (v_load): use the abs_path_p function instead of checking
 for leading slash.

* stream.c (abs_path_p): New function.
(stream_init): Register abs_path_p as abs-path-p.

* stream.h (abs_path_p): Declared.

* txr.1: Documented abs-path-p.

* dep.mk: Updated.
---
 stream.h | 1 +
 1 file changed, 1 insertion(+)

(limited to 'stream.h')

diff --git a/stream.h b/stream.h
index 30b06a85..16829c58 100644
--- a/stream.h
+++ b/stream.h
@@ -113,5 +113,6 @@ val mknod_wrap(val path, val mode, val dev);
 val symlink_wrap(val target, val to);
 val link_wrap(val target, val to);
 val readlink_wrap(val path);
+val abs_path_p(val path);
 
 void stream_init(void);
-- 
cgit v1.2.3