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

Log of /src/code/filesys.lisp

Parent Directory Parent Directory | Revision Log Revision Log


Links to HEAD: (view) (annotate)
Sticky Tag:

Revision 1.114 - (view) (annotate) - [select for diffs]
Tue Mar 1 04:32:58 2011 UTC (3 years, 1 month ago) by rtoy
Branch: MAIN
CVS Tags: GIT-CONVERSION, HEAD, snapshot-2011-03, snapshot-2011-04, snapshot-2011-06, snapshot-2011-07, snapshot-2011-09
Changes since 1.113: +1 -34 lines
Diff to previous 1.113 , to selected 1.103
Remove commented-out DEFAULT-DIRECTORY written by fmg.

Don't need this anymore since the issue appears to be fixed.

Revision 1.113 - (view) (annotate) - [select for diffs]
Mon Nov 8 22:28:59 2010 UTC (3 years, 5 months ago) by rtoy
Branch: MAIN
CVS Tags: cross-sol-x86-2010-12-20, cross-sol-x86-base, cross-sol-x86-merged, cross-sparc-branch-base, snapshot-2010-12, snapshot-2011-01, snapshot-2011-02
Branch point for: cross-sol-x86-branch, cross-sparc-branch
Changes since 1.112: +18 -18 lines
Diff to previous 1.112 , to selected 1.103
Fix typo in ENUMERATE-MATCHES.  It's verify-existence, not
verify-existance.

Revision 1.112 - (view) (annotate) - [select for diffs]
Mon Jun 7 22:52:17 2010 UTC (3 years, 10 months ago) by rtoy
Branch: MAIN
CVS Tags: RELEASE_20b, release-20b-pre1, release-20b-pre2, snapshot-2010-07, snapshot-2010-08, snapshot-2010-11, sparc-tramp-assem-2010-07-19, sparc-tramp-assem-base
Branch point for: RELEASE-20B-BRANCH, sparc-tramp-assem-branch
Changes since 1.111: +2 -2 lines
Diff to previous 1.111 , to selected 1.103
code/filesys.lisp:
o FILE-WRITE-DATE merges the filename with
  *DEFAULT-PATHNAME-DEFAULTS*, as required by CLHS sec 19.2.3.

general-info/release-20b.txt:
o Update.

Revision 1.111 - (view) (annotate) - [select for diffs]
Mon Jun 7 22:10:11 2010 UTC (3 years, 10 months ago) by rtoy
Branch: MAIN
Changes since 1.110: +4 -4 lines
Diff to previous 1.110 , to selected 1.103
code/fd-stream.lisp:
o OPEN merges the filename with *DEFAULT-PATHNAME-DEFAULTS*, as
  required by CLHS sec 19.2.3.

code/filesys.lisp:
o DELETE-FILE, ENSURE-DIRECTORIES-EXIST, and FILE-AUTHOR merge the
  filename with *DEFAULT-PATHNAME-DEFAULTS*, as required by CLHS sec
  19.2.3.

general-info/release-20b.txt:
o Update.

Revision 1.110 - (view) (annotate) - [select for diffs]
Tue Apr 20 17:57:44 2010 UTC (3 years, 11 months ago) by rtoy
Branch: MAIN
CVS Tags: snapshot-2010-05, snapshot-2010-06
Changes since 1.109: +34 -34 lines
Diff to previous 1.109 , to selected 1.103
Change uses of _"foo" to (intl:gettext "foo").  This is because slime
may get confused with source locations if the reader macros are
installed.

Revision 1.109 - (view) (annotate) - [select for diffs]
Mon Apr 19 02:18:03 2010 UTC (3 years, 11 months ago) by rtoy
Branch: MAIN
Changes since 1.108: +19 -19 lines
Diff to previous 1.108 , to selected 1.103
Remove _N"" reader macro from docstrings when possible.

Revision 1.108 - (view) (annotate) - [select for diffs]
Fri Mar 19 15:18:59 2010 UTC (4 years ago) by rtoy
Branch: MAIN
CVS Tags: post-merge-intl-branch, snapshot-2010-04
Changes since 1.107: +54 -52 lines
Diff to previous 1.107 , to selected 1.103
Merge intl-branch 2010-03-18 to HEAD.  To build, you need to use
boot-2010-02-1 as the bootstrap file.  You should probably also use
the new -P option for build.sh to generate and update the po files
while building.

Revision 1.107.14.1 - (view) (annotate) - [select for diffs]
Thu Feb 25 20:34:49 2010 UTC (4 years, 1 month ago) by rtoy
Branch: intl-2-branch
Changes since 1.107: +54 -52 lines
Diff to previous 1.107 , to next main 1.114 , to selected 1.103
Restart internalization work.  This new branch starts with code from
the intl-branch on date 2010-02-12 18:00:00+0500.  This version works
and

LANG=en@piglatin bin/lisp

works (once the piglatin translation is added).

Revision 1.107.12.2 - (view) (annotate) - [select for diffs]
Tue Feb 9 18:41:59 2010 UTC (4 years, 2 months ago) by rtoy
Branch: intl-branch
CVS Tags: intl-branch-2010-03-18-1300, intl-branch-working-2010-02-11-1000, intl-branch-working-2010-02-19-1000
Changes since 1.107.12.1: +52 -52 lines
Diff to previous 1.107.12.1 , to branch point 1.107 , to next main 1.114 , to selected 1.103
Mark translatable strings; update cmucl.pot and ko/cmucl.po
accordingly.

Revision 1.107.12.1 - (view) (annotate) - [select for diffs]
Mon Feb 8 17:15:47 2010 UTC (4 years, 2 months ago) by rtoy
Branch: intl-branch
Changes since 1.107: +3 -1 lines
Diff to previous 1.107 , to selected 1.103
Add (intl:textdomain "cmucl") to the files to set the textdomain.

Revision 1.107 - (view) (annotate) - [select for diffs]
Thu Jun 11 16:03:57 2009 UTC (4 years, 10 months ago) by rtoy
Branch: MAIN
CVS Tags: RELEASE_20a, amd64-dd-start, intl-2-branch-base, intl-branch-base, merged-unicode-utf16-extfmt-2009-06-11, portable-clx-base, portable-clx-import-2009-06-16, pre-merge-intl-branch, release-20a-base, release-20a-pre1, snapshot-2009-07, snapshot-2009-08, snapshot-2009-11, snapshot-2009-12, snapshot-2010-01, snapshot-2010-02, snapshot-2010-03, unicode-string-buffer-base, unicode-string-buffer-impl-base
Branch point for: RELEASE-20A-BRANCH, amd64-dd-branch, intl-2-branch, intl-branch, portable-clx-branch, unicode-string-buffer-branch, unicode-string-buffer-impl-branch
Changes since 1.106: +6 -4 lines
Diff to previous 1.106 , to selected 1.103
Merge Unicode work to trunk.  From label
unicode-utf16-extfmt-2009-06-11.

Revision 1.104.4.4.2.1 - (view) (annotate) - [select for diffs]
Wed Jul 2 01:22:07 2008 UTC (5 years, 9 months ago) by rtoy
Branch: unicode-utf16-extfmt-branch
CVS Tags: unicode-snapshot-2009-05, unicode-snapshot-2009-06, unicode-utf16-extfmt-2009-03-27, unicode-utf16-extfmt-2009-06-11, unicode-utf16-extfmts-pre-sync-2008-11, unicode-utf16-extfmts-sync-2008-12
Changes since 1.104.4.4: +5 -1 lines
Diff to previous 1.104.4.4 , to selected 1.103
More external format support from Paul Foley.

To get external format support I think you need to add :extfmts to
*features*.  But you can't bootstrap with that feature yet.

Initial support for pathname translations to so that namestrings can
be converted to an appropriate format before being given to the OS.

Many, many new external formats added.

These changes are all on their own branch for now, until the bootstrap
issue is resolved.  And also so we don't lose these changes from Paul.

Revision 1.104.4.4 - (view) (annotate) - [select for diffs]
Mon Jun 23 15:03:31 2008 UTC (5 years, 9 months ago) by rtoy
Branch: unicode-utf16-branch
CVS Tags: unicode-utf16-char-support-2009-03-25, unicode-utf16-char-support-2009-03-26, unicode-utf16-sync-2008-07, unicode-utf16-sync-2008-09, unicode-utf16-sync-2008-11, unicode-utf16-sync-2008-12, unicode-utf16-sync-label-2009-03-16
Branch point for: unicode-utf16-extfmt-branch
Changes since 1.104.4.3: +36 -26 lines
Diff to previous 1.104.4.3 , to branch point 1.104 , to next main 1.114 , to selected 1.103
Sync to HEAD branch.

Revision 1.106 - (view) (annotate) - [select for diffs]
Thu Jun 19 21:28:51 2008 UTC (5 years, 9 months ago) by rtoy
Branch: MAIN
CVS Tags: RELEASE_19f, label-2009-03-16, label-2009-03-25, merge-sse2-packed, merge-with-19f, release-19f-base, release-19f-pre1, snapshot-2008-07, snapshot-2008-08, snapshot-2008-09, snapshot-2008-10, snapshot-2008-11, snapshot-2008-12, snapshot-2009-01, snapshot-2009-02, snapshot-2009-04, snapshot-2009-05, sse2-base, sse2-checkpoint-2008-10-01, sse2-merge-with-2008-10, sse2-merge-with-2008-11, sse2-packed-2008-11-12, sse2-packed-base
Branch point for: RELEASE-19F-BRANCH, sse2-branch, sse2-packed-branch
Changes since 1.105: +36 -26 lines
Diff to previous 1.105 , to selected 1.103
Make DIRECTORY work faster when there are a large number of files.
Basically, don't use delete-duplicates but do it ourselves since the
list is already sorted.

From Lynn Quam, cmucl-imp, 2008/06/05, slightly modified.

code/filesys.lisp:
o New DIRECTORY function

general-info/release-19f.txt:
o Update

Revision 1.104.4.3 - (view) (annotate) - [select for diffs]
Thu Jun 19 03:30:44 2008 UTC (5 years, 9 months ago) by rtoy
Branch: unicode-utf16-branch
Changes since 1.104.4.2: +2 -2 lines
Diff to previous 1.104.4.2 , to branch point 1.104 , to selected 1.103
Merge changes from HEAD to the unicode-utf16 branch.

Revision 1.105 - (view) (annotate) - [select for diffs]
Wed Jun 18 15:57:01 2008 UTC (5 years, 9 months ago) by rtoy
Branch: MAIN
Changes since 1.104: +2 -2 lines
Diff to previous 1.104 , to selected 1.103
RENAME-FILE should create the defaulted-new-name from merging new-name
with the original filespec, not the truename of the filespec.  Also
fixes the issue where defaulted-new-name should be an LPN if new-name
is.

From Madhu, cmucl-imp, 2008/06/01.

Revision 1.104.4.2 - (view) (annotate) - [select for diffs]
Mon May 19 16:55:15 2008 UTC (5 years, 10 months ago) by rtoy
Branch: unicode-utf16-branch
CVS Tags: unicode-utf16-string-support
Changes since 1.104.4.1: +1 -13 lines
Diff to previous 1.104.4.1 , to branch point 1.104 , to selected 1.103
Remove debugging stuff.

code/c-call.lisp:
o Remove debugging print
o Don't need make-array-unsigned-byte-8.  It was never really needed.
o Update deport-gen not to use make-array-unsigned-byte-8.
o Remove %primitive prints.

code/filesys.lisp:
o Remove %primitive prints.

code/lispinit.lisp:
o Remove %primitive prints.

code/pathname.lisp:
o Remove %primitive prints.

Revision 1.104.4.1 - (view) (annotate) - [select for diffs]
Wed May 14 16:12:04 2008 UTC (5 years, 11 months ago) by rtoy
Branch: unicode-utf16-branch
Changes since 1.104: +14 -4 lines
Diff to previous 1.104 , to selected 1.103
Initial checkin of unicode branch.  This is incomplete.

What works:
o Cross-compile works on sparc and a lisp.core is created.  This core
  is able to build code and appears to use 16-bit strings.

What doesn't:
o The sparc version is not able to rebuild itself.  It hangs when
  trying to create a new lisp.core.
o The x86 version will cross-compile, but worldload fails.  The files
  being loaded have bizarre names.  Probably some deftransform not
  working correctly.

Issues:
o Characters are still essentially 8 bits.  This needs to be fixed.
o All input/output is basically still 8 bits.  Only the low 8 bits of
  a character are output.  For input, characters are assumed to be
  8-bit.
o No external formats or anything is supported.
o Readtable support not done.


Use boot-2008-05-cross-unicode-{sparc,x86}.lisp to cross-compile the
unicode changes.

Untested whether this code can still be compiled without :unicode.

Changes:

code/array.lisp:
o Base-char strings are 16 bits wide, not 8.

code/c-call.lisp:
o Define versions of DEPORT-GEN, %NATURALIZE-C-STRING to "handle"
  unicode strings.

code/debug-info.lisp:
o Adjust READ-VAR-STRING to use 16-bit strings.  (Needed to at least
  to make the disassembler work.)

code/debug.lisp:
o Add address when printing out objects that can't be printed.
  (Generally useful and not just for unicode.)

code/fd-stream.lisp:
o Hack output routines to only use the low 8-bits of the character.
  (This needs significant work!)

code/filesys.lisp:
o Some debugging %primitive prints left in, but commented out, in
  PARSE-UNIX-NAMESTRING.

code/lispinit.lisp:
o Debugging %primitive print's for top-level forms.

code/load.lisp:
o Update FOP-SHORT-CHARACTER for unicode.  But still only output the
  low 8 bits of a character to a fasl/core.  This needs updating.
o Hack routines for symbols to explicitly read in the individual bytes
  of the symbol/package name because READ-N-BYTES isn't working for us
  right now.
o Update FOP-STRING/FOP-SMALL-STRING to read in 16-bit elements for
  strings.  Full 16-bit strings supported.
o Currently only write 8-bit chars for foreign names.  This needs
  fixing.

code/misc.lisp:
o Register :unicode runtime feature.

code/pathname.lisp:
o Debugging %primitive prints left in, but commented out.

code/stream.lisp:
o Replace %primitive byte-blt with REPLACE for now to get the desired
  characters.

code/unix-glibc2.lisp:
o Workaround for unix-current-directory to return 16-bit strings.
  (Not necessary anymore?)
o UNIX-RESOLVE-LINKS doesn't seem to like MAKE-STRING with an
  INITIAL-ELEMENT specified.  Remove initial-element.  (Needs fixing.)

code/unix.lisp:
o Same as for unix-glibc2.lisp

compiler/array-tran.lisp:
o Turn off the MAKE-STRING deftransform.
o Update ARRAY-INFO to create 16-bit arrays for an element-type of
  base-char.

compiler/dump.lisp:
o Only dump 8-bit chars to a fasl for foreign fixups.
o Explicitly dump the characters of symbol name.  DUMP-BYTES not quite
  working for us now?
o Make DUMP-SIMPLE-STRING dump all 16 bits of each character.
o Characters are dumped as the low 8 bits.  Needs fixing.

compiler/generic/new-genesis.lisp:
o STRING-TO-CORE writes 16-bit strings to the core file.
o FOP-SHORT-CHARACTER for unicode added, but we still only write 8
  bits to the core.  (Needs fixing.)
o COLD-LOAD-SYMBOL modified to read 16-bit characters from the fasl
  file to create a symbol.
o FOP-UNINTERNED-SYMBOL-SAVE and FOP-UNINTERNED-SMALL-SYMBOL-SAVE
  reads 16-bit characters for symbol names.
o FOP-STRING/FOP-SMALL-STRING reads 16-bit characters for strings.
o FOP-FOREIGN-FIXUP and FOP-FOREIGN-DATA-FIXUP still only read 8-bit
  characters for foreign names.  (Needs fixing.)

compiler/generic/vm-tran.lisp:
o New deftransforms to support unicode.  Not the most efficient but
  should be workable for now.  Old deftransforms didn't copy enough
  bits.
o Deftransform for concatenate completely disabled.  This needs
  fixing.

compiler/sparc/array.lisp:
o Change simple-string accessor to use halfword accessors instead of
  byte accessors.

compiler/x86/array.lisp:
o Change simple-string accessor to use halfword accessors instead of
  byte accessors.

lisp/Config.linux_gencgc:
o Define -DUNICODE as needed

lisp/Config.sun4_solaris_sunc
o Define -DUNICODE as needed.

lisp/alloc.c:
o alloc_string needs to allocate 16-bit strings

lisp/backtrace.c:
o Tell ldb backtrace how to print out 16-bit strings.  This is a hack!

lisp/gencgc.c:
o Tell GC how long the 16-bit strings are now.

lisp/interr.c:
o Not really needed but make debug_print (aka %primitive print)
  support all objects by calling ldb's print function to print the
  object.

lisp/os-common.c:
o Add hack convert_lisp_string to take a 16-bit Lisp string and create
  a new string containing just the low 8 bits of each Lisp character.
o OS foreign linkage stuff needs 8-bit strings, so we need to convert
  Lisp strings to the desired size.  Very hackish!

lisp/print.c:
o Teach ldb how to print Lisp 16-bit strings.  Currently, just dump
  out each byte of the 16-bit string.  This needs major work!

lisp/purify.c:
o Teach purify about the 16-bit strings.

Revision 1.104 - (view) (annotate) - [select for diffs]
Mon Sep 10 16:25:00 2007 UTC (6 years, 7 months ago) by rtoy
Branch: MAIN
CVS Tags: release-19e, release-19e-base, release-19e-pre1, release-19e-pre2, snapshot-2007-10, snapshot-2007-11, snapshot-2007-12, snapshot-2008-01, snapshot-2008-02, snapshot-2008-03, snapshot-2008-04, snapshot-2008-05, snapshot-2008-06, unicode-utf16-base
Branch point for: release-19e-branch, unicode-utf16-branch
Changes since 1.103: +23 -12 lines
Diff to previous 1.103
Apply patch from Walter C. Pelissero, cmucl-imp, 2007-09-05, fixing
bug that #p"..." didn't have a namestring.

Some further changes were also applied to fix the problem that #p"..a"
had directory = (:relative), name = nil, and type "a".  This is now
directory = nil, name = ".", type ="a".

Revision 1.103 - (view) (annotate) - [selected]
Sat Aug 4 23:54:37 2007 UTC (6 years, 8 months ago) by fgilham
Branch: MAIN
CVS Tags: pre-telent-clx, snapshot-2007-09
Changes since 1.102: +5 -4 lines
Diff to previous 1.102
Back out kludged default-directory function that doesn't seem necessary any more.

