Minor improvement for Windows in filefuncs.c.

2 files changed, 24 insertions, 1 deletions

diff --git a/extension/ChangeLog b/extension/ChangeLog
index 91146f3b..5a0065fe 100644
--- a/extension/ChangeLog
+++ b/extension/ChangeLog
@@ -1,3 +1,9 @@
+2013-08-02         Arnold D. Robbins     <arnold@skeeve.com>
+
+	* filefuncs.c (do_fts): Add a version for _WIN32 that prints a
+	"not supported" fatal message.  This is slightly better than the
+	"fts not found" which is otherwise produced.
+
 2013-07-24         Arnold D. Robbins     <arnold@skeeve.com>
 
 	* gawkdirfd.h (FAKE_FD_VALUE): Move definition up in the file to give
diff --git a/extension/filefuncs.c b/extension/filefuncs.c
index ad6a991d..0ffddedd 100644
--- a/extension/filefuncs.c
+++ b/extension/filefuncs.c
@@ -511,7 +511,24 @@ init_filefuncs(void)
 	return errors == 0;
 }
 
-#ifndef _WIN32
+#ifdef _WIN32
+/*  do_fts --- walk a heirarchy and fill in an array */
+
+/*
+ * Usage from awk:
+ *	flags = or(FTS_PHYSICAL, ...)
+ *	result = fts(pathlist, flags, filedata)
+ */
+
+static awk_value_t *
+do_fts(int nargs, awk_value_t *result)
+{
+	fatal(ext_id, _("fts is not supported on this system"));
+
+	return NULL;	/* for the compiler */
+}
+
+#else /* _WIN32 */
 
 static int fts_errors = 0;