Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
648c1127 by Raymond Toy at 2023-05-31T03:55:52+00:00
Fix #216: enough-namestring with relative pathname fails
- - - - -
660ab4c5 by Raymond Toy at 2023-05-31T03:56:07+00:00
Merge branch 'issue-216-enough-namestring-relative-dir' into 'master'
Fix #216: enough-namestring with relative pathname fails
Closes #216
See merge request cmucl/cmucl!152
- - - - -
2 changed files:
- src/code/filesys.lisp
- tests/issues.lisp
Changes:
=====================================
src/code/filesys.lisp
=====================================
@@ -610,8 +610,8 @@
;; We are an absolute pathname, so we can just use it.
pathname-directory)
(t
- ;; We are a relative directory. So we lose.
- (lose)))))
+ ;; We are a relative directory, so just return it as is.
+ pathname-directory))))
(strings (unparse-unix-directory-list result-dir)))
(let* ((pathname-version (%pathname-version pathname))
(version-needed (and pathname-version
=====================================
tests/issues.lisp
=====================================
@@ -977,3 +977,12 @@
(assert-true (equal (make-pathname :version :newest)
(make-pathname :version :unspecific)))
)
+
+(define-test issue.216.enough-namestring-relative-dir
+ (:tag :issues)
+ (let ((pathname #p"foo/bar.lisp"))
+ (dolist (defaults '(#p"/tmp/zot/" #p"/tmp/zot/foo/"))
+ (let ((enough (enough-namestring pathname defaults)))
+ ;; This is the condition from the CLHS entry for enough-namestring
+ (assert-equal (merge-pathnames enough defaults)
+ (merge-pathnames (parse-namestring pathname nil defaults) defaults))))))
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/dcb8124fa472a81202ddd8…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/dcb8124fa472a81202ddd8…
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
dcb8124f by Raymond Toy at 2023-05-29T06:42:23-07:00
Add a simple template for release notes
Supply a template for release notes that has the various parts to be
filled in.
This probably needs some tweaking. I'm no longer clear on the
differences between "Changes", "ANSI compliance fixes", "Bug fixes",
and "Gitlab tickets".
- - - - -
1 changed file:
- + src/general-info/release-template.md
Changes:
=====================================
src/general-info/release-template.md
=====================================
@@ -0,0 +1,39 @@
+# Work in progress
+
+The CMUCL project is pleased to announce the release of CMUCL 21e.
+This is a major release which contains numerous enhancements and bug
+fixes from the <previous> release.
+
+CMUCL is a free, high performance implementation of the Common Lisp
+programming language which runs on most major Unix platforms. It
+mainly conforms to the ANSI Common Lisp standard. CMUCL provides a
+sophisticated native code compiler; a powerful foreign function
+interface; an implementation of CLOS, the Common Lisp Object System,
+which includes multi-methods and a meta-object protocol; a
+source-level debugger and code profiler; and an Emacs-like editor
+implemented in Common Lisp. CMUCL is maintained by a team of
+volunteers collaborating over the Internet, and is mostly in the
+public domain.
+
+## New in this release:
+ * Known issues:
+ * Feature enhancements:
+ * Changes:
+ * ANSI compliance fixes:
+ * Bug fixes:
+ * Gitlab tickets:
+ * Other changes:
+ * Improvements to the PCL implementation of CLOS:
+ * Changes to building procedure:
+
+This release is not binary compatible with code compiled using CMUCL
+<previous>; you will need to recompile FASL files.
+
+See http://www.cmucl.org or
+https://gitlab.common-lisp.net/cmucl/cmucl for more information,
+See
+https://gitlab.common-lisp.net/cmucl/cmucl/wikis/GettingCmucl
+for obtaining CMUCL, including sources and binaries..
+
+
+We hope you enjoy using this release of CMUCL!
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/dcb8124fa472a81202ddd82…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/dcb8124fa472a81202ddd82…
You're receiving this email because of your account on gitlab.common-lisp.net.
Jon Boone deleted branch 154-piglatin-translaton-doesn-t-work-anymore at cmucl / cmucl
--
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch issue-228-update-ansi-tests at cmucl / cmucl
Commits:
e296a74b by Raymond Toy at 2023-05-24T09:08:50-07:00
Check out cmucl-expected-failures branch for testing
This branch has the expected failures for cmucl, so switch to it for
testing.
- - - - -
1 changed file:
- .gitlab-ci.yml
Changes:
=====================================
.gitlab-ci.yml
=====================================
@@ -76,7 +76,7 @@ linux:ansi-test:
artifacts: true
before_script:
- git clone https://gitlab.common-lisp.net/cmucl/ansi-test.git
- #- (cd ansi-test; git checkout rtoy-cmucl-expected-failures)
+ - (cd ansi-test; git checkout cmucl-expected-failures)
script:
- cd ansi-test
- make LISP="../dist/bin/lisp -batch -noinit -nositeinit"
@@ -163,7 +163,7 @@ osx:ansi-test:
artifacts: true
before_script:
- /opt/local/bin/git clone https://gitlab.common-lisp.net/cmucl/ansi-test.git
- #- (cd ansi-test; /opt/local/bin/git checkout rtoy-cmucl-expected-failures)
+ - (cd ansi-test; /opt/local/bin/git checkout cmucl-expected-failures)
script:
- cd ansi-test
- make LISP="../dist/bin/lisp -batch -noinit -nositeinit"
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/e296a74b04953c7766f7d16…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/e296a74b04953c7766f7d16…
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
ac7d904b by Raymond Toy at 2023-05-22T16:16:29-07:00
Update docstring for *default-external-format*
Add a note that `*default-external-format*` is not affected by any
locale settings nor by `set-system-external-format`.
`set-system-external-format` already has a note that it does not
affect `*default-external-format*`.
- - - - -
1 changed file:
- src/code/extfmts.lisp
Changes:
=====================================
src/code/extfmts.lisp
=====================================
@@ -24,7 +24,8 @@
(defvar *default-external-format*
:utf-8
"The default external format to use if no other external format is
- specified")
+ specified. This is unaffected by any locale settings or by
+ SET-SYSTEM-EXTERNAL-FORMAT.")
(defvar *external-formats*
(make-hash-table :test 'equal)
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/ac7d904ba06e6d3c189f000…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/ac7d904ba06e6d3c189f000…
You're receiving this email because of your account on gitlab.common-lisp.net.