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)))))) |