May 2006 - cl-utilities-cvs@common-lisp.net

[cl-utilities-cvs] CVS cl-utilities
by pscott 03 May '06

03 May '06

Update of /project/cl-utilities/cvsroot/cl-utilities In directory clnet:/tmp/cvs-serv24356 Modified Files: package.sh Log Message: Fixed a broken link, for real this time. Really. I hope. --- /project/cl-utilities/cvsroot/cl-utilities/package.sh 2005/12/28 23:34:29 1.7 +++ /project/cl-utilities/cvsroot/cl-utilities/package.sh 2006/05/03 01:57:15 1.8 @@ -1,21 +1,21 @@ #!/bin/sh -mkdir cl-utilities-1.2.3 -mkdir cl-utilities-1.2.3/doc -cp cl-utilities.asd package.sh collecting.lisp split-sequence.lisp expt-mod.lisp package.lisp compose.lisp extremum.lisp read-delimited.lisp test.lisp copy-array.lisp once-only.lisp rotate-byte.lisp with-unique-names.lisp README cl-utilities-1.2.3/ -cp doc/collecting.html doc/expt-mod.html doc/read-delimited.html doc/with-unique-names.html doc/compose.html doc/extremum.html doc/rotate-byte.html doc/copy-array.html doc/index.html doc/split-sequence.html doc/once-only.html doc/style.css cl-utilities-1.2.3/doc/ +mkdir cl-utilities-1.2.4 +mkdir cl-utilities-1.2.4/doc +cp cl-utilities.asd package.sh collecting.lisp split-sequence.lisp expt-mod.lisp package.lisp compose.lisp extremum.lisp read-delimited.lisp test.lisp copy-array.lisp once-only.lisp rotate-byte.lisp with-unique-names.lisp README cl-utilities-1.2.4/ +cp doc/collecting.html doc/expt-mod.html doc/read-delimited.html doc/with-unique-names.html doc/compose.html doc/extremum.html doc/rotate-byte.html doc/copy-array.html doc/index.html doc/split-sequence.html doc/once-only.html doc/style.css cl-utilities-1.2.4/doc/ rm -f cl-utilities-latest.tar.gz cl-utilities-latest.tar.gz.asc -tar -czvf cl-utilities-1.2.3.tar.gz cl-utilities-1.2.3/ -ln -s ~/hacking/lisp/cl-utilities/cl-utilities-1.2.3.tar.gz ~/hacking/lisp/cl-utilities/cl-utilities-latest.tar.gz -gpg -b -a ~/hacking/lisp/cl-utilities/cl-utilities-1.2.3.tar.gz -ln -s ~/hacking/lisp/cl-utilities/cl-utilities-1.2.3.tar.gz.asc ~/hacking/lisp/cl-utilities/cl-utilities-latest.tar.gz.asc -rm -Rf cl-utilities-1.2.3/ +tar -czvf cl-utilities-1.2.4.tar.gz cl-utilities-1.2.4/ +ln -s ~/hacking/lisp/cl-utilities/cl-utilities-1.2.4.tar.gz ~/hacking/lisp/cl-utilities/cl-utilities-latest.tar.gz +gpg -b -a ~/hacking/lisp/cl-utilities/cl-utilities-1.2.4.tar.gz +ln -s ~/hacking/lisp/cl-utilities/cl-utilities-1.2.4.tar.gz.asc ~/hacking/lisp/cl-utilities/cl-utilities-latest.tar.gz.asc +rm -Rf cl-utilities-1.2.4/ -scp cl-utilities-1.2.3.tar.gz pscott@common-lisp.net:/project/cl-utilities/public_html/cl-utilities-1.2.3.tar.gz -scp cl-utilities-1.2.3.tar.gz.asc pscott@common-lisp.net:/project/cl-utilities/public_html/cl-utilities-1.2.3.tar.gz.asc -scp cl-utilities-latest.tar.gz pscott@common-lisp.net:/project/cl-utilities/ftp/cl-utilities-1.2.3.tar.gz -scp cl-utilities-latest.tar.gz.asc pscott@common-lisp.net:/project/cl-utilities/ftp/cl-utilities-1.2.3.tar.gz.asc +scp cl-utilities-1.2.4.tar.gz pscott@common-lisp.net:/project/cl-utilities/public_html/cl-utilities-1.2.4.tar.gz +scp cl-utilities-1.2.4.tar.gz.asc pscott@common-lisp.net:/project/cl-utilities/public_html/cl-utilities-1.2.4.tar.gz.asc +scp cl-utilities-latest.tar.gz pscott@common-lisp.net:/project/cl-utilities/ftp/cl-utilities-1.2.4.tar.gz +scp cl-utilities-latest.tar.gz.asc pscott@common-lisp.net:/project/cl-utilities/ftp/cl-utilities-1.2.4.tar.gz.asc scp cl-utilities-latest.tar.gz pscott@common-lisp.net:/project/cl-utilities/public_html/cl-utilities-latest.tar.gz scp cl-utilities-latest.tar.gz.asc pscott@common-lisp.net:/project/cl-utilities/public_html/cl-utilities-latest.tar.gz.asc

