October 2011 - cmucl-cvs - mailman3.common-lisp.net

[cmucl-cvs] [git] CMU Common Lisp branch RELEASE-20C-BRANCH updated. release-20c-base-7-gd26f843
by Raymond Toy 31 Oct '11

31 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, RELEASE-20C-BRANCH has been updated via d26f843313d53333fc1160a6fef13d6aaba312d3 (commit) from 50b8f96365ae8fb57e0dd70a01185fff20c19156 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit d26f843313d53333fc1160a6fef13d6aaba312d3 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sun Oct 30 17:55:31 2011 -0700 Pretty-print WITH-ARRAY-DATA. diff --git a/code/pprint.lisp b/code/pprint.lisp index c0f66c5..d1f570f 100644 --- a/code/pprint.lisp +++ b/code/pprint.lisp @@ -1945,7 +1945,8 @@ When annotations are present, invoke them at the right positions." (new-assem:without-scheduling pprint-with-like) (vm::with-fixed-allocation pprint-with-like) (kernel::number-dispatch pprint-with-like) - (stream::with-stream-class pprint-with-like))) + (stream::with-stream-class pprint-with-like) + (lisp::with-array-data pprint-with-like))) (defun pprint-init () (setf *initial-pprint-dispatch* (make-pprint-dispatch-table)) ----------------------------------------------------------------------- Summary of changes: code/pprint.lisp | 3 ++- 1 files changed, 2 insertions(+), 1 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch RELEASE-20C-BRANCH updated. release-20c-base-6-g50b8f96
by Raymond Toy 30 Oct '11

30 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, RELEASE-20C-BRANCH has been updated via 50b8f96365ae8fb57e0dd70a01185fff20c19156 (commit) via 14435ceb9d456422906a70076ce4354cdcd98fec (commit) from 5de45b3d05925f6eae2ebbc61526a3e54f44bbb4 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 50b8f96365ae8fb57e0dd70a01185fff20c19156 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sun Oct 30 15:32:18 2011 -0700 Solaris sh doesn't have test -e. Use -d instead. diff --git a/tools/create-target.sh b/tools/create-target.sh index d4fc614..b923678 100755 --- a/tools/create-target.sh +++ b/tools/create-target.sh @@ -81,7 +81,7 @@ esac diag "Settings: bld_dir=$bld_dir lisp_variant=$lisp_variant ${motif_variant:+motif_variant=$motif_variant}" # Create a directory tree that mirrors the source directory tree -[ -e "$bld_dir" ] && quit "Exists: `ls -ld $bld_dir`" +[ -d "$bld_dir" ] && quit "Exists: `ls -ld $bld_dir`" mkdir -p "$bld_dir" (cd src && find . -name .git -prune -o -type d -print) | (cd $bld_dir && xargs mkdir -p) || quit "Can't create target directories" commit 14435ceb9d456422906a70076ce4354cdcd98fec Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sun Oct 30 15:31:56 2011 -0700 Solaris /bin/sh doesn't like ${VERSION:+ -v "$VERSION"}. Simplify it. diff --git a/tools/build-all.sh b/tools/build-all.sh index 3b69e1c..e9d137f 100755 --- a/tools/build-all.sh +++ b/tools/build-all.sh @@ -46,7 +46,7 @@ do C) CREATE_OPT="$OPTARG" ;; o) OLDLISP="$OPTARG" ;; 8) OLD8="$OPTARG" ;; - v) VERSION="$OPTARG" ;; + v) VERSION="$OPTARG"; VERSION_SET=true ;; U) UPDATE_TRANS="-U" ;; P) UPDATE_POT="" ;; \?) usage ;; @@ -83,16 +83,19 @@ buildx86 () buildsun4 () { + if [ "$VERSION_SET" = true ]; then + VERS="-v '"$VERSION"'" + fi # Build non-unicode versions if [ -n "$OLD8" ]; then set -x - src/tools/build.sh -b ${BASE}-8bit $bootfiles ${VERSION:+-v "$VERSION"} -C "$CREATE_OPT" ${UPDATE_TRANS} ${UPDATE_POT} -o "$OLD8" + src/tools/build.sh -b ${BASE}-8bit $bootfiles ${VERS} -C "$CREATE_OPT" ${UPDATE_TRANS} ${UPDATE_POT} -o "$OLD8" set +x fi # Build the unicode version. if [ -n "$OLDLISP" ]; then set -x - src/tools/build.sh -b ${BASE} $bootfiles ${VERSION:+-v "$VERSION"} -C "$CREATE_OPT" ${UPDATE_TRANS} ${UPDATE_POT} -o "$OLDLISP" + src/tools/build.sh -b ${BASE} $bootfiles ${VERS} -C "$CREATE_OPT" ${UPDATE_TRANS} ${UPDATE_POT} -o "$OLDLISP" set +x fi } ----------------------------------------------------------------------- Summary of changes: tools/build-all.sh | 9 ++++++--- tools/create-target.sh | 2 +- 2 files changed, 7 insertions(+), 4 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. release-20c-base-6-gdf24c18
by Raymond Toy 30 Oct '11

