Just Launched: You can now import projects and releases from Google Code onto SourceForge
We are excited to release new functionality to enable a 1-click import from Google Code onto the Allura platform on SourceForge. You can import tickets, wikis, source, releases, and more with a few simple steps. Read More
Update of /cvsroot/sbcl/sbcl/contrib/sb-simple-streams
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31290/contrib/sb-simple-streams
RIP (physical) PATHNAME-VERSION significance
... remove all internal discrimination based on the version
field if the pathname involved has the Unix host.
... parsing of a physical pathname namestring (i.e. again either
explicitly or implicitly on the Unix host) never produces
a version from the namestring.
... make :if-exists :new-version behave like :if-exists :error,
because despite weasel-words in CLHS someone might
legitimately expect :if-exists :new-version not to
clobber the old version.
... (this latter needs to be revisited, when OPEN is made aware
of logical pathnames and the wacky logic they impose; we
can support :new-version with LPNs, but only if OPEN is
... make pathnames more likely to be read/print consistent, by
throwing errors in more cases (we now pass PFD's test for
that, not that it's that stringent).
... throw errors on use of (:absolute :up) and friends in CL
... don't throw error on creation, and in fact test in sb-posix
that we can use #p"/../" for what it means.
RCS file: /cvsroot/sbcl/sbcl/contrib/sb-simple-streams/internal.lisp,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -d -r1.6 -r1.7
--- internal.lisp 30 Nov 2003 17:11:06 -0000 1.6
+++ internal.lisp 27 Jan 2004 10:34:58 -0000 1.7
@@ -482,11 +482,11 @@
- ((:error nil)
+ ((:error nil :new-version)
(setf mask (logior mask sb-unix:o_excl)))
(setf mask (logior mask sb-unix:o_creat)))
- ((:new-version :supersede)
(setf mask (logior mask sb-unix:o_trunc)))))
(setf if-exists nil))) ; :ignore-this-arg