1 0

[cl-utilities-cvs] CVS cl-utilities/doc
by pscott 03 May '06

03 May '06

Update of /project/cl-utilities/cvsroot/cl-utilities/doc In directory clnet:/tmp/cvs-serv24356/doc Modified Files: with-unique-names.html Log Message: Fixed a broken link, for real this time. Really. I hope. --- /project/cl-utilities/cvsroot/cl-utilities/doc/with-unique-names.html 2006/05/03 01:33:28 1.2 +++ /project/cl-utilities/cvsroot/cl-utilities/doc/with-unique-names.html 2006/05/03 01:57:15 1.3 @@ -51,7 +51,7 @@ created are <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_l.htm#lexical">lexical</a> unless <a - HREF="http://www.lispworks.com/documentation/HyperSpec/Body/dec_specia.htm#special">special</a> + HREF="http://www.lispworks.com/documentation/HyperSpec/Body/d_specia.htm#special">special</a> <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_d.htm#declarat…">declaration</a>s are specified.

1 0

[cl-utilities-cvs] CVS cl-utilities/doc
by pscott 03 May '06

03 May '06

Update of /project/cl-utilities/cvsroot/cl-utilities/doc In directory clnet:/tmp/cvs-serv24065/doc Modified Files: split-sequence.html Log Message: Added implementation notes explaining the abysmal performance on lists. --- /project/cl-utilities/cvsroot/cl-utilities/doc/split-sequence.html 2006/05/03 01:33:28 1.3 +++ /project/cl-utilities/cvsroot/cl-utilities/doc/split-sequence.html 2006/05/03 01:46:54 1.4 @@ -78,11 +78,28 @@ me</a> so we can get it straightened out. The implementation itself is mature and well tested, and it is -widely used. Efficiency probably isn't what it could be with some type -declarations, but the code is striaghtforward and should be fast -enough. If it isn't fast enough for you, feel free to modify -it, or even just complain about it on the mailing list---something -might get done. +widely used. The code should be fast enough for most people, but be +warned: it was written with vectors in mind, with list manipulation as +an afterthought. It does a lot of things that are quick on vectors but +slow on lists, and this can result in many orders of magnitude +slowdown in list benchmarks versus code written for lists. If this is +a problem for you, it should be straightforward to write your own, +such as the (more limited, not API compatible) example function given +by Szymon in <a +href="http://common-lisp.net/pipermail/cl-utilities-devel/2006-May/000011.html">this +mailing list post</a>: + +<pre> +(defun split-list-if (test list &aux (start list) (end list)) + (loop while (and end (setq start (member-if-not test end))) + collect (ldiff start (setq end (member-if test start))))) +</pre> + +If this is an issue for enough people, I could optimize the code +and fix this problem. I'm reluctant to do that, however, since the +code works and is tested. It's usually more important to be correct +and non-buggy than to be fast, and I have been known to introduce +bugs. <hr><a href="index.html">Manual Index</a>

1 0

[cl-utilities-cvs] CVS cl-utilities/doc
by pscott 03 May '06

03 May '06