30 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via df24c184b9235970968cafd51dee7716491016d9 (commit) via d7cf6dcd12c849c14daba4d086b5c571215018b3 (commit) from 4c04d402638dd573a2952e88fa3c920243160b30 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit df24c184b9235970968cafd51dee7716491016d9 Merge: 4c04d40 d7cf6dc Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sun Oct 30 10:27:25 2011 -0700 Merge branch 'RELEASE-20C-BRANCH' commit d7cf6dcd12c849c14daba4d086b5c571215018b3 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Oct 29 23:31:10 2011 -0700 Ignore files generated by tex. diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..7937ace --- /dev/null +++ b/.gitignore @@ -0,0 +1,15 @@ +docs/cmu-user/*.aux +docs/cmu-user/*.cdx +docs/cmu-user/*.cnd +docs/cmu-user/*.fdx +docs/cmu-user/*.fnd +docs/cmu-user/*.idx +docs/cmu-user/*.tdx +docs/cmu-user/*.tnd +docs/cmu-user/*.toc +docs/cmu-user/*.vdx +docs/cmu-user/*.vnd +docs/cmu-user/*.ilg +docs/cmu-user/*.out +docs/cmu-user/*.pdf +docs/cmu-user/*.log ----------------------------------------------------------------------- Summary of changes: .gitignore | 15 +++++++++++++++ 1 files changed, 15 insertions(+), 0 deletions(-) create mode 100644 .gitignore hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. release-20c-base-3-gad21078
by Raymond Toy 30 Oct '11

30 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via ad210786dc3408d450e7780b3f60e0c18cef18e0 (commit) via d22414b343842447e945a611ceb6973230ae2f65 (commit) via 8b6039fd9e994e44b09e6ce1ca71905d2b9551e0 (commit) from 938269e2987c8ca1e73d804a8a8a53b63024cae2 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- ----------------------------------------------------------------------- Summary of changes: docs/cmu-user/cmu-user.tex | 2 +- general-info/lisp.1 | 2 +- general-info/release-20c.txt | 4 ++-- 3 files changed, 4 insertions(+), 4 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch RELEASE-20C-BRANCH updated. release-20c-base-4-g5de45b3
by Raymond Toy 30 Oct '11

30 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, RELEASE-20C-BRANCH has been updated via 5de45b3d05925f6eae2ebbc61526a3e54f44bbb4 (commit) from ad210786dc3408d450e7780b3f60e0c18cef18e0 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 5de45b3d05925f6eae2ebbc61526a3e54f44bbb4 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Oct 29 23:23:49 2011 -0700 Auto-detect NetBSD. diff --git a/tools/create-target.sh b/tools/create-target.sh index e420f5c..d4fc614 100755 --- a/tools/create-target.sh +++ b/tools/create-target.sh @@ -40,6 +40,7 @@ uname_m=`uname -m 2>/dev/null` i386) lisp_variant=x86_darwin ;; esac ;; + NetBSD) lisp_variant=x86_netbsd ;; *) quit "Unsupported OS: $uname_s";; esac } ----------------------------------------------------------------------- Summary of changes: tools/create-target.sh | 1 + 1 files changed, 1 insertions(+), 0 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch RELEASE-20C-BRANCH updated. release-20c-base-3-gad21078
by Raymond Toy 22 Oct '11

22 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, RELEASE-20C-BRANCH has been updated via ad210786dc3408d450e7780b3f60e0c18cef18e0 (commit) via d22414b343842447e945a611ceb6973230ae2f65 (commit) via 8b6039fd9e994e44b09e6ce1ca71905d2b9551e0 (commit) from 938269e2987c8ca1e73d804a8a8a53b63024cae2 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit ad210786dc3408d450e7780b3f60e0c18cef18e0 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Oct 22 13:52:25 2011 -0700 Update date. diff --git a/general-info/lisp.1 b/general-info/lisp.1 index 5bb9915..2595260 100644 --- a/general-info/lisp.1 +++ b/general-info/lisp.1 @@ -11,7 +11,7 @@ .\" ********************************************************************** .\" .\" Man page for CMU CL. -.TH LISP 1 "Mar, 2009" +.TH LISP 1 "Nov, 2011" .AT 3 .SH NAME lisp \- CMU Common Lisp programming environment commit d22414b343842447e945a611ceb6973230ae2f65 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Oct 22 13:50:06 2011 -0700 Clean up phrasing. diff --git a/general-info/release-20c.txt b/general-info/release-20c.txt index 2db1794..86ff7a1 100644 --- a/general-info/release-20c.txt +++ b/general-info/release-20c.txt @@ -22,8 +22,8 @@ New in this release: - Update to Unicode 6.0.0. - Add support for character name completion. This can be used by Slime to do character name completion. - - Initial support for Solaris/x86. CMUCL will run on Solaris/x86 - with all features available, except only Unicode is supported. + - Support for Solaris/x86. CMUCL will run on Solaris/x86 with all + features available, except only Unicode is supported. * Changes - ASDF2 updated to version 2.017. commit 8b6039fd9e994e44b09e6ce1ca71905d2b9551e0 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Oct 22 13:45:22 2011 -0700 Update date and version for release. diff --git a/docs/cmu-user/cmu-user.tex b/docs/cmu-user/cmu-user.tex index 3ea079c..4a94c16 100644 --- a/docs/cmu-user/cmu-user.tex +++ b/docs/cmu-user/cmu-user.tex @@ -47,7 +47,7 @@ \newcommand{\keywords}{lisp, Common Lisp, manual, compiler, programming language implementation, programming environment} -\date{October 2010 \\ 20b} +\date{November 2011 \\ 20c} \begin{document} ----------------------------------------------------------------------- Summary of changes: docs/cmu-user/cmu-user.tex | 2 +- general-info/lisp.1 | 2 +- general-info/release-20c.txt | 4 ++-- 3 files changed, 4 insertions(+), 4 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp annotated tag release-20c-base created. release-20c-base
by Raymond Toy 22 Oct '11

22 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The annotated tag, release-20c-base has been created at cff7125f5b6ea7d9fe8eb00eef27b86bfc186bd4 (tag) tagging 938269e2987c8ca1e73d804a8a8a53b63024cae2 (commit) replaces snapshot-2011-10 tagged by Raymond Toy on Sat Oct 22 08:56:26 2011 -0700 - Log ----------------------------------------------------------------- Base of the release-20c branch. Alex Goncharov (10): 1. Add .gitignore. 2. Rewrite tools/create-target.sh Merge branch 'master' of ssh://common-lisp.net/var/git/projects/cmucl/cmucl tools/create-target.sh: merge from dynamic-stack-alloc Remove .gitignore: no need for it for now Merge branch 'master' of ssh://common-lisp.net/var/git/projects/cmucl/cmucl compile-file: add a doc string for the :Load argument. compile-file: rephrase the doc string for the :Load argument. compiler/main.lisp: Doc strings reformat per the established conventions. Merge branch 'master' of ssh://common-lisp.net/var/git/projects/cmucl/cmucl compiler/main.lisp: Improve the doc strings for compile-file and compile-file-pathname. Raymond Toy (18): Use git describe to add to default version string. Use git describe instead of git log to get a version. o Let build.sh set the default version instead of setting one here. Remove reference to CVS. Change to correct directory before symlinking the Config and Makefile Just expand the VERSION everywhere instead of trying to be smart and Cleanup version stuff and fix bug. Handle the case where Git describe prints nothing. In this case, just Format docstrings for COMPILE-FILE and COMPILE-FILE-PATHNAME so Clean up implementation of PROCESS-FILE-COMMENT slightly. Properly handle a denormal operand exception. This should get rid of Update with new docstrings and code changes. Remove :CREATE from :IF-DOES-NOT-EXIST; it doesn't do anything Clean up docstrings of MAP<foo> to match the argument names. (format t "a~0&b") should not output a newline between a and b. Bump version to 20c, add bootstrap file. Remove reference to CVS. Regenerated. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch RELEASE-20C-BRANCH created. snapshot-2011-10-28-g938269e
by Raymond Toy 22 Oct '11

22 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, RELEASE-20C-BRANCH has been created at 938269e2987c8ca1e73d804a8a8a53b63024cae2 (commit) - Log ----------------------------------------------------------------- ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2011-10-28-g938269e
by Raymond Toy 22 Oct '11

22 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via 938269e2987c8ca1e73d804a8a8a53b63024cae2 (commit) via 241c42f324ac69380ee8e1f7f387e89c9ea085c8 (commit) from 4ac29cb60d52a15a16db9e733c687f56b74fa787 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 938269e2987c8ca1e73d804a8a8a53b63024cae2 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Oct 22 08:49:20 2011 -0700 Regenerated. diff --git a/i18n/locale/cmucl.pot b/i18n/locale/cmucl.pot index 6ddb2af..92ace3d 100644 --- a/i18n/locale/cmucl.pot +++ b/i18n/locale/cmucl.pot @@ -3294,27 +3294,36 @@ msgstr "" #: src/code/list.lisp msgid "" -"Applies fn to successive elements of lists, returns its second argument." +"Applies Function to successive elements of each List, and returns\n" +" its second argument." msgstr "" #: src/code/list.lisp -msgid "Applies fn to successive elements of list, returns list of results." +msgid "" +"Applies Function to successive elements of each List, and returns a\n" +" list of results." msgstr "" #: src/code/list.lisp -msgid "Applies fn to successive elements of list, returns NCONC of results." +msgid "" +"Applies Function to successive elements of each List, and returns\n" +" NCONC of results." msgstr "" #: src/code/list.lisp -msgid "Applies fn to successive CDRs of list, returns ()." +msgid "Applies Function to successive CDRs of each List, and returns ()." msgstr "" #: src/code/list.lisp -msgid "Applies fn to successive CDRs of list, returns list of results." +msgid "" +"Applies Function to successive CDRs of each List, and returns list\n" +" of results." msgstr "" #: src/code/list.lisp -msgid "Applies fn to successive CDRs of lists, returns NCONC of results." +msgid "" +"Applies Function to successive CDRs of each List, and returns NCONC\n" +" of results." msgstr "" #: src/code/list.lisp diff --git a/i18n/locale/en(a)piglatin/LC_MESSAGES/cmucl.po b/i18n/locale/en(a)piglatin/LC_MESSAGES/cmucl.po index 8ed111f..78da94f 100644 --- a/i18n/locale/en(a)piglatin/LC_MESSAGES/cmucl.po +++ b/i18n/locale/en(a)piglatin/LC_MESSAGES/cmucl.po @@ -4546,36 +4546,51 @@ msgstr "" " unctionfay andway accumulatingway esultsray asway esiredday." #: src/code/list.lisp +#, fuzzy msgid "" -"Applies fn to successive elements of lists, returns its second argument." +"Applies Function to successive elements of each List, and returns\n" +" its second argument." msgstr "" "Appliesway nfay otay uccessivesay elementsway ofway istslay, eturnsray " "itsway econdsay argumentway." #: src/code/list.lisp -msgid "Applies fn to successive elements of list, returns list of results." +#, fuzzy +msgid "" +"Applies Function to successive elements of each List, and returns a\n" +" list of results." msgstr "" "Appliesway nfay otay uccessivesay elementsway ofway istlay, eturnsray istlay " "ofway esultsray." #: src/code/list.lisp -msgid "Applies fn to successive elements of list, returns NCONC of results." +#, fuzzy +msgid "" +"Applies Function to successive elements of each List, and returns\n" +" NCONC of results." msgstr "" "Appliesway nfay otay uccessivesay elementsway ofway istlay, eturnsray NCONC " "ofway esultsray." #: src/code/list.lisp -msgid "Applies fn to successive CDRs of list, returns ()." +#, fuzzy +msgid "Applies Function to successive CDRs of each List, and returns ()." msgstr "Appliesway nfay otay uccessivesay Drscay ofway istlay, eturnsray ()." #: src/code/list.lisp -msgid "Applies fn to successive CDRs of list, returns list of results." +#, fuzzy +msgid "" +"Applies Function to successive CDRs of each List, and returns list\n" +" of results." msgstr "" "Appliesway nfay otay uccessivesay Drscay ofway istlay, eturnsray istlay " "ofway esultsray." #: src/code/list.lisp -msgid "Applies fn to successive CDRs of lists, returns NCONC of results." +#, fuzzy +msgid "" +"Applies Function to successive CDRs of each List, and returns NCONC\n" +" of results." msgstr "" "Appliesway nfay otay uccessivesay Drscay ofway istslay, eturnsray NCONC " "ofway esultsray." diff --git a/i18n/locale/ko/LC_MESSAGES/cmucl.po b/i18n/locale/ko/LC_MESSAGES/cmucl.po index a8dcf1d..a806bec 100644 --- a/i18n/locale/ko/LC_MESSAGES/cmucl.po +++ b/i18n/locale/ko/LC_MESSAGES/cmucl.po @@ -3295,27 +3295,36 @@ msgstr "" #: src/code/list.lisp msgid "" -"Applies fn to successive elements of lists, returns its second argument." +"Applies Function to successive elements of each List, and returns\n" +" its second argument." msgstr "" #: src/code/list.lisp -msgid "Applies fn to successive elements of list, returns list of results." +msgid "" +"Applies Function to successive elements of each List, and returns a\n" +" list of results." msgstr "" #: src/code/list.lisp -msgid "Applies fn to successive elements of list, returns NCONC of results." +msgid "" +"Applies Function to successive elements of each List, and returns\n" +" NCONC of results." msgstr "" #: src/code/list.lisp -msgid "Applies fn to successive CDRs of list, returns ()." +msgid "Applies Function to successive CDRs of each List, and returns ()." msgstr "" #: src/code/list.lisp -msgid "Applies fn to successive CDRs of list, returns list of results." +msgid "" +"Applies Function to successive CDRs of each List, and returns list\n" +" of results." msgstr "" #: src/code/list.lisp -msgid "Applies fn to successive CDRs of lists, returns NCONC of results." +msgid "" +"Applies Function to successive CDRs of each List, and returns NCONC\n" +" of results." msgstr "" #: src/code/list.lisp commit 241c42f324ac69380ee8e1f7f387e89c9ea085c8 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Oct 22 08:42:06 2011 -0700 Remove reference to CVS. diff --git a/tools/build.sh b/tools/build.sh index 74374dd..392637e 100755 --- a/tools/build.sh +++ b/tools/build.sh @@ -94,7 +94,7 @@ usage () echo ' the translations.' echo " -? This help message" echo " -w Specify a different build-world.sh script" - echo " -U If translations are done, overwrite the CVS files with the" + echo " -U If translations are done, overwrite the files with the" echo " translations instead of computing and displaying the diffs." echo " -O opt Any additional command-line flags to use when building." echo " The flags always include -noinit -nositeinit" ----------------------------------------------------------------------- Summary of changes: i18n/locale/cmucl.pot | 21 ++++++++++++++----- i18n/locale/en(a)piglatin/LC_MESSAGES/cmucl.po | 27 ++++++++++++++++++++----- i18n/locale/ko/LC_MESSAGES/cmucl.po | 21 ++++++++++++++----- tools/build.sh | 2 +- 4 files changed, 52 insertions(+), 19 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2011-10-26-g4ac29cb
by Raymond Toy 22 Oct '11

22 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via 4ac29cb60d52a15a16db9e733c687f56b74fa787 (commit) from d6a6792b94882e781003cf47cfdb882ba3a96f6a (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 4ac29cb60d52a15a16db9e733c687f56b74fa787 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Oct 22 08:37:26 2011 -0700 Bump version to 20c, add bootstrap file. A normal build can be done using boot-20c.lisp. diff --git a/bootfiles/20b/boot-20c.lisp b/bootfiles/20b/boot-20c.lisp new file mode 100644 index 0000000..cc54472 --- /dev/null +++ b/bootfiles/20b/boot-20c.lisp @@ -0,0 +1,68 @@ +;;;; +;;;; Boot file for changing the fasl file version numbers to 20c. +;;;; + +(in-package :c) + +(setf lisp::*enable-package-locked-errors* nil) + +;;; +;;; Note that BYTE-FASL-FILE-VERSION is a constant. +;;; +;;; (Be sure to change BYTE-FASL-FILE-VERSION in +;;; compiler/byte-comp.lisp to the correct value too!) +;;; +#-cmu20c +(setf (symbol-value 'byte-fasl-file-version) #x20c) +#-cmu20c +(setf (backend-fasl-file-version *target-backend*) #x20c) + +;;; +;;; Don't check fasl versions in the compiling Lisp because we'll +;;; load files compiled with the new version numbers. +;;; +#-cmu20c +(setq lisp::*skip-fasl-file-version-check* t) + +;;; +;;; This is here because BYTE-FASL-FILE-VERSION is constant-folded in +;;; OPEN-FASL-FILE. To make the new version number take effect, we +;;; have to redefine the function. +;;; +#-cmu20c +(defun open-fasl-file (name where &optional byte-p) + (declare (type pathname name)) + (let* ((stream (open name :direction :output + :if-exists :new-version + :element-type '(unsigned-byte 8) + :class 'binary-text-stream)) + (res (make-fasl-file :stream stream))) + (multiple-value-bind + (version f-vers f-imp) + (if byte-p + (values "Byte code" + byte-fasl-file-version + (backend-byte-fasl-file-implementation *backend*)) + (values (backend-version *backend*) + (backend-fasl-file-version *backend*) + (backend-fasl-file-implementation *backend*))) + (format stream + "FASL FILE output from ~A.~@ + Compiled ~A on ~A~@ + Compiler ~A, Lisp ~A~@ + Targeted for ~A, FASL version ~X~%" + where + (ext:format-universal-time nil (get-universal-time)) + (machine-instance) compiler-version + (lisp-implementation-version) + version f-vers) + ;; + ;; Terminate header. + (dump-byte 255 res) + ;; + ;; Specify code format. + (dump-fop 'lisp::fop-long-code-format res) + (dump-byte f-imp res) + (dump-unsigned-32 f-vers res)) + res)) + diff --git a/compiler/byte-comp.lisp b/compiler/byte-comp.lisp index 3f04bdd..ad16162 100644 --- a/compiler/byte-comp.lisp +++ b/compiler/byte-comp.lisp @@ -34,12 +34,20 @@ ;;;; Fasl file format: -(defconstant byte-fasl-file-version #x20b) +;; The fasl file version should be a series of hex digits in the range +;; 0-9 followed by a single hex digit in the range a-f. Then the +;; version looks like a decimal number followed by a minor release +;; letter of a to f. +(defconstant byte-fasl-file-version #x20c) (let* ((version-string (format nil "~X" byte-fasl-file-version))) - (sys:register-lisp-feature (intern (concatenate 'string "CMU" version-string) :keyword)) + ;; Add :cmu<n> to *features* + (sys:register-lisp-feature (intern (concatenate 'string "CMU" version-string) + :keyword)) + ;; Same as above, except drop the trailing a-f character. (sys:register-lisp-feature (intern (concatenate 'string "CMU" - (subseq version-string 0 (1- (length version-string)))) + (subseq version-string 0 + (1- (length version-string)))) :keyword))) (defun backend-byte-fasl-file-type (backend) ----------------------------------------------------------------------- Summary of changes: bootfiles/{19d/boot-19e.lisp => 20b/boot-20c.lisp} | 15 ++++++++++----- compiler/byte-comp.lisp | 14 +++++++++++--- 2 files changed, 21 insertions(+), 8 deletions(-) copy bootfiles/{19d/boot-19e.lisp => 20b/boot-20c.lisp} (83%) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2011-10-25-gd6a6792
by Raymond Toy 22 Oct '11

22 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via d6a6792b94882e781003cf47cfdb882ba3a96f6a (commit) from c3ec1280d301ba9af8b1492b51c5e015bfb1b3ef (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit d6a6792b94882e781003cf47cfdb882ba3a96f6a Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Fri Oct 21 20:35:49 2011 -0700 (format t "a~0&b") should not output a newline between a and b. diff --git a/code/format.lisp b/code/format.lisp index b8a9e76..704ec34 100644 --- a/code/format.lisp +++ b/code/format.lisp @@ -1999,9 +1999,10 @@ (if params (expand-bind-defaults ((count 1)) params `(progn - (fresh-line stream) - (dotimes (i (1- ,count)) - (terpri stream)))) + (when (plusp ,count) + (fresh-line stream) + (dotimes (i (1- ,count)) + (terpri stream))))) '(fresh-line stream))) (def-format-interpreter #\& (colonp atsignp params) @@ -2010,9 +2011,10 @@ :complaint (intl:gettext "Cannot specify either colon or atsign for this directive."))) (interpret-bind-defaults ((count 1)) params - (fresh-line stream) - (dotimes (i (1- count)) - (terpri stream)))) + (when (plusp count) + (fresh-line stream) + (dotimes (i (1- count)) + (terpri stream))))) (def-format-directive #\| (colonp atsignp params) (when (or colonp atsignp) diff --git a/general-info/release-20c.txt b/general-info/release-20c.txt index ffe98b5..2db1794 100644 --- a/general-info/release-20c.txt +++ b/general-info/release-20c.txt @@ -1,7 +1,5 @@ ========================== C M U C L 20 c ============================= -[--- WORK IN PROGRESS ---] - The CMUCL project is pleased to announce the release of CMUCL 20c. This is a major release which contains numerous enhancements and bug fixes from the 20b release. @@ -60,6 +58,7 @@ New in this release: - Improve type propagation for LOAD-TIME-VALUE. - Add -O option to build.sh to allow specifying options to lisp when doing the builds. + - (format t "a~0&b") should not output a newline between a and b. * ANSI compliance fixes: - Fixes for signaling errors with READ-CHAR and READ-BYTE ----------------------------------------------------------------------- Summary of changes: code/format.lisp | 14 ++++++++------ general-info/release-20c.txt | 3 +-- 2 files changed, 9 insertions(+), 8 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2011-10-24-gc3ec128
by Raymond Toy 22 Oct '11

22 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via c3ec1280d301ba9af8b1492b51c5e015bfb1b3ef (commit) from 7243adb2da5a50c966fb9676f72caa1f20ed4116 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit c3ec1280d301ba9af8b1492b51c5e015bfb1b3ef Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Fri Oct 21 19:02:06 2011 -0700 Clean up docstrings of MAP<foo> to match the argument names. diff --git a/code/list.lisp b/code/list.lisp index aa44acd..590564a 100644 --- a/code/list.lisp +++ b/code/list.lisp @@ -1056,27 +1056,32 @@ (defun mapc (function list &rest more-lists) - "Applies fn to successive elements of lists, returns its second argument." + "Applies Function to successive elements of each List, and returns + its second argument." (map1 function (cons list more-lists) nil t)) (defun mapcar (function list &rest more-lists) - "Applies fn to successive elements of list, returns list of results." + "Applies Function to successive elements of each List, and returns a + list of results." (map1 function (cons list more-lists) :list t)) (defun mapcan (function list &rest more-lists) - "Applies fn to successive elements of list, returns NCONC of results." + "Applies Function to successive elements of each List, and returns + NCONC of results." (map1 function (cons list more-lists) :nconc t)) (defun mapl (function list &rest more-lists) - "Applies fn to successive CDRs of list, returns ()." + "Applies Function to successive CDRs of each List, and returns ()." (map1 function (cons list more-lists) nil nil)) (defun maplist (function list &rest more-lists) - "Applies fn to successive CDRs of list, returns list of results." + "Applies Function to successive CDRs of each List, and returns list + of results." (map1 function (cons list more-lists) :list nil)) (defun mapcon (function list &rest more-lists) - "Applies fn to successive CDRs of lists, returns NCONC of results." + "Applies Function to successive CDRs of each List, and returns NCONC + of results." (map1 function (cons list more-lists) :nconc nil)) ----------------------------------------------------------------------- Summary of changes: code/list.lisp | 17 +++++++++++------ 1 files changed, 11 insertions(+), 6 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch dynamic-stack-alloc updated. snapshot-2011-10-38-g9122483
by Raymond Toy 15 Oct '11

15 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, dynamic-stack-alloc has been updated via 9122483ad1826b335339eca9982882ef8faaf7f7 (commit) via a34b7f0e2796651ac002cefd0811767091a3731a (commit) via ae88f40f3125a4cc7729ccb81ebadd33e05889c7 (commit) via e9c497d7156a43a4acb77c26e392fb47f9c47552 (commit) via 987c3f200c854ede9196132e517756c5d4421239 (commit) via c78ad0faeb5c8518124d55757c2b868ae8b97dfb (commit) via 1e5b21e28d58b1b16a36111967e2ee77464cafbd (commit) via fce6baff8422e8de9c3f4b33e557c55e3e34ebee (commit) via 8c5abd162d1cbee840088eee055f064bf9c1e283 (commit) via 6758988de6238d627c018601adfa137e9321e69d (commit) via 5079827f9d27e143f3a48ab5006ec42f71f0815c (commit) via a0559708e0f703f88c7bb731689e85e3c9f0b88c (commit) via e04778be14f6bba6a489a8bae37e39dee50bebe8 (commit) via ef0137913f8e6bcbe6bc7931d25f5c30cbb91857 (commit) via 39ecf08786867b6aa353203a26b51256a541cedf (commit) via e656215ac44b80944c2ead1314d512ddbcb94ac4 (commit) via 803a8bd24679310c298c8e51264f9dbdb2cf30a7 (commit) via 15db498a83e329bfd524a40897a07a3076f390c8 (commit) via 4be42bd6d9718524eab70a3cdc9ba8f457d83b86 (commit) via 7c53c93c934cafc335ef98e48be2d1cd7e141579 (commit) via b4d64266f7e16b51677285a3e6f93b5351fb13c3 (commit) from d452655e2ee178a879d8e3b6caaec5469d99cf2a (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 9122483ad1826b335339eca9982882ef8faaf7f7 Merge: d452655 a34b7f0 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Thu Oct 13 18:59:33 2011 -0700 Merge branch 'master' into dynamic-stack-alloc Conflicts: tools/create-target.sh tools/load-world.sh diff --cc tools/load-world.sh index d381769,288e40c..391208f --- a/tools/load-world.sh +++ b/tools/load-world.sh @@@ -11,9 -11,10 +11,9 @@@ usage( SKIP_PCL= NO_PCL_FEATURE= - # Default version is the date and the git hash + # Default version is the date with the git hash. GIT_HASH="`(cd src; git describe --dirty 2>/dev/null)`" - VERSION="`date '+%Y-%m-%d %H:%M:%S'`" + VERSION="`date '+%Y-%m-%d %H:%M:%S'`${GIT_HASH:+ $GIT_HASH}" -echo $VERSION while getopts "p" arg do ----------------------------------------------------------------------- Summary of changes: compiler/main.lisp | 137 ++++++++++++++++++++++++++--------------------- tools/build-all.sh | 26 +++++---- tools/create-target.sh | 2 +- tools/load-world.sh | 8 ++-- 4 files changed, 95 insertions(+), 78 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2011-10-21-g7b6eb21
by Raymond Toy 15 Oct '11

15 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via 7b6eb2172fe582d5d1278abc041ba097fda9aa32 (commit) from a34b7f0e2796651ac002cefd0811767091a3731a (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 7b6eb2172fe582d5d1278abc041ba097fda9aa32 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Fri Oct 14 22:44:17 2011 -0700 Properly handle a denormal operand exception. This should get rid of the occasional problem about SIGFPE's with no exceptions enabled. error.lisp: o Add floating-point-denormal-operand arithmetic error. exports.lisp: o Export the new arithmetic error type. float-trap.lisp: o Check the denormal trap bit and signal the appropriate error. release-20c.txt: o Update. diff --git a/code/error.lisp b/code/error.lisp index f2b2a19..2678d22 100644 --- a/code/error.lisp +++ b/code/error.lisp @@ -53,7 +53,8 @@ arithmetic-error arithmetic-error-operation arithmetic-error-operands package-error package-error-package division-by-zero floating-point-overflow floating-point-underflow - floating-point-inexact floating-point-invalid-operation)) + floating-point-inexact floating-point-invalid-operation + #+x86 floating-point-denormal-operand)) (in-package "CONDITIONS") @@ -1129,6 +1130,8 @@ (define-condition floating-point-underflow (arithmetic-error) ()) (define-condition floating-point-inexact (arithmetic-error) ()) (define-condition floating-point-invalid-operation (arithmetic-error) ()) +#+x86 +(define-condition floating-point-denormal-operand (arithmetic-error) ()) ;;; This condition is signalled whenever we make a UNKNOWN-TYPE so that ;;; compiler warnings can be emitted as appropriate. diff --git a/code/exports.lisp b/code/exports.lisp index 6749fb0..d34e2d3 100644 --- a/code/exports.lisp +++ b/code/exports.lisp @@ -720,7 +720,9 @@ "FIND-IF" "FIND-IF-NOT" "FIND-PACKAGE" "FIND-RESTART" "FIND-SYMBOL" "FINISH-OUTPUT" "FIRST" "FIXNUM" "FLET" "FLOAT" "FLOAT-DIGITS" "FLOAT-PRECISION" "FLOAT-RADIX" - "FLOAT-SIGN" "FLOATING-POINT-INEXACT" + "FLOAT-SIGN" + "FLOATING-POINT-DENORMAL-OPERAND" + "FLOATING-POINT-INEXACT" "FLOATING-POINT-INVALID-OPERATION" "FLOATING-POINT-OVERFLOW" "FLOATING-POINT-UNDERFLOW" "FLOATP" "FLOOR" "FMAKUNBOUND" "FORCE-OUTPUT" "FORMAT" "FORMATTER" diff --git a/code/float-trap.lisp b/code/float-trap.lisp index 5cb3b3f..0ac3898 100644 --- a/code/float-trap.lisp +++ b/code/float-trap.lisp @@ -289,6 +289,11 @@ (error 'floating-point-inexact :operation fop :operands operands)) + #+x86 + ((not (zerop (logand float-denormal-trap-bit traps))) + (error 'floating-point-denormal-operand + :operation fop + :operands operands)) (t ;; It looks like the sigcontext on Solaris/x86 doesn't ;; actually save the status word of the FPU. The diff --git a/general-info/release-20c.txt b/general-info/release-20c.txt index 50bea98..ffe98b5 100644 --- a/general-info/release-20c.txt +++ b/general-info/release-20c.txt @@ -145,7 +145,7 @@ New in this release: actually prevent stack overflows from crashing lisp. - Fix rounding of numbers larger than a fixnum. (See Trac #10 for a related issue.) - + - Properly handle the denormal operand trap on x86es. * Trac Tickets: - #43: unread-char doesn't change file-position ----------------------------------------------------------------------- Summary of changes: code/error.lisp | 5 ++++- code/exports.lisp | 4 +++- code/float-trap.lisp | 5 +++++ general-info/release-20c.txt | 2 +- 4 files changed, 13 insertions(+), 3 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2011-10-20-ga34b7f0
by Raymond Toy 13 Oct '11

13 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via a34b7f0e2796651ac002cefd0811767091a3731a (commit) via ae88f40f3125a4cc7729ccb81ebadd33e05889c7 (commit) from e9c497d7156a43a4acb77c26e392fb47f9c47552 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit a34b7f0e2796651ac002cefd0811767091a3731a Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Wed Oct 12 22:15:46 2011 -0700 Clean up implementation of PROCESS-FILE-COMMENT slightly. diff --git a/compiler/main.lisp b/compiler/main.lisp index eac347d..544ccb0 100644 --- a/compiler/main.lisp +++ b/compiler/main.lisp @@ -1127,9 +1127,9 @@ (generate-comment (file-info) (let* ((name (pathname (source-info-stream file-info))) (proc (run-git name)) - comment) - (if (and proc (zerop (process-exit-code proc)) - (setf comment (read-line (process-output proc) nil nil))) + (comment (and proc (zerop (process-exit-code proc)) + (read-line (process-output proc) nil nil)))) + (if comment (format nil "$Header: ~A ~A $" (enough-namestring name) comment) commit ae88f40f3125a4cc7729ccb81ebadd33e05889c7 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Wed Oct 12 22:06:43 2011 -0700 Format docstrings for COMPILE-FILE and COMPILE-FILE-PATHNAME so DESCRIBE prints them neatly. diff --git a/compiler/main.lisp b/compiler/main.lisp index 9e16830..eac347d 100644 --- a/compiler/main.lisp +++ b/compiler/main.lisp @@ -1810,13 +1810,14 @@ These keywords are supported: :Output-File - The name of the FASL to output, NIL for none, T for the default. (Note the - difference between the treatment of NIL :Output-File here and in COMPILE-FILE-PATHNAME.) - The returned pathname of the output file may differ from the pathname of the - :Output-File parameter, e.g. when the latter is a designator for a directory. + The name of the FASL to output, NIL for none, T for the default. + (Note the difference between the treatment of NIL :Output-File + here and in COMPILE-FILE-PATHNAME.) The returned pathname of the + output file may differ from the pathname of the :Output-File + parameter, e.g. when the latter is a designator for a directory. :Load - Load the compiled file; T here requires :Output-File to be non-NIL, as well. - The default for :Load is NIL. + Load the compiled file; T here requires :Output-File to be + non-NIL, as well. The default for :Load is NIL. :Error-File The name of the error listing file, NIL for none (the default), T for .err. :Trace-File @@ -2135,10 +2136,12 @@ (byte-compile *byte-compile-default*) (output-file t output-file-supplied-p) &allow-other-keys) - "Return a pathname describing what file COMPILE-FILE would write to given these arguments. - The returned pathname of the output file may differ from the pathname of the :Output-File - parameter, e.g. when the latter is a designator for a directory. The CMUCL caveat: NIL is - accepted for :Output-File there but not here, which is probably not in line with CLHS." + "Return a pathname describing what file COMPILE-FILE would write to + given these arguments. The returned pathname of the output file may + differ from the pathname of the :Output-File parameter, e.g. when + the latter is a designator for a directory. The CMUCL caveat: NIL is + accepted for :Output-File there but not here, which is probably not + in line with CLHS." (declare (type (or string pathname stream) input-file) (type (or string pathname stream (member t)) output-file) (values (or null pathname))) ----------------------------------------------------------------------- Summary of changes: compiler/main.lisp | 29 ++++++++++++++++------------- 1 files changed, 16 insertions(+), 13 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2011-10-18-ge9c497d
by Alex Goncharov 13 Oct '11

13 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via e9c497d7156a43a4acb77c26e392fb47f9c47552 (commit) from 987c3f200c854ede9196132e517756c5d4421239 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit e9c497d7156a43a4acb77c26e392fb47f9c47552 Author: Alex Goncharov <alex-goncharov(a)comcast.net> Date: Thu Oct 13 00:11:25 2011 -0400 compiler/main.lisp: Improve the doc strings for compile-file and compile-file-pathname. Unify the use of the FASL and NIL words across all documentation strings in this file. diff --git a/compiler/main.lisp b/compiler/main.lisp index a4bbefd..9e16830 100644 --- a/compiler/main.lisp +++ b/compiler/main.lisp @@ -1801,12 +1801,19 @@ *byte-compile-default*) ((:xref *record-xref-info*) *record-xref-info*)) - "Compiles Source, producing a corresponding .FASL file. Source may be a list + "Compiles Source, producing a corresponding FASL file. Source may be a list of files, in which case the files are compiled as a unit, producing a single - .FASL file. The output file names are defaulted from the first (or only) - input file name. Other options available via keywords: + FASL file. The output file names are defaulted from the first (or only) + input file name. (The use of a list for Source is a CMUCL extension, not + specified in CLHS.) + + These keywords are supported: + :Output-File - The name of the fasl to output, NIL for none, T for the default. + The name of the FASL to output, NIL for none, T for the default. (Note the + difference between the treatment of NIL :Output-File here and in COMPILE-FILE-PATHNAME.) + The returned pathname of the output file may differ from the pathname of the + :Output-File parameter, e.g. when the latter is a designator for a directory. :Load Load the compiled file; T here requires :Output-File to be non-NIL, as well. The default for :Load is NIL. @@ -1848,7 +1855,7 @@ The external format to use when opening the source file. :Decoding-Error How to handle decoding errors in the external format when reading the - source file. Default (T) is to signal an error. Nil means silently + source file. Default (T) is to signal an error. NIL means silently continue, replacing the invalid sequence with a suitable replacment character." (let* ((fasl-file nil) @@ -2001,7 +2008,7 @@ be compiled. IF NAME names a macro, then the compiled expression replaces the existing macro-function. If NAME names a function, the compiled expression is placed in the function cell of NAME. If NAME - is Nil, the compiled code object is returned." + is NIL, the compiled code object is returned." (with-compilation-unit () (with-ir1-namespace (let* ((*backend* *native-backend*) @@ -2128,8 +2135,10 @@ (byte-compile *byte-compile-default*) (output-file t output-file-supplied-p) &allow-other-keys) - "Return a pathname describing what file COMPILE-FILE would write to given - these arguments." + "Return a pathname describing what file COMPILE-FILE would write to given these arguments. + The returned pathname of the output file may differ from the pathname of the :Output-File + parameter, e.g. when the latter is a designator for a directory. The CMUCL caveat: NIL is + accepted for :Output-File there but not here, which is probably not in line with CLHS." (declare (type (or string pathname stream) input-file) (type (or string pathname stream (member t)) output-file) (values (or null pathname))) ----------------------------------------------------------------------- Summary of changes: compiler/main.lisp | 25 +++++++++++++++++-------- 1 files changed, 17 insertions(+), 8 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2011-10-17-g987c3f2
by Alex Goncharov 12 Oct '11

12 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The branch, master has been updated via 987c3f200c854ede9196132e517756c5d4421239 (commit) via c78ad0faeb5c8518124d55757c2b868ae8b97dfb (commit) from 1e5b21e28d58b1b16a36111967e2ee77464cafbd (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- commit 987c3f200c854ede9196132e517756c5d4421239 Merge: c78ad0f 1e5b21e Author: Alex Goncharov <alex-goncharov(a)comcast.net> Date: Tue Oct 11 21:30:54 2011 -0400 Merge branch 'master' of ssh://common-lisp.net/var/git/projects/cmucl/cmucl commit c78ad0faeb5c8518124d55757c2b868ae8b97dfb Author: Alex Goncharov <alex-goncharov(a)comcast.net> Date: Tue Oct 11 21:30:44 2011 -0400 compiler/main.lisp: Doc strings reformat per the established conventions. Plus one dot added. Minus the new line in ext:file-comment diff --git a/compiler/main.lisp b/compiler/main.lisp index 7bfce70..9a2dd99 100644 --- a/compiler/main.lisp +++ b/compiler/main.lisp @@ -4,8 +4,7 @@ ;;; This code was written as part of the CMU Common Lisp project at ;;; Carnegie Mellon University, and has been placed in the public domain. ;;; -(ext:file-comment - "$Header: src/compiler/main.lisp $") +(ext:file-comment "$Header: src/compiler/main.lisp $") ;;; ;;; ********************************************************************** ;;; @@ -54,8 +53,8 @@ ;;; Exported: (defvar *byte-compile-top-level* t "Similar to *BYTE-COMPILE-DEFAULT*, but controls the compilation of top-level - forms (evaluated at load-time) when the :BYTE-COMPILE argument is :MAYBE - (the default.) When true, we decide to byte-compile.") + forms (evaluated at load-time) when the :BYTE-COMPILE argument is :MAYBE + (the default.) When true, we decide to byte-compile.") ;;; Exported: (defvar *loop-analyze* nil @@ -139,9 +138,9 @@ (defvar *user-source-info* nil "The user supplied source-info for the current compilation. -This is the :source-info argument to COMPILE-FROM-STREAM and will be -stored in the INFO slot of the DEBUG-SOURCE in code components and -in the user USER-INFO slot of STREAM-SOURCE-LOCATIONs.") + This is the :source-info argument to COMPILE-FROM-STREAM and will be + stored in the INFO slot of the DEBUG-SOURCE in code components and + in the user USER-INFO slot of STREAM-SOURCE-LOCATIONs.") ;;; Maybe-Mumble -- Internal ;;; @@ -1801,56 +1800,55 @@ in the user USER-INFO slot of STREAM-SOURCE-LOCATIONs.") ((:xref *record-xref-info*) *record-xref-info*)) "Compiles Source, producing a corresponding .FASL file. Source may be a list - of files, in which case the files are compiled as a unit, producing a single - .FASL file. The output file names are defaulted from the first (or only) - input file name. Other options available via keywords: - :Output-File - The name of the fasl to output, NIL for none, T for the default. - :Load - Load the compiled file; T here requires :Output-File to be non-NIL, as well. - The default for :Load is NIL. - :Error-File - The name of the error listing file, NIL for none (the default), T for - .err. - :Trace-File - If specified, internal data structures are dumped to this file. T for - the .trace default. - :Error-Output - If a stream, then error output is sent there as well as to the listing - file. NIL suppresses this additional error output. The default is T, - which means use *ERROR-OUTPUT*. - :Block-Compile {NIL | :SPECIFIED | T} - Determines whether multiple functions are compiled together as a unit, - resolving function references at compile time. NIL means that global - function names are never resolved at compilation time. :SPECIFIED means - that names are resolved at compile-time when convenient (as in a - self-recursive call), but the compiler doesn't combine top-level DEFUNs. - With :SPECIFIED, an explicit START-BLOCK declaration will enable block - compilation. A value of T indicates that all forms in the file(s) should - be compiled as a unit. The default is the value of - EXT:*BLOCK-COMPILE-DEFAULT*, which is initially :SPECIFIED. - :Entry-Points - This specifies a list of function names for functions in the file(s) that - must be given global definitions. This only applies to block - compilation, and is useful mainly when :BLOCK-COMPILE T is specified on a - file that lacks START-BLOCK declarations. If the value is NIL (the - default) then all functions will be globally defined. - :Byte-Compile {T | NIL | :MAYBE} - Determines whether to compile into interpreted byte code instead of - machine instructions. Byte code is several times smaller, but much - slower. If :MAYBE, then only byte-compile when SPEED is 0 and - DEBUG <= 1. The default is the value of EXT:*BYTE-COMPILE-DEFAULT*, - which is initially :MAYBE. - :Xref - If non-NIL, enable recording of cross-reference information. The default - is the value of C:*RECORD-XREF-INFO* - :External-Format - The external format to use when opening the source file - :Decoding-Error - How to handle decoding errors in the external format when reading the - source file. Default (T) is to signal an error. Nil means silently - continue, replacing the invalid sequence with a suitable replacment - character." + of files, in which case the files are compiled as a unit, producing a single + .FASL file. The output file names are defaulted from the first (or only) + input file name. Other options available via keywords: + :Output-File + The name of the fasl to output, NIL for none, T for the default. + :Load + Load the compiled file; T here requires :Output-File to be non-NIL, as well. + The default for :Load is NIL. + :Error-File + The name of the error listing file, NIL for none (the default), T for .err. + :Trace-File + If specified, internal data structures are dumped to this file. T for + the .trace default. + :Error-Output + If a stream, then error output is sent there as well as to the listing + file. NIL suppresses this additional error output. The default is T, + which means use *ERROR-OUTPUT*. + :Block-Compile {NIL | :SPECIFIED | T} + Determines whether multiple functions are compiled together as a unit, + resolving function references at compile time. NIL means that global + function names are never resolved at compilation time. :SPECIFIED means + that names are resolved at compile-time when convenient (as in a + self-recursive call), but the compiler doesn't combine top-level DEFUNs. + With :SPECIFIED, an explicit START-BLOCK declaration will enable block + compilation. A value of T indicates that all forms in the file(s) should + be compiled as a unit. The default is the value of + EXT:*BLOCK-COMPILE-DEFAULT*, which is initially :SPECIFIED. + :Entry-Points + This specifies a list of function names for functions in the file(s) that + must be given global definitions. This only applies to block + compilation, and is useful mainly when :BLOCK-COMPILE T is specified on a + file that lacks START-BLOCK declarations. If the value is NIL (the + default) then all functions will be globally defined. + :Byte-Compile {T | NIL | :MAYBE} + Determines whether to compile into interpreted byte code instead of + machine instructions. Byte code is several times smaller, but much + slower. If :MAYBE, then only byte-compile when SPEED is 0 and + DEBUG <= 1. The default is the value of EXT:*BYTE-COMPILE-DEFAULT*, + which is initially :MAYBE. + :Xref + If non-NIL, enable recording of cross-reference information. The default + is the value of C:*RECORD-XREF-INFO* + :External-Format + The external format to use when opening the source file. + :Decoding-Error + How to handle decoding errors in the external format when reading the + source file. Default (T) is to signal an error. Nil means silently + continue, replacing the invalid sequence with a suitable replacment + character." (let* ((fasl-file nil) (error-file-stream nil) (output-file-pathname nil) @@ -2129,7 +2127,7 @@ in the user USER-INFO slot of STREAM-SOURCE-LOCATIONs.") (output-file t output-file-supplied-p) &allow-other-keys) "Return a pathname describing what file COMPILE-FILE would write to given - these arguments." + these arguments." (declare (type (or string pathname stream) input-file) (type (or string pathname stream (member t)) output-file) (values (or null pathname))) ----------------------------------------------------------------------- Summary of changes: compiler/main.lisp | 114 +++++++++++++++++++++++++-------------------------- 1 files changed, 56 insertions(+), 58 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-sync-label-2009-03-16 created. 84111a10beb9aefaf3f1bf4cee45d42d7057615b
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-sync-label-2009-03-16 has been created at 84111a10beb9aefaf3f1bf4cee45d42d7057615b (commit) - Log ----------------------------------------------------------------- commit 84111a10beb9aefaf3f1bf4cee45d42d7057615b Author: rtoy <rtoy> Date: Mon Mar 16 21:10:57 2009 +0000 Sync to CVS HEAD, tag label-2009-03-16. But don't sync Config.FreeBSD_gencgc, Config.x86_freebsd, FreeBSD-os.c, and FreeBSD-os.h. Let Alex sync those later. The result seems to work as expected on Solaris and x86/linux. Darwin (ppc or x86) untested. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-sync-2008-12 created. 5ea897048ca5d1bc7321be6916b11f2e76eb69a8
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-sync-2008-12 has been created at 5ea897048ca5d1bc7321be6916b11f2e76eb69a8 (commit) - Log ----------------------------------------------------------------- commit 5ea897048ca5d1bc7321be6916b11f2e76eb69a8 Author: rtoy <rtoy> Date: Thu Dec 18 21:50:19 2008 +0000 Merge Snapshot 2008-12 to this branch. Some tweaks needed in boot-2008-05-cross-unicode-x86.lisp and the Config files. FreeBSD and Darwin/x86 untested, but Linux and Solaris build ok. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-sync-2008-11 created. 2cad8ceb89e302dc9f3041bd0887378c4cb56e72
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-sync-2008-11 has been created at 2cad8ceb89e302dc9f3041bd0887378c4cb56e72 (commit) - Log ----------------------------------------------------------------- commit 2cad8ceb89e302dc9f3041bd0887378c4cb56e72 Author: rtoy <rtoy> Date: Sat Nov 1 22:40:36 2008 +0000 Sync to snapshot 2008-11. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-sync-2008-07 created. f78265ea1d4a575baad21b2aa511c1e8dff3b98b
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-sync-2008-07 has been created at f78265ea1d4a575baad21b2aa511c1e8dff3b98b (commit) - Log ----------------------------------------------------------------- commit f78265ea1d4a575baad21b2aa511c1e8dff3b98b Author: rtoy <rtoy> Date: Fri Jun 27 17:24:14 2008 +0000 Merge changes from snapshot-2008-07. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-sync-2008-09 created. 3327b6aa5a1951e993cc64e8aaa9a688592d3224
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-sync-2008-09 has been created at 3327b6aa5a1951e993cc64e8aaa9a688592d3224 (commit) - Log ----------------------------------------------------------------- commit 3327b6aa5a1951e993cc64e8aaa9a688592d3224 Author: rtoy <rtoy> Date: Wed Sep 3 16:34:32 2008 +0000 Merge from snapshot-2008-09. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-extfmts-sync-2008-12 created. 81fea73c0557be93107348e24900469d996e7f2b
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-extfmts-sync-2008-12 has been created at 81fea73c0557be93107348e24900469d996e7f2b (commit) - Log ----------------------------------------------------------------- commit 81fea73c0557be93107348e24900469d996e7f2b Author: rtoy <rtoy> Date: Fri Dec 19 01:31:34 2008 +0000 Merge changes from utf16 branch to update to snapshot 2008-12. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-string-support created. f0a8c5c41f0f4a4644ca78eeec4aaec6ecc79d76
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-string-support has been created at f0a8c5c41f0f4a4644ca78eeec4aaec6ecc79d76 (commit) - Log ----------------------------------------------------------------- commit f0a8c5c41f0f4a4644ca78eeec4aaec6ecc79d76 Author: rtoy <rtoy> Date: Tue May 20 14:33:06 2008 +0000 Add support for dumping 16-bit characters. (Of course we still only have 8 bits for each character.) code/load.lisp: o Read 16 bits from a fasl to create a character. The data is stored little-endian. code/dump.lisp: o Dump a 16-bit character to a fasl in little-endian order. compiler/generic/new-genesis.lisp: o Read 16-bit character in little-endian order. bootfiles/19e/boot-2008-05-cross-unicode-common.lisp: o Update dump-character and fop-short-character with the new definitions from load.lisp and dump.lisp. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-char-support-2009-03-26 created. 6d283811e639d37d49129ceeb928a52890c61bd9
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-char-support-2009-03-26 has been created at 6d283811e639d37d49129ceeb928a52890c61bd9 (commit) - Log ----------------------------------------------------------------- commit 6d283811e639d37d49129ceeb928a52890c61bd9 Author: rtoy <rtoy> Date: Fri Mar 27 03:02:15 2009 +0000 Update deftransforms for unicode. Be sure to cross-compile using boot-2009-03-cross-unicode-foo. Then do a normal build using boot-2009-03-unicode-char as the bootstrap file for a normal build. bootfiles/19e/boot-2008-05-cross-unicode-common.lisp: o Initialize *UNICODE-DATA* to be an EQL hash table instead of EQUAL. The key is a character, so EQL works as well. This also means we don't need to do any hashing of the character, which is problematic in building and bootstrapping with unicode support. code/char/lisp: o Make UNICODE-DATA be inline, since it's so simple. o Clean up unicode implementation of ALPHANUMERICP to use the fast ASCII tests before trying unicode. o Update REBUILD-UNICODE-DATA to take an optional arg for the path to the UnicodeData.txt file, and remove the test for the size of the hash table; we always want to rebuild. compiler/srctran.lisp: o Update deftransforms for CHAR-EQUAL, CHAR-UPCASE, and CHAR-DOWNCASE to handle unicode. However, for speed (I hope), we keep a fast test for ASCII characters. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-extfmt-2009-03-27 created. 70327f16201de230b91e7964af42bcd48b06ac3d
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-extfmt-2009-03-27 has been created at 70327f16201de230b91e7964af42bcd48b06ac3d (commit) - Log ----------------------------------------------------------------- commit 70327f16201de230b91e7964af42bcd48b06ac3d Author: rtoy <rtoy> Date: Fri Mar 27 16:24:10 2009 +0000 Merge from unicode-utf16-branch to get equal hash-table fixes so that name-char works again. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-extfmt-2009-06-11 created. 336528efd31528174a3b0978ca72c8929a2e2f2b
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-extfmt-2009-06-11 has been created at 336528efd31528174a3b0978ca72c8929a2e2f2b (commit) - Log ----------------------------------------------------------------- commit 336528efd31528174a3b0978ca72c8929a2e2f2b Author: rtoy <rtoy> Date: Thu Jun 11 14:32:24 2009 +0000 Fix typos in string-case-fold. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-extfmts-pre-sync-2008-11 created. 0aa762cd7fc2e4b6267693bdd64da2cd99b4a2a7
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-extfmts-pre-sync-2008-11 has been created at 0aa762cd7fc2e4b6267693bdd64da2cd99b4a2a7 (commit) - Log ----------------------------------------------------------------- commit 0aa762cd7fc2e4b6267693bdd64da2cd99b4a2a7 Author: rtoy <rtoy> Date: Mon Jul 14 20:53:43 2008 +0000 From Paul Foley: There's a bug in the handling of LISTEN now. You can solve it by simply commenting out the (setf (fd-stream-listen stream) t) in the :UNREAD clause in fd-stream-misc-routine...- it's not needed when unreading is implemented by backing up in the buffer (e.g., with last-char-read-size.... (AFAICS there's nothing wrong with setting it there, but it screws up read-interactive in my toplevel command thing - leaves it expecting to read arguments when it shouldn't, because LISTEN returns T when there's no input pending, but I don't understand why...) ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-base created. 7e7cb462208dd9ee575c7e0c1a8829189ab527c5
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-base has been created at 7e7cb462208dd9ee575c7e0c1a8829189ab527c5 (commit) - Log ----------------------------------------------------------------- commit 7e7cb462208dd9ee575c7e0c1a8829189ab527c5 Merge: 616275b 24d534c Author: cvs2git <cvs2git> Date: Mon May 5 18:42:18 2008 +0000 This commit was manufactured by cvs2svn to create branch 'unicode- utf16-branch'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-utf16-char-support-2009-03-25 created. 6ac77d969659b436caf0b5316a2b7626dcb72e04
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-utf16-char-support-2009-03-25 has been created at 6ac77d969659b436caf0b5316a2b7626dcb72e04 (commit) - Log ----------------------------------------------------------------- commit 6ac77d969659b436caf0b5316a2b7626dcb72e04 Author: rtoy <rtoy> Date: Wed Mar 25 19:32:53 2009 +0000 Character name and properties support, from Paul Foley, slightly modified by Raymond Toy. Use 19f/boot-2009-03-cross-unicode-<arch> for the cross compile script. Use 19f/boot-2009-03-unicode-char for the bootstrap file to initialize the unicode character structures. bootfiles/19e/boot-2008-05-cross-unicode-common.lisp: o Just add new slots to fd-stream here, to make it easier to bootstrap the utf16-extfmts code, and to select the clobber-it restart automatically. o Build the initial unicode properties bootfiles/19f/boot-2009-03-cross-unicode-ppc.lisp: bootfiles/19f/boot-2009-03-cross-unicode-sparc.lisp: bootfiles/19f/boot-2009-03-cross-unicode-x86.lisp: o New scripts for cross-compiling. Basically just calls the original ones in the 19e directory. bootfiles/19f/boot-2009-03-unicode-char.lisp: o Bootstrap file to load up the full unicode properties. i18n/UnicodeData.txt: o UnicodeData.txt, obtained from unicode.org/Public/UNIDATA/UnicodeData.txt, 2009-03-24. code/fd-stream.lisp: o Add new slots to fd-stream, needed by utf16-extfmts branch. code/char.lisp: o Define structure to hold unicode properties of each character and new hash table to hold the properties. o Update CHAR-NAME and NAME-CHAR to give the character names and code, respectively. o Update GRAPHIC-CHAR-P, ALPHA-CHAR-P, UPPER-CASE-P, LOWER-CASE-P, BOTH-CASE-P, ALPHANUMERICP, EQUAL-CHAR-CODE, CHAR-UPCASE, and CHAR-DOWNCASE to handle unicode characters. o Add function REBUILD-UNICODE-DATA to update the unicode structures from UnicodeData.txt. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-string-buffer-impl-base created. 698a261f8dd2308579a5ef6a9c846f335eb38385
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-string-buffer-impl-base has been created at 698a261f8dd2308579a5ef6a9c846f335eb38385 (commit) - Log ----------------------------------------------------------------- commit 698a261f8dd2308579a5ef6a9c846f335eb38385 Author: rtoy <rtoy> Date: Sat Sep 19 14:44:52 2009 +0000 First set of changes to add new slots to lisp-stream so we can implement a faster external formats by converting all buffered input at one step instead of a character at a time. code/struct.lisp: o Add new slots: string-buffer, string-index, string-buffer-len code/sysmacs.lisp: o Update PREPARE-FOR-FAST-READ-CHAR, DONE-WITH-FAST-READ-CHAR, and FAST-READ-CHAR to use the new slots. code/fd-stream.lisp: o Don't allocate the in-buffer array since the fast read char stuff no longer handles the in-buffer. bootfiles/20a/boot-2009-10-1-cross.lisp: o New file. Use this to cross-compile this change. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-string-buffer-base created. efe5c26ab7e84aba93ea2270fd9f5c7bee0a0a26
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-string-buffer-base has been created at efe5c26ab7e84aba93ea2270fd9f5c7bee0a0a26 (commit) - Log ----------------------------------------------------------------- commit efe5c26ab7e84aba93ea2270fd9f5c7bee0a0a26 Merge: 1ddd8e1 24d534c Author: cvs2git <cvs2git> Date: Sat Sep 19 14:12:23 2009 +0000 This commit was manufactured by cvs2svn to create branch 'unicode-string- buffer-branch'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-snapshot-2009-06 created. c4db47ac25f8687f7aab743dd690774d721563c0
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-snapshot-2009-06 has been created at c4db47ac25f8687f7aab743dd690774d721563c0 (commit) - Log ----------------------------------------------------------------- commit c4db47ac25f8687f7aab743dd690774d721563c0 Author: rtoy <rtoy> Date: Sat May 30 02:02:58 2009 +0000 Fix test in BOTH-CASE-P. The lower limit is +unicode-category-upper+, not unicode-category-lower+. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag unicode-snapshot-2009-05 created. b7939fec84e0fd2e2484bc8bdff6c07d285cd9d3
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, unicode-snapshot-2009-05 has been created at b7939fec84e0fd2e2484bc8bdff6c07d285cd9d3 (commit) - Log ----------------------------------------------------------------- commit b7939fec84e0fd2e2484bc8bdff6c07d285cd9d3 Author: rtoy <rtoy> Date: Fri May 1 16:09:10 2009 +0000 Add some heuristics to gc_alloc (and gc_alloc_unboxed), based on some suggestions from Douglas. Currently, if there's not enough free space left in the region, a large alloc is done. Douglahs suggested increasing the threshold, which we have increased from 32 to PAGE_SIZE/64. Also, he mentioned it's a bug that we abandon the region if we have a large object allocate. We now also do a large alloc if the object is large enough. (The object won't get copied in the next GC, so that's a win.) Finally, we add a simple heuristic where we keep track of how many consecutive large allocs have been done. If the threshold is exceeded, we abandon the region (wasting space) and allocate a new region. This prevents spectacularly bad performance (10 times slower or more) on sparc when the object is small, and there's some room in the region but not enough for the object. The boxed region would never get updated so the allocation would never be inline. For debugging, the consecutive alloc limit is a variable. We also keep track of how many times we abandon a region. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag sse2-packed-2008-11-12 created. 29406192e5e0d417eb8a92e3c0719145c4e5e972
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, sse2-packed-2008-11-12 has been created at 29406192e5e0d417eb8a92e3c0719145c4e5e972 (commit) - Log ----------------------------------------------------------------- commit 29406192e5e0d417eb8a92e3c0719145c4e5e972 Author: rtoy <rtoy> Date: Sat Nov 1 16:07:20 2008 +0000 Sync to snapshot-2008-11. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag sse2-packed-base created. 47ecd60783d2a705edd0cafbc6f3e11f8a1a02e2
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, sse2-packed-base has been created at 47ecd60783d2a705edd0cafbc6f3e11f8a1a02e2 (commit) - Log ----------------------------------------------------------------- commit 47ecd60783d2a705edd0cafbc6f3e11f8a1a02e2 Author: rtoy <rtoy> Date: Mon Oct 6 16:32:31 2008 +0000 Only output the FPU type for x86. Don't do anything for any other architecture. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag sse2-merge-with-2008-11 created. 29406192e5e0d417eb8a92e3c0719145c4e5e972
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, sse2-merge-with-2008-11 has been created at 29406192e5e0d417eb8a92e3c0719145c4e5e972 (commit) - Log ----------------------------------------------------------------- commit 29406192e5e0d417eb8a92e3c0719145c4e5e972 Author: rtoy <rtoy> Date: Sat Nov 1 16:07:20 2008 +0000 Sync to snapshot-2008-11. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag sse2-checkpoint-2008-10-01 created. 7799506ceb0fd69a211484c891f8d79c158319b1
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, sse2-checkpoint-2008-10-01 has been created at 7799506ceb0fd69a211484c891f8d79c158319b1 (commit) - Log ----------------------------------------------------------------- commit 7799506ceb0fd69a211484c891f8d79c158319b1 Author: rtoy <rtoy> Date: Wed Oct 1 20:05:15 2008 +0000 Don't need float-wait instructions with SSE2 (which are precise and occur as soon as the instruction completes execution). ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag sse2-merge-with-2008-10 created. 9a5e67ab2d2dfde92d6a346c508bacc76d8e818e
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, sse2-merge-with-2008-10 has been created at 9a5e67ab2d2dfde92d6a346c508bacc76d8e818e (commit) - Log ----------------------------------------------------------------- commit 9a5e67ab2d2dfde92d6a346c508bacc76d8e818e Author: rtoy <rtoy> Date: Wed Oct 8 15:17:59 2008 +0000 Merge changes from snapshot-2008-10. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag sse2-base created. 96f8a163c6dee507244c7c00bb09779731cedca8
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, sse2-base has been created at 96f8a163c6dee507244c7c00bb09779731cedca8 (commit) - Log ----------------------------------------------------------------- commit 96f8a163c6dee507244c7c00bb09779731cedca8 Merge: 8946c55 24d534c Author: cvs2git <cvs2git> Date: Wed Sep 24 09:42:34 2008 +0000 This commit was manufactured by cvs2svn to create branch 'sse2-branch'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag sparc_gencgc_merge created. a448d274e1204c371bbf5ad0f575a5b00aac7b1e
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, sparc_gencgc_merge has been created at a448d274e1204c371bbf5ad0f575a5b00aac7b1e (commit) - Log ----------------------------------------------------------------- commit a448d274e1204c371bbf5ad0f575a5b00aac7b1e Merge: af86726 24d534c Author: cvs2git <cvs2git> Date: Fri Aug 22 13:22:17 2003 +0000 This commit was manufactured by cvs2svn to create tag 'sparc_gencgc_merge'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag sparc_gencgc created. b69621fa77da1f4bf488ccd6283836c4cde25ae8
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, sparc_gencgc has been created at b69621fa77da1f4bf488ccd6283836c4cde25ae8 (commit) - Log ----------------------------------------------------------------- commit b69621fa77da1f4bf488ccd6283836c4cde25ae8 Merge: 9fa00d0 24d534c Author: cvs2git <cvs2git> Date: Thu Aug 7 10:31:43 2003 +0000 This commit was manufactured by cvs2svn to create branch 'sparc_gencgc_branch'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag sparc-tramp-assem-base created. c5ae76af43a213e2604d8647e8a9ece3a3bc2762
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, sparc-tramp-assem-base has been created at c5ae76af43a213e2604d8647e8a9ece3a3bc2762 (commit) - Log ----------------------------------------------------------------- commit c5ae76af43a213e2604d8647e8a9ece3a3bc2762 Merge: 5bd8293 24d534c Author: cvs2git <cvs2git> Date: Thu Jul 15 02:00:06 2010 +0000 This commit was manufactured by cvs2svn to create branch 'sparc-tramp-assem- branch'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag sparc-tramp-assem-2010-07-19 created. 8dcb368463da30236417c4f8ce1ce015634df7b8
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, sparc-tramp-assem-2010-07-19 has been created at 8dcb368463da30236417c4f8ce1ce015634df7b8 (commit) - Log ----------------------------------------------------------------- commit 8dcb368463da30236417c4f8ce1ce015634df7b8 Author: rtoy <rtoy> Date: Mon Jul 19 17:54:42 2010 +0000 Fixes for scavenging interrupt contexts. There's special code to handle reg_LIP. In fact, the same thing needs to be done for reg_PC, and reg_NPC for sparc, and reg_LR and reg_CTR for ppc. These latter registers aren't always paired with reg_CODE (like in assembly routines), so we need to find that paired register. (Code essentially the same as done by Alastair Bridgewater for sbcl.) ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag snapshot-2011-09 created. c29541bb399e20ccc3788e1537f7249ff49d1772
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, snapshot-2011-09 has been created at c29541bb399e20ccc3788e1537f7249ff49d1772 (commit) - Log ----------------------------------------------------------------- commit c29541bb399e20ccc3788e1537f7249ff49d1772 Merge: 05a46af 24d534c Author: cvs2git <cvs2git> Date: Sat Sep 3 15:04:41 2011 +0000 This commit was manufactured by cvs2svn to create tag 'snapshot-2011-09'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag snapshot-2011-07 created. e673ec829e03d693f1ff97eed944c67a9e543d19
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, snapshot-2011-07 has been created at e673ec829e03d693f1ff97eed944c67a9e543d19 (commit) - Log ----------------------------------------------------------------- commit e673ec829e03d693f1ff97eed944c67a9e543d19 Merge: 5b8db9f 24d534c Author: cvs2git <cvs2git> Date: Wed Jun 29 00:58:42 2011 +0000 This commit was manufactured by cvs2svn to create tag 'snapshot-2011-07'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag snapshot-2011-06 created. 2b0b8663b297feaaba9041435e38685658f26b6b
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, snapshot-2011-06 has been created at 2b0b8663b297feaaba9041435e38685658f26b6b (commit) - Log ----------------------------------------------------------------- commit 2b0b8663b297feaaba9041435e38685658f26b6b Merge: c3df479 24d534c Author: cvs2git <cvs2git> Date: Mon Jun 6 19:28:11 2011 +0000 This commit was manufactured by cvs2svn to create tag 'snapshot-2011-06'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag snapshot-2011-04 created. 9903476437f47aaaf4d2edcfba8fd5493d9abd70
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, snapshot-2011-04 has been created at 9903476437f47aaaf4d2edcfba8fd5493d9abd70 (commit) - Log ----------------------------------------------------------------- commit 9903476437f47aaaf4d2edcfba8fd5493d9abd70 Merge: 97e9837 24d534c Author: cvs2git <cvs2git> Date: Sun Apr 3 15:19:15 2011 +0000 This commit was manufactured by cvs2svn to create tag 'snapshot-2011-04'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag snapshot-2011-03 created. 63cacfd64d5b6c7e783c7c7911215f897e83fca1
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, snapshot-2011-03 has been created at 63cacfd64d5b6c7e783c7c7911215f897e83fca1 (commit) - Log ----------------------------------------------------------------- commit 63cacfd64d5b6c7e783c7c7911215f897e83fca1 Merge: b7ba4e6 24d534c Author: cvs2git <cvs2git> Date: Tue Mar 1 04:40:14 2011 +0000 This commit was manufactured by cvs2svn to create tag 'snapshot-2011-03'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp tag snapshot-2011-02 created. 7d5b55698a6e241f3cb6a45f3b744db42c395a23
by Raymond Toy 11 Oct '11

11 Oct '11

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp". The tag, snapshot-2011-02 has been created at 7d5b55698a6e241f3cb6a45f3b744db42c395a23 (commit) - Log ----------------------------------------------------------------- commit 7d5b55698a6e241f3cb6a45f3b744db42c395a23 Merge: 5d90aed 24d534c Author: cvs2git <cvs2git> Date: Wed Feb 2 13:08:26 2011 +0000 This commit was manufactured by cvs2svn to create tag 'snapshot-2011-02'. ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

cmucl-cvs October 2011