From a06f2a9e34955fb4d560c8e3a7e57d5ffa745a12 Mon Sep 17 00:00:00 2001
From: bdc <bdc>
Date: Thu, 26 Sep 1996 19:30:22 +0000
Subject: [PATCH] minor tweak from Lewis Girod

---
 Error-log        | 3 +++
 scsh/syscalls1.c | 2 +-
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/Error-log b/Error-log
index 6922297..7c3c7d1 100644
--- a/Error-log
+++ b/Error-log
@@ -33,3 +33,6 @@ alist->env didn't work, because it was passing a list, not a vector,
     to the %INSTALL-ENV procedure. Reported by Mike Sperber 9/19/96.
 
 syntactically illegal LET in rw.scm. Reported by jsc 9/23/96.
+
+a semantically incorrect but benign error in syscalls.1c.
+Reported by Lewis Girod 12/12/95. Fixed by bdc 9/26/96
diff --git a/scsh/syscalls1.c b/scsh/syscalls1.c
index 5f0839f..c247c7f 100644
--- a/scsh/syscalls1.c
+++ b/scsh/syscalls1.c
@@ -127,7 +127,7 @@ char const *scm_readlink(const char *path)
   int retval = readlink(path, linkpath, MAXPATHLEN);
 
   return (char const *)
-      (retval == -1) ? NULL : ( linkpath[retval] = '\0', linkpath );
+      ((retval == -1) ? NULL : ( linkpath[retval] = '\0', linkpath ));
 }