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

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-03-2-g522f920
by Raymond Toy 27 Mar '12

27 Mar '12

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 522f9205c9ed5e1ed23389e2c2b186de352835df (commit) from 5c93b7785dc917fdc6f633606a49ebf6f97077dd (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 522f9205c9ed5e1ed23389e2c2b186de352835df Author: Raymond Toy <rtoy(a)google.com> Date: Tue Mar 27 14:22:11 2012 -0700 Set the generator costs for the complex multiply vops to be the number of instructions. This gives the sse3 complex multiply vop a chance to be used if SSE3 is available. (The user needs to :SSE3 to *FEATURES* for this to work. The core of CMUCL only assumes SSE2 is available.) diff --git a/src/compiler/x86/float-sse2.lisp b/src/compiler/x86/float-sse2.lisp index 979268f..f54f072 100644 --- a/src/compiler/x86/float-sse2.lisp +++ b/src/compiler/x86/float-sse2.lisp @@ -2149,7 +2149,7 @@ (:policy :fast-safe) (:temporary (:scs (complex-double-reg)) t1 t2) (:guard (backend-featurep :sse3)) - (:generator 1 + (:generator 8 ;; Basic algorithm from the paper "The Microarchitecture of the ;; Intel Pentium 4 Processor on 90nm Technololgy" ;; @@ -2176,7 +2176,7 @@ (:policy :fast-safe) (:temporary (:scs (complex-double-reg)) t0 t1 t2) (:temporary (:scs (unsigned-reg)) tmp) - (:generator 1 + (:generator 13 ;; Basic algorithm from the paper "The Microarchitecture of the ;; Intel Pentium 4 Processor on 90nm Technololgy" @@ -2208,7 +2208,7 @@ (:policy :fast-safe) (:temporary (:scs (complex-single-reg)) t0 t1 t2) (:temporary (:scs (unsigned-reg)) tmp) - (:generator 1 + (:generator 14 ;; Basic algorithm from the paper "The Microarchitecture of the ;; Intel Pentium 4 Processor on 90nm Technololgy" ----------------------------------------------------------------------- Summary of changes: src/compiler/x86/float-sse2.lisp | 6 +++--- 1 files changed, 3 insertions(+), 3 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-03-1-g5c93b77
by Alex Goncharov 04 Mar '12

04 Mar '12

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 5c93b7785dc917fdc6f633606a49ebf6f97077dd (commit) from 4d8eb68fd59351d6c8277f99b92657ef072d199f (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 5c93b7785dc917fdc6f633606a49ebf6f97077dd Author: Alex Goncharov <alex-goncharov(a)comcast.net> Date: Sun Mar 4 12:09:30 2012 -0500 .gitignore: add build-* diff --git a/.gitignore b/.gitignore index c122cd7..614b6ed 100644 --- a/.gitignore +++ b/.gitignore @@ -5,6 +5,7 @@ linux-[234] linux-8bit-[234] sparc-[234] sparc-8bit-[234] +build-* # Ignore files generated by TeX src/docs/cmu-user/*.aux ----------------------------------------------------------------------- Summary of changes: .gitignore | 1 + 1 files changed, 1 insertions(+), 0 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp annotated tag snapshot-2012-03 created. snapshot-2012-03
by Raymond Toy 03 Mar '12

03 Mar '12

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, snapshot-2012-03 has been created at 4dbb3325545dabbd2040295eeb1d6fd7e2c145e1 (tag) tagging 4d8eb68fd59351d6c8277f99b92657ef072d199f (commit) replaces snapshot-2012-02 tagged by Raymond Toy on Sat Mar 3 08:55:58 2012 -0800 - Log ----------------------------------------------------------------- Snapshot 2012-03. Raymond Toy (22): Update to Unicode 6.1.0. Support the creation of mach-o object files for ppc. Build with mach-o.c and exec-final.c if FEATURE_EXECUTABLE is Clean up comments about exec-final. Cleanup comments Preliminary support for ppc and correct some comments. If git describe looks like a snapshot tag, just use that as the No default version anymore; let load-world.sh specify it. Oops. Remove the set -x/set +x lines from the last commit. Use fwrite to dump the string instead of putw. Update documentation for string-to-octets. Add the fpu type to kernel.core on x86. Needed to set the fpu_mode Fix compiler warning and use fwrite instead of putw to print a Remove unused var. Fix compiler warning. Merge branch 'master' of ssh://common-lisp.net/var/git/projects/cmucl/cmucl Add -R flag to force recompilation of C runtime. Oops. Always write the fpu mode to the core file on x86. (Previously Return NIL if the prefix isn't a prefix of any name instead of Merge branch 'master' of ssh://common-lisp.net/var/git/projects/cmucl/cmucl Update for snapshot. Really update to 6.1.0! ----------------------------------------------------------------------- hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-02-22-g4d8eb68
by Raymond Toy 03 Mar '12

03 Mar '12

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 4d8eb68fd59351d6c8277f99b92657ef072d199f (commit) via 1995dd499746042e2b300732424a5f4c1134f7bf (commit) from 09a1e78fcae36d88f56c6a3267ce72b07ed9f6dd (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 4d8eb68fd59351d6c8277f99b92657ef072d199f Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Mar 3 08:46:19 2012 -0800 Really update to 6.1.0! diff --git a/src/i18n/unidata.bin b/src/i18n/unidata.bin index d463157..0ee2dd9 100644 Binary files a/src/i18n/unidata.bin and b/src/i18n/unidata.bin differ commit 1995dd499746042e2b300732424a5f4c1134f7bf Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Mar 3 07:46:53 2012 -0800 Update for snapshot. diff --git a/src/general-info/release-20d.txt b/src/general-info/release-20d.txt index b0b31c9..58a431b 100644 --- a/src/general-info/release-20d.txt +++ b/src/general-info/release-20d.txt @@ -46,6 +46,9 @@ New in this release: directory, which was previously missing. * The stack needs to be 16-byte aligned on Darwin. * ldb no longer prints prompts forever when EOF is reached. + * LISP:UNICODE-COMPLETE now longer signals an error if the prefix + isn't a prefix of the name of any unicode character. Nil is + returned instead. * Trac Tickets: * #50: Print/read error with make-pathname. @@ -58,6 +61,8 @@ New in this release: * On darwin/x86, gcc-4.2 is explicitly used in case Xcode 4 is installed. CMUCL doesn't run correctly when built with gcc/llvm in Xcode 4. + * Add -R option to build.sh to force recompiling the C + runtime. (Default it to compile only what is changed.) * Improvements to the PCL implementation of CLOS: ----------------------------------------------------------------------- Summary of changes: src/general-info/release-20d.txt | 5 +++++ src/i18n/unidata.bin | Bin 1490793 -> 1490793 bytes 2 files changed, 5 insertions(+), 0 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-02-20-g09a1e78
by Raymond Toy 03 Mar '12

03 Mar '12

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 09a1e78fcae36d88f56c6a3267ce72b07ed9f6dd (commit) via e32ec7c0afd112b157e61756256219bb59536857 (commit) from 74c59b7679c19e07fa0866c4aeb1d652856a7ed9 (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 09a1e78fcae36d88f56c6a3267ce72b07ed9f6dd Merge: e32ec7c 74c59b7 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Mar 3 07:36:13 2012 -0800 Merge branch 'master' of ssh://common-lisp.net/var/git/projects/cmucl/cmucl commit e32ec7c0afd112b157e61756256219bb59536857 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Mar 3 07:34:30 2012 -0800 Return NIL if the prefix isn't a prefix of any name instead of signaling an error. diff --git a/src/code/unidata.lisp b/src/code/unidata.lisp index 32432a1..981e2a7 100644 --- a/src/code/unidata.lisp +++ b/src/code/unidata.lisp @@ -1306,6 +1306,9 @@ do (push (concatenate 'string prefix-match x) names)) (when completep (push prefix-match names)) + (when (zerop (length prefix-match)) + ;; The prefix isn't a prefix for anything, so return nil + (return-from unicode-complete nil)) (flet ((han-or-cjk-completion (prefix-match prefix dictionary) (let* ((prefix-tail (subseq prefix-match (min (length prefix) ----------------------------------------------------------------------- Summary of changes: src/code/unidata.lisp | 3 +++ 1 files changed, 3 insertions(+), 0 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-02-18-g74c59b7
by Raymond Toy 24 Feb '12

24 Feb '12

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 74c59b7679c19e07fa0866c4aeb1d652856a7ed9 (commit) from 8895c013f61f55b8e561e0efa56962038b578213 (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 74c59b7679c19e07fa0866c4aeb1d652856a7ed9 Author: Raymond Toy <rtoy(a)google.com> Date: Fri Feb 24 09:22:58 2012 -0800 Oops. Always write the fpu mode to the core file on x86. (Previously only wrote the mode when compiling with sse2.) diff --git a/src/compiler/generic/new-genesis.lisp b/src/compiler/generic/new-genesis.lisp index ee417f4..9523d41 100644 --- a/src/compiler/generic/new-genesis.lisp +++ b/src/compiler/generic/new-genesis.lisp @@ -2928,9 +2928,8 @@ ;; For x86, identify the core as using either x87 or sse2 ;; instructions. - (cond ((and (eql (c:backend-fasl-file-implementation c:*backend*) - c:x86-fasl-file-implementation) - (c:backend-featurep :sse2)) + (cond ((eql (c:backend-fasl-file-implementation c:*backend*) + c:x86-fasl-file-implementation) (write-long 4) (write-long version) ;; See the definition of fpu_mode_t in lisp.h for correct ----------------------------------------------------------------------- Summary of changes: src/compiler/generic/new-genesis.lisp | 5 ++--- 1 files changed, 2 insertions(+), 3 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-02-17-g8895c01
by Raymond Toy 19 Feb '12

19 Feb '12

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 8895c013f61f55b8e561e0efa56962038b578213 (commit) from 14c63c68c74e9d0ebe1a21bcb23bad48a4a917a1 (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 8895c013f61f55b8e561e0efa56962038b578213 Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sun Feb 19 15:49:10 2012 -0800 Add -R flag to force recompilation of C runtime. diff --git a/bin/build.sh b/bin/build.sh index 276272d..0ac13c8 100755 --- a/bin/build.sh +++ b/bin/build.sh @@ -94,6 +94,8 @@ usage () 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" + echo " -R Force recompiling the C runtime. Normally, just runs make to " + echo " recompile anything that has changed." exit 1 } @@ -124,11 +126,16 @@ buildit () then $TOOLDIR/clean-target.sh $CLEAN_FLAGS $TARGET || { echo "Failed: $TOOLDIR/clean-target.sh"; exit 1; } time $BUILDWORLD $TARGET $OLDLISP $BOOT || { echo "Failed: $BUILDWORLD"; exit 1; } - # Set the LANG to C. For whatever reason, if I (rtoy) don't - # do this on my openSuSE system, any messages from gcc are - # basically garbled. This should be harmless on other - # systems. - LANG=C $MAKE -C $TARGET/lisp $MAKE_TARGET || { echo "Failed: $MAKE -C $TARGET/lisp"; exit 1; } + if [ "$REBUILD_LISP" = "yes" ]; then + $TOOLDIR/rebuild-lisp.sh $TARGET + else + # Set the LANG to C. For whatever reason, if I (rtoy) don't + # do this on my openSuSE system, any messages from gcc are + # basically garbled. This should be harmless on other + # systems. + LANG=C $MAKE -C $TARGET/lisp $MAKE_TARGET || { echo "Failed: $MAKE -C $TARGET/lisp"; exit 1; } + fi + if [ "$BUILD_WORLD2" = "yes" ]; then $BUILDWORLD $TARGET $OLDLISP $BOOT || { echo "Failed: $BUILDWORLD"; exit 1; } @@ -145,7 +152,7 @@ BUILDWORLD="$TOOLDIR/build-world.sh" BUILD_POT="yes" UPDATE_TRANS= -while getopts "123Po:b:v:uB:C:Ui:f:w:O:?" arg +while getopts "123PRo:b:v:uB:C:Ui:f:w:O:?" arg do case $arg in 1) ENABLE2="no" ;; @@ -164,6 +171,7 @@ do w) BUILDWORLD="$OPTARG" ;; U) UPDATE_TRANS="yes";; O) OLDLISPFLAGS="$OLDLISPFLAGS $OPTARG" ;; + R) REBUILD_LISP="yes";; \?) usage ;; esac ----------------------------------------------------------------------- Summary of changes: bin/build.sh | 20 ++++++++++++++------ 1 files changed, 14 insertions(+), 6 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-02-16-g14c63c6
by Raymond Toy 17 Feb '12

17 Feb '12

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 14c63c68c74e9d0ebe1a21bcb23bad48a4a917a1 (commit) via f6c4baf6d5ec399d0fa556782ae01493911a37f7 (commit) via 2adbebc42e0732e50e7c3dfb997c252553c73a9a (commit) from 2e958dba7d37b76966146b2b279db7f0a248865d (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 14c63c68c74e9d0ebe1a21bcb23bad48a4a917a1 Merge: f6c4baf 2e958db Author: Raymond Toy <rtoy(a)google.com> Date: Fri Feb 17 11:38:21 2012 -0800 Merge branch 'master' of ssh://common-lisp.net/var/git/projects/cmucl/cmucl commit f6c4baf6d5ec399d0fa556782ae01493911a37f7 Author: Raymond Toy <rtoy(a)google.com> Date: Fri Feb 17 10:44:59 2012 -0800 Fix compiler warning. diff --git a/src/lisp/Linux-os.c b/src/lisp/Linux-os.c index 6c8f10f..8f85101 100644 --- a/src/lisp/Linux-os.c +++ b/src/lisp/Linux-os.c @@ -145,7 +145,7 @@ os_init0(const char *argv[], const char *envp[]) struct utsname name; uname(&name); - check_personality(&name, argv, envp); + check_personality(&name, (char *const *) argv, (char *const *) envp); } void commit 2adbebc42e0732e50e7c3dfb997c252553c73a9a Author: Raymond Toy <rtoy(a)google.com> Date: Fri Feb 17 10:44:45 2012 -0800 Remove unused var. diff --git a/src/lisp/interr.c b/src/lisp/interr.c index ecdcbc0..57e18f2 100644 --- a/src/lisp/interr.c +++ b/src/lisp/interr.c @@ -174,7 +174,6 @@ debug_print(lispobj object) if ((unsigned long) lisp_string->header == type_SimpleString) { unsigned short int* lisp_chars; int len; - int k; len = lisp_string->length >> 2; lisp_chars = (unsigned short int*) lisp_string->data; ----------------------------------------------------------------------- Summary of changes: src/lisp/Linux-os.c | 2 +- src/lisp/interr.c | 1 - 2 files changed, 1 insertions(+), 2 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-02-13-g2e958db
by Raymond Toy 17 Feb '12

17 Feb '12

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 2e958dba7d37b76966146b2b279db7f0a248865d (commit) from c623db61db3f9538b79582a1331d86f22d03e7ac (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 2e958dba7d37b76966146b2b279db7f0a248865d Author: Raymond Toy <rtoy(a)google.com> Date: Thu Feb 16 20:41:32 2012 -0800 Fix compiler warning and use fwrite instead of putw to print a string. diff --git a/src/lisp/print.c b/src/lisp/print.c index 9f8fa10..f8a9086 100644 --- a/src/lisp/print.c +++ b/src/lisp/print.c @@ -372,11 +372,11 @@ print_string(struct vector* vector) int len = fixnum_value(vector->length); while (len-- > 0) { - if ((*charptr == '"')) { + if (*charptr == '"') { putchar('\\'); } /* Just dump out the UTF-16 data */ - putw(*charptr, stdout); + fwrite(charptr, sizeof(*charptr), 1, stdout); charptr++; } #endif ----------------------------------------------------------------------- Summary of changes: src/lisp/print.c | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0

[cmucl-cvs] [git] CMU Common Lisp branch master updated. snapshot-2012-02-12-gc623db6
by Raymond Toy 12 Feb '12

12 Feb '12

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 c623db61db3f9538b79582a1331d86f22d03e7ac (commit) from d9a51ad03487c82a9d5998c1b2b4490447141b76 (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 c623db61db3f9538b79582a1331d86f22d03e7ac Author: Raymond Toy <toy.raymond(a)gmail.com> Date: Sat Feb 11 18:16:23 2012 -0800 Add the fpu type to kernel.core on x86. Needed to set the fpu_mode when it's loaded so that the C code knows what to do. In particular call_into_lisp needs to know to save the correct fpu state. diff --git a/src/compiler/generic/new-genesis.lisp b/src/compiler/generic/new-genesis.lisp index d356c36..ee417f4 100644 --- a/src/compiler/generic/new-genesis.lisp +++ b/src/compiler/generic/new-genesis.lisp @@ -2925,9 +2925,22 @@ ;; Write the Version entry. ;; (write-long version-entry-type-code) - (write-long 3) - (write-long version) + ;; For x86, identify the core as using either x87 or sse2 + ;; instructions. + (cond ((and (eql (c:backend-fasl-file-implementation c:*backend*) + c:x86-fasl-file-implementation) + (c:backend-featurep :sse2)) + (write-long 4) + (write-long version) + ;; See the definition of fpu_mode_t in lisp.h for correct + ;; values to use here. + (write-long (if (c:backend-featurep :sse2) + 2 ; fpu_mode_t = SSE2 + 1))) + (t + (write-long 3) + (write-long version))) ;; Write the New Directory entry header. ;; (write-long new-directory-entry-type-code) ----------------------------------------------------------------------- Summary of changes: src/compiler/generic/new-genesis.lisp | 17 +++++++++++++++-- 1 files changed, 15 insertions(+), 2 deletions(-) hooks/post-receive -- CMU Common Lisp

1 0