[version 0.6.0
ediware**20070529050013] {
hunk ./CHANGELOG 1
+Version 0.6.0
+2007-05-28
+Support for Scieneer CL (patch from Douglas Crosher)
+
hunk ./cl-fad.asd 2
-;;; $Header: /usr/local/cvsrep/cl-fad/cl-fad.asd,v 1.16 2007/05/15 18:54:15 edi Exp $
+;;; $Header: /usr/local/cvsrep/cl-fad/cl-fad.asd,v 1.17 2007/05/28 18:25:54 edi Exp $
hunk ./cl-fad.asd 35
-    :version "0.5.2"
+    :version "0.6.0"
hunk ./doc/index.html 76
-current version is 0.5.2.
+current version is 0.6.0.
hunk ./doc/index.html 115
+<li><a href="http://www.scieneer.com/scl/">Scieneer Common Lisp</a>
hunk ./doc/index.html 234
-Pasternacki, Jack D. Unrue, and Gary King who sent patches for OpenMCL, ECL, ABCL, and MCL.
+Pasternacki, Jack D. Unrue, Gary King, and Douglas Crosher who sent
+patches for OpenMCL, ECL, ABCL, MCL, and Scieneer&nbsp;CL.
hunk ./doc/index.html 238
-$Header: /usr/local/cvsrep/cl-fad/doc/index.html,v 1.29 2007/05/15 18:54:16 edi Exp $
+$Header: /usr/local/cvsrep/cl-fad/doc/index.html,v 1.30 2007/05/28 18:25:55 edi Exp $
hunk ./fad.lisp 2
-;;; $Header: /usr/local/cvsrep/cl-fad/fad.lisp,v 1.30 2007/05/15 18:54:15 edi Exp $
+;;; $Header: /usr/local/cvsrep/cl-fad/fad.lisp,v 1.31 2007/05/28 18:25:54 edi Exp $
hunk ./fad.lisp 98
-    #+(or :sbcl :cmu :lispworks) (directory wildcard)
+    #+(or :sbcl :cmu :scl :lispworks) (directory wildcard)
hunk ./fad.lisp 105
-  #-(or :sbcl :cmu :lispworks :openmcl :allegro :clisp :cormanlisp :ecl :abcl :digitool)
+  #-(or :sbcl :cmu :scl :lispworks :openmcl :allegro :clisp :cormanlisp :ecl :abcl :digitool)
hunk ./fad.lisp 130
-  #+(or :cmu :abcl) (or (probe-file (pathname-as-directory pathspec))
-                        (probe-file pathspec))
+  #+(or :cmu :scl :abcl) (or (probe-file (pathname-as-directory pathspec))
+                             (probe-file pathspec))
hunk ./fad.lisp 141
-  #-(or :sbcl :cmu :lispworks :openmcl :allegro :clisp :cormanlisp :ecl :abcl :digitool)
+  #-(or :sbcl :cmu :scl :lispworks :openmcl :allegro :clisp :cormanlisp :ecl :abcl :digitool)
hunk ./fad.lisp 278
+                                      #+:scl (multiple-value-bind (ok errno)
+                                                 (unix:unix-rmdir (ext:unix-namestring (truename file)))
+                                               (unless ok
+                                                 (error "~@<Error deleting ~S: ~A~@:>"
+                                                        file (unix:get-unix-error-msg errno))))
}