Changeset 7735


Ignore:
Timestamp:
Nov 25, 2007, 2:31:52 AM (12 years ago)
Author:
gb
Message:

Fix comment describing %stat return values.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/level-1/linux-files.lisp

    r7658 r7735  
    289289
    290290
    291 ;;; Returns: (values t mode size mtime inode uid) on success,
    292 ;;;          (values nil nil nil nil nil nil) otherwise
     291;;; Returns: (values t mode size mtime inode uid blksize) on success,
     292;;;          (values nil nil nil nil nil nil nil) otherwise
     293;;; NAME should be a "native namestring", e.g,, have all lisp pathname
     294;;; escaping removed.
    293295(defun %stat (name &optional link-p)
    294296  (rlet ((stat :stat))
     
    314316
    315317(defun %unix-file-kind (path &optional check-for-link)
    316   (%file-kind (nth-value 1 (%stat (native-translated-namestring path)
    317                                   check-for-link))))
     318  (%file-kind (nth-value 1 (%stat (native-translated-namestring path) check-for-link))))
    318319
    319320(defun %unix-fd-kind (fd)
Note: See TracChangeset for help on using the changeset viewer.