close Warning: Can't synchronize with repository "(default)" ("(default)" is not readable or not a Git repository.). Look in the Trac log for more information.

Opened 13 years ago

Closed 13 years ago

Last modified 13 years ago

#50 closed defect (fixed)

Print/read error with make-pathname

Reported by: Raymond Toy Owned by: somebody
Priority: minor Milestone:
Component: Core Version: 2011-12
Keywords: Cc:

Description

(make-pathname :directory '(:absolute "tmp" "" "a" "" "b")) -> #P"/tmp//a/b/". But #P"/tmp//a/b/"}} does not read back to the equivalent pathname. The multiple slashes are smashed into one so the result is the same as {{{#P/tmp/a/b/".

CMUCL should print the pathname as #P(:directory (:absolute "tmp" "" "a" "" "b")).

Change History (2)

comment:1 Changed 13 years ago by toy.raymond@…

Resolution: fixed
Status: newclosed

commit a4e33b7683a15bccdf944729b5c1fcb5a81970cf Author: Raymond Toy <toy.raymond@…> Date: Thu Dec 8 10:22:32 2011 -0800

Fix ticket:50

Check if "" (and "/") is in the list of directories and signal an error so that we use the #P(...) syntax to print out the pathname readably.

Update the pot and po files accordingly.

comment:2 Changed 13 years ago by rtoy@…

commit 2a93478cc3f27b51eab5cf03a369c3be3198ecd7 Author: Raymond Toy <rtoy@…> Date: Thu Dec 8 09:55:36 2011 -0800

Fix ticket:50

Catch the case of " " and signal an error so that we can print such pathnames using the #P(...) syntax. Also catch the case where the directory includes an explicit directory separator, "/", which would not be printed readably either.

Update the pot file too.

Note: See TracTickets for help on using tickets.