Skip to content
Snippets Groups Projects
Commit 52d2dc6c authored by rtoy's avatar rtoy
Browse files

o Pathname printer was producing an error for (MAKE-PATHNAME :HOST NIL

  :TYPE "foo").  This is because PATHNAME-HOST was signaling an error
  for a host of NIL.  We check for a host of NIL now, and bypass the
  call to PATHNAME-HOST.  This allows the pathname printer to print
  #P(:HOST NIL :TYPE "foo"), as we want.

  (The error comes from host-pathname.  NIL is a valid result of
  host-pathname, so we could change that, but I think that has other
  implications, one of which is (MAKE-PATHNAME :HOST NIL :NAME "foo"
  :TYPE "lisp") gets printed as #P"foo.lisp", which is wrong, since
  that pathname has a unix-host host.)

o Fix merging of version in MAKE-PATHNAME.  CLHS MERGE-PATHNAMES says
  if the pathname name is given, the version is not affected by the
  default pathname.
parent 65b0a63d
No related branches found
No related tags found
No related merge requests found
Loading
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment