diff options
author | Ludovic Courtès <ludo@gnu.org> | 2013-03-04 08:56:47 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2013-03-04 08:57:08 +0100 |
commit | 69b6da07c386446d16a11cc41cb64b486199413c (patch) | |
tree | e77d56be4474416a654ad7d8ac0b55224027cca6 /libguile/filesys.c | |
parent | 994d87be35769480b04c9f96085a7a0b41040c9d (diff) | |
download | guile-69b6da07c386446d16a11cc41cb64b486199413c.tar.gz |
Use `scm_is_eq' in filesys.c.
* libguile/filesys.c (is_file_name_separator): Use `scm_is_eq' instead
of `=='. Fixes <http://hydra.nixos.org/build/4261579>.
Diffstat (limited to 'libguile/filesys.c')
-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; |