From b49974ba3dc48ce7a706b5a16764c34f7f546be2 Mon Sep 17 00:00:00 2001
From: Kevin Ryde <user42@zip.com.au>
Date: Sat, 24 Apr 2004 23:19:57 +0000
Subject: [PATCH] Missed a bit of: (scm_getcwd, scm_readlink): Avoid memory
 leak on errors.

---
 libguile/filesys.c | 1 -
 1 file changed, 1 deletion(-)

diff --git a/libguile/filesys.c b/libguile/filesys.c
index bab0df1df..7b9d18fdb 100644
--- a/libguile/filesys.c
+++ b/libguile/filesys.c
@@ -874,7 +874,6 @@ SCM_DEFINE (scm_getcwd, "getcwd", 0, 0, 0,
       errno = save_errno;
       SCM_SYSERROR;
     }
-  SCM_SYSERROR;
   result = scm_mem2string (wd, strlen (wd));
   scm_must_free (wd);
   return result;