mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-11 14:21:10 +02:00
Code Activity

Missed a bit of:

Browse source 
(scm_getcwd, scm_readlink): Avoid memory leak on errors.
This commit is contained in:
Kevin Ryde 2004-04-24 23:19:57 +00:00
parent 9ff1f64794
commit b49974ba3d
1 changed files with 0 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

1
libguile/filesys.c
View file

@ -874,7 +874,6 @@ SCM_DEFINE (scm_getcwd, "getcwd", 0, 0, 0,
errno = save_errno; errno = save_errno;
SCM_SYSERROR; SCM_SYSERROR;
} }
SCM_SYSERROR;
result = scm_mem2string (wd, strlen (wd)); result = scm_mem2string (wd, strlen (wd));
scm_must_free (wd); scm_must_free (wd);
return result; return result;