From: <cli...@li...> - 2008-06-13 19:16:47
|
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 Symbol-Table.text,1.27,1.28 (Sam Steingold) 2. clisp/doc Symbol-Table.text, 1.28, 1.29 impent.xml, 1.316, 1.317 impext.xml, 1.526, 1.527 (Sam Steingold) 3. clisp/modules/syscalls test.tst,1.67,1.68 (Sam Steingold) 4. clisp/src ChangeLog,1.6286,1.6287 (Sam Steingold) 5. clisp/modules/syscalls calls.c,1.228,1.229 (Sam Steingold) ---------------------------------------------------------------------- Message: 1 Date: Thu, 12 Jun 2008 19:10:28 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/doc Symbol-Table.text,1.27,1.28 To: cli...@li... Message-ID: <E1K...@ma...> Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv27942/doc Modified Files: Symbol-Table.text Log Message: MAKE-DIR -> MAKE-DIRECTORY; DELETE-DIR -> DELETE-DIRECTORY; RENAME-DIR -> RENAME-DIRECTORY Index: Symbol-Table.text =================================================================== RCS file: /cvsroot/clisp/clisp/doc/Symbol-Table.text,v retrieving revision 1.27 retrieving revision 1.28 diff -u -d -r1.27 -r1.28 --- Symbol-Table.text 5 Jun 2008 21:58:36 -0000 1.27 +++ Symbol-Table.text 12 Jun 2008 19:10:26 -0000 1.28 @@ -358,11 +358,11 @@ cd EXT:DEFAULT-DIRECTORY default-dir -EXT:MAKE-DIR +EXT:MAKE-DIRECTORY make-dir -EXT:DELETE-DIR +EXT:DELETE-DIRECTORY delete-dir -EXT:RENAME-DIR +EXT:RENAME-DIRECTORY rename-dir EXT:CHAR-KEY with-kbd ------------------------------ Message: 2 Date: Thu, 12 Jun 2008 19:11:20 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/doc Symbol-Table.text, 1.28, 1.29 impent.xml, 1.316, 1.317 impext.xml, 1.526, 1.527 To: cli...@li... Message-ID: <E1K...@ma...> Update of /cvsroot/clisp/clisp/doc In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv28361/doc Modified Files: Symbol-Table.text impent.xml impext.xml Log Message: (foreign-address-null): remove documentation of the deprecated function Index: impext.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/impext.xml,v retrieving revision 1.526 retrieving revision 1.527 diff -u -d -r1.526 -r1.527 --- impext.xml 11 Jun 2008 21:09:50 -0000 1.526 +++ impext.xml 12 Jun 2008 19:11:17 -0000 1.527 @@ -3014,13 +3014,6 @@ &c-lang; type of &cplace-r;, measured in bits. </simpara></listitem></varlistentry> -<varlistentry id="fa-null"> - <term><code>(&foreign-address-null; &f-ent;)</code></term> -<listitem><simpara>This predicate returns &t; if the - &f-ent; refers to the &c-NULL; address (and thus &f-ent; should - probably not be passed to most foreign functions). -</simpara></listitem></varlistentry> - <varlistentry id="faddr-u"> <term><code>(&foreign-address-unsigned; &f-ent;)</code></term> <term><code>(&unsigned-foreign-address; &number-r;)</code></term> Index: impent.xml =================================================================== RCS file: /cvsroot/clisp/clisp/doc/impent.xml,v retrieving revision 1.316 retrieving revision 1.317 diff -u -d -r1.316 -r1.317 --- impent.xml 12 Jun 2008 16:26:12 -0000 1.316 +++ impent.xml 12 Jun 2008 19:11:17 -0000 1.317 @@ -581,7 +581,6 @@ <!ENTITY f-ptr '<replaceable>foreign-pointer</replaceable>'> <!ENTITY set-foreign-pointer '<link linkend="fptr"><function>FFI:SET-FOREIGN-POINTER</function></link>'> <!ENTITY foreign-address '<link linkend="faddr"><function>FFI:FOREIGN-ADDRESS</function></link>'> -<!ENTITY foreign-address-null '<link linkend="fa-null"><function>FFI:FOREIGN-ADDRESS-NULL</function></link>'> <!ENTITY foreign-address-t '<link linkend="faddr"><classname>FFI:FOREIGN-ADDRESS</classname></link>'> <!ENTITY foreign-address-unsigned '<link linkend="faddr-u"><function>FFI:FOREIGN-ADDRESS-UNSIGNED</function></link>'> <!ENTITY foreign-value '<link linkend="foreign-value"><function>FFI:FOREIGN-VALUE</function></link>'> Index: Symbol-Table.text =================================================================== RCS file: /cvsroot/clisp/clisp/doc/Symbol-Table.text,v retrieving revision 1.28 retrieving revision 1.29 diff -u -d -r1.28 -r1.29 --- Symbol-Table.text 12 Jun 2008 19:10:26 -0000 1.28 +++ Symbol-Table.text 12 Jun 2008 19:11:17 -0000 1.29 @@ -786,8 +786,6 @@ sizeof FFI:BITSIZEOF bitsizeof -FFI:FOREIGN-ADDRESS-NULL -fa-null FFI:UNSIGNED-FOREIGN-ADDRESS faddr-u FFI:FOREIGN-ADDRESS-UNSIGNED ------------------------------ Message: 3 Date: Fri, 13 Jun 2008 18:11:56 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/modules/syscalls test.tst,1.67,1.68 To: cli...@li... Message-ID: <E1K...@ma...> Update of /cvsroot/clisp/clisp/modules/syscalls In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv7281/modules/syscalls Modified Files: test.tst Log Message: (jN 2 1): accommodatate win32 Index: test.tst =================================================================== RCS file: /cvsroot/clisp/clisp/modules/syscalls/test.tst,v retrieving revision 1.67 retrieving revision 1.68 diff -u -d -r1.67 -r1.68 --- test.tst 11 Jun 2008 20:47:27 -0000 1.67 +++ test.tst 13 Jun 2008 18:11:53 -0000 1.68 @@ -140,8 +140,8 @@ (float= (os:j1 1.0) 0.4400505857449335d0) T (float= (os:jN 0 0) 1.0d0) T (float= (os:jN 1 1.0) 0.4400505857449335d0) T -(float= (os:jN 2 1.0) 0.11490348493190049d0) T -(float= (os:jN 2 1) 0.11490348493190049d0) T +(float= (os:jN 2 1.0) 0.11490348493190048d0) T +(float= (os:jN 2 1) 0.11490348493190048d0) T (float= (os:jN 2 0) 0.0d0) T (float~ (os:y0 1.0) 0.08825696421567696d0) T (float~ (os:y0 10.0) 0.055671167283599395d0) T ------------------------------ Message: 4 Date: Fri, 13 Jun 2008 19:15:02 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/src ChangeLog,1.6286,1.6287 To: cli...@li... Message-ID: <E1K...@ma...> Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv30837/src Modified Files: ChangeLog Log Message: (check_errno) [WIN32_NATIVE]: #include <winerror.h>, drop prefix=ERROR, and use cygwin cvs tree to define many more codes Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.6286 retrieving revision 1.6287 diff -u -d -r1.6286 -r1.6287 --- ChangeLog 11 Jun 2008 22:50:51 -0000 1.6286 +++ ChangeLog 13 Jun 2008 19:14:59 -0000 1.6287 @@ -1,3 +1,9 @@ +2008-06-13 Sam Steingold <sd...@gn...> + + * modules/syscalls/calls.c (check_errno) [WIN32_NATIVE]: + #include <winerror.h>, drop prefix=ERROR, + and use cygwin cvs tree to define many more codes + 2008-06-11 Sam Steingold <sd...@gn...> * modules/syscalls/calls.c (GETHOSTID): ------------------------------ Message: 5 Date: Fri, 13 Jun 2008 19:15:03 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/modules/syscalls calls.c,1.228,1.229 To: cli...@li... Message-ID: <E1K...@ma...> Update of /cvsroot/clisp/clisp/modules/syscalls In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv30837/modules/syscalls Modified Files: calls.c Log Message: (check_errno) [WIN32_NATIVE]: #include <winerror.h>, drop prefix=ERROR, and use cygwin cvs tree to define many more codes Index: calls.c =================================================================== RCS file: /cvsroot/clisp/clisp/modules/syscalls/calls.c,v retrieving revision 1.228 retrieving revision 1.229 diff -u -d -r1.228 -r1.229 --- calls.c 11 Jun 2008 22:50:50 -0000 1.228 +++ calls.c 13 Jun 2008 19:15:00 -0000 1.229 @@ -4189,184 +4189,944 @@ #if (defined(HAVE_ERRNO_H) && defined(HAVE_STRERROR)) || defined(WIN32_NATIVE) /* http://www.opengroup.org/onlinepubs/009695399/basedefs/errno.h.html */ #if defined(WIN32_NATIVE) -DEFCHECKER(check_errno,type=DWORD,prefix=ERROR,reverse=uint32_to_I, \ - /* http://msdn.microsoft.com/en-us/library/aa914935.aspx */ \ - ACCESS_DENIED ACCOUNT_DISABLED ACCOUNT_EXPIRED ACCOUNT_LOCKED_OUT \ - ACCOUNT_RESTRICTION ACTIVE_CONNECTIONS ADAP_HDW_ERR \ - ADDRESS_ALREADY_ASSOCIATED ADDRESS_NOT_ASSOCIATED ALIAS_EXISTS \ - ALLOTTED_SPACE_EXCEEDED ALREADY_ASSIGNED ALREADY_EXISTS \ - ALREADY_INITIALIZED ALREADY_REGISTERED ALREADY_RUNNING_LKG \ - ALREADY_WAITING APP_WRONG_OS ARENA_TRASHED ARITHMETIC_OVERFLOW \ [...1091 lines suppressed...] + ERROR_SXS_XML_E_MISSINGROOT ERROR_SXS_XML_E_UNEXPECTEDEOF \ + ERROR_SXS_XML_E_BADPEREFINSUBSET ERROR_SXS_XML_E_UNCLOSEDSTARTTAG \ + ERROR_SXS_XML_E_UNCLOSEDENDTAG ERROR_SXS_XML_E_UNCLOSEDSTRING \ + ERROR_SXS_XML_E_UNCLOSEDCOMMENT ERROR_SXS_XML_E_UNCLOSEDDECL \ + ERROR_SXS_XML_E_UNCLOSEDCDATA ERROR_SXS_XML_E_RESERVEDNAMESPACE \ + ERROR_SXS_XML_E_INVALIDENCODING ERROR_SXS_XML_E_INVALIDSWITCH \ + ERROR_SXS_XML_E_BADXMLCASE ERROR_SXS_XML_E_INVALID_STANDALONE \ + ERROR_SXS_XML_E_UNEXPECTED_STANDALONE \ + ERROR_SXS_XML_E_INVALID_VERSION ERROR_SXS_XML_E_MISSINGEQUALS \ + ERROR_SXS_PROTECTION_RECOVERY_FAILED \ + ERROR_SXS_PROTECTION_PUBLIC_KEY_TOO_SHORT \ + ERROR_SXS_PROTECTION_CATALOG_NOT_VALID \ + ERROR_SXS_UNTRANSLATABLE_HRESULT \ + ERROR_SXS_PROTECTION_CATALOG_FILE_MISSING \ + ERROR_SXS_MISSING_ASSEMBLY_IDENTITY_ATTRIBUTE \ + ERROR_SXS_INVALID_ASSEMBLY_IDENTITY_ATTRIBUTE_NAME \ + ) # define errno_to_I uint32_to_I #else DEFCHECKER(check_errno, E2BIG EACCES EADDRINUSE EADDRNOTAVAIL EAFNOSUPPORT \ ------------------------------ ------------------------------------------------------------------------- Check out the new SourceForge.net Marketplace. It's the best place to buy or sell services for just about anything Open Source. http://sourceforge.net/services/buy/index.php ------------------------------ _______________________________________________ clisp-cvs mailing list cli...@li... https://lists.sourceforge.net/lists/listinfo/clisp-cvs End of clisp-cvs Digest, Vol 26, Issue 15 ***************************************** |