cmucl-cvs

cmucl-cvs@common-lisp.net

2904 discussions

[cmucl-cvs] CMUCL commit: cmucl-www/cmucl-www/www (download.html)
by Raymond Toy 30 Sep '10

30 Sep '10

Date: Wednesday, September 29, 2010 @ 20:32:09 Author: rtoy Path: /project/cmucl/cvsroot/cmucl-www/cmucl-www/www Modified: download.html Fix some incorrect html. ---------------+ download.html | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) Index: cmucl-www/cmucl-www/www/download.html diff -u cmucl-www/cmucl-www/www/download.html:1.23 cmucl-www/cmucl-www/www/download.html:1.24 --- cmucl-www/cmucl-www/www/download.html:1.23 Wed Sep 29 20:25:55 2010 +++ cmucl-www/cmucl-www/www/download.html Wed Sep 29 20:32:09 2010 @@ -110,12 +110,11 @@ </ul> </td> <td> - <dl> - <ul> +  - </ul> - </dl> </td> <td>  </ul> +--> </td> <td> <ul>

1 0

[cmucl-cvs] CMUCL commit: cmucl-www/cmucl-www/www (download.html)
by Raymond Toy 30 Sep '10

30 Sep '10

Date: Wednesday, September 29, 2010 @ 20:25:55 Author: rtoy Path: /project/cmucl/cvsroot/cmucl-www/cmucl-www/www Modified: download.html Fix broken link. ---------------+ download.html | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) Index: cmucl-www/cmucl-www/www/download.html diff -u cmucl-www/cmucl-www/www/download.html:1.22 cmucl-www/cmucl-www/www/download.html:1.23 --- cmucl-www/cmucl-www/www/download.html:1.22 Wed Sep 29 19:37:44 2010 +++ cmucl-www/cmucl-www/www/download.html Wed Sep 29 20:25:55 2010 @@ -336,7 +336,7 @@ <td></td> <td> <ul> - <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Unicode</a></li> + <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Unicode</a></li> <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Unicode extras</a></li> <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Non-Unicode</a></li> <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Non-Unicode extras</a></li>

1 0

[cmucl-cvs] CMUCL commit: cmucl-www/cmucl-www (build.el)
by Raymond Toy 30 Sep '10

30 Sep '10

Date: Wednesday, September 29, 2010 @ 19:59:58 Author: rtoy Path: /project/cmucl/cvsroot/cmucl-www/cmucl-www Modified: build.el Nah, make common-lisp.net the base url since that is the source of all the other sites. Especially useful for checking links so we don't have to wait for the pages to get propagated. ----------+ build.el | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) Index: cmucl-www/cmucl-www/build.el diff -u cmucl-www/cmucl-www/build.el:1.8 cmucl-www/cmucl-www/build.el:1.9 --- cmucl-www/cmucl-www/build.el:1.8 Wed Sep 29 19:52:27 2010 +++ cmucl-www/cmucl-www/build.el Wed Sep 29 19:59:58 2010 @@ -30,7 +30,14 @@ (require 'cl) -(defconst wb-base-url "http://www.cmucl.org/") +;; What should be our base url? The "official" site is www.cons.org. +;; But we now have www.cmucl.org too. But the "source" to all of +;; these sites is common-lisp.net. Let's make that the base url since +;; that is, by definition, the most up-to-date site. This is also +;; useful for checking links and such since the site is always +;; up-to-date compared to the others. +(defconst wb-base-url "http://www.common-lisp.net/project/cmucl/mirror/") +;;(defconst wb-base-url "http://www.cmucl.org/") ;;(defconst wb-base-url "http://www.cons.org/cmucl/") ;; (defconst wb-doc-url "ftp://ftp.linux.org.uk/pub/lisp/cmucl/doc/") (defconst wb-doc-url "http://common-lisp.net/project/cmucl/doc/")

1 0

[cmucl-cvs] CMUCL commit: cmucl-www/cmucl-www (build.el)
by Raymond Toy 30 Sep '10

30 Sep '10

