anchor.diff:  			:parent (handle-fh dhandle)
   			:directory-p (or (cl-fad:directory-exists-p pathname)
   					 (string= name ".")
  -					 (string= name "..")))))
  +					 (string= name ".."))
  +			:info (nefarious.finfo:get-file-information pathname))))
       (when (handle-directory-p handle)
         (nfs-log :info "Attempt to make a file handle from a directory")
         (return-from make-handle nil))
  
positive.code:   directory-p
    parent ;; nfs directory handle of the parent (or nil if toplevel export directory)
    children ;; nfs handles of children
    )
  
  (defun make-handle (dhandle name id)
  
negative.code: (defmethod nfs-provider-attrs ((provider simple-provider) fh)
    (let ((handle (find-handle provider fh)))
      (if handle
  	(let ((info (handle-info handle))) ;;(nefarious.finfo:get-file-information (handle-pathname handle))))
  	  (make-fattr3 :type (if (handle-directory-p handle)
  				 :dir
  				 :reg)
  