summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>1999-08-29 18:03:39 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>1999-08-29 18:03:39 +0000
commitf326ecf3863233f6e82fa182eb829fa77405204a (patch)
treee231b52bca331705483edec4275aa377530367a2
parent7671d04a380cf65f9b4672f2ae687950977cfcea (diff)
downloadguile-f326ecf3863233f6e82fa182eb829fa77405204a.tar.gz
* filesys.c (scm_stat2scm): Conditionally use S_ISLNK.
-rw-r--r--libguile/filesys.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/libguile/filesys.c b/libguile/filesys.c
index 1ee34c257..96c4e9b30 100644
--- a/libguile/filesys.c
+++ b/libguile/filesys.c
@@ -295,7 +295,9 @@ scm_close (SCM fd_or_port)
SCM_SYMBOL (scm_sym_regular, "regular");
SCM_SYMBOL (scm_sym_directory, "directory");
+#ifdef HAVE_S_ISLNK
SCM_SYMBOL (scm_sym_symlink, "symlink");
+#endif
SCM_SYMBOL (scm_sym_block_special, "block-special");
SCM_SYMBOL (scm_sym_char_special, "char-special");
SCM_SYMBOL (scm_sym_fifo, "fifo");
@@ -343,8 +345,10 @@ scm_stat2scm (stat_temp)
ve[13] = scm_sym_regular;
else if (S_ISDIR (mode))
ve[13] = scm_sym_directory;
+#ifdef HAVE_S_ISLNK
else if (S_ISLNK (mode))
ve[13] = scm_sym_symlink;
+#endif
else if (S_ISBLK (mode))
ve[13] = scm_sym_block_special;
else if (S_ISCHR (mode))