mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-20 02:30:23 +02:00
Code Activity

Update Gnulib to v0.1-603-g1d16a7b

Browse source
This commit is contained in:
Andy Wingo 2015-10-22 13:10:30 +00:00
parent 139ef2d17c
commit 2d4da30fde
412 changed files with 3961 additions and 2000 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/rename.c
View file

@ -1,6 +1,6 @@
/* Work around rename bugs in some systems.
Copyright (C) 2001-2003, 2005-2006, 2009-2014 Free Software Foundation, Inc.
Copyright (C) 2001-2003, 2005-2006, 2009-2015 Free Software Foundation, Inc.
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU Lesser General Public License as published by
@ -285,7 +285,7 @@ rpl_rename (char const *src, char const *dst)
char *dst_temp = (char *) dst;
bool src_slash;
bool dst_slash;
bool dst_exists;
bool dst_exists _GL_UNUSED;
int ret_val = -1;
int rename_errno = ENOTDIR;
struct stat src_st;
@ -462,7 +462,9 @@ rpl_rename (char const *src, char const *dst)
ret_val = rename (src_temp, dst_temp);
rename_errno = errno;
out:
out: _GL_UNUSED_LABEL;
if (src_temp != src)
free (src_temp);
if (dst_temp != dst)