Date: Wednesday, September 29, 2010 @ 19:52:27 Author: rtoy Path: /project/cmucl/cvsroot/cmucl-www/cmucl-www Modified: build.el Make the base url www.cmucl.org instead of www.cons.org/cmucl. ----------+ build.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) Index: cmucl-www/cmucl-www/build.el diff -u cmucl-www/cmucl-www/build.el:1.7 cmucl-www/cmucl-www/build.el:1.8 --- cmucl-www/cmucl-www/build.el:1.7 Tue Mar 30 00:14:10 2010 +++ cmucl-www/cmucl-www/build.el Wed Sep 29 19:52:27 2010 @@ -30,7 +30,8 @@ (require 'cl) -(defconst wb-base-url "http://www.cons.org/cmucl/") +(defconst wb-base-url "http://www.cmucl.org/") +;;(defconst wb-base-url "http://www.cons.org/cmucl/") ;; (defconst wb-doc-url "ftp://ftp.linux.org.uk/pub/lisp/cmucl/doc/") (defconst wb-doc-url "http://common-lisp.net/project/cmucl/doc/") (defconst wb-target-dir "/project/cmucl/public_html/mirror/")

1 0

[cmucl-cvs] CMUCL commit: cmucl-www/cmucl-www/www (download.html)
by Raymond Toy 30 Sep '10

30 Sep '10

Date: Wednesday, September 29, 2010 @ 19:37:44 Author: rtoy Path: /project/cmucl/cvsroot/cmucl-www/cmucl-www/www Modified: download.html o Correct the broken links to the binaries o Fix link to Fedora cmucl package. o Update gentoo link. ---------------+ download.html | 31 ++++++++++++++++++------------- 1 file changed, 18 insertions(+), 13 deletions(-) Index: cmucl-www/cmucl-www/www/download.html diff -u cmucl-www/cmucl-www/www/download.html:1.21 cmucl-www/cmucl-www/www/download.html:1.22 --- cmucl-www/cmucl-www/www/download.html:1.21 Wed Sep 29 19:19:53 2010 +++ cmucl-www/cmucl-www/www/download.html Wed Sep 29 19:37:44 2010 @@ -142,8 +142,8 @@ </td> <td> <ul> - <li> <a href="http://common-lisp.net/project/cmucl/downloads/release/20b/cmucl-src-20a.ta…">Source code</a></li> - <li> <a href="http://common-lisp.net/project/cmucl/downloads/release/20b/release-20a.txt">Release notes for 20b</a></li> + <li> <a href="http://common-lisp.net/project/cmucl/downloads/release/20b/cmucl-src-20b.ta…">Source code</a></li> + <li> <a href="http://common-lisp.net/project/cmucl/downloads/release/20b/release-20b.txt">Release notes for 20b</a></li> </ul> </td> </tr> @@ -330,16 +330,19 @@ </ul> </td> <td> + + + </td> + <td></td> + <td> <ul> <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Unicode</a></li> - <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Unicode extras</a></li> - <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Non-Unicode</a></li> - <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Non-Unicode extras</a></li> + <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Unicode extras</a></li> + <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Non-Unicode</a></li> + <li> <a href="http://common-lisp.net/project/cmucl/downloads/snapshots/2009/11/cmucl-2009…">Non-Unicode extras</a></li> </ul> </td> <td></td> - <td></td> - <td></td> </tr> <tr> <th>20a</th> @@ -386,10 +389,12 @@ </td> <td> <ul> - <li> <a href="http://common-lisp.net/project/cmucl/downloads/release/20a/cmucl-20a-sparcv…">Unicode</a></li> - <li> <a href="http://common-lisp.net/project/cmucl/downloads/release/20a/cmucl-20a-sparcv…">Unicode extras</a></li> - <li> <a href="http://common-lisp.net/project/cmucl/downloads/release/20a/cmucl-20a-non-un…">Non-Unicode</a></li> - <li> <a href="http://common-lisp.net/project/cmucl/downloads/release/20a/cmucl-20a-non-un…">Non-Unicode extras</a></li> + <li> <a href="http://common-lisp.net/project/cmucl/downloads/release/20a/cmucl-20a-sparcv…">Unicode</a></li> + <li> <a href="http://common-lisp.net/project/cmucl/downloads/release/20a/cmucl-20a-sparcv…">Unicode extras</a></li> + <li> <a href="http://common-lisp.net/project/cmucl/downloads/release/20a/cmucl-20a-non-un…">Non-Unicode</a></li> + <li> <a + href="http://common-lisp.net/project/cmucl/downloads/release/20a/cmucl-20a-non-un…">Non-Unicode extras</a></li> + </ul> </td> <td> <ul> @@ -423,7 +428,7 @@ </pre> CMUCL is available as a <a - href="https://admin.fedoraproject.org/pkgdb/packages/name/cmucl">package</a> + href="https://admin.fedoraproject.org/pkgdb/acls/name/cmucl">package</a> for RedHat Fedora and RHEL, thanks to Rex Dieter. These are also a part of <a href="http://fedoraproject.org/wiki/EPEL">Fedora EPEL</a>. These are slightly different from the binaries @@ -432,7 +437,7 @@ that may change. CMUCL is available as a package for the <a href = - "http://gentoo.org/">Gentoo Linux</a> distribution, thanks to + "http://www.gentoo.org/">Gentoo Linux</a> distribution, thanks to Stelian Ionescu. The package is named cmucl, and is in the dev-lisp category. These are slightly different from the common-lisp.net binaries in that different compiler flags may have

1 0

[cmucl-cvs] CMUCL commit: cmucl-www/cmucl-www/www (download.html)
by Raymond Toy 30 Sep '10

30 Sep '10

Date: Wednesday, September 29, 2010 @ 19:19:54 Author: rtoy Path: /project/cmucl/cvsroot/cmucl-www/cmucl-www/www Modified: download.html o Fix link to installation page o Add RELEASE_20b tag. ---------------+ download.html | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) Index: cmucl-www/cmucl-www/www/download.html diff -u cmucl-www/cmucl-www/www/download.html:1.20 cmucl-www/cmucl-www/www/download.html:1.21 --- cmucl-www/cmucl-www/www/download.html:1.20 Mon Sep 27 16:39:16 2010 +++ cmucl-www/cmucl-www/www/download.html Wed Sep 29 19:19:53 2010 @@ -75,7 +75,7 @@ <h2>Download links</h2> For your convenience, here are links to selected builds. See the -<a href="install">installation</a> guide for information on the naming +<a href="install.html">installation</a> guide for information on the naming convention of the binaries and information on how to install them. @@ -472,6 +472,7 @@ There are CVS tags for the latest releases, named + <tt>RELEASE_20b</tt> <tt>RELEASE_20a</tt> <tt>RELEASE_19f</tt>, <tt>release-19e</tt>, <tt>release-19d</tt>, <tt>release-19c</tt>, <tt>release-19b</tt>, <tt>release-19a</tt>,

