Menu
▾
▴
clisp-cvs digest, Vol 1 #1138 - 10 msgs
|
From: <cli...@li...> - 2005-06-17 03:12:02
|
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/doc impbody.xml,1.386,1.387 (Sam Steingold) 2. clisp/doc clhs-ent.xml,1.12,1.13 cl-ent.xml,1.88,1.89 (Sam Steingold) 3. clisp/doc impext.xml,1.351,1.352 (Sam Steingold) 4. clisp/src ChangeLog,1.4705,1.4706 (Sam Steingold) 5. clisp/doc id-href-map.xsl,NONE,1.1 Makefile,1.64,1.65 (Sam Steingold) 6. clisp/doc mop.xml,2.52,2.53 impext.xml,1.352,1.353 impbyte.xml,1.74,1.75 (Sam Steingold) 7. clisp/src TODO,1.96,1.97 (Sam Steingold) 8. clisp/doc mop.xml,2.53,2.54 (Sam Steingold) 9. clisp/doc impbyte.xml,1.75,1.76 (Sam Steingold) 10. clisp/doc impent.xml,1.219,1.220 (Sam Steingold) --__--__-- Message: 1 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc impbody.xml,1.386,1.387 Date: Thu, 16 Jun 2005 13:33:32 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9933/doc Modified Files: impbody.xml Log Message: fixed last patch Index: impbody.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/impbody.xml,v retrieving revision 1.386 retrieving revision 1.387 diff -u -d -r1.386 -r1.387 --- impbody.xml 15 Jun 2005 12:42:54 -0000 1.386 +++ impbody.xml 16 Jun 2005 13:33:29 -0000 1.387 @@ -333,7 +333,7 @@ <listitem><simpara>&cons-t;</simpara></listitem> <listitem><simpara>&symbol-t;, &null-t;, &boolean-t;, &keyword-t;</simpara></listitem> - <listitem><simpara>&bit-t;<literal role="type">(&integer-t; 0 + <listitem><simpara>&bit-t;, <literal role="type">(&integer-t; 0 #.&most-positive-fixnum;)</literal>, <literal role="type">(&integer-t; #.&most-negative-fixnum; (0))</literal>, <literal role="type">(&integer-t; (#.&most-positive-fixnum;))</literal>, <literal role="type">(&integer-t; * --__--__-- Message: 2 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc clhs-ent.xml,1.12,1.13 cl-ent.xml,1.88,1.89 Date: Thu, 16 Jun 2005 13:35:34 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12234/doc Modified Files: clhs-ent.xml cl-ent.xml Log Message: moved &pri-val; away from a generated file Index: clhs-ent.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/clhs-ent.xml,v retrieving revision 1.12 retrieving revision 1.13 diff -u -d -r1.12 -r1.13 --- clhs-ent.xml 15 Jun 2005 14:47:20 -0000 1.12 +++ clhs-ent.xml 16 Jun 2005 13:35:32 -0000 1.13 @@ -757,7 +757,6 @@ <!ENTITY pprint-pop "<ulink url='&clhs;/Body/locmac_pprint-pop.html'><function>PPRINT-POP</function></ulink>"> <!ENTITY pprint-tab "<ulink url='&clhs;/Body/fun_pprint-tab.html'><function>PPRINT-TAB</function></ulink>"> <!ENTITY pprint-tabular "<ulink url='&clhs;/Body/fun_pprint-fi_rint-tabular.html'><function>PPRINT-TABULAR</function></ulink>"> -<!ENTITY primary-value-glo "<ulink url='&clhs;/Body/glo_p.html'>primary value</ulink>"> <!ENTITY prin1 "<ulink url='&clhs;/Body/fun_writecm_p_rintcm_princ.html'><function>PRIN1</function></ulink>"> <!ENTITY prin1-to-string "<ulink url='&clhs;/Body/fun_write-to-_nc-to-string.html'><function>PRIN1-TO-STRING</function></ulink>"> <!ENTITY princ "<ulink url='&clhs;/Body/fun_writecm_p_rintcm_princ.html'><function>PRINC</function></ulink>"> Index: cl-ent.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/cl-ent.xml,v retrieving revision 1.88 retrieving revision 1.89 diff -u -d -r1.88 -r1.89 --- cl-ent.xml 12 Jun 2005 19:24:04 -0000 1.88 +++ cl-ent.xml 16 Jun 2005 13:35:32 -0000 1.89 @@ -184,6 +184,7 @@ <!ENTITY place "<ulink url='&clhs;/Body/glo_p.html#place'>place</ulink>"> <!ENTITY pri-esc "<ulink url='&clhs;/Body/glo_p.html#printer_escaping'>printer escaping</ulink>"> <!ENTITY mul-val "<ulink url='&clhs;/Body/glo_m.html#multiple_values'>multiple values</ulink>"> +<!ENTITY pri-val "<ulink url='&clhs;/Body/glo_p.html#primary_value'>primary value</ulink>"> <!ENTITY finally "<ulink url='&clhs;/Body/sec_6-1-7-2.html'><literal>FINALLY</literal></ulink>"> <!ENTITY cont-err "<ulink url='&clhs;/Body/glo_c.html#continuable'>continuable</ulink> &error-t;"> <!ENTITY funname "<ulink url='&clhs;/Body/glo_f.html#function_name'>function name</ulink>"> --__--__-- Message: 3 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc impext.xml,1.351,1.352 Date: Thu, 16 Jun 2005 13:37:19 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13184/doc Modified Files: impext.xml Log Message: (memoized): fixed last patch Index: impext.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/impext.xml,v retrieving revision 1.351 retrieving revision 1.352 diff -u -d -r1.351 -r1.352 --- impext.xml 15 Jun 2005 14:47:19 -0000 1.351 +++ impext.xml 16 Jun 2005 13:37:16 -0000 1.352 @@ -1544,10 +1544,9 @@ </programlisting> </para></formalpara> -<formalpara id="memoized"> - <title>Macro <function>EXT:MEMOIZED</function></title> +<formalpara id="memoized"><title>Macro <function>EXT:MEMOIZED</function></title> <para><code>(<function>EXT:MEMOIZED</function> &form-r;)</code> - memoizes the &primary-value-glo; of <literal>FORM</literal> from its first evaluation. + memoizes the &pri-val; of &form-r; from its first evaluation. </para></formalpara> <formalpara id="with-collect"> --__--__-- Message: 4 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/src ChangeLog,1.4705,1.4706 Date: Thu, 16 Jun 2005 13:42:58 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16668/src Modified Files: ChangeLog Log Message: fixed formatting; removed ../doc/ entries Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.4705 retrieving revision 1.4706 diff -u -d -r1.4705 -r1.4706 --- ChangeLog 15 Jun 2005 12:42:42 -0000 1.4705 +++ ChangeLog 16 Jun 2005 13:42:51 -0000 1.4706 @@ -5,9 +5,6 @@ 2005-06-15 Jörg Höhle <ho...@us...> * defs1.lisp (memoized): export it from EXT. - * ../doc/impbody.xml: (TYPE-OF 0 or 1) yields BIT; - HASH-TABLE-TEST now returns EXT:FAST/STABLEHASH-EQ/EQL/EQUAL, - not EQ, EQL nor EQUAL anymore. 2005-06-14 Sam Steingold <sd...@gn...> @@ -75,8 +72,8 @@ 2005-06-07 Bruno Haible <br...@cl...> - * genclisph.d (print_printf_arg, printf_with_args, print_file, - emit_typedef_test, emit_typedef, emit_typedef_f): Declare as local. + * genclisph.d (print_printf_arg, printf_with_args, print_file) + (emit_typedef_test, emit_typedef, emit_typedef_f): Declare as local. 2005-06-07 Bruno Haible <br...@cl...> @@ -88,8 +85,8 @@ 2005-06-06 Bruno Haible <br...@cl...> - * modules/berkeley-db/bdb.c (fill_dbt): Call I_to_LEbytes differently, - avoiding a prior memset(). + * modules/berkeley-db/bdb.c (fill_dbt): Call I_to_LEbytes + differently, avoiding a prior memset(). 2005-06-06 Bruno Haible <br...@cl...> @@ -100,9 +97,9 @@ 2005-06-04 Bruno Haible <br...@cl...> * modules/syscalls/calls.c: Assume stdlib.h exists. - (POSIX::STREAM-LOCK): Use a 64-bit variable for the length on systems - with 64-bit off_t and on Woe32. Fix wrong assigment from GetLastError() - to 'bool'. + (POSIX::STREAM-LOCK): Use a 64-bit variable for the length on + systems with 64-bit off_t and on Woe32. Fix wrong assigment from + GetLastError() to 'bool'. 2005-06-04 Bruno Haible <br...@cl...> @@ -155,8 +152,8 @@ Compile with gcc -Wmissing-declarations. * makemake.in (XCFLAGS): Add -Wmissing-declarations. * lispbibl.d: Include pseudofun.c with PSEUDO_C. - (fehler_unencodable, mkops_from_handles, mkips_from_handles, - hashcode_lfloat, sigsegv_handler_failed, ext_show_stack): New + (fehler_unencodable, mkops_from_handles, mkips_from_handles) + (hashcode_lfloat, sigsegv_handler_failed, ext_show_stack): New declarations. * io.d (print): Make local. * pathname.d (fehler_pathname_designator): Make local. @@ -171,26 +168,26 @@ * unix.d (errno): Don't declare. Assume <errno.h> does it. * spvw.d (print_banner): Define with void argument list. * stream.d (get_col): Likewise. - * pathname.d (fix_parse_namestring_dot_file, nullfile, - interpret_launch_priority): Likewise. - * hashtabl.d (get_eq_hashfunction, get_eql_hashfunction, - get_equal_hashfunction): Likewise. + * pathname.d (fix_parse_namestring_dot_file, nullfile) + (interpret_launch_priority): Likewise. + * hashtabl.d (get_eq_hashfunction, get_eql_hashfunction) + (get_equal_hashfunction): Likewise. * debug.d (ext_show_stack): Likewise. * realtran.d (sin_stack, cos_stack): Likewise. 2005-06-04 Bruno Haible <br...@cl...> - * lispbibl.d (Encoding, Encoding_wcslen, Encoding_wcstombs, cslen, - cstombs, TheEncoding, TheMachineCode, ThePseudofun, Pseudofun): Emit - to clisp.h. + * lispbibl.d (Encoding, Encoding_wcslen, Encoding_wcstombs, cslen) + (cstombs, TheEncoding, TheMachineCode, ThePseudofun, Pseudofun): + Emit to clisp.h. (with_string_0, with_sstring_0): Use cslen instead of cslen_f, cstombs instead of cstombs_f. * encoding.d (cslen_f, cslen_ff, cstombs_f, cstombs_ff): Remove functions. * genclisph.d (main): Don't emit cslen_f, cslen_ff, cstombs_f, cstombs_ff. - * modules/syscalls/calls.c (LispToPropVariant, PropSpecSetStr, - with_string_0w): Use cslen instead of cslen_f, cstombs instead of + * modules/syscalls/calls.c (LispToPropVariant, PropSpecSetStr) + (with_string_0w): Use cslen instead of cslen_f, cstombs instead of cstombs_f. * modules/clx/new-clx/clx.f (to_XChar2b): Use cstombs instead of cstombs_f. @@ -261,10 +258,10 @@ 2005-06-04 Bruno Haible <br...@cl...> - * lispbibl.d (addr_to_string, nonintr_connect, string_to_addr, - resolve_host, connect_to_x_server, socket_getlocalname, - socket_getpeername, create_server_socket, accept_connection, - create_client_socket): New declarations. + * lispbibl.d (addr_to_string, nonintr_connect, string_to_addr) + (resolve_host, connect_to_x_server, socket_getlocalname) + (socket_getpeername, create_server_socket, accept_connection) + (create_client_socket): New declarations. * socket.d: Improve documentation. (create_server_socket, create_client_socket): Remove redundant declarations. @@ -375,9 +372,9 @@ 2005-05-29 Bruno Haible <br...@cl...> Fix omission in 2004-06-20 patch. - * spvw_garcol.d (gc_sweep1_instance_forward, - gc_sweep1_instance_target) [TYPECODES]: Make it work for closure_type - as well. + * spvw_garcol.d (gc_sweep1_instance_forward) + (gc_sweep1_instance_target) [TYPECODES]: Make it work for + closure_type as well. 2005-05-29 Bruno Haible <br...@cl...> @@ -460,27 +457,27 @@ TYPECODES. (cgci_types_pointable, pgci_types_pointable, ngci_types_pointable): New macros. - (TheCons, TheRatio, TheComplex, TheSymbol, TheSymbolflagged, TheBignum, - TheFfloat, TheDfloat, TheLfloat, TheSarray, TheSbvector, TheCodevec, - TheS8string, TheS16string, TheS32string, TheSnstring, TheSistring, - TheSstring, TheSvector, TheIarray, TheRecord, TheLrecord, TheSrecord, - TheXrecord, ThePackage, TheHashtable, TheReadtable, ThePathname, - TheLogpathname, The_Random_state, TheByte, TheFsubr, TheLoadtimeeval, - TheSymbolmacro, TheGlobalSymbolmacro, TheMacro, TheFunctionMacro, - TheBigReadLabel, TheEncoding, TheFpointer, TheFaddress, TheFvariable, - TheFfunction, TheWeakpointer, TheMutableWeakList, TheWeakList, - TheWeakAnd, TheWeakOr, TheWeakmapping, TheWeakAndMapping, - TheWeakOrMapping, TheMutableWeakAlist, TheWeakAlist, - TheWeakHashedAlist, TheFinalizer, TheSocketServer, TheYetanother, - TheStream, TheStructure, TheClosure, TheIclosure, TheCclosure, - TheInstance, TheVarobject): Define using ngci_types_pointable. + (TheCons, TheRatio, TheComplex, TheSymbol, TheSymbolflagged, TheBignum) + (TheFfloat, TheDfloat, TheLfloat, TheSarray, TheSbvector, TheCodevec) + (TheS8string, TheS16string, TheS32string, TheSnstring, TheSistring) + (TheSstring, TheSvector, TheIarray, TheRecord, TheLrecord, TheSrecord) + (TheXrecord, ThePackage, TheHashtable, TheReadtable, ThePathname) + (TheLogpathname, The_Random_state, TheByte, TheFsubr, TheLoadtimeeval) + (TheSymbolmacro, TheGlobalSymbolmacro, TheMacro, TheFunctionMacro) + (TheBigReadLabel, TheEncoding, TheFpointer, TheFaddress, TheFvariable) + (TheFfunction, TheWeakpointer, TheMutableWeakList, TheWeakList) + (TheWeakAnd, TheWeakOr, TheWeakmapping, TheWeakAndMapping) + (TheWeakOrMapping, TheMutableWeakAlist, TheWeakAlist) + (TheWeakHashedAlist, TheFinalizer, TheSocketServer, TheYetanother) + (TheStream, TheStructure, TheClosure, TheIclosure, TheCclosure) + (TheInstance, TheVarobject): Define using ngci_types_pointable. (TheSubr, TheFramepointer, TheMachine): Define using cgci_types_pointable. (ThePointer): Define using pgci_types_pointable. * subr.d (LISPFUN_F, LISPFUN_G) [TYPECODES]: Provide different definition if DEBUG_GCSAFETY. - * constsym.d (LISPSYM_B) [TYPECODES]: Provide different definition if - DEBUG_GCSAFETY. + * constsym.d (LISPSYM_B) [TYPECODES]: Provide different definition + if DEBUG_GCSAFETY. * genclisph.d (main): Update. Provide definitions for pointable_unchecked, pointable_address_unchecked, symbol_tab. @@ -508,9 +505,9 @@ * lispbibl.d (ANSIC_error): New declaration. * errunix.d [!UNIX]: Define only OS_error. * error.d [!UNIX]: Include errunix.c, to define ANSIC_error. - * stream.d (open_iconv, check_charset, iconv_mblen, iconv_mbstowcs, - iconv_wcslen, iconv_wcstombs, iconv_range, ChannelStream_fini): Undo - 2005-03-01 patch. Call ANSIC_error instead of OS_error. + * stream.d (open_iconv, check_charset, iconv_mblen, iconv_mbstowcs) + (iconv_wcslen, iconv_wcstombs, iconv_range, ChannelStream_fini): + Undo 2005-03-01 patch. Call ANSIC_error instead of OS_error. * makemake.in (ERROR_INCLUDES): Add errunix unconditionally. * win32.d: Undefine HAVE_ICONV, in case it's set by unixconf.h (on @@ -6703,7 +6700,7 @@ initff. (structure-effective-slot-definition-initff): Remove accessor. (structure-effective-slot-definition-readonly): Update. - (initialize-instance-<structure-effective-slot-definition>: Remove + (initialize-instance-<structure-effective-slot-definition>): Remove initff argument. (make-instance-<structure-effective-slot-definition>): Update. (make-load-form-<structure-effective-slot-definition>): Use @@ -8922,7 +8919,6 @@ (struct argv_initparams): Remove argv_stackneed. (parse_options): Drop support for option -s. (main): Don't reserve space for SP. Don't call setSP. - * ../doc/clisp.xml.in: Remove documentation of option -s. 2004-08-31 Bruno Haible <br...@cl...> @@ -22649,7 +22645,6 @@ (needs): drop .clisp and .clisp-full in favor of clisp.c (IMPNOTES_FILES) [win32]: added clisp.ico (clisp): new target - * doc/clisp.ico: new file 2002-08-05 Sam Steingold <sd...@gn...> @@ -27208,8 +27203,6 @@ * init.lisp: Load "international". * makemake.in (CPARTS): Add i18n. (LPARTS): Add international. - * ../doc/impext.xml: Rename section "The Language" to - "Internationalization". Add gettext binding documentation and example. 2001-08-05 Bruno Haible <ha...@cl...> @@ -29476,7 +29469,6 @@ 2000-05-11 Sam Steingold <sd...@gn...> * stream.d (socket_status): use HANDLE_SET & HANDLE_ISSET macros. - * ../doc/impext.xml: document LISP:SOCKET-STATUS. 2000-05-09 Sam Steingold <sd...@gn...> @@ -37030,7 +37022,6 @@ * linuxlibc6/link.sh, linuxlibc6/Makefile: Likewise. * clx/mit-clx/link.sh, clx/mit-clx/Makefile.clisp: Likewise. * clx/new-clx/link.sh, clx/new-clx/Makefile: Likewise. - * doc/module.txt, impnotes.html: Update. * _clisp.c: Ignore option -W. 1998-06-25 Bruno Haible <br...@li...> --__--__-- Message: 5 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc id-href-map.xsl,NONE,1.1 Makefile,1.64,1.65 Date: Thu, 16 Jun 2005 15:39:16 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15880/doc Modified Files: Makefile Added Files: id-href-map.xsl Log Message: (html): generate and upload id-href.map --- NEW FILE: id-href-map.xsl --- <!-- CLISP Implementation Notes multi-piece ID to HREF map generator --> <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0"> <xsl:output method="text" indent="no"/> <xsl:template match="div|obj"> <xsl:value-of select="@targetptr"/> <xsl:text> </xsl:text> <xsl:value-of select="@href"/> <xsl:text> </xsl:text> <xsl:apply-templates/> </xsl:template> <xsl:template match="ttl|xreftext"/> <xsl:strip-space elements="*"/> </xsl:stylesheet> Index: Makefile =================================================================== RCS file: /cvsroot/clisp/clisp/doc/Makefile,v retrieving revision 1.64 retrieving revision 1.65 diff -u -d -r1.64 -r1.65 --- Makefile 14 Apr 2005 16:51:16 -0000 1.64 +++ Makefile 16 Jun 2005 15:39:13 -0000 1.65 @@ -148,6 +148,7 @@ cd html && sed 's/^/ln -vf /' .symlinks | sh - $(XMLOUT) "olink-chunk.xml" --stringparam current.docid "impnotes" \ -o $@/ chunk.xsl $< + xsltproc --timing -o $@/id-href.map id-href-map.xsl tdb-chunk.xml $(XMLOUT) "olink-chunk.xml" --stringparam current.docid "man" \ -o $@/clisp.html pile.xsl clisp.xml sed $(SGML_UNCOMMENT) $@/clisp.html > _clisp-1.html @@ -157,7 +158,7 @@ # time xmlto xhtml -o $@/ -m chunk.xsl $< # time docbook2html --dsl impnotes.dsl -o $@ $< egrep -Hnr 'id="id[0-9]*"' $@ || true - (test -n "$(DIST)" && scp -p html/*.html impnotes.css \ + (test -n "$(DIST)" && scp -p html/*.html html/id-href.map impnotes.css \ $(DIST)/impnotes/;) || true up: impnotes.html html --__--__-- Message: 6 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc mop.xml,2.52,2.53 impext.xml,1.352,1.353 impbyte.xml,1.74,1.75 Date: Thu, 16 Jun 2005 16:06:05 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv30472/doc Modified Files: mop.xml impext.xml impbyte.xml Log Message: use &pri-val; for "first value" Index: impbyte.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/impbyte.xml,v retrieving revision 1.74 retrieving revision 1.75 diff -u -d -r1.74 -r1.75 --- impbyte.xml 14 May 2005 20:33:53 -0000 1.74 +++ impbyte.xml 16 Jun 2005 16:06:02 -0000 1.75 @@ -1304,7 +1304,7 @@ <listitem><simpara>an unsigned integer. </simpara></listitem></varlistentry> <varlistentry><term>&value1;</term> - <listitem><simpara>the first value, a &clisp; object. + <listitem><simpara>the &pri-val;, a &clisp; object. If &mv-count; = 0, this is &nil;.</simpara></listitem></varlistentry> <varlistentry><term>&mv-space;</term> <listitem><simpara>all values except the first one, an array of &clisp; Index: impext.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/impext.xml,v retrieving revision 1.352 retrieving revision 1.353 diff -u -d -r1.352 -r1.353 --- impext.xml 16 Jun 2005 13:37:16 -0000 1.352 +++ impext.xml 16 Jun 2005 16:06:01 -0000 1.353 @@ -4778,10 +4778,10 @@ <varlistentry><term><code>(&mk-pipe-io; &command-r; &key-amp; &eltype; &extfmt; &buffered;)</code></term> <listitem><simpara>returns three values. - The first value is a &bidi-s; that will simultaneously pass its output + The &pri-val; is a &bidi-s; that will simultaneously pass its output as input to the execution of the given operating system command and supply the output from this command as input. - The second and third value will be the &in-s; and the &out-s; that + The second and third value are the &in-s; and the &out-s; that make up the &bidi-s;, respectively.</simpara> <warning><simpara>These three streams must be closed individually.</simpara></warning> Index: mop.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/mop.xml,v retrieving revision 2.52 retrieving revision 2.53 diff -u -d -r2.52 -r2.53 --- mop.xml 3 Jan 2005 11:22:03 -0000 2.52 +++ mop.xml 16 Jun 2005 16:06:00 -0000 2.53 @@ -3332,14 +3332,14 @@ the classes of the required arguments.</simpara> <simpara>If it is possible to completely determine the ordered list of applicable methods based only on the supplied classes, this generic - function returns that list as its first value and true as its second + function returns that list as its &pri-val; and true as its second value. The returned list of &m-mo;s is sorted by precedence order, the most specific method coming first. If no methods are applicable to arguments with the specified classes, the empty list and true are returned.</simpara> <simpara>If it is not possible to completely determine the ordered list of applicable methods based only on the supplied classes, this - generic function returns an unspecified first value and false as its + generic function returns an unspecified &pri-val; and false as its second value.</simpara> <simpara>When a generic function is invoked, the discriminating function must determine the ordered list of methods applicable to the @@ -3352,7 +3352,7 @@ &compute-applicable-methods-UC; and &compute-applicable-methods-mop; must be maintained: for any given generic function and set of arguments, if &compute-applicable-methods-UC; returns a second value of true, - the first value must be equal to the value that would be returned by + the &pri-val; must be equal to the value that would be returned by a corresponding call to &compute-applicable-methods-mop;. The results are undefined if a portable method on either of these generic functions causes this consistency to be violated.</simpara> @@ -3369,7 +3369,7 @@ that could be applicable to arguments of the supplied classes, this method returns the ordered list of applicable methods as its first value and true as its second value.</simpara> - <simpara>Otherwise this method returns an unspecified first value and + <simpara>Otherwise this method returns an unspecified &pri-val; and false as its second value.</simpara> <simpara>This method can be overridden. Because of the consistency requirements between this generic function and @@ -3658,7 +3658,7 @@ the discriminating function then calls &compute-applicable-methods-mop;. </simpara><para>When &compute-applicable-methods-UC; returns a second value of true, the discriminating function is permitted to memoize - the first returned value as follows. The discriminating function may + the &pri-val; as follows. The discriminating function may reuse the list of applicable methods without calling &compute-applicable-methods-UC; again provided that: <orderedlist numeration="lowerroman"> --__--__-- Message: 7 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/src TODO,1.96,1.97 Date: Thu, 16 Jun 2005 16:36:29 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv14948/src Modified Files: TODO Log Message: get-charset-range: move the "caching" code to the test suite [bruno] Index: TODO =================================================================== RCS file: /cvsroot/clisp/clisp/src/TODO,v retrieving revision 1.96 retrieving revision 1.97 diff -u -d -r1.96 -r1.97 --- TODO 15 Jun 2005 16:21:18 -0000 1.96 +++ TODO 16 Jun 2005 16:36:26 -0000 1.97 @@ -10,6 +10,8 @@ workaround for an extra comma in _clisp.1 [sds] +get-charset-range: move the "caching" code to the test suite [bruno] + regression: resolution of logical pathnames is broken, try (compile-file (logical-pathname "SYS:FOO.LISP")) [sds] --__--__-- Message: 8 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc mop.xml,2.53,2.54 Date: Thu, 16 Jun 2005 19:23:04 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20364/doc Modified Files: mop.xml Log Message: DEFCLASS indentation Index: mop.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/mop.xml,v retrieving revision 2.53 retrieving revision 2.54 diff -u -d -r2.53 -r2.54 --- mop.xml 16 Jun 2005 16:06:00 -0000 2.53 +++ mop.xml 16 Jun 2005 19:22:48 -0000 2.54 @@ -806,8 +806,8 @@ to &ensure-class;.</simpara> <programlisting language="lisp"> (defclass plane (moving-object graphics-object) - ((altitude :initform 0 :accessor plane-altitude) - (speed)) + ((altitude :initform 0 :accessor plane-altitude) + (speed)) (:default-initargs :engine *jet*)) (ensure-class 'plane @@ -830,11 +830,11 @@ which are the values of those properties.</simpara> <programlisting language="lisp"> (defclass sst (plane) - ((mach mag-step 2 - locator sst-mach - locator mach-location - :reader mach-speed - :reader mach)) + ((mach mag-step 2 + locator sst-mach + locator mach-location + :reader mach-speed + :reader mach)) (:metaclass faster-class) (another-option foo bar)) @@ -3568,7 +3568,7 @@ <programlisting language="lisp"> (defclass my-generic-function (standard-generic-function) - () + () (:default-initargs :method-class (find-class 'my-method))) (defclass my-method (standard-method) ()) @@ -4743,9 +4743,9 @@ itself. <programlisting language="lisp"> (defclass ordered-class (standard-class) - ((slot-order :initform () - :initarg :slot-order - :reader class-slot-order))) + ((slot-order :initform () + :initarg :slot-order + :reader class-slot-order))) (defmethod compute-slots ((class ordered-class)) (let ((order (class-slot-order class))) @@ -4764,8 +4764,8 @@ <programlisting language="lisp"> (defclass point () - ((x :initform 0) - (y :initform 0)) + ((x :initform 0) + (y :initform 0)) (:metaclass ordered-class) (:slot-order x y)) @@ -4814,8 +4814,8 @@ <programlisting language="lisp"> (defclass constructor () - ((name :initarg :name :accessor constructor-name) - (fields :initarg :fields :accessor constructor-fields)) + ((name :initarg :name :accessor constructor-name) + (fields :initarg :fields :accessor constructor-fields)) (:metaclass funcallable-standard-class)) (defmethod initialize-instance :after ((c constructor) &key-amp;) @@ -5181,7 +5181,7 @@ <programlisting language="lisp"> (defclass updater () - ((dependent :initarg :dependent :reader dependent))) + ((dependent :initarg :dependent :reader dependent))) (defun record-updater (class dependee dependent &rest-amp; initargs) (let ((updater (apply #'make-instance class :dependent dependent --__--__-- Message: 9 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc impbyte.xml,1.75,1.76 Date: Thu, 16 Jun 2005 19:40:42 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29697 Modified Files: impbyte.xml Log Message: (immediate-o): new variablelist Index: impbyte.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/impbyte.xml,v retrieving revision 1.75 retrieving revision 1.76 diff -u -d -r1.75 -r1.76 --- impbyte.xml 16 Jun 2005 16:06:02 -0000 1.75 +++ impbyte.xml 16 Jun 2005 19:40:40 -0000 1.76 @@ -778,21 +778,32 @@ <section id="lisp-obj-in-c"><title>Lisp objects in &clisp;</title> <itemizedlist><title>Three kinds of storage are distinguished:</title> - <listitem><simpara>&clisp; data (the "heap"), i.e. storage which contains - Lisp objects and is managed by the garbage collector.</simpara></listitem> + <listitem><simpara>&clisp; data (the <quote>heap</quote>), i.e. storage + which contains &clisp; &object-t;s and is managed by the &gc;or. + </simpara></listitem> <listitem><simpara>&clisp; stack (called &STACK;), contains &clisp; - &object-t;s</simpara></listitem> + &object-t;s visible to the &gc;or</simpara></listitem> <listitem><simpara>&c-lang; data (including program text, data, &malloc;ed memory)</simpara></listitem> </itemizedlist> -<para>A &clisp; object is one word, containing a tag - (partial type information) and either immediate data - (e.g. &fixnum-t;s or &short-float-t;s) or a pointer to storage. +<para>A &clisp; object is one word, containing a tag (partial type +information) and either immediate data or a pointer to storage. Pointers to &c-lang; data have tag = <literal>machine_type</literal> = 0, pointers to &clisp; stack have tag = <literal>system_type</literal>, most other pointers point to &clisp; data.</para> +<variablelist id="immediate-o"><title>Immediate objects</title> +<varlistentry><term>32-bit CPU</term> + <listitem><para><simplelist columns="1"><member>&fixnum-t;</member> + <member>&short-float-t;</member><member>&character-t;</member> +</simplelist></para></listitem></varlistentry> +<varlistentry><term>64-bit CPU</term> + <listitem><para>In addition to the above, <simplelist columns="1"> + <member>&single-float-t; (with &typecodes;)</member> +</simplelist></para></listitem></varlistentry> +</variablelist> + <para>Let us turn to these &clisp; objects that consume regular &clisp; memory. Every &clisp; object has a size which is determined when the object is allocated (using one of the <function>allocate_*()</function> @@ -804,9 +815,9 @@ <para>&clisp; objects which contain exactly 2 &clisp; objects (i.e. &cons-t;es, &complex-t; numbers, &ratio-t;s) are stored in a separate area and occupy 2 words each. -All other &clisp; objects have "varying length" (more precisely, -not a fixed length) and include a word for &gc;ion purposes -at their beginning.</para> +All other &clisp; objects have <quote>varying</quote> length +(more precisely, not a fixed length) and include a word for &gc;ion +purposes at their beginning.</para> <para>The garbage collector is invoked by <function>allocate_*()</function> calls according to certain heuristics. --__--__-- Message: 10 From: Sam Steingold <sd...@us...> To: cli...@li... Subject: clisp/doc impent.xml,1.219,1.220 Date: Thu, 16 Jun 2005 19:43:46 +0000 Reply-To: cli...@li... Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31212 Modified Files: impent.xml Log Message: (immediate-o): new variablelist Index: impent.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/impent.xml,v retrieving revision 1.219 retrieving revision 1.220 diff -u -d -r1.219 -r1.220 --- impent.xml 6 May 2005 19:41:33 -0000 1.219 +++ impent.xml 16 Jun 2005 19:43:44 -0000 1.220 @@ -394,7 +394,7 @@ <!ENTITY RC-file "<olink targetdoc='man' targetptr='opt-norc'>RC file</olink>"> <!ENTITY my-compile-file "<olink targetdoc='impnotes' targetptr='compilefile'><function>COMPILE-FILE</function></olink>"> <!ENTITY bytecode "<olink targetdoc='impnotes' targetptr='bytecode'>bytecode</olink>"> -<!ENTITY immediate-o "<link linkend='lisp-obj-in-c'>immediate object</link>"> +<!ENTITY immediate-o "<link linkend='immediate-o'>immediate object</link>"> <!ENTITY fasthash-eq "<link linkend='make-hash'><constant>EXT:FASTHASH-EQ</constant></link>"> <!ENTITY stablehash-eq "<link linkend='make-hash'><constant>EXT:STABLEHASH-EQ</constant></link>"> <!ENTITY standard-stablehash "<link linkend='make-hash'><classname>EXT:STANDARD-STABLEHASH</classname></link>"> --__--__-- _______________________________________________ clisp-cvs mailing list cli...@li... https://lists.sourceforge.net/lists/listinfo/clisp-cvs End of clisp-cvs Digest |
