/[cmucl]/src/code/pathname.lisp
ViewVC logotype

Diff of /src/code/pathname.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.37 by dtc, Thu Feb 11 12:24:30 1999 UTC revision 1.38 by dtc, Sat Apr 10 15:05:06 1999 UTC
# Line 959  a host-structure or string." Line 959  a host-structure or string."
959               (wild-pathname-p pathname :type)               (wild-pathname-p pathname :type)
960               (wild-pathname-p pathname :version)))               (wild-pathname-p pathname :version)))
961          (:host (frob (%pathname-host pathname)))          (:host (frob (%pathname-host pathname)))
962          (:device (frob (%pathname-host pathname)))          (:device (frob (%pathname-device pathname)))
963          (:directory (some #'frob (%pathname-directory pathname)))          (:directory (some #'frob (%pathname-directory pathname)))
964          (:name (frob (%pathname-name pathname)))          (:name (frob (%pathname-name pathname)))
965          (:type (frob (%pathname-type pathname)))          (:type (frob (%pathname-type pathname)))

Legend:
Removed from v.1.37  
changed lines
  Added in v.1.38

  ViewVC Help
Powered by ViewVC 1.1.5