Update of /project/cl-utilities/cvsroot/cl-utilities/doc In directory clnet:/tmp/cvs-serv22428/doc Modified Files: collecting.html compose.html extremum.html once-only.html rotate-byte.html split-sequence.html with-unique-names.html Log Message: Fixed broken links in with-unique-names.html and changed links to the old HyperSpec at lisp.org to the newer one at lispworks.com. Thanks to Martin Simmons for pointing this out. --- /project/cl-utilities/cvsroot/cl-utilities/doc/collecting.html 2005/12/14 21:15:16 1.2 +++ /project/cl-utilities/cvsroot/cl-utilities/doc/collecting.html 2006/05/03 01:33:28 1.3 @@ -18,7 +18,7 @@ Arguments and Values: forms---an <a -href="http://www.lisp.org/HyperSpec/Body/glo_i.html#implicit_progn">implicit +href="http://www.lispworks.com/documentation/HyperSpec/Body/glo_i.html#implicit_p…">implicit progn</a>. collector---a symbol which will have a collection function bound to it. --- /project/cl-utilities/cvsroot/cl-utilities/doc/compose.html 2005/12/14 21:15:16 1.1 +++ /project/cl-utilities/cvsroot/cl-utilities/doc/compose.html 2006/05/03 01:33:28 1.2 @@ -14,7 +14,7 @@ Arguments and Values: -function---a <a href="http://www.lisp.org/HyperSpec/Body/glo_f.html#function_designator">function designator</a>. +function---a <a href="http://www.lispworks.com/documentation/HyperSpec/Body/glo_f.html#function_d…">function designator</a>. composite-function---a function. --- /project/cl-utilities/cvsroot/cl-utilities/doc/extremum.html 2005/12/14 21:15:18 1.2 +++ /project/cl-utilities/cvsroot/cl-utilities/doc/extremum.html 2006/05/03 01:33:28 1.3 @@ -31,13 +31,13 @@ morally-smallest-element---the element of sequence that would appear first if the sequence were ordered according to <a class="hyperspec" href =" -http://www.lisp.org/HyperSpec/Body/fun_sortcm_stable-sort.html">sort</a> +http://www.lispworks.com/documentation/HyperSpec/Body/fun_sortcm_stable-sort.html">sort</a> using predicate and key morally-smallest-elements---the identical elements of sequence that would appear first if the sequence were ordered according to <a class="hyperspec" href =" -http://www.lisp.org/HyperSpec/Body/fun_sortcm_stable-sort.html">sort</a> +http://www.lispworks.com/documentation/HyperSpec/Body/fun_sortcm_stable-sort.html">sort</a> using predicate and key. If predicate states that neither of two objects is before the other, they are considered identical. @@ -47,7 +47,7 @@ n-smallest-elements---the n elements of sequence that would appear first if the sequence were ordered according to <a class="hyperspec" href =" -http://www.lisp.org/HyperSpec/Body/fun_sortcm_stable-sort.html">sort</a> +http://www.lispworks.com/documentation/HyperSpec/Body/fun_sortcm_stable-sort.html">sort</a> using predicate and key @@ -57,7 +57,7 @@ appear first if the subsequence of sequence specified by start and end were ordered according to <a class="hyperspec" href =" -http://www.lisp.org/HyperSpec/Body/fun_sortcm_stable-sort.html">sort</a> +http://www.lispworks.com/documentation/HyperSpec/Body/fun_sortcm_stable-sort.html">sort</a> using predicate and key. @@ -96,7 +96,7 @@ The return value of <tt>(extremum predicate sequence :key key)</tt> can be defined as <tt>(elt (<a class="hyperspec" href =" -http://www.lisp.org/HyperSpec/Body/fun_sortcm_stable-sort.html">sort</a> +http://www.lispworks.com/documentation/HyperSpec/Body/fun_sortcm_stable-sort.html">sort</a> predicate (subseq sequence start end) :key key) 0)</tt> except when sequence is empty (see Exceptional Situations), but may use faster (less asymptotically complex) algorithms to find this answer. --- /project/cl-utilities/cvsroot/cl-utilities/doc/once-only.html 2005/12/14 21:15:18 1.1 +++ /project/cl-utilities/cvsroot/cl-utilities/doc/once-only.html 2006/05/03 01:33:28 1.2 @@ -15,9 +15,9 @@ Arguments and Values: -name---a <a href="http://www.lisp.org/HyperSpec/Body/glo_s.html#symbol">symbol</a></a>. +name---a <a href="http://www.lispworks.com/documentation/HyperSpec/Body/glo_s.html#symbol">symbol</a></a>. -form---a <a href="http://www.lisp.org/HyperSpec/Body/glo_f.html#form">form</a></a>. +form---a <a href="http://www.lispworks.com/documentation/HyperSpec/Body/glo_f.html#form">form</a></a>. Description: --- /project/cl-utilities/cvsroot/cl-utilities/doc/rotate-byte.html 2005/12/14 21:15:18 1.1 +++ /project/cl-utilities/cvsroot/cl-utilities/doc/rotate-byte.html 2006/05/03 01:33:28 1.2 @@ -46,7 +46,12 @@ See Also: -<a class="hyperspec" href =" http://www.lisp.org/HyperSpec/Body/fun_bytecm_by_yte-position.html">byte</a>, <a class="hyperspec" href =" http://www.lisp.org/HyperSpec/Body/fun_dpb.html">dpb</a>, <a class="hyperspec" href =" http://www.lisp.org/HyperSpec/Body/acc_ldb.html">ldb</a> +<a class="hyperspec" href =" +http://www.lispworks.com/documentation/HyperSpec/Body/fun_bytecm_by_yte-position.html">byte</a>, +<a class="hyperspec" href =" +http://www.lispworks.com/documentation/HyperSpec/Body/fun_dpb.html">dpb</a>, <a +class="hyperspec" href =" +http://www.lispworks.com/documentation/HyperSpec/Body/acc_ldb.html">ldb</a> Implementation notes --- /project/cl-utilities/cvsroot/cl-utilities/doc/split-sequence.html 2005/12/14 21:15:18 1.2 +++ /project/cl-utilities/cvsroot/cl-utilities/doc/split-sequence.html 2006/05/03 01:33:28 1.3 @@ -41,7 +41,7 @@ Splits sequence into a list of subsequences delimited by objects satisfying the test. -List is a list of sequences of the same kind as sequence that has elements consisting of subsequences of sequence that were delimited in the argument by elements satisfying the test. Index is an index into sequence indicating the unprocessed region, suitable as an argument to <a class="hyperspec" href =" http://www.lisp.org/HyperSpec/Body/acc_subseq.html">subseq</a> to continue processing in the same manner if desired. +List is a list of sequences of the same kind as sequence that has elements consisting of subsequences of sequence that were delimited in the argument by elements satisfying the test. Index is an index into sequence indicating the unprocessed region, suitable as an argument to <a class="hyperspec" href =" http://www.lispworks.com/documentation/HyperSpec/Body/acc_subseq.html">subseq</a> to continue processing in the same manner if desired. The count argument, if supplied, limits the number of subsequences in the first return value; if more than count delimited subsequences exist in sequence, the count leftmost delimited subsequences will be in order in the first return value, and the second return value will be the index into sequence at which processing stopped. --- /project/cl-utilities/cvsroot/cl-utilities/doc/with-unique-names.html 2005/12/14 21:15:18 1.1 +++ /project/cl-utilities/cvsroot/cl-utilities/doc/with-unique-names.html 2006/05/03 01:33:28 1.2 @@ -22,7 +22,7 @@ <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_e.htm#evaluate">evaluate</a>d. The default is var. declaration---a <a href =" - http://www.lisp.org/HyperSpec/Body/sym_declare.html">declare</a> + http://www.lispworks.com/documentation/HyperSpec/Body/sym_declare.html">declare</a> <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_e.htm#expressi…">expression</a>; not <a @@ -32,14 +32,14 @@ <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_r.htm#return">return</a>ed by the forms. Description: <a - HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_E.htm#Execute">Execute</a>s + HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_e.htm#Execute">Execute</a>s a series of <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_f.htm#form">form</a>s with each var <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_b.htm#bound">bound</a> to a <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_f.htm#fresh">fresh</a>, <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_u.htm#unintern…">uninterned</a> <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_s.htm#symbol">symbol</a>. The <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_u.htm#unintern…">uninterned</a> <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_s.htm#symbol">symbol</a> is created as if by - a <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_c.htm#call">call</a> to <a href =" http://www.lisp.org/HyperSpec/Body/fun_gensym.html">gensym</a> with the + a <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_c.htm#call">call</a> to <a href =" http://www.lispworks.com/documentation/HyperSpec/Body/fun_gensym.html">gensym</a> with the <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_s.htm#string">string</a> denoted by prefix---or, if prefix is not supplied, the <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_s.htm#string">string</a> @@ -51,7 +51,7 @@ created are <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_l.htm#lexical">lexical</a> unless <a - HREF="http://www.lispworks.com/documentation/HyperSpec/Body/dec_special.htm#speci…">special</a> + HREF="http://www.lispworks.com/documentation/HyperSpec/Body/dec_specia.htm#special">special</a> <a HREF="http://www.lispworks.com/documentation/HyperSpec/Body/26_glo_d.htm#declarat…">declaration</a>s are specified. @@ -72,15 +72,15 @@ </pre> Side Effects: - Might increment <a href =" http://www.lisp.org/HyperSpec/Body/var_stgensym-counterst.html">*gensym-counter*</a> once for each + Might increment <a href =" http://www.lispworks.com/documentation/HyperSpec/Body/var_stgensym-counters…">*gensym-counter*</a> once for each var. Affected by: <a href =" - http://www.lisp.org/HyperSpec/Body/var_stgensym-counterst.html">*gensym-counter*</a> + http://www.lispworks.com/documentation/HyperSpec/Body/var_stgensym-counters…">*gensym-counter*</a> Exceptional Situations: None. See Also: -<a href =" http://www.lisp.org/HyperSpec/Body/fun_gensym.html">gensym</a>, <a href =" http://www.lisp.org/HyperSpec/Body/speope_letcm_letst.html">let</a> +<a href =" http://www.lispworks.com/documentation/HyperSpec/Body/fun_gensym.html">gensym</a>, <a href =" http://www.lispworks.com/documentation/HyperSpec/Body/speope_letcm_letst.ht…">let</a>

1 0