Jon Boone pushed to branch issue-154-piglatin-translation-doesnt-work-anymore at cmucl / cmucl
Commits:
-
b6e9fd43
by Raymond Toy at 2023-06-05T14:20:56-04:00
-
2d76d55f
by Raymond Toy at 2023-06-05T14:20:57-04:00
-
149665ae
by Raymond Toy at 2023-06-05T14:20:59-04:00
4 changed files:
- src/code/filesys.lisp
- src/code/unicode.lisp
- + src/general-info/release-template.md
- tests/issues.lisp
Changes:
| ... | ... | @@ -610,8 +610,8 @@ |
| 610 | 610 | ;; We are an absolute pathname, so we can just use it.
|
| 611 | 611 | pathname-directory)
|
| 612 | 612 | (t
|
| 613 | - ;; We are a relative directory. So we lose.
|
|
| 614 | - (lose)))))
|
|
| 613 | + ;; We are a relative directory, so just return it as is.
|
|
| 614 | + pathname-directory))))
|
|
| 615 | 615 | (strings (unparse-unix-directory-list result-dir)))
|
| 616 | 616 | (let* ((pathname-version (%pathname-version pathname))
|
| 617 | 617 | (version-needed (and pathname-version
|
| ... | ... | @@ -177,7 +177,7 @@ |
| 177 | 177 | ;; incorrect; instead, what we need is a new rule:
|
| 178 | 178 | ;;
|
| 179 | 179 | ;; *Break after paragraph separators.*
|
| 180 | -;; WB3a. Sep �
|
|
| 180 | +;; WB3a. Sep
|
|
| 181 | 181 | ;; I'll make a propose to the UTC for this.
|
| 182 | 182 | ;;
|
| 183 | 183 | ;; Here is Will's translation of those rules (including WB3a)
|
| 1 | +# Work in progress
|
|
| 2 | + |
|
| 3 | +The CMUCL project is pleased to announce the release of CMUCL 21e.
|
|
| 4 | +This is a major release which contains numerous enhancements and bug
|
|
| 5 | +fixes from the <previous> release.
|
|
| 6 | + |
|
| 7 | +CMUCL is a free, high performance implementation of the Common Lisp
|
|
| 8 | +programming language which runs on most major Unix platforms. It
|
|
| 9 | +mainly conforms to the ANSI Common Lisp standard. CMUCL provides a
|
|
| 10 | +sophisticated native code compiler; a powerful foreign function
|
|
| 11 | +interface; an implementation of CLOS, the Common Lisp Object System,
|
|
| 12 | +which includes multi-methods and a meta-object protocol; a
|
|
| 13 | +source-level debugger and code profiler; and an Emacs-like editor
|
|
| 14 | +implemented in Common Lisp. CMUCL is maintained by a team of
|
|
| 15 | +volunteers collaborating over the Internet, and is mostly in the
|
|
| 16 | +public domain.
|
|
| 17 | + |
|
| 18 | +## New in this release:
|
|
| 19 | + * Known issues:
|
|
| 20 | + * Feature enhancements:
|
|
| 21 | + * Changes:
|
|
| 22 | + * ANSI compliance fixes:
|
|
| 23 | + * Bug fixes:
|
|
| 24 | + * Gitlab tickets:
|
|
| 25 | + * Other changes:
|
|
| 26 | + * Improvements to the PCL implementation of CLOS:
|
|
| 27 | + * Changes to building procedure:
|
|
| 28 | + |
|
| 29 | +This release is not binary compatible with code compiled using CMUCL
|
|
| 30 | +<previous>; you will need to recompile FASL files.
|
|
| 31 | + |
|
| 32 | +See http://www.cmucl.org or
|
|
| 33 | +https://gitlab.common-lisp.net/cmucl/cmucl for more information,
|
|
| 34 | +See
|
|
| 35 | +https://gitlab.common-lisp.net/cmucl/cmucl/wikis/GettingCmucl
|
|
| 36 | +for obtaining CMUCL, including sources and binaries..
|
|
| 37 | + |
|
| 38 | + |
|
| 39 | +We hope you enjoy using this release of CMUCL! |
| ... | ... | @@ -986,3 +986,12 @@ |
| 986 | 986 | (assert-true (equal (make-pathname :version :newest)
|
| 987 | 987 | (make-pathname :version :unspecific)))
|
| 988 | 988 | )
|
| 989 | + |
|
| 990 | +(define-test issue.216.enough-namestring-relative-dir
|
|
| 991 | + (:tag :issues)
|
|
| 992 | + (let ((pathname #p"foo/bar.lisp"))
|
|
| 993 | + (dolist (defaults '(#p"/tmp/zot/" #p"/tmp/zot/foo/"))
|
|
| 994 | + (let ((enough (enough-namestring pathname defaults)))
|
|
| 995 | + ;; This is the condition from the CLHS entry for enough-namestring
|
|
| 996 | + (assert-equal (merge-pathnames enough defaults)
|
|
| 997 | + (merge-pathnames (parse-namestring pathname nil defaults) defaults)))))) |