From: <cli...@li...> - 2008-05-22 18:27:10
|
Send clisp-cvs mailing list submissions to cli...@li... To subscribe or unsubscribe via the World Wide Web, visit https://lists.sourceforge.net/lists/listinfo/clisp-cvs or, via email, send a message with subject or body 'help' to cli...@li... You can reach the person managing the list at cli...@li... When replying, please edit your Subject line so it is more specific than "Re: Contents of clisp-cvs digest..." CLISP CVS commits for today Today's Topics: 1. clisp/modules/rawsock rawsock.c,1.95,1.96 (Sam Steingold) 2. clisp/doc impbody.xml,1.511,1.512 (Sam Steingold) 3. clisp/doc cl-ent.xml,1.127,1.128 (Sam Steingold) 4. clisp/doc impbyte.xml,1.111,1.112 (Sam Steingold) 5. clisp/doc common.xsl,1.59,1.60 (Sam Steingold) 6. clisp/doc common.xsl,1.60,1.61 (Sam Steingold) 7. clisp/doc common.xsl,1.61,1.62 impnotes.css,1.34,1.35 (Sam Steingold) 8. clisp configure,1.123,1.124 (Sam Steingold) 9. clisp/src ChangeLog,1.6203,1.6204 (Sam Steingold) 10. clisp/modules/regexp configure.in,1.31,1.32 (Sam Steingold) 11. clisp/src ChangeLog,1.6204,1.6205 (Sam Steingold) ---------------------------------------------------------------------- Message: 1 Date: Wed, 21 May 2008 20:14:46 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/modules/rawsock rawsock.c,1.95,1.96 To: cli...@li... Message-ID: <E1J...@ma...> Update of /cvsroot/clisp/clisp/modules/rawsock In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv12983/modules/rawsock Modified Files: rawsock.c Log Message: typo in comments Index: rawsock.c =================================================================== RCS file: /cvsroot/clisp/clisp/modules/rawsock/rawsock.c,v retrieving revision 1.95 retrieving revision 1.96 diff -u -d -r1.95 -r1.96 --- rawsock.c 27 Feb 2008 20:48:02 -0000 1.95 +++ rawsock.c 21 May 2008 20:14:44 -0000 1.96 @@ -1084,7 +1084,7 @@ ssize_t retval; size_t len; uintL offset; - if ((retval = check_iovec_arg(&STACK_2,&offset)) >= 0) { /* WRITEW */ + if ((retval = check_iovec_arg(&STACK_2,&offset)) >= 0) { /* WRITEV */ struct iovec *buffer = (struct iovec*)alloca(sizeof(struct iovec)*retval); fill_iovec(STACK_0,offset,retval,buffer,PROT_READ); SYSCALL(retval,sock,writev(sock,buffer,retval)); ------------------------------ Message: 2 Date: Wed, 21 May 2008 22:08:19 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/doc impbody.xml,1.511,1.512 To: cli...@li... Message-ID: <E1J...@ma...> Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv24481 Modified Files: impbody.xml Log Message: (compile-jit): add section Index: impbody.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/impbody.xml,v retrieving revision 1.511 retrieving revision 1.512 diff -u -d -r1.511 -r1.512 --- impbody.xml 1 May 2008 14:09:51 -0000 1.511 +++ impbody.xml 21 May 2008 22:08:16 -0000 1.512 @@ -418,6 +418,18 @@ <para>&clisp; compiles to platform-independent &bytecode;.</para> +<section id="compile-jit"><title>Just-In-Time Native Compilation</title> + <subtitle><emphasis role="plat-dep">only in &clisp; built &with; + &lightning;</emphasis></subtitle> +<para>The code compiled to &bytecode;s with optimization levels + <programlisting language="lisp"> +(&or-m; (≥ 0 &space-dec;) (≤ 1 &speed-dec;))</programlisting> + (by &compile; &compile-file-my;, or &compile-decl;) will be + <firstterm>just-in-time</firstterm> (i.e., on the first execution) + compiled to native code using &lightning;. +</para> +</section> + </section> <section id="compilation-semantics"><title>Compilation Semantics ------------------------------ Message: 3 Date: Wed, 21 May 2008 22:16:06 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/doc cl-ent.xml,1.127,1.128 To: cli...@li... Message-ID: <E1J...@ma...> Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv27258/doc Modified Files: cl-ent.xml Log Message: (lightning): new entity Index: cl-ent.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/cl-ent.xml,v retrieving revision 1.127 retrieving revision 1.128 diff -u -d -r1.127 -r1.128 --- cl-ent.xml 22 Apr 2008 22:38:24 -0000 1.127 +++ cl-ent.xml 21 May 2008 22:16:03 -0000 1.128 @@ -111,6 +111,7 @@ <!ENTITY libffcall '&gnu; <ulink url="http://libffcall.sourceforge.net/">libffcall</ulink>'> <!ENTITY readline-link 'http://tiswww.case.edu/php/chet/readline/'> <!ENTITY readline '&gnu; <ulink url="&readline-link;readline.html">readline</ulink>'> +<!ENTITY lightning '&gnu; <ulink url="http://www.gnu.org/software/lightning/">lightning</ulink>'> <!ENTITY gdbm '&gnu; <ulink url="http://www.gnu.org/software/gdbm">DataBase Manager</ulink>'> <!ENTITY gnulib '&gnu; <ulink url="http://www.gnu.org/software/gnulib/">Portability Library</ulink>'> <!ENTITY autoconf '&gnu; <ulink url="http://www.gnu.org/software/autoconf/">autoconf</ulink>'> ------------------------------ Message: 4 Date: Wed, 21 May 2008 22:16:18 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/doc impbyte.xml,1.111,1.112 To: cli...@li... Message-ID: <E1J...@ma...> Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv27541/doc Modified Files: impbyte.xml Log Message: formatting Index: impbyte.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/impbyte.xml,v retrieving revision 1.111 retrieving revision 1.112 diff -u -d -r1.111 -r1.112 --- impbyte.xml 14 Apr 2008 17:30:54 -0000 1.111 +++ impbyte.xml 21 May 2008 22:16:16 -0000 1.112 @@ -2638,15 +2638,13 @@ <computeroutput>MY-PLUS-1</computeroutput> ;; works only on closure objects (sys::closure-name #'my-plus-1) -<computeroutput>MY-PLUS-1</computeroutput> -</programlisting></para></formalpara> +<computeroutput>MY-PLUS-1</computeroutput></programlisting></para></formalpara> <formalpara id="closure-codevec"><title>Closure bytecode</title> <para>The actual bytecode vector (if you modify it, you can get a segfault when the function is executed):<programlisting language="lisp"> (sys::closure-codevec #'my-plus-1) -<computeroutput>#(0 0 0 0 2 0 0 0 6 3 174 174 51 2 53 25 3)</computeroutput> -</programlisting></para></formalpara> +<computeroutput>#(0 0 0 0 2 0 0 0 6 3 174 174 51 2 53 25 3)</computeroutput></programlisting></para></formalpara> <formalpara id="closure-consts"><title>Closure constants</title> <para>A closure can depend on external and internal values: @@ -2655,9 +2653,8 @@ (defun my-plus-2 (z) (declare (compile)) (+ x y z))) <computeroutput>MY-PLUS-2</computeroutput> (sys::closure-consts #'my-plus-2) -<computeroutput>(#(Y 456 X 123 NIL) 3 1)</computeroutput> -</programlisting> Use &disassemble; to see how the constants are used. -</para></formalpara> +<computeroutput>(#(Y 456 X 123 NIL) 3 1)</computeroutput></programlisting> +Use &disassemble; to see how the constants are used.</para></formalpara> <formalpara id="signature"><title>Closure signature</title> <para>Function <function>SYS::SIGNATURE</function> returns 8 values: @@ -2681,9 +2678,8 @@ (sys::disassemble-LAP byte-list const-list)) <computeroutput>((0 LOAD&PUSH 2) (1 LOAD&PUSH 2) (2 CALLSR 2 53) (5 SKIP&RET 3))</computeroutput> (sys::assemble-LAP (mapcar #'rest *)) -<computeroutput>(174 174 51 2 53 25 3)</computeroutput> -</programlisting></para></formalpara> -</section> +<computeroutput>(174 174 51 2 53 25 3)</computeroutput></programlisting> +</para></formalpara></section> <section id="bytecode-design"><title>Bytecode Design</title> @@ -2708,13 +2704,13 @@ <section id="byte-jmptail-q"> <title>Why <link linkend="instr-jump">JMPTAIL</link>?</title> <abstract><title>Question:</title> - <para>Consider this function and its disassembly:<programlisting> - (defun foo (x y) (if (or (= x 0) (= y 0)) (+ x y) (foo y (1- x)))) - (&disassemble; 'foo) + <para>Consider this function and its disassembly: +<programlisting language="lisp"> +(defun foo (x y) (if (or (= x 0) (= y 0)) (+ x y) (foo y (1- x)))) +(&disassemble; 'foo) 8 (LOAD&PUSH 1) 9 (LOAD&DEC&PUSH 3) -11 (JMPTAIL 2 5 L0) - </programlisting> +11 (JMPTAIL 2 5 L0)</programlisting> Why are the arguments pushed onto the &STACK;, just to be popped off of it during the <literal role="byte">JMPTAIL</literal>? Why not a sequence of <literal role="byte">LOAD</literal>, ------------------------------ Message: 5 Date: Thu, 22 May 2008 15:57:02 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/doc common.xsl,1.59,1.60 To: cli...@li... Message-ID: <E1J...@ma...> Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv8365 Modified Files: common.xsl Log Message: (user.footer.content): add http://sourceforge.net/awards/cca/?group_id=1355 Index: common.xsl =================================================================== RCS file: /cvsroot/clisp/clisp/doc/common.xsl,v retrieving revision 1.59 retrieving revision 1.60 diff -u -d -r1.59 -r1.60 --- common.xsl 28 Apr 2008 16:07:03 -0000 1.59 +++ common.xsl 22 May 2008 15:57:00 -0000 1.60 @@ -394,6 +394,7 @@ <tr><td align="left"><a href="http://clisp.cons.org"> <img src="clisp.png" width="48" height="48" alt="[CLISP home]"/></a></td> <td align="center"><a href="http://sourceforge.net/donate/index.php?group_id=1355"><img src="http://images.sourceforge.net/images/project-support.jpg" width="88" height="32" alt="[Support This Project]"/></a></td> + <td align="center"><a href="http://sourceforge.net/awards/cca/?group_id=1355"><img src="http://sourceforge.net/awards/cca/badge_img.php?group_id=1355&style=1" width="120" height="60" alt="[nominate this project for the community choice award]"/></a></td> <td align="right"><a href="http://sourceforge.net"><img width="125" height="37" alt="[SourceForge]" src="http://sflogo.sourceforge.net/sflogo.php?group_id=1355&type=2&page={@id}"/></a></td> </tr></table></div><hr width="100%"/> <!-- https://sourceforge.net/tracker/?func=detail&atid=200001&aid=1878997&group_id=1 --> ------------------------------ Message: 6 Date: Thu, 22 May 2008 15:58:27 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/doc common.xsl,1.60,1.61 To: cli...@li... Message-ID: <E1J...@ma...> Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv9106 Modified Files: common.xsl Log Message: (user.footer.content): more specific alt="" Index: common.xsl =================================================================== RCS file: /cvsroot/clisp/clisp/doc/common.xsl,v retrieving revision 1.60 retrieving revision 1.61 diff -u -d -r1.60 -r1.61 --- common.xsl 22 May 2008 15:57:00 -0000 1.60 +++ common.xsl 22 May 2008 15:58:25 -0000 1.61 @@ -393,8 +393,8 @@ <div class="custom-footer"><hr width="100%"/><table width="100%"> <tr><td align="left"><a href="http://clisp.cons.org"> <img src="clisp.png" width="48" height="48" alt="[CLISP home]"/></a></td> - <td align="center"><a href="http://sourceforge.net/donate/index.php?group_id=1355"><img src="http://images.sourceforge.net/images/project-support.jpg" width="88" height="32" alt="[Support This Project]"/></a></td> - <td align="center"><a href="http://sourceforge.net/awards/cca/?group_id=1355"><img src="http://sourceforge.net/awards/cca/badge_img.php?group_id=1355&style=1" width="120" height="60" alt="[nominate this project for the community choice award]"/></a></td> + <td align="center"><a href="http://sourceforge.net/donate/index.php?group_id=1355"><img src="http://images.sourceforge.net/images/project-support.jpg" width="88" height="32" alt="[Support CLISP]"/></a></td> + <td align="center"><a href="http://sourceforge.net/awards/cca/?group_id=1355"><img src="http://sourceforge.net/awards/cca/badge_img.php?group_id=1355&style=1" width="120" height="60" alt="[Nominate CLISP for the Community Choice Award]"/></a></td> <td align="right"><a href="http://sourceforge.net"><img width="125" height="37" alt="[SourceForge]" src="http://sflogo.sourceforge.net/sflogo.php?group_id=1355&type=2&page={@id}"/></a></td> </tr></table></div><hr width="100%"/> <!-- https://sourceforge.net/tracker/?func=detail&atid=200001&aid=1878997&group_id=1 --> ------------------------------ Message: 7 Date: Thu, 22 May 2008 16:13:22 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/doc common.xsl,1.61,1.62 impnotes.css,1.34,1.35 To: cli...@li... Message-ID: <E1J...@ma...> Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv14893/doc Modified Files: common.xsl impnotes.css Log Message: use css to set width="100%" in hr Index: impnotes.css =================================================================== RCS file: /cvsroot/clisp/clisp/doc/impnotes.css,v retrieving revision 1.34 retrieving revision 1.35 diff -u -d -r1.34 -r1.35 --- impnotes.css 6 Mar 2008 22:21:59 -0000 1.34 +++ impnotes.css 22 May 2008 16:13:19 -0000 1.35 @@ -72,3 +72,6 @@ /* modules */ .module { background-color: lightyellow; color: darkblue; font-weight: bold; } + +/* full width horizontal rulers */ +hr { width: 100%; } Index: common.xsl =================================================================== RCS file: /cvsroot/clisp/clisp/doc/common.xsl,v retrieving revision 1.61 retrieving revision 1.62 diff -u -d -r1.61 -r1.62 --- common.xsl 22 May 2008 15:58:25 -0000 1.61 +++ common.xsl 22 May 2008 16:13:19 -0000 1.62 @@ -375,7 +375,7 @@ <xsl:param name="google.ads" select="0"/> <xsl:template name="user.footer.content"> <xsl:if test="/refentry/refentryinfo"><div class="refentryinfo"> - <hr width="100%"/><table width="100%" summary="man page meta info"> + <hr /><table width="100%" summary="man page meta info"> <th><td align="left"> <xsl:apply-templates select="/refentry/refentryinfo/title/node()"/> </td><td align="center"> @@ -384,19 +384,19 @@ <xsl:apply-templates select="/refentry/refentryinfo/date/node()"/> </td></th></table></div></xsl:if> <xsl:if test="/book/bookinfo"><div class="bookinfo"> - <hr width="100%"/><table width="100%" summary="impnotes meta info"> + <hr /><table width="100%" summary="impnotes meta info"> <th><td align="left"> <xsl:apply-templates select="/book/bookinfo/subtitle/node()"/> </td><td align="right"> <xsl:apply-templates select="/book/bookinfo/date/node()"/> </td></th></table></div></xsl:if> - <div class="custom-footer"><hr width="100%"/><table width="100%"> + <div class="custom-footer"><hr /><table width="100%"> <tr><td align="left"><a href="http://clisp.cons.org"> <img src="clisp.png" width="48" height="48" alt="[CLISP home]"/></a></td> <td align="center"><a href="http://sourceforge.net/donate/index.php?group_id=1355"><img src="http://images.sourceforge.net/images/project-support.jpg" width="88" height="32" alt="[Support CLISP]"/></a></td> <td align="center"><a href="http://sourceforge.net/awards/cca/?group_id=1355"><img src="http://sourceforge.net/awards/cca/badge_img.php?group_id=1355&style=1" width="120" height="60" alt="[Nominate CLISP for the Community Choice Award]"/></a></td> <td align="right"><a href="http://sourceforge.net"><img width="125" height="37" alt="[SourceForge]" src="http://sflogo.sourceforge.net/sflogo.php?group_id=1355&type=2&page={@id}"/></a></td> - </tr></table></div><hr width="100%"/> + </tr></table></div><hr /> <!-- https://sourceforge.net/tracker/?func=detail&atid=200001&aid=1878997&group_id=1 --> <form method="get" action="http://www.google.com/custom" target="_top"> <table width="100%" border="0"><tr> @@ -428,7 +428,7 @@ <input type="hidden" name="oe" value="UTF-8"/> <input type="hidden" name="cof" value="GALT:#008000;GL:1;DIV:#336699;VLC:663399;AH:center;BGC:FFFFFF;LBGC:000000;ALC:0000FF;LC:0000FF;T:000000;GFNT:0000FF;GIMP:0000FF;LH:48;LW:48;L:http://clisp.cons.org/clisp.png;S:http://clisp.cons.org;FORID:1"/> <input type="hidden" name="hl" value="en"/></td></tr></table></form> - <hr width="100%"/> + <hr /> <xsl:if test="$google.ads != 0"><div class="google-ads"> <script type="text/javascript"><xsl:comment> google_ad_client = "pub-4445255502750357"; ------------------------------ Message: 8 Date: Thu, 22 May 2008 18:22:55 +0000 From: Sam Steingold <sd...@us...> Subject: clisp configure,1.123,1.124 To: cli...@li... Message-ID: <E1J...@ma...> Update of /cvsroot/clisp/clisp In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv14174 Modified Files: configure Log Message: (--help-modules): more compact output, do not print anything for modules whose configure does not accept any --with.*prefix arguments Index: configure =================================================================== RCS file: /cvsroot/clisp/clisp/configure,v retrieving revision 1.123 retrieving revision 1.124 diff -u -d -r1.123 -r1.124 --- configure 20 May 2008 14:05:33 -0000 1.123 +++ configure 22 May 2008 18:22:52 -0000 1.124 @@ -212,13 +212,17 @@ echo "module sets found in the directory '${MODDIR}':" MODLIST=`find ${MODDIR} -name link.sh -o -name link.sh.in | sed -e 's,^${MODDIR}/,,' -e 's,/[^/]*$,,' | sort` for m in ${MODLIST}; do echo " "${m}; done - echo "to specify the location of the external software:" + echo "to specify the location of external software:" for m in src ${MODLIST}; do CFG=./${m}/configure if [ -x ${CFG} ]; then - echo " "${m}: - ${CFG} --help | grep ' --with-[a-zA-Z0-8]*-prefix' - echo " run '${CFG} --help' for more information" + tmp=${CFG}.with + ${CFG} --help | grep ' --with-[a-zA-Z0-8]*-prefix' > ${tmp} + if test -s ${tmp}; then + echo "* ${m} (try also '${CFG} --help')" + cat ${tmp} + fi + rm -f ${tmp} fi done exit 0 ;; ------------------------------ Message: 9 Date: Thu, 22 May 2008 18:22:56 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/src ChangeLog,1.6203,1.6204 To: cli...@li... Message-ID: <E1J...@ma...> Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv14174/src Modified Files: ChangeLog Log Message: (--help-modules): more compact output, do not print anything for modules whose configure does not accept any --with.*prefix arguments Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.6203 retrieving revision 1.6204 diff -u -d -r1.6203 -r1.6204 --- ChangeLog 21 May 2008 17:23:33 -0000 1.6203 +++ ChangeLog 22 May 2008 18:22:53 -0000 1.6204 @@ -1,3 +1,9 @@ +2008-05-22 Sam Steingold <sd...@gn...> + + * configure (--help-modules): more compact output, + do not print anything for modules whose configure + does not accept any --with.*prefix arguments + 2008-05-21 Sam Steingold <sd...@gn...> * modules/syscalls/calls.c (POSIX::RESOLVE-HOST-IPADDR): ------------------------------ Message: 10 Date: Thu, 22 May 2008 18:27:01 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/modules/regexp configure.in,1.31,1.32 To: cli...@li... Message-ID: <E1J...@ma...> Update of /cvsroot/clisp/clisp/modules/regexp In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv16616/modules/regexp Modified Files: configure.in Log Message: remove AM_GNU_GETTEXT([external]) (why was it there in the first place?!) Index: configure.in =================================================================== RCS file: /cvsroot/clisp/clisp/modules/regexp/configure.in,v retrieving revision 1.31 retrieving revision 1.32 diff -u -d -r1.31 -r1.32 --- configure.in 16 Nov 2007 19:31:19 -0000 1.31 +++ configure.in 22 May 2008 18:26:59 -0000 1.32 @@ -1,6 +1,6 @@ dnl AUTOCONF configuration for regex dnl Bruno Haible 18.4.1995 -dnl Sam Steingold 2003-2007 +dnl Sam Steingold 2003-2008 AC_PREREQ(2.57) AC_INIT(regexp, 1.0, clisp-list) @@ -12,7 +12,6 @@ BOLD_MSG([Regexp (Common)]) CL_MODULE_COMMON_CHECKS AC_CHECK_HEADERS(string.h sys/types.h) -AM_GNU_GETTEXT([external]) gl_C_RESTRICT dnl called from top-level configure.in:gl_INIT [gl_FUNC_ALLOCA gl_REGEX] ------------------------------ Message: 11 Date: Thu, 22 May 2008 18:27:01 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/src ChangeLog,1.6204,1.6205 To: cli...@li... Message-ID: <E1J...@ma...> Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv16616/src Modified Files: ChangeLog Log Message: remove AM_GNU_GETTEXT([external]) (why was it there in the first place?!) Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.6204 retrieving revision 1.6205 diff -u -d -r1.6204 -r1.6205 --- ChangeLog 22 May 2008 18:22:53 -0000 1.6204 +++ ChangeLog 22 May 2008 18:26:59 -0000 1.6205 @@ -1,5 +1,10 @@ 2008-05-22 Sam Steingold <sd...@gn...> + * modules/regexp/configure.in: remove AM_GNU_GETTEXT([external]) + (why was it there in the first place?!) + +2008-05-22 Sam Steingold <sd...@gn...> + * configure (--help-modules): more compact output, do not print anything for modules whose configure does not accept any --with.*prefix arguments ------------------------------ ------------------------------------------------------------------------- This SF.net email is sponsored by: Microsoft Defy all challenges. Microsoft(R) Visual Studio 2008. http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/ ------------------------------ _______________________________________________ clisp-cvs mailing list cli...@li... https://lists.sourceforge.net/lists/listinfo/clisp-cvs End of clisp-cvs Digest, Vol 25, Issue 41 ***************************************** |