X-Git-Url: https://git.hcoop.net/bpt/guile.git/blobdiff_plain/42ad901d04a32e9ec7033a5ba520b3be1908f2bf..2e945bccca0209965dbbb1aea858f9bb7576641a:/libguile/filesys.c

diff --git a/libguile/filesys.c b/libguile/filesys.c
index 3434756a3..91c00852f 100644
--- a/libguile/filesys.c
+++ b/libguile/filesys.c
@@ -1503,14 +1503,14 @@ SCM_DEFINE (scm_basename, "basename", 1, 1, 0,
   if (j == -1)
     end = i;
 #ifdef __MINGW32__
-  while (i >= 0 && (f[i] != '/' || f[i] != '\\')) --i;
+  while (i >= 0 && f[i] != '/' && f[i] != '\\') --i;
 #else
   while (i >= 0 && f[i] != '/') --i;
 #endif /* ndef __MINGW32__ */
   if (i == end)
     {
 #ifdef __MINGW32__
-      if (len > 0 && (f[0] == '/' || f[i] == '\\'))
+      if (len > 0 && (f[0] == '/' || f[0] == '\\'))
 #else
       if (len > 0 && f[0] == '/')
 #endif /* ndef __MINGW32__ */