From 3314ffa1cc6b510acb3559de026815883f40773e Mon Sep 17 00:00:00 2001
From: pw <pw>
Date: Thu, 3 Jun 1999 15:55:49 +0000
Subject: [PATCH] Add documentation for the optional arguments to
 unix-namestring.

---
 code/filesys.lisp | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/code/filesys.lisp b/code/filesys.lisp
index 4569188fc..5d1e67ab7 100644
--- a/code/filesys.lisp
+++ b/code/filesys.lisp
@@ -6,7 +6,7 @@
 ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/filesys.lisp,v 1.55 1999/02/02 12:18:34 pw Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/filesys.lisp,v 1.56 1999/06/03 15:55:49 pw Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -638,7 +638,10 @@
 ;;; 
 (defun unix-namestring (pathname &optional (for-input t) executable-only)
   "Convert PATHNAME into a string that can be used with UNIX system calls.
-   Search-lists and wild-cards are expanded."
+   Search-lists and wild-cards are expanded. If optional argument
+   FOR-INPUT is true and PATHNAME doesn't exist, NIL is returned.
+   If optional argument EXECUTABLE-ONLY is true, NIL is returned
+   unless an executable version of PATHNAME exists."
   ;; toy@rtp.ericsson.se: Let unix-namestring also handle logical
   ;; pathnames too.
   (let ((path (let ((lpn (pathname pathname)))
-- 
GitLab