1 0

[cmucl-cvs] CMUCL commit: src/code (unidata.lisp)
by Raymond Toy 29 Sep '10

29 Sep '10

Date: Wednesday, September 29, 2010 @ 16:51:19 Author: rtoy Path: /project/cmucl/cvsroot/src/code Modified: unidata.lisp Add a function to create the key from two codepoints that can be used as the key for the composition table. That way the logic is in exactly one place and not spread out through the code. --------------+ unidata.lisp | 20 +++++++++++++++----- 1 file changed, 15 insertions(+), 5 deletions(-) Index: src/code/unidata.lisp diff -u src/code/unidata.lisp:1.22 src/code/unidata.lisp:1.23 --- src/code/unidata.lisp:1.22 Mon Sep 20 20:57:29 2010 +++ src/code/unidata.lisp Wed Sep 29 16:51:19 2010 @@ -4,7 +4,7 @@ ;;; This code was written by Paul Foley and has been placed in the public ;;; domain. ;;; -(ext:file-comment "$Header: /project/cmucl/cvsroot/src/code/unidata.lisp,v 1.22 2010-09-21 00:57:29 rtoy Rel $") +(ext:file-comment "$Header: /project/cmucl/cvsroot/src/code/unidata.lisp,v 1.23 2010-09-29 20:51:19 rtoy Exp $") ;;; ;;; ********************************************************************** ;;; @@ -18,7 +18,7 @@ (defconstant +unidata-path+ #p"ext-formats:unidata.bin") -(defvar *unidata-version* "$Revision: 1.22 $") +(defvar *unidata-version* "$Revision: 1.23 $") (defstruct unidata range @@ -1031,6 +1031,16 @@ (subseq (case-fold-full-tabl data) off (+ off len)))))) +(declaim (inline composition-table-key)) +(defun composition-table-key (c1 c2) + (declare (type codepoint c1 c2)) + ;; Compute the key for the composition table from two code points. + ;; Note that each codepoint is 21 bits long. We just cat the + ;; codepoints together to create the key. Based on tests with + ;; Unicode 5.2.0 this is good enough because the low 29 bits are + ;; unique, so each key will be in its own bucket. + (logior (ash c1 21) c2)) + ;; Build the composition pair table. (defun build-composition-table () (let ((table (make-hash-table))) @@ -1049,7 +1059,7 @@ (setf widep (if widep 2 1)) (when (> (length decomp) widep) (let ((c2 (codepoint decomp widep))) - (setf (gethash (logior (ash c1 21) c2) table) cp)))))))) + (setf (gethash (composition-table-key c1 c2) table) cp)))))))) ;; Remove any in the exclusion list (loop for cp across (unicode-composition-exclusions) do @@ -1059,7 +1069,7 @@ (codepoint decomp 0) (when (> (length decomp) (if widep 2 1)) (let ((c2 (codepoint decomp (if widep 2 1)))) - (remhash (logior (ash c1 21) c2) table))))))) + (remhash (composition-table-key c1 c2) table))))))) (values table))) (defvar *composition-pair-table* nil) @@ -1094,7 +1104,7 @@ (setf *composition-pair-table* (build-composition-table))) (cond ((compose-hangul c1 c2)) (t - (gethash (logior (ash c1 21) c2) *composition-pair-table* nil)))) + (gethash (composition-table-key c1 c2) *composition-pair-table* nil)))) (defun unicode-word-break-code (code) (unless (unidata-word-break *unicode-data*)

1 0

[cmucl-cvs] CMUCL commit: cmucl-www/cmucl-www/www/news (index.html)
by Raymond Toy 28 Sep '10

28 Sep '10

Date: Monday, September 27, 2010 @ 19:44:10 Author: rtoy Path: /project/cmucl/cvsroot/cmucl-www/cmucl-www/www/news Modified: index.html Oops. It's href, not http! ------------+ index.html | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) Index: cmucl-www/cmucl-www/www/news/index.html diff -u cmucl-www/cmucl-www/www/news/index.html:1.38 cmucl-www/cmucl-www/www/news/index.html:1.39 --- cmucl-www/cmucl-www/www/news/index.html:1.38 Mon Sep 27 16:39:17 2010 +++ cmucl-www/cmucl-www/www/news/index.html Mon Sep 27 19:44:10 2010 @@ -13,7 +13,7 @@ <dl> <dt>20b released</dt> <dd>CMUCL 20b has been released. For information on the changes, - we refer the reader to the <a http="release-20b.txt">20b release + we refer the reader to the <a href="release-20b.txt">20b release notes</a>. </dd>

1 0

[cmucl-cvs] CMUCL commit: cmucl-www/cmucl-www/www (index.html)
by Raymond Toy 28 Sep '10

28 Sep '10

Date: Monday, September 27, 2010 @ 19:43:52 Author: rtoy Path: /project/cmucl/cvsroot/cmucl-www/cmucl-www/www Modified: index.html Oops. It's href, not http! ------------+ index.html | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) Index: cmucl-www/cmucl-www/www/index.html diff -u cmucl-www/cmucl-www/www/index.html:1.14 cmucl-www/cmucl-www/www/index.html:1.15 --- cmucl-www/cmucl-www/www/index.html:1.14 Mon Sep 27 19:41:25 2010 +++ cmucl-www/cmucl-www/www/index.html Mon Sep 27 19:43:51 2010 @@ -71,7 +71,7 @@ <dt>CMUCL 20b released</dt> <dd> CMUCL 20b has been released, For information on the changes between - 20b and 20a, we refer the reader to the <a http="news/release-20b.txt">20b release + 20b and 20a, we refer the reader to the <a href="news/release-20b.txt">20b release notes</a>. </dd> </dl>

1 0

[cmucl-cvs] CMUCL commit: cmucl-www/cmucl-www/www (index.html)
by Raymond Toy 28 Sep '10

28 Sep '10

Date: Monday, September 27, 2010 @ 19:41:25 Author: rtoy Path: /project/cmucl/cvsroot/cmucl-www/cmucl-www/www Modified: index.html Fix link to 20b release notes. ------------+ index.html | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) Index: cmucl-www/cmucl-www/www/index.html diff -u cmucl-www/cmucl-www/www/index.html:1.13 cmucl-www/cmucl-www/www/index.html:1.14 --- cmucl-www/cmucl-www/www/index.html:1.13 Mon Sep 27 16:39:16 2010 +++ cmucl-www/cmucl-www/www/index.html Mon Sep 27 19:41:25 2010 @@ -71,7 +71,7 @@ <dt>CMUCL 20b released</dt> <dd> CMUCL 20b has been released, For information on the changes between - 20b and 20a, we refer the reader to the <a http="release-20b.txt">20b release + 20b and 20a, we refer the reader to the <a http="news/release-20b.txt">20b release notes</a>. </dd> </dl>

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

cmucl-cvs