diff options
-rw-r--r-- | libguile/filesys.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/filesys.c b/libguile/filesys.c index f7c83e00f..cd4be792f 100644 --- a/libguile/filesys.c +++ b/libguile/filesys.c @@ -463,10 +463,10 @@ static int fstat_Win32 (int fdes, struct stat *buf) static int is_file_name_separator (SCM c) { - if (c == SCM_MAKE_CHAR ('/')) + if (scm_is_eq (c, SCM_MAKE_CHAR ('/'))) return 1; #ifdef __MINGW32__ - if (c == SCM_MAKE_CHAR ('\\')) + if (scm_is_eq (c, SCM_MAKE_CHAR ('\\'))) return 1; #endif return 0; |