|
From: <cli...@li...> - 2010-12-30 12:05:19
|
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/src ChangeLog,1.7587,1.7588 (Sam Steingold) 2. clisp/src ChangeLog,1.7588,1.7589 (Sam Steingold) 3. clisp/src pathname.d,1.527,1.528 ChangeLog,1.7589,1.7590 (Arseny Slobodyuk) ---------------------------------------------------------------------- Message: 1 Date: Wed, 29 Dec 2010 14:47:21 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/src ChangeLog,1.7587,1.7588 To: cli...@li... Message-ID: <E1P...@sf...> Update of /cvsroot/clisp/clisp/src In directory sfp-cvsdas-2.v30.ch3.sourceforge.com:/tmp/cvs-serv30867 Modified Files: ChangeLog Log Message: typos Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.7587 retrieving revision 1.7588 diff -u -d -r1.7587 -r1.7588 --- ChangeLog 29 Dec 2010 05:30:03 -0000 1.7587 +++ ChangeLog 29 Dec 2010 14:47:18 -0000 1.7588 @@ -1,9 +1,9 @@ 2010-12-29 Arseny Slobodyuk <am...@us...> - Fix for bug #3144993: OS:FILE-INFO crashes when file's times + Fix for bug#3144993: OS:FILE-INFO crashes when file's times are corrupted (Y2.04k bug) * time.d (convert_time_to_universal) [WIN32_NATIVE]: use 64 bit - when dividing ticks by ticks_per_second, because universal time + when dividing ticks by ticks_per_second, because universal time exceeds 32 bits around year 2035. 2010-12-10 Sam Steingold <sd...@gn...> @@ -12,7 +12,7 @@ * init.lisp (open-for-load): accept ignore-pathname-defaults and do not call MERGE-PATHNAMES if it is non-NIL; use PROBE-PATHNAME instead of DIRECTORY to probe for a directory - (load): ccept :IGNORE-PATHNAME-DEFAULTS and pass it to OPEN-FOR-LOAD; + (load): accept :IGNORE-PATHNAME-DEFAULTS and pass it to OPEN-FOR-LOAD; pathname merging is done in OPEN-FOR-LOAD (search-file): call PATHNAME instead of MERGE-PATHNAMES on the argument to avoid being killed by *DEFAULT-PATHNAME-DEFAULTS* ------------------------------ Message: 2 Date: Thu, 30 Dec 2010 01:43:42 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/src ChangeLog,1.7588,1.7589 To: cli...@li... Message-ID: <E1P...@sf...> Update of /cvsroot/clisp/clisp/src In directory sfp-cvsdas-2.v30.ch3.sourceforge.com:/tmp/cvs-serv27250 Modified Files: ChangeLog Log Message: typos Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.7588 retrieving revision 1.7589 diff -u -d -r1.7588 -r1.7589 --- ChangeLog 29 Dec 2010 14:47:18 -0000 1.7588 +++ ChangeLog 30 Dec 2010 01:43:39 -0000 1.7589 @@ -16000,7 +16000,7 @@ config.status failed with error: `CFLAGS' was not set in the previous run This is a partial reversal of the 2005-10-07 patch (dependency of - C files on on config.h are kept). + C files on config.h are kept). 2005-10-11 Sam Steingold <sd...@gn...> @@ -21266,7 +21266,7 @@ (c-HANDLER-BIND): handle HANDLER-BIND in function syntax * init.lisp (%expand-form): do not handle %HANDLER-BIND specially * clos-class3.lisp (reinitialize-instance-<defined-class>): - use use the function syntax for %HANDLER-BIND + use the function syntax for %HANDLER-BIND * clos-genfun4.lisp (generic-function-undeterminedp): ditto * clos-methcomb2.lisp (any-method-combination-check-options): ditto @@ -33240,7 +33240,7 @@ 2004-03-18 Sam Steingold <sd...@gn...> * io.d (circle_p): when SYS::*PRINT-CIRCLE-TABLE* is NIL, assume - that the the object has no circularities and print it normally + that the object has no circularities and print it normally (pr_enter_2): bind SYS::*PRINT-CIRCLE-TABLE* to NIL when there are no circularities but *PRINT-READABLY* is non-NIL @@ -34707,7 +34707,7 @@ (c-bind-with-svars, c-UNWIND-PROTECT, c-MULTIPLE-VALUE-PROG1): use it (c-VARSET): set SECLASS-USES-BINDING for SPECIAL variables (c-PROGV, c-parallel-bind-movable-var-anode): - check both both USES and USES-BINDING + check both USES and USES-BINDING (c-FUNCTION, c-HANDLER-BIND): use *SECLASS-READ* instead of a literal (f-side-effect, c-unlist, c-DEFUN, c-RETURN-FROM, c-GO): use *SECLASS-DIRTY* instead of a literal @@ -36674,7 +36674,7 @@ (fehler_undef_function, fehler_kein_symbol, fehler_function) (test_symbol_non_constant): remove (check_symbol_non_constant, check_fdefinition, check_function): add - (COERCE): use use check_fdefinition() + (COERCE): use check_fdefinition() instead of fehler_undef_function() * record.d (MAKE-MACRO, MAKE-FUNCTION-MACRO): use check_function() instead of fehler_function() @@ -37037,7 +37037,7 @@ (DIR-KEY-OPEN, DKEY-SEARCH-ITERATOR, init_iteration_node) (DIR-KEY-VALUE, SET-DKEY-VALUE, REG_KEY_DEL): use check_string() instead of fehler_string() - * eval.d (SPECIAL-VARIABLE-P): use use check_symbol() + * eval.d (SPECIAL-VARIABLE-P): use check_symbol() instead of test_symbol() (sym_value_place, check_local_symbol_value): new functions (sym_value): now a macro that calls sym_value_place() @@ -40826,7 +40826,7 @@ 2002-06-12 Sam Steingold <sd...@gn...> - * lispbibl.d (schar): match the cast in return the the return type + * lispbibl.d (schar): match the cast in return with the return type 2002-06-12 Arseny Slobodjuck <am...@ic...> ------------------------------ Message: 3 Date: Thu, 30 Dec 2010 05:34:03 +0000 From: Arseny Slobodyuk <am...@us...> Subject: clisp/src pathname.d,1.527,1.528 ChangeLog,1.7589,1.7590 To: cli...@li... Message-ID: <E1P...@sf...> Update of /cvsroot/clisp/clisp/src In directory sfp-cvsdas-2.v30.ch3.sourceforge.com:/tmp/cvs-serv26024 Modified Files: pathname.d ChangeLog Log Message: Condition fix in classify_namestring Index: pathname.d =================================================================== RCS file: /cvsroot/clisp/clisp/src/pathname.d,v retrieving revision 1.527 retrieving revision 1.528 diff -u -d -r1.527 -r1.528 --- pathname.d 2 Dec 2010 01:16:05 -0000 1.527 +++ pathname.d 30 Dec 2010 05:33:56 -0000 1.528 @@ -5999,7 +5999,7 @@ end_blocking_system_call(); if (success) { /* file exists. */ if (fwd) *fwd = convert_time_to_universal( - filedata.ftLastWriteTime.dwLowDateTime + filedata.ftLastWriteTime.dwHighDateTime || filedata.ftLastWriteTime.dwLowDateTime ? &filedata.ftLastWriteTime : &filedata.ftCreationTime); if (fsize) *fsize = off_to_I( Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.7589 retrieving revision 1.7590 diff -u -d -r1.7589 -r1.7590 --- ChangeLog 30 Dec 2010 01:43:39 -0000 1.7589 +++ ChangeLog 30 Dec 2010 05:33:58 -0000 1.7590 @@ -1,3 +1,7 @@ +2010-12-30 Arseny Slobodyuk <am...@us...> + + * pathname.d (classify_namestring) [WIN32_NATIVE]: fixed condition. + 2010-12-29 Arseny Slobodyuk <am...@us...> Fix for bug#3144993: OS:FILE-INFO crashes when file's times ------------------------------ ------------------------------------------------------------------------------ Learn how Oracle Real Application Clusters (RAC) One Node allows customers to consolidate database storage, standardize their database environment, and, should the need arise, upgrade to a full multi-node Oracle RAC database without downtime or disruption http://p.sf.net/sfu/oracle-sfdevnl ------------------------------ _______________________________________________ clisp-cvs mailing list cli...@li... https://lists.sourceforge.net/lists/listinfo/clisp-cvs End of clisp-cvs Digest, Vol 56, Issue 7 **************************************** |