summaryrefslogtreecommitdiff
path: root/libguile/filesys.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2013-02-24 14:07:13 +0100
committerAndy Wingo <wingo@pobox.com>2013-02-24 14:18:29 +0100
commitc21939bc247e2e36a5d698c60ba4a03cd3bbaf38 (patch)
tree8670d66293c5f78d0552565f1410e0ec9e46b5be /libguile/filesys.c
parent4bab7f01be8a1ce321f1e30235e1077f1ea0804c (diff)
downloadguile-c21939bc247e2e36a5d698c60ba4a03cd3bbaf38.tar.gz
simplify scm_stat on mingw
* libguile/filesys.c (scm_stat): Don't munge the filename on MinGW; gnulib does that for us.
Diffstat (limited to 'libguile/filesys.c')
-rw-r--r--libguile/filesys.c6
1 files changed, 0 insertions, 6 deletions
diff --git a/libguile/filesys.c b/libguile/filesys.c
index 2c4168eea..422a44cac 100644
--- a/libguile/filesys.c
+++ b/libguile/filesys.c
@@ -541,12 +541,6 @@ SCM_DEFINE (scm_stat, "stat", 1, 1, 0,
else if (scm_is_string (object))
{
char *file = scm_to_locale_string (object);
-#ifdef __MINGW32__
- char *p;
- p = file + strlen (file) - 1;
- while (p > file && (*p == '/' || *p == '\\'))
- *p-- = '\0';
-#endif
SCM_SYSCALL (rv = stat_or_stat64 (file, &stat_temp));
free (file);
}