anchor.diff:    ((:ok fs-stat-res-ok)
      (otherwise fs-stat-res-fail)))
   
  -(defun handle-fs-stat (handle)
  +;; FSSTAT3res NFSPROC3_FSSTAT(FSSTAT3args)           = 18;
  +(defrpc call-fs-stat (fs-stat-args fs-stat-res) 18)
  +(defhandler %handle-fs-stat (handle) 18
     (declare (ignore handle))
     (make-xunion :ok 
   	       (make-fs-stat-res-ok)))
   
  +;; ------------------------------------------------------
   ;; fs info -- get static file system info
   
   (defxenum nfs-info 
  
positive.code:   ((:ok read-dir*-res-ok)
     (otherwise read-dir*-res-fail)))
  
  (defun handle-read-dir* (dir cookie verf count max)
    (declare (ignore dir cookie verf count max))
    (make-xunion :ok 
  	       (make-read-dir*-res-ok)))
  
  ;; fs stat -- get dynamic filesystem info
  
  (defxtype* fs-stat-args () nfs-fh3)
  
negative.code:   ((:ok readlink-res-ok)
     (otherwise readlink-res-fail)))
  
  (defrpc call-readlink (readlink-args readlink-res) 5)
  (defhandler %handle-readlink (handle) 5
    (declare (ignore handle))
    (make-xunion :ok
  	       (make-readlink-res-ok :data "")))
  
  ;; ------------------------------------------------------
  ;; read -- read from file
  ;; READ3res NFSPROC3_READ(READ3args)               = 6;
  
  (defxstruct read-args ()
    ((file nfs-fh3)
  