Revision 1.102 - (view) (annotate) - [select for diffs]
Sat Jan 20 02:01:48 2007 UTC (7 years, 2 months ago) by fgilham
Branch: MAIN
CVS Tags: snapshot-2007-02, snapshot-2007-03, snapshot-2007-04, snapshot-2007-05, snapshot-2007-06, snapshot-2007-07, snapshot-2007-08
Changes since 1.101: +38 -4 lines
Diff to previous 1.101 , to selected 1.103
Hacked default-directory function to avoid calling concatenate.  See
source comment associated with change.

Revision 1.101 - (view) (annotate) - [select for diffs]
Tue Jan 16 17:28:22 2007 UTC (7 years, 3 months ago) by rtoy
Branch: MAIN
Changes since 1.100: +11 -8 lines
Diff to previous 1.100 , to selected 1.103
Version numbers should not start with 0.  This causes problems
print/read consistency because "foo.~01~ is printed as "foo.~1~".
This could be fixed in other places, but it seems best not to allow
leading zeroes in the version number.

Patch from Madhu, cmucl-imp, 2007-01-14.

Revision 1.100 - (view) (annotate) - [select for diffs]
Tue Mar 14 15:19:10 2006 UTC (8 years, 1 month ago) by rtoy
Branch: MAIN
CVS Tags: double-double-array-base, double-double-array-checkpoint, double-double-base, double-double-init-%make-sparc, double-double-init-checkpoint-1, double-double-init-ppc, double-double-init-sparc, double-double-init-sparc-2, double-double-init-x86, double-double-irrat-end, double-double-irrat-start, double-double-reader-base, double-double-reader-checkpoint-1, double-double-sparc-checkpoint-1, release-19d, release-19d-base, release-19d-pre1, release-19d-pre2, snapshot-2006-04, snapshot-2006-05, snapshot-2006-06, snapshot-2006-07, snapshot-2006-08, snapshot-2006-09, snapshot-2006-10, snapshot-2006-11, snapshot-2006-12, snapshot-2007-01
Branch point for: double-double-array-branch, double-double-branch, double-double-reader-branch, release-19d-branch
Changes since 1.99: +25 -18 lines
Diff to previous 1.99 , to selected 1.103
o Add docstring for *IGNORE-WILDCARDS*.
o Make UNPARSE-UNIX-PIECE honor *IGNORE-WILDCARDS*.

Requested by Lynn Quam so namestrings can be given to run-program and
friends without pathname wildcards escaped.

Revision 1.86.2.1 - (view) (annotate) - [select for diffs]
Mon Dec 19 01:09:50 2005 UTC (8 years, 3 months ago) by rtoy
Branch: ppc_gencgc_branch
CVS Tags: ppc_gencgc_snap_2005-12-17, ppc_gencgc_snap_2006-01-06
Changes since 1.86: +160 -79 lines
Diff to previous 1.86 , to next main 1.114 , to selected 1.103
Merge code from main branch of 2005-12-17 to ppc gencgc branch.  Still
doesn't work of course.

Revision 1.99 - (view) (annotate) - [select for diffs]
Sun Dec 4 15:49:35 2005 UTC (8 years, 4 months ago) by rtoy
Branch: MAIN
CVS Tags: snapshot-2006-01, snapshot-2006-02, snapshot-2006-03
Changes since 1.98: +3 -2 lines
Diff to previous 1.98 , to selected 1.103
A single leading dot in the name portion is ok when printing the
namestring.

Bug noted by Lynn Quam, cmucl-imp, 2005/12/02.

Revision 1.98 - (view) (annotate) - [select for diffs]
Mon Nov 7 00:42:25 2005 UTC (8 years, 5 months ago) by rtoy
Branch: MAIN
CVS Tags: snapshot-2005-12
Changes since 1.97: +4 -3 lines
Diff to previous 1.97 , to selected 1.103
A pathname name may contain a dot if a pathname type is given.

Revision 1.97 - (view) (annotate) - [select for diffs]
Fri Nov 4 14:22:43 2005 UTC (8 years, 5 months ago) by rtoy
Branch: MAIN
Changes since 1.96: +14 -1 lines
Diff to previous 1.96 , to selected 1.103
Signal an error when trying to create a namestring if the name or type
component contains a "/" or "." because we can't print these readably.

Revision 1.96 - (view) (annotate) - [select for diffs]
Sat Oct 22 00:33:56 2005 UTC (8 years, 5 months ago) by rtoy
Branch: MAIN
CVS Tags: snapshot-2005-11
Changes since 1.95: +3 -2 lines
Diff to previous 1.95 , to selected 1.103
Oops.  A version of nil, :newest, or :unspecific is ok without a
name.  (But we still have problems with print/read for :newest and
:unspecific.)

Revision 1.95 - (view) (annotate) - [select for diffs]
Fri Oct 21 18:10:11 2005 UTC (8 years, 5 months ago) by rtoy
Branch: MAIN
Changes since 1.94: +1 -2 lines
Diff to previous 1.94 , to selected 1.103
CMUCL cannot readably print a pathname with just a version component,
so signal an error when we try to generate the the namestring.

Revision 1.94 - (view) (annotate) - [select for diffs]
Wed Oct 5 12:54:28 2005 UTC (8 years, 6 months ago) by rtoy
Branch: MAIN
CVS Tags: release-19c, release-19c-base, release-19c-pre1, snapshot-2005-10
Branch point for: release-19c-branch
Changes since 1.93: +19 -7 lines
Diff to previous 1.93 , to selected 1.103
Fix a couple of issues with ENOUGH-NAMESTRING not returning the
shortest namestring:

(enough-namestring #p"/foo" #p"/") => "foo", not "./foo"
(enough-namestring #p"foo/bar" #p"foo/") => "bar", not "foo/bar"

We check for a common prefix for all cases first now, instead of just
when the pathname is :absolute.

Revision 1.93 - (view) (annotate) - [select for diffs]
Fri Sep 30 15:44:19 2005 UTC (8 years, 6 months ago) by rtoy
Branch: MAIN
Changes since 1.92: +14 -4 lines
Diff to previous 1.92 , to selected 1.103
parse-unix-namestring:
o Don't allow a namestring to be parsed as a search-list if a logical
  host with the same host name already exists.  Allowing this causes
  confusing in printing such pathnames because, when read, the logical
  host takes precedence.

unparse-unix-file:
o Preserve version :NEWEST when printing out logical pathnames.  This
  makes #p"host:foo.bar.newest" readable.

Revision 1.92 - (view) (annotate) - [select for diffs]
Sun Sep 25 21:47:48 2005 UTC (8 years, 6 months ago) by rtoy
Branch: MAIN
Changes since 1.91: +17 -5 lines
Diff to previous 1.91 , to selected 1.103
extract-name-type-and-version:
o Leave some debugging prints in, but commented out.
o In the last case for EXPLICIT-VERSION, when looking for digits
  surrounded by ~'s, return version NIL if we don't find just digits.
  #p"foo.*" was returning version :newest.  I think we really want
  :version nil.

unparse-unix-enough:
o If the pathname has no directory, it's relative to the defaults.
  Returning NIL is probably as good as returning '(:RELATIVE), and
  results in a shorter namestring.

Revision 1.91 - (view) (annotate) - [select for diffs]
Thu Sep 22 20:27:16 2005 UTC (8 years, 6 months ago) by rtoy
Branch: MAIN
Changes since 1.90: +56 -53 lines
Diff to previous 1.90 , to selected 1.103
ENOUGH-NAMESTRING did not work with search-lists.  Now just look at
the first path in a search-list to determine the appropriate
namestring.  This is mostly intended to work with the "home:"
search-list, which only has one path, by default.

Revision 1.90 - (view) (annotate) - [select for diffs]
Wed Sep 21 20:01:34 2005 UTC (8 years, 6 months ago) by rtoy
Branch: MAIN
Changes since 1.89: +15 -4 lines
Diff to previous 1.89 , to selected 1.103
code/filesys.lisp:

o Make the #p reader treat ".." as a directory, not a file.
o Make the #p reader treat "<lots of dots>" be a file with that name
  instead of name with one fewer dot and type "".  So #p"..." has
  :name "...", :type nil instead of :name "..", :type "".

code/pathname.lisp:
o Issue a warning if someone wants :name to be ".." or ".".  We allow
  it, but doing so will break print/read consistency.  (Should we make
  such pathnames not readably printable?)

Revision 1.89 - (view) (annotate) - [select for diffs]
Mon Sep 12 14:38:17 2005 UTC (8 years, 7 months ago) by rtoy
Branch: MAIN
Changes since 1.88: +18 -5 lines
Diff to previous 1.88 , to selected 1.103
Fix some issues with printing (make-pathname :directory '(:relative)),
which used to print as #p"", and with reading #p".", #p"./".

code/filesys.lisp:
o When parsing a unix namestring, delete any "." elements of the
  directory list.
o If we've parsed a namestring such that the file name is ".", replace
  that with :name NIL and adjust the :directory component
  appropriately, because on Unix, "." can't be the name of a file.
o Make :directory '(:relative) be printed as "./"

code/pathname.lisp:
o If the :directory argument to MAKE-PATHNAME contains strings with
  #\/, print a warning that this is not a valid element.
o Remove all "."'s from a :relative directory component.

Revision 1.88 - (view) (annotate) - [select for diffs]
Wed Aug 31 13:57:08 2005 UTC (8 years, 7 months ago) by rtoy
Branch: MAIN
Changes since 1.87: +2 -2 lines
Diff to previous 1.87 , to selected 1.103
(enough-namestring #p"/a/b/c/" #p"/") was returning #p"/a/b/c/"
instead of #p"a/b/c/".  Fix it.

Revision 1.87 - (view) (annotate) - [select for diffs]
Mon Aug 22 20:29:19 2005 UTC (8 years, 7 months ago) by rtoy
Branch: MAIN
CVS Tags: snapshot-2005-09
Changes since 1.86: +18 -13 lines
Diff to previous 1.86 , to selected 1.103
Add a restart to ENSURE-DIRECTORIES-EXIST to retry directory
creation.  From Eduardo Munoz, cmucl-imp, 2005/07/31.

Revision 1.86 - (view) (annotate) - [select for diffs]
Thu Feb 10 15:57:08 2005 UTC (9 years, 2 months ago) by rtoy
Branch: MAIN
CVS Tags: ppc_gencgc_snap_2005-05-14, release-19b-base, release-19b-pre1, release-19b-pre2, snapshot-2005-03, snapshot-2005-04, snapshot-2005-05, snapshot-2005-06, snapshot-2005-07, snapshot-2005-08
Branch point for: ppc_gencgc_branch, release-19b-branch
Changes since 1.85: +5 -1 lines
Diff to previous 1.85 , to selected 1.103
As noted by Dan Corkill, cmucl-imp, 2005-02-08, :unspecific should be
accepted when computing namestrings.  CLHS 19.2.2.2.3.1 says
:unspecific components should not appear in the namestring.  Make it so.

Revision 1.85 - (view) (annotate) - [select for diffs]
Mon Dec 13 15:12:54 2004 UTC (9 years, 4 months ago) by rtoy
Branch: MAIN
CVS Tags: snapshot-2005-01, snapshot-2005-02
Changes since 1.84: +2 -2 lines
Diff to previous 1.84 , to selected 1.103
A directory component containing :WILD was not being handled correctly
when converting to a namestring.

Bug and fix from Artem V. Andreev, cmucl-imp, 2004-12-12.

Revision 1.84 - (view) (annotate) - [select for diffs]
Mon Oct 18 16:57:33 2004 UTC (9 years, 5 months ago) by rtoy
Branch: MAIN
CVS Tags: snapshot-2004-11, snapshot-2004-12
Changes since 1.83: +9 -5 lines
Diff to previous 1.83 , to selected 1.103
EXTRACT-NAME-TYPE-AND-VERSION:
  o Was not treating "foo.lisp.*" as having a version :wild, like cmucl
    used to.  Reinstate this.
  o Honor *ignore-wildcards* when extracting versions.  This prevents
    errors if there's a file named like "foo.lisp.~*~".

%ENUMERATE-FILES:
  o Was handling the case when the version is :wild.  We now search
    the directory for versions that match.

Issue reported by Lynn Quam, cmucl-imp, 2004-10-15.

Revision 1.83 - (view) (annotate) - [select for diffs]
Mon Sep 27 19:06:35 2004 UTC (9 years, 6 months ago) by rtoy
Branch: MAIN
CVS Tags: snapshot-2004-10
Changes since 1.82: +2 -1 lines
Diff to previous 1.82 , to selected 1.103
Do not signal errors when a version is given without a name.  This
needs to be rethought because there's confusion on what pathnames can
be printed readably or not.

In particular (probe-file "logical-host:dir;") gets an error because
there's a merge-pathname that creates a pathname without a name, but
version :newest.

Revision 1.82 - (view) (annotate) - [select for diffs]
Mon Sep 13 17:42:40 2004 UTC (9 years, 7 months ago) by rtoy
Branch: MAIN
Changes since 1.81: +16 -3 lines
Diff to previous 1.81 , to selected 1.103
o Was not correctly parsing "~*~" to mean a wild-card version.
o If we have a version, but no name, we can't print readably, so
  signal an error instead.

Revision 1.79.4.1 - (view) (annotate) - [select for diffs]
Wed Jun 2 15:08:53 2004 UTC (9 years, 10 months ago) by rtoy
Branch: release-19a-branch
CVS Tags: release-19a, release-19a-pre2, release-19a-pre3
Changes since 1.79: +3 -3 lines
Diff to previous 1.79 , to next main 1.114 , to selected 1.103
Merge in changes from 1.80/1.81 for namestring fixes and error signaling in FILE-AUTHOR

Revision 1.81 - (view) (annotate) - [select for diffs]
Wed Jun 2 14:46:08 2004 UTC (9 years, 10 months ago) by rtoy
Branch: MAIN
CVS Tags: prm-before-macosx-merge-tag, snapshot-2004-06, snapshot-2004-07, snapshot-2004-08, snapshot-2004-09
Changes since 1.80: +2 -2 lines
Diff to previous 1.80 , to selected 1.103
CMUCL intended to support things like [abc] in namestrings, but a typo
prevented it.  Fix the typos.

Revision 1.80 - (view) (annotate) - [select for diffs]
Wed Jun 2 09:12:24 2004 UTC (9 years, 10 months ago) by emarsden
Branch: MAIN
Changes since 1.79: +2 -2 lines
Diff to previous 1.79 , to selected 1.103
Trivial fix for error signaling in FILE-AUTHOR. Resolves file-author.error.3
and file-author.error.4 in the pfdietz ANSI test suite.

Revision 1.79 - (view) (annotate) - [select for diffs]
Thu Apr 1 17:48:37 2004 UTC (10 years ago) by rtoy
Branch: MAIN
CVS Tags: amd64-merge-start, mod-arith-base, release-19a-base, release-19a-pre1, snapshot-2004-04, snapshot-2004-05
Branch point for: mod-arith-branch, release-19a-branch
Changes since 1.78: +4 -2 lines
Diff to previous 1.78 , to selected 1.103
Helmut Eller notes on cmucl-imp on 2004-04-24 that

  (delete-file (open "/tmp/tmp-file" :direction :output
                     :if-does-not-exist :create :if-exists :supersede))

signals an error because delete-file is unlinking the file twice,
because CLOSE is called with the option :ABORT T.

Don't do that, so that any reversion of the file isn't done, and we
file is deleted.

Revision 1.78 - (view) (annotate) - [select for diffs]
Fri Jan 9 15:09:27 2004 UTC (10 years, 3 months ago) by toy
Branch: MAIN
Changes since 1.77: +2 -2 lines
Diff to previous 1.77 , to selected 1.103
The pathname for PROBE-FILE is supposed to be merged with
*DEFAULT-PATHNAME-DEFAULTS*

Revision 1.77 - (view) (annotate) - [select for diffs]
Fri Jan 9 04:11:07 2004 UTC (10 years, 3 months ago) by toy
Branch: MAIN
Changes since 1.76: +3 -2 lines
Diff to previous 1.76 , to selected 1.103
DIRECTORY is supposed to merge the given pathname with
*DEFAULT-PATHNAME-DEFAULTS*

Revision 1.76 - (view) (annotate) - [select for diffs]
Tue Aug 5 16:31:24 2003 UTC (10 years, 8 months ago) by toy
Branch: MAIN
CVS Tags: dynamic-extent-base, lisp-executable-base, snapshot-2003-10, snapshot-2003-11, snapshot-2003-12, sparc_gencgc, sparc_gencgc_merge
Branch point for: dynamic-extent, lisp-executable, sparc_gencgc_branch
Changes since 1.75: +9 -3 lines
Diff to previous 1.75 , to selected 1.103
In %ENUMERATE-FILES, also match if the file has no explicit version
(version NIL) and we're looking for version :NEWEST, since that's what
no explicit version means.

Revision 1.75 - (view) (annotate) - [select for diffs]
Wed Jun 11 16:40:02 2003 UTC (10 years, 10 months ago) by toy
Branch: MAIN
Changes since 1.74: +6 -5 lines
Diff to previous 1.74 , to selected 1.103
	* code/filesys.lisp (purge-backup-files): Renamed from
	purge-files, which is just too vague.

	(directory): Specify a default-version of :WILD for
	merge-pathnames to make sure we can match any version when looking
	for files.

Revision 1.74 - (view) (annotate) - [select for diffs]
Tue Jun 10 18:14:10 2003 UTC (10 years, 10 months ago) by toy
Branch: MAIN
Changes since 1.73: +9 -3 lines
Diff to previous 1.73 , to selected 1.103
	* code/filesys.lisp (filesys-init): The version component of
	*default-pathname-defaults* changed from :newest to :unspecific,
	so merging doesn't automatically create versioned files.

	(extract-name-type-and-version): When no explicit version is given
	in a namestring, return version NIL instead of :NEWEST.

Revision 1.73 - (view) (annotate) - [select for diffs]
Tue Jun 10 16:52:36 2003 UTC (10 years, 10 months ago) by toy
Branch: MAIN
Changes since 1.72: +63 -27 lines
Diff to previous 1.72 , to selected 1.103
Some changes from Paul Foley:

o Fix a number of spelling errors.
o Add EXT:PURGE-FILES (hmm, should that be renamed to
  purge-backup-files?) to delete old versions of files.
o Opening a file with :if-exists :append shouldn't set the Unix append
  flag, else you can't seek back to a point before you started
  appending. (Actually from Rudi Schlatte.)
o Fix a bug in logical pathname parsing.
o Fix FASL-file versioning so we don't create versioned fasl files.

Revision 1.72 - (view) (annotate) - [select for diffs]
Fri Feb 14 19:47:12 2003 UTC (11 years, 2 months ago) by toy
Branch: MAIN
CVS Tags: cold-pcl-base, release-18e, release-18e-base, release-18e-pre1, release-18e-pre2, remove_negative_zero_not_zero
Branch point for: cold-pcl, release-18e-branch
Changes since 1.71: +12 -6 lines
Diff to previous 1.71 , to selected 1.103
UNPARSE-UNIX-ENOUGH:  If the PATHNAME has no directory component or
has a relative directory component, it is taken as relative to
DEFAULTS instead of signaling an error that it can't be represented
relative to DEFAULTS.

Revision 1.71 - (view) (annotate) - [select for diffs]
Fri Nov 15 15:08:11 2002 UTC (11 years, 5 months ago) by toy
Branch: MAIN
Changes since 1.70: +9 -80 lines
Diff to previous 1.70 , to selected 1.103
From Eric Marsden:

   Replace the code that grovels /etc/passwd files with an interface
   to the standard user and group database access functions. This
   makes CMUCL work better on systems where user databases are
   accessed using NIS or LDAP.

   Add functions UNIX-GETPWUID, UNIX-GETPWNAM that return structures
   of type USER-INFO, and UNIX-GETGRGID and UNIX-GETGRNAM that
   return structures of type GROUP-INFO. The functions return NIL if
   the requested information is not available. On Linux/glibc and
   Solaris, reentrant versions of the functions are used. On FreeBSD
   we call the non-thread-safe versions.

Revision 1.70 - (view) (annotate) - [select for diffs]
Fri Nov 8 15:26:51 2002 UTC (11 years, 5 months ago) by toy
Branch: MAIN
Changes since 1.69: +4 -2 lines
Diff to previous 1.69 , to selected 1.103
Bob Rogers suggests that default-directory return a pathname with an
explicit unix host instead of leaving it unspecified.

Revision 1.69 - (view) (annotate) - [select for diffs]
Wed Oct 16 14:01:01 2002 UTC (11 years, 6 months ago) by toy
Branch: MAIN
Changes since 1.68: +5 -2 lines
Diff to previous 1.68 , to selected 1.103
Port over SBCL's fix for the Entomotomy bug

host-namestring-return-value-unusable
logical-pathnames-not-externalizable

host-namestring returns "" for physical pathnames when it used to
return "Unix".  But "Unix" is a valid logical host name and "" is not.

Logical pathnames weren't externalizable.  Make them so.

Revision 1.68.2.1 - (view) (annotate) - [select for diffs]
Fri Oct 4 23:13:24 2002 UTC (11 years, 6 months ago) by pmai
Branch: UNICODE-BRANCH
Changes since 1.68: +35 -38 lines
Diff to previous 1.68 , to next main 1.114 , to selected 1.103
Checked in Brian Spilsbury's experimental Unicode, locales, and dialect
support patchset.  This lives on its own branch, so that people can
play with it and tweak it, without disturbing 18e release engineering
on the main branch.  Bootstrapping has only been tried on LINKAGE_TABLE
x86/Linux builds.  A working cross-compile script is checked in under
bootfiles/19a/boot1-cross-unicode.lisp.  The script still leaves you
with some interactive errors, on the cross compile, which you should
answer with 2.  See the mailing list for more information.

Revision 1.68 - (view) (annotate) - [select for diffs]
Wed Oct 2 13:36:48 2002 UTC (11 years, 6 months ago) by toy
Branch: MAIN
CVS Tags: UNICODE-BASE
Branch point for: UNICODE-BRANCH
Changes since 1.67: +3 -3 lines
Diff to previous 1.67 , to selected 1.103
Treat pathname version :unspecific the same as :newest.

Revision 1.67 - (view) (annotate) - [select for diffs]
Wed Jul 10 16:15:58 2002 UTC (11 years, 9 months ago) by toy
Branch: MAIN
CVS Tags: LINKAGE_TABLE, PRE_LINKAGE_TABLE
Changes since 1.66: +4 -2 lines
Diff to previous 1.66 , to selected 1.103
From Eric Marsden:

 * (pcl:class-precedence-list (find-class 'null)) should have symbol
   occurring before list, as per CLHS.

 * minor changes to certain error conditions: eg trying to set
   DEFAULT-DIRECTORY to a non-existent directory should raise a
   condition of type FILE-ERROR. (Some of these changes are from
   Alexey Dejneka, via SBCL).

 * cleanup of some Hemlock-related symbols that shouldn't be exported
   when :no-hemlock is defined.

Revision 1.43.2.6 - (view) (annotate) - [select for diffs]
Sat Mar 23 18:49:59 2002 UTC (12 years ago) by pw
Branch: RELENG_18
CVS Tags: RELEASE_18d
Changes since 1.43.2.5: +71 -50 lines
Diff to previous 1.43.2.5 , to branch point 1.43 , to next main 1.114 , to selected 1.103
Mega commit to bring RELENG_18 branch in sync with HEAD in preparation
for release tagging 18d.

Revision 1.66 - (view) (annotate) - [select for diffs]
Tue Feb 19 15:48:25 2002 UTC (12 years, 1 month ago) by toy
Branch: MAIN
Changes since 1.65: +4 -3 lines
Diff to previous 1.65 , to selected 1.103
%ENUMERATE-FILES was not putting the version number on to pathname
correctly (forgot the ~s).  From Lynn Quam.

Revision 1.65 - (view) (annotate) - [select for diffs]
Thu Dec 13 13:45:08 2001 UTC (12 years, 4 months ago) by pmai
Branch: MAIN
Changes since 1.64: +3 -2 lines
Diff to previous 1.64 , to selected 1.103
Fix bug reported by Lynn Quam, which caused (pathname "*") to fail
because of a missing bounds check.

Revision 1.64 - (view) (annotate) - [select for diffs]
Thu May 31 17:00:51 2001 UTC (12 years, 10 months ago) by toy
Branch: MAIN
Changes since 1.63: +6 -4 lines
Diff to previous 1.63 , to selected 1.103
When unparse-unix-file is given a logical pathname, don't put ~'s
around the version since that's not valid logical pathname syntax.

Revision 1.63 - (view) (annotate) - [select for diffs]
Mon Mar 12 12:44:31 2001 UTC (13 years, 1 month ago) by pw
Branch: MAIN
Changes since 1.62: +9 -4 lines
Diff to previous 1.62 , to selected 1.103
Fix extract-name-tape-and-version to honor rule that a leading "."
is part of the name component.

Revision 1.62 - (view) (annotate) - [select for diffs]
Sun Mar 11 22:00:38 2001 UTC (13 years, 1 month ago) by pw
Branch: MAIN
Changes since 1.61: +52 -32 lines
Diff to previous 1.61 , to selected 1.103
Libralize extract-name-type-and-version to allow ".*" as a version wildcard.

Revision 1.61 - (view) (annotate) - [select for diffs]
Fri Mar 9 19:47:18 2001 UTC (13 years, 1 month ago) by pw
Branch: MAIN
Changes since 1.60: +3 -3 lines
Diff to previous 1.60 , to selected 1.103
Fix typo in unparsing wild versions in new scheme; ".~~*~~" => ".~*~".

Revision 1.60 - (view) (annotate) - [select for diffs]
Fri Feb 23 18:56:11 2001 UTC (13 years, 1 month ago) by dtc
Branch: MAIN
Changes since 1.59: +8 -8 lines
Diff to previous 1.59 , to selected 1.103
o Fix some problems in the parsing within extract-name-type-and-version.

Revision 1.59 - (view) (annotate) - [select for diffs]
Thu Feb 22 19:35:01 2001 UTC (13 years, 1 month ago) by dtc
Branch: MAIN
Changes since 1.58: +38 -46 lines
Diff to previous 1.58 , to selected 1.103
o Rework the unix namestrings format, using the suffix .~#~ for the file
  version, reducing the risk of confusion with commonly used unix filenames.

Revision 1.43.2.5 - (view) (annotate) - [select for diffs]
Thu Aug 24 14:24:01 2000 UTC (13 years, 7 months ago) by dtc
Branch: RELENG_18
CVS Tags: RELEASE_18c
Changes since 1.43.2.4: +11 -10 lines
Diff to previous 1.43.2.4 , to branch point 1.43 , to selected 1.103
Add the new keyword argument :TRUENAMEP to the function directory,
replacing the former :FOLLOW-LINKS argument, and redefine
:FOLLOW-LINKS to control the following of symbolic links while
searching for matching directories.

Revision 1.58 - (view) (annotate) - [select for diffs]
Thu Aug 24 14:22:56 2000 UTC (13 years, 7 months ago) by dtc
Branch: MAIN
Changes since 1.57: +11 -10 lines
Diff to previous 1.57 , to selected 1.103
Add the new keyword argument :TRUENAMEP to the function directory,
replacing the former :FOLLOW-LINKS argument, and redefine
:FOLLOW-LINKS to control the following of symbolic links while
searching for matching directories.

Revision 1.43.2.4 - (view) (annotate) - [select for diffs]
Wed Aug 23 15:53:13 2000 UTC (13 years, 7 months ago) by dtc
Branch: RELENG_18
Changes since 1.43.2.3: +92 -40 lines
Diff to previous 1.43.2.3 , to branch point 1.43 , to selected 1.103
o Rework %enumerate-directories to handle :wild and :wild-inferiors
  within the pathname; noted by Christophe Rhodes. Further maintain a
  list of the directory inode and device numbers which are used to avoid
  paths loops during :wild-inferiors searches.

o Enhance %enumerate-directories to accept a new follow-links argument to
  allow the following of symbolic links to be disabled. Similarly add
  follow-links keyword argument to interface macro enumerate-matches.

Revision 1.57 - (view) (annotate) - [select for diffs]
Wed Aug 23 15:52:46 2000 UTC (13 years, 7 months ago) by dtc
Branch: MAIN
Changes since 1.56: +92 -40 lines
Diff to previous 1.56 , to selected 1.103
o Rework %enumerate-directories to handle :wild and :wild-inferiors
  within the pathname; noted by Christophe Rhodes. Further maintain a
  list of the directory inode and device numbers which are used to avoid
  paths loops during :wild-inferiors searches.

o Enhance %enumerate-directories to accept a new follow-links argument to
  allow the following of symbolic links to be disabled. Similarly add
  follow-links keyword argument to interface macro enumerate-matches.

Revision 1.43.2.3 - (view) (annotate) - [select for diffs]
Tue May 23 16:36:27 2000 UTC (13 years, 10 months ago) by pw
Branch: RELENG_18
Changes since 1.43.2.2: +16 -4 lines
Diff to previous 1.43.2.2 , to branch point 1.43 , to selected 1.103
This set of revisions brings the RELENG_18 branch up to HEAD in preparation
for an 18c release.

Revision 1.56 - (view) (annotate) - [select for diffs]
Thu Jun 3 15:55:49 1999 UTC (14 years, 10 months ago) by pw
Branch: MAIN
Changes since 1.55: +5 -2 lines
Diff to previous 1.55 , to selected 1.103
Add documentation for the optional arguments to unix-namestring.

Revision 1.55 - (view) (annotate) - [select for diffs]
Tue Feb 2 12:18:34 1999 UTC (15 years, 2 months ago) by pw
Branch: MAIN
Changes since 1.54: +2 -2 lines
Diff to previous 1.54 , to selected 1.103
FILE-NAMESTRING now returns NIL instead of "" when applied to a
directory pathname designator. This change may break some user code.

Revision 1.54 - (view) (annotate) - [select for diffs]
Sat Dec 19 16:03:58 1998 UTC (15 years, 4 months ago) by dtc
Branch: MAIN
Changes since 1.53: +11 -2 lines
Diff to previous 1.53 , to selected 1.103
Check for illegal characters in unix file names; from Peter Van Eynde.

Revision 1.43.2.2 - (view) (annotate) - [select for diffs]
Sun Jul 19 01:06:05 1998 UTC (15 years, 9 months ago) by dtc
Branch: RELENG_18
CVS Tags: RELEASE_18b
Changes since 1.43.2.1: +13 -13 lines
Diff to previous 1.43.2.1 , to branch point 1.43 , to selected 1.103
Update from the current main branch.

Revision 1.53 - (view) (annotate) - [select for diffs]
Thu Jul 16 13:30:47 1998 UTC (15 years, 9 months ago) by pw
Branch: MAIN
Changes since 1.52: +0 -0 lines
Diff to previous 1.52 , to selected 1.103
Fixes and improvements to July-14 commit dealing with condition types
in calls to error. From Douglas.

Revision 1.52 - (view) (annotate) - [select for diffs]
Tue Jul 14 18:12:16 1998 UTC (15 years, 9 months ago) by pw
Branch: MAIN
Changes since 1.51: +0 -5 lines
Diff to previous 1.51 , to selected 1.103
This revision merges in many of the fixes for ANSI condition types
in various calls to ERROR. Those easily handled by using new condition
types simple-file-error and simple-program-error are included.

The only functional change here is that the function CHARACTER no longer
accepts an integer argument so as to be ANSI compliant. This may
break some code.

Revision 1.51 - (view) (annotate) - [select for diffs]
Mon Jul 13 17:44:42 1998 UTC (15 years, 9 months ago) by pw
Branch: MAIN
Changes since 1.50: +18 -13 lines
Diff to previous 1.50 , to selected 1.103
Backout a previous hack of adding format-{control|arguments} protocol
to serious-condition. Instead, have new internal condition types
simple-package-error, simple-file-error and simple-program-error
which inherit from simple-condition and respective error condition,
thus picking up the format protocol from simple-condition.

Noted a probable bug in that the CPL for conditions is not sorted
which results in the found report method being dependent
on the order of super-classes specified in the call to define-condition.

Revision 1.43.2.1 - (view) (annotate) - [select for diffs]
Tue Jun 23 11:21:54 1998 UTC (15 years, 9 months ago) by pw
Branch: RELENG_18
Changes since 1.43: +103 -57 lines
Diff to previous 1.43 , to selected 1.103
This (huge) revision brings the RELENG_18 branch up to the current HEAD.
Note code/unix-glib2.lisp not yet included -- not sure it is ready to go.

Revision 1.50 - (view) (annotate) - [select for diffs]
Tue May 5 00:14:35 1998 UTC (15 years, 11 months ago) by dtc
Branch: MAIN
Changes since 1.49: +2 -2 lines
Diff to previous 1.49 , to selected 1.103
Restore the in-synonym-of, out-synonym-of, with-in-stream, and
with-out-stream macros incorrectly replaced in the recent Gray stream
changes.

Revision 1.49 - (view) (annotate) - [select for diffs]
Mon May 4 01:27:13 1998 UTC (15 years, 11 months ago) by dtc
Branch: MAIN
Changes since 1.48: +2 -2 lines
Diff to previous 1.48 , to selected 1.103
Gray streams support:
* Rename the 'stream structure class to sys:lisp-stream.
* Add a new none hierarchical 'stream built-in class which inherits
  from: instance, t.
* Hack in the new stream class as a mixin for the structure base
  lisp-stream class which now inherits from: stream, structure-object,
  instance, t.
* Add a new 'fundamental-stream standard-class which includes 'stream
  as a mixin, and add PCL hacks to allow this to be redefined after PCL is
  loaded to be (defclass fundamental-stream (standard-object stream) ...).
* Add appropriate support to the base stream functions to dispatch to
  the Gray stream functions for the handling of fundamental-streams.
  Some of the lisp-streams encapsulating CLOS streams still need
  a little work.

Revision 1.48 - (view) (annotate) - [select for diffs]
Fri Apr 24 13:10:15 1998 UTC (15 years, 11 months ago) by pw
Branch: MAIN
Changes since 1.47: +2 -2 lines
Diff to previous 1.47 , to selected 1.103
Fix too many close parens in last revision. Patch from Douglas.

Revision 1.47 - (view) (annotate) - [select for diffs]
Mon Apr 20 11:32:51 1998 UTC (16 years ago) by pw
Branch: MAIN
Changes since 1.46: +82 -43 lines
Diff to previous 1.46 , to selected 1.103
This revision alters the condition type hierarchy to be in compliance
with the ANSI spec. A default report method is attached to the
serious-condition class and many of the uses of (error "string" arg..)
in filesys.lisp and package.lisp were changed to use, for example,
(error 'file-error :format-control "string" :format-arguments (list stuff))
The end result is no obvious change to what the user sees, and enables
one to establish a handler to catch the particular error type as
mentioned in the "Exceptional Situations:" section of the CLHS
write-ups. There probably are still some places where the error
types need to be fixed.

Also, a bug in with-package-iterator which caused failure with
a null package-use-list was fixed, and some file functions (like
truename and probe-file) now disallow a wild pathname.

Revision 1.46 - (view) (annotate) - [select for diffs]
Sun Mar 1 21:46:05 1998 UTC (16 years, 1 month ago) by dtc
Branch: MAIN
Changes since 1.45: +2 -2 lines
Diff to previous 1.45 , to selected 1.103
Fix doc. typos "the the" -> "the".

Revision 1.45 - (view) (annotate) - [select for diffs]
Wed Feb 11 18:15:22 1998 UTC (16 years, 2 months ago) by dtc
Branch: MAIN
Changes since 1.44: +20 -16 lines
Diff to previous 1.44 , to selected 1.103
Extend ensure-directories-exist to handle search-lists; only the first
path in a search-list is considered.

Revision 1.44 - (view) (annotate) - [select for diffs]
Fri Jan 30 17:11:09 1998 UTC (16 years, 2 months ago) by pw
Branch: MAIN
Changes since 1.43: +4 -1 lines
Diff to previous 1.43 , to selected 1.103
Add doc string to ENSURE-DIRECTORIES-EXIST

Revision 1.43 - (view) (annotate) - [select for diffs]
Fri May 16 17:03:56 1997 UTC (16 years, 11 months ago) by dtc
Branch: MAIN
CVS Tags: RELEASE_18a
Branch point for: RELENG_18
Changes since 1.42: +21 -19 lines
Diff to previous 1.42 , to selected 1.103
Few fixes to ensure-directories-exist: make it work with logical
pathnames; don't call truename on the pathname as this will likely
fail if it's a file.

Revision 1.42 - (view) (annotate) - [select for diffs]
Fri May 16 11:45:15 1997 UTC (16 years, 11 months ago) by dtc
Branch: MAIN
Changes since 1.41: +25 -1 lines
Diff to previous 1.41 , to selected 1.103
Function ensure-directories-exist, part of ANSI CL, contributed by
Pierpaolo Bernardi.

Revision 1.41 - (view) (annotate) - [select for diffs]
Sat Jan 18 14:30:48 1997 UTC (17 years, 3 months ago) by ram
Branch: MAIN
Changes since 1.40: +10 -4 lines
Diff to previous 1.40 , to selected 1.103
Werkowskis source kit 1.03.7

Revision 1.40 - (view) (annotate) - [select for diffs]
Fri Jul 12 19:21:58 1996 UTC (17 years, 9 months ago) by ram
Branch: MAIN
Changes since 1.39: +2 -2 lines
Diff to previous 1.39 , to selected 1.103
Merged patch from PW that makes PRINT-DIRECTORY handle broken
links better.

Revision 1.39 - (view) (annotate) - [select for diffs]
Fri Feb 4 15:05:08 1994 UTC (20 years, 2 months ago) by wlott
Branch: MAIN
Changes since 1.38: +6 -3 lines
Diff to previous 1.38 , to selected 1.103
Added an executable-only optional to unix-namestring so that we can expand
path:foo into the first executable in the path named foo, not just the
first file.

Revision 1.38 - (view) (annotate) - [select for diffs]
Wed Aug 11 16:33:17 1993 UTC (20 years, 8 months ago) by ram
Branch: MAIN
Changes since 1.37: +5 -3 lines
Diff to previous 1.37 , to selected 1.103
Made QUICK-INTEGER-TO-STRING only handle the FIXNUM case so that it really is
quick.

Revision 1.37 - (view) (annotate) - [select for diffs]
Fri Aug 6 11:57:21 1993 UTC (20 years, 8 months ago) by ram
Branch: MAIN
Changes since 1.36: +3 -1 lines
Diff to previous 1.36 , to selected 1.103
Added some missing simple-string declarations.

Revision 1.36 - (view) (annotate) - [select for diffs]
Wed Aug 4 13:33:17 1993 UTC (20 years, 8 months ago) by ram
Branch: MAIN
Changes since 1.35: +5 -5 lines
Diff to previous 1.35 , to selected 1.103
Fixed %enumerate-directories to hack :WILD and :WILD-INFERIORS (somewhat.)
Semi-gratuitously changed %enumerate-files to use %pathname accessors.

Revision 1.35 - (view) (annotate) - [select for diffs]
Wed Aug 4 10:54:53 1993 UTC (20 years, 8 months ago) by ram
Branch: MAIN
Changes since 1.34: +2 -5 lines
Diff to previous 1.34 , to selected 1.103
Deleted vestigial documentation in rename-file about files that are open but
don't exist yet.

Revision 1.34 - (view) (annotate) - [select for diffs]
Wed Aug 4 09:37:47 1993 UTC (20 years, 8 months ago) by ram
Branch: MAIN
Changes since 1.33: +17 -20 lines
Diff to previous 1.33 , to selected 1.103
Undid last change, because that's the wrong place to put it.

Revision 1.33 - (view) (annotate) - [select for diffs]
Tue Aug 3 13:57:35 1993 UTC (20 years, 8 months ago) by ram
Branch: MAIN
Changes since 1.32: +5 -4 lines
Diff to previous 1.32 , to selected 1.103
Fixed enumerate-files to hack :wild and :unspecific name&type.

Revision 1.32 - (view) (annotate) - [select for diffs]
Tue Aug 3 13:27:11 1993 UTC (20 years, 8 months ago) by ram
Branch: MAIN
Changes since 1.31: +20 -17 lines
Diff to previous 1.31 , to selected 1.103
Changed ENUMERATE-MATCHES (hence all filesys code) to do
translate-logical-pathname on logical pathnames.

Revision 1.31 - (view) (annotate) - [select for diffs]
Sat Jul 31 01:07:13 1993 UTC (20 years, 8 months ago) by ram
Branch: MAIN
Changes since 1.30: +34 -33 lines
Diff to previous 1.30 , to selected 1.103
Added support for parsing :WILD and :WILD-INFERIORS.  Fixed :WILD-INFERIORS
unparsing.  Un-commented-out USER-HOMEDIR-PATHNAME.  Un-generalized
split-at-slashes, since logical pathname parsing no longer uses it.

Revision 1.30 - (view) (annotate) - [select for diffs]
Thu Jul 15 17:59:50 1993 UTC (20 years, 9 months ago) by phg
Branch: MAIN
Changes since 1.29: +3 -1 lines
Diff to previous 1.29 , to selected 1.103
Logical pathnames for UNIX filesystems have been added. Note that logical-
namestrings must consist of capital letters, numbers and hyphens, according
to the ANSI specification, and not including lower case letters as listed
in some of the examples in the specification.

Revision 1.29 - (view) (annotate) - [select for diffs]
Fri Sep 4 15:22:16 1992 UTC (21 years, 7 months ago) by phg
Branch: MAIN
Changes since 1.28: +2 -2 lines
Diff to previous 1.28 , to selected 1.103
Change to the function %enumerate-files to permit versions to match on :wild
and :newest for UNIX filesystems (the only kind currently supported by
CMUCL).

Revision 1.28 - (view) (annotate) - [select for diffs]
Wed Aug 19 18:45:34 1992 UTC (21 years, 8 months ago) by phg
Branch: MAIN
Changes since 1.27: +17 -9 lines
Diff to previous 1.27 , to selected 1.103
Modifications to support logical-pathnames. unparse-unix-piece includes 
support for wildcards and wildcard-inferiors.  split-at-slashes given
an optional argument to permit parsing of directories based on the ";"
in logical-pathnames.

Revision 1.27 - (view) (annotate) - [select for diffs]
Sat Feb 15 12:47:35 1992 UTC (22 years, 2 months ago) by wlott
Branch: MAIN
Changes since 1.26: +3 -3 lines
Diff to previous 1.26 , to selected 1.103
Fixed some constant names that changed.

Revision 1.26 - (view) (annotate) - [select for diffs]
Fri Feb 14 23:44:50 1992 UTC (22 years, 2 months ago) by wlott
Branch: MAIN
Changes since 1.25: +32 -32 lines
Diff to previous 1.25 , to selected 1.103
Merged new-alien changes onto trunk.

Revision 1.25.1.1 - (view) (annotate) - [select for diffs] (vendor branch)
Sun Feb 2 21:01:25 1992 UTC (22 years, 2 months ago) by wlott
Changes since 1.25: +32 -32 lines
Diff to previous 1.25 , to next main 1.114 , to selected 1.103
Changed ``mach:'' to ``unix:''.

Revision 1.25 - (view) (annotate) - [select for diffs]
Thu Jan 30 16:23:49 1992 UTC (22 years, 2 months ago) by wlott
Branch: MAIN
Changes since 1.24: +7 -4 lines
Diff to previous 1.24 , to selected 1.103
Fixed PARSE-UNIX-NAMESTRING to use '(:absolute) as the directory when there
are no directories but there was an initial slash instead of using NIL.

Revision 1.24 - (view) (annotate) - [select for diffs]
Fri Dec 20 21:17:37 1991 UTC (22 years, 4 months ago) by ram
Branch: MAIN
Changes since 1.23: +9 -7 lines
Diff to previous 1.23 , to selected 1.103
Changed DELETE-FILE to signal an error if the file doesn't exist.

Revision 1.23 - (view) (annotate) - [select for diffs]
Fri Dec 20 15:35:56 1991 UTC (22 years, 4 months ago) by ram
Branch: MAIN
Changes since 1.22: +21 -11 lines
Diff to previous 1.22 , to selected 1.103
Added FOLLOW-LINKS argument to DIRECTORY which inhibits the final call to
TRUENAME when NIL.  Changed completion and directory printing to specify this.

Revision 1.22 - (view) (annotate) - [select for diffs]
Wed Dec 18 23:15:38 1991 UTC (22 years, 4 months ago) by wlott
Branch: MAIN
Changes since 1.21: +6 -7 lines
Diff to previous 1.21 , to selected 1.103
Make directory return truenames.  Make complete-file and ambiguous-files
only look that the directory of the defaults.

Revision 1.21 - (view) (annotate) - [select for diffs]
Wed Dec 18 11:42:09 1991 UTC (22 years, 4 months ago) by wlott
Branch: MAIN
Changes since 1.20: +20 -15 lines
Diff to previous 1.20 , to selected 1.103
Fixed %enumerate-files to skip ``.'' and ``..''.  Fixed directory to merge
in :wild for the name, type, and version.

Revision 1.20 - (view) (annotate) - [select for diffs]
Mon Dec 16 20:00:44 1991 UTC (22 years, 4 months ago) by wlott
Branch: MAIN
Changes since 1.19: +2 -2 lines
Diff to previous 1.19 , to selected 1.103
typo

Revision 1.19 - (view) (annotate) - [select for diffs]
Mon Dec 16 19:42:56 1991 UTC (22 years, 4 months ago) by wlott
Branch: MAIN
Changes since 1.18: +5 -6 lines
Diff to previous 1.18 , to selected 1.103
Fixed %ENUMERATE-FILES to deal better with pathnames that have NIL for the
type.

Revision 1.18 - (view) (annotate) - [select for diffs]
Mon Dec 16 13:04:40 1991 UTC (22 years, 4 months ago) by wlott
Branch: MAIN
Changes since 1.17: +5 -4 lines
Diff to previous 1.17 , to selected 1.103
In UNIX-NAMESTRING, treat a NIL version the same as :NEWEST.

Revision 1.17 - (view) (annotate) - [select for diffs]
Mon Dec 16 12:50:25 1991 UTC (22 years, 4 months ago) by wlott
Branch: MAIN
Changes since 1.16: +40 -25 lines
Diff to previous 1.16 , to selected 1.103
Fixed various places that needed to take into account the fact that
UNIX-NAMESTRING might return NIL now.

Revision 1.16 - (view) (annotate) - [select for diffs]
Mon Dec 16 10:31:59 1991 UTC (22 years, 4 months ago) by wlott
Branch: MAIN
Changes since 1.15: +624 -598 lines
Diff to previous 1.15 , to selected 1.103
Extensive rewrite.  The machine/filesystem independed stuff is now in
pathname.lisp and this file contains basically the Unix depended code.
This rewrite includes full support for wildcards and structured directories
(as per X3J13).  The new pathname format also lends itself better to the
addition of logical pathnames (but they haven't been written, yet).

Revision 1.15 - (view) (annotate) - [select for diffs]
Sun Dec 1 18:10:44 1991 UTC (22 years, 4 months ago) by wlott
Branch: MAIN
Changes since 1.14: +3 -3 lines
Diff to previous 1.14 , to selected 1.103
Removed use of TAB-OVER, so I can remove pprint.lisp from the cold load.

Revision 1.14 - (view) (annotate) - [select for diffs]
Sat Nov 16 15:56:08 1991 UTC (22 years, 5 months ago) by ram
Branch: MAIN
Changes since 1.13: +1 -3 lines
Diff to previous 1.13 , to selected 1.103
Deleted some orphaned code.

Revision 1.13 - (view) (annotate) - [select for diffs]
Tue Oct 22 16:31:32 1991 UTC (22 years, 5 months ago) by chiles
Branch: MAIN
Changes since 1.12: +52 -22 lines
Diff to previous 1.12 , to selected 1.103
Modified COMPLETE-FILE to correctly complete files relative to the defaults.
It was previously relying on MERGE-PATHNAMES solely, but MERGE-PATHNAMES cannot
do what COMPLETE-FILE requires when presented with a partial (non-absolute)
pathname that includes some directories.  What the user wants is the partial
pathname to be merged with the absolute defaults including any directories
specified in pathname.  MERGE-PATHNAMES cannot do this since partial pathnames
have independent uses, and it cannot clobber a non-nil slot in the partial
pathname structure.  However, COMPLETE-FILE obtains its partial pathnames from
users specifying against defaults with the intent of deriving an absolute name,
so when the defaults contain an absolute directory slot, the partial directory
spec of the supplied pathname (if any) gets tacked onto the end of the defaults
directory spec.

This fixes a long standing Hemlock problem: you could find files relative to
the defaults with subdirectory specs, but you could not complete them.

Fixed DIRECTORY to no longer signal errors.  It's job is to return a list of
files matching its argument, and it should return nil when the spec is in
accurate.

Revision 1.12 - (view) (annotate) - [select for diffs]
Tue Sep 3 20:44:02 1991 UTC (22 years, 7 months ago) by ram
Branch: MAIN
Changes since 1.11: +4 -15 lines
Diff to previous 1.11 , to selected 1.103
Make user-homedir-pathname just return home:.

Revision 1.11 - (view) (annotate) - [select for diffs]
Thu Aug 22 16:03:37 1991 UTC (22 years, 7 months ago) by ram
Branch: MAIN
Changes since 1.10: +2 -2 lines
Diff to previous 1.10 , to selected 1.103
Changed pathname printer to use #P.

Revision 1.10 - (view) (annotate) - [select for diffs]
Tue May 28 17:50:35 1991 UTC (22 years, 10 months ago) by ram
Branch: MAIN
Changes since 1.9: +42 -47 lines
Diff to previous 1.9 , to selected 1.103
Changed exported funs not to assign their arguments.

Revision 1.9 - (view) (annotate) - [select for diffs]
Thu Apr 25 13:25:48 1991 UTC (22 years, 11 months ago) by ram
Branch: MAIN
Changes since 1.8: +4 -5 lines
Diff to previous 1.8 , to selected 1.103
Changed PARSE-NAMESTRING to use WITH-ARRAY-DATA.

Revision 1.8 - (view) (annotate) - [select for diffs]
Fri Feb 8 13:32:39 1991 UTC (23 years, 2 months ago) by ram
Branch: MAIN
Changes since 1.7: +9 -5 lines
Diff to previous 1.7 , to selected 1.103
New file header with RCS header FILE-COMMENT.

Revision 1.7 - (view) (annotate) - [select for diffs]
Fri Nov 23 08:36:30 1990 UTC (23 years, 4 months ago) by wlott
Branch: MAIN
Changes since 1.6: +100 -97 lines
Diff to previous 1.6 , to selected 1.103
Finally got around to rewritting print-directory.

Revision 1.6 - (view) (annotate) - [select for diffs]
Sat Nov 17 05:40:13 1990 UTC (23 years, 5 months ago) by wlott
Branch: MAIN
Changes since 1.5: +7 -4 lines
Diff to previous 1.5 , to selected 1.103
In ambiguous-files, don't merge in the name and type from defaults, and
check for subdirs, so that we get the trailing slash on them.

Revision 1.5 - (view) (annotate) - [select for diffs]
Fri Nov 9 23:37:20 1990 UTC (23 years, 5 months ago) by wlott
Branch: MAIN
Changes since 1.4: +7 -4 lines
Diff to previous 1.4 , to selected 1.103
Export unix-namestring from the extensions package, and allow the second
arg to be defaulted to T.

Revision 1.4 - (view) (annotate) - [select for diffs]
Sat Nov 3 00:23:13 1990 UTC (23 years, 5 months ago) by wlott
Branch: MAIN
Changes since 1.3: +284 -339 lines
Diff to previous 1.3 , to selected 1.103
Rewrote large chunks to get rid of Dave code.  Do pattern matching in
directory instead of expecting the lower level code to handle it.
Changed the names of routines like %ses-get-useful-part to something
reasonable.

Revision 1.3 - (view) (annotate) - [select for diffs]
Fri Aug 24 18:11:00 1990 UTC (23 years, 7 months ago) by wlott
Branch: MAIN
Changes since 1.2: +12 -6 lines
Diff to previous 1.2 , to selected 1.103
Moved MIPS branch onto trunk; no merge necessary.

Revision 1.2.1.5 - (view) (annotate) - [select for diffs] (vendor branch)
Mon Jul 2 04:29:58 1990 UTC (23 years, 9 months ago) by wlott
Changes since 1.2.1.4: +3 -3 lines
Diff to previous 1.2.1.4 , to next main 1.114 , to selected 1.103
Fixed default-directory to return a pathname that is all
pathname-directory, so that (merge-pathnames "foo.bar" (default-directory))
will do the obvious thing.

Revision 1.2.1.4 - (view) (annotate) - [select for diffs] (vendor branch)
Tue Jun 12 02:23:16 1990 UTC (23 years, 10 months ago) by wlott
Changes since 1.2.1.3: +4 -4 lines
Diff to previous 1.2.1.3 , to selected 1.103
Set the :default search-list *after* we ste *default-pathname-defaults*,
otherwise it craps out, cause *default-pathname-defaults* isn't a
pathname, and it must be before we can create pathnames.

Revision 1.2.1.3 - (view) (annotate) - [select for diffs] (vendor branch)
Mon Jun 11 01:13:49 1990 UTC (23 years, 10 months ago) by wlott
Changes since 1.2.1.2: +6 -2 lines
Diff to previous 1.2.1.2 , to selected 1.103
Set (search-list "default:") in filesys-init.

Revision 1.2.1.2 - (view) (annotate) - [select for diffs] (vendor branch)
Sat May 26 22:58:18 1990 UTC (23 years, 10 months ago) by wlott
Changes since 1.2.1.1: +4 -2 lines
Diff to previous 1.2.1.1 , to selected 1.103
Changed semantics of unix-current-directory, so had to change
default-directory, which used it.

Revision 1.2.1.1 - (view) (annotate) - [select for diffs] (vendor branch)
Fri May 25 20:31:04 1990 UTC (23 years, 10 months ago) by wlott
Changes since 1.2: +1 -1 lines
Diff to previous 1.2 , to selected 1.103
Changed %primitive shrink-vector to function shrink-vector

Revision 1.2 - (view) (annotate) - [select for diffs]
Thu Feb 22 11:53:35 1990 UTC (24 years, 1 month ago) by ram
Branch: MAIN
Changes since 1.1: +98 -263 lines
Diff to previous 1.1 , to selected 1.103
Back-merged my type fixes into the working code version as of this date.

Revision 1.1 - (view) (annotate) - [select for diffs]
Tue Feb 6 17:24:17 1990 UTC (24 years, 2 months ago) by ram
Branch: MAIN
Diff to selected 1.103
Initial revision

This form allows you to request diffs between any two revisions of this file. For each of the two "sides" of the diff, select a symbolic revision name using the selection box, or choose 'Use Text Field' and enter a numeric revision.

  Diffs between and
  Type of Diff should be a

Sort log by:

  ViewVC Help
Powered by ViewVC 1.1.5