- Apr 02, 2008
- Apr 01, 2008
-
-
cshapiro authored
across function calls. Make it so. With this change we set the direction flag only when needed and clear it immediately after its use. VOPs can now assume that the direction flag is always set to zero. Also, replace two uses of the LODS instruction with equivalent simpler instructions.
-
cshapiro authored
from the current string hash function. The use of this instruction was a holdover from the old string hash function and does not have an effect on the current implementation.
-
- Mar 28, 2008
-
-
rtoy authored
-
- Mar 26, 2008
-
-
rtoy authored
args.
-
- Mar 25, 2008
-
-
agoncharov authored
-
rtoy authored
http://article.gmane.org/gmane.lisp.cmucl.devel/10471. These changes make the compiler and interpreter behave the same, and, as a side-effect, makes Nicolas's code work as he wants. pcl/slots.lisp: o Add LEGAL-SLOT-NAME-P-INTERNAL that returns two values. If the slot-name is legal, return T. If illegal, return NIL and a string indicating why. o Use this new function in the compiler macros for SLOT-VALUE, (SETF SLOT-VALUE) and SLOT-BOUNDP so that we use the fast ACCESSOR-* versions only when we know the slot-name is legal. Otherwise, the compiler macros give up. pcl/methods.lisp: o Change the method LEGAL-SLOT-NAME-P to use LEGAL-SLOT-NAME-P-INTERNAL. o Update the call to LEGAL-SLOT-NAME-P in SHARED-INITIALIZE since LEGAL-SLOT-NAME-P returns 2 values now.
-
- Mar 21, 2008
- Mar 19, 2008
-
-
cshapiro authored
void keyword to specify empty parameter lists.
-
- Mar 18, 2008
-
-
cshapiro authored
make direct use of. Remove the includes of these headers and fix-up several files that indirectly depended on them. * FreeBSD-os.c - add stdio.h and unistd.h includes that were implicitly depended on. Remove unused or commented system includes. * FreeBSD-os.h - remove unused includes. Include signal.h to directly provide the SIGBUS, SIGSEGV, and sub-code definitions. Redefine os_vm_address_t and os_vm_size_t in terms of standard types. Now that the sys/param.h include is gone we no longer need to undefine PAGE_SIZE. * elf.c - add includes that were implicitly depended on. * lisp.c - remove unused system includes including sys/param.h which redefines PAGE_SIZE.
-
cshapiro authored
by ANSI C and usually expands to the same value as MAXPATHLEN.
-
cshapiro authored
include search paths.
-
cshapiro authored
register as an argument to FNSTSW. Make it so.
-
cshapiro authored
-
cshapiro authored
is required by all systems.
-
- Mar 16, 2008
-
-
agoncharov authored
the next version.
-
rtoy authored
-
rtoy authored
-
- Mar 15, 2008
-
-
agoncharov authored
* Eliminate `printf' format string and the following arguments conflicts. * A variable may be used uninitialized. * A variable may be defined but not used.
-
- Mar 13, 2008
-
-
rtoy authored
10^66-1. 10^63 is a vigintillion. (From SBCL).
-
rtoy authored
exceeding the specified width. I think the correct answer is ".0000". So, add a parameter, allow-overflow-p, to FLONUM-TO-STRING to allow the width constraint to be exceeded. This defaults to T. FLONUM-TO-STRING looks at this and decides whether or not to print out all the leading zeroes or not. In FIXED-FORMAT-AUX, set allow-overflow-p to NIL so we don't exceed the width. I wish there were another way to do this, but I can't think of one right now. All print tests pass, and add the following test: (format nil "~5F" 1d-10) -> ".0000" print.lisp: o Change FLONUM-TO-STRING to use keyword parameters instead of optional parameters. o Add :ALLOW-OVERFLOW-P, defaulting to T. o Use :ALLOW-OVERFLOW-P to determine if all the leading zeroes should be printed or not. format.lisp: o Update calls to FLONUM-TO-STRING to use keywords parameters. o In FIXED-FORMAT-AUX, set :ALLOW-OVERFLOW-P to NIL
-
- Mar 05, 2008
-
-
rtoy authored
simple. Can't derive the actual dimensions because a subsequent adjust-array could change the dimensions.
-
- Mar 03, 2008
-
-
rtoy authored
want to print ", @foo" not ",@foo". Similarly, for .foo, we want to print ", .foo" instead of ",.foo".
-
- Feb 29, 2008
- Feb 28, 2008
-
-
rtoy authored
-
- Feb 27, 2008
-
-
cshapiro authored
-
rtoy authored
failure instead of -1.
-
rtoy authored
-
rtoy authored
Basically caused by a change of exponent due rounding of the number for printing. 0.999999 might get printed as 1.000. The original number had an exponent of -1, but the printed number has an exponent of 0, and we need to account for this. code/print.lisp: o Modify FLONUM-TO-STRING to take into account of the actual and printed exponent of the number. Return an extra value to indicate if rounding has the exponent to change. code/format.lisp: o Use the new return value from FLONUM-TO-STRING to tell us if we need to adjust the printed exponent to account for the rounding change. All print tests still pass, and we add the following tests: (assert (string= (format nil "~11,3,2,0,'*,,'EE" .99) " 0.990E+00")) (assert (string= (format nil "~11,3,2,0,'*,,'EE" .999) " 0.999E+00")) (assert (string= (format nil "~11,3,2,0,'*,,'EE" .9999) " 0.100E+01")) (assert (string= (format nil "~11,3,2,0,'*,,'EE" .0000999) " 0.999E-04")) (assert (string= (format nil "~11,3,2,0,'*,,'EE" .00009999) " 0.100E-03")) (assert (string= (format nil "~11,3,2,,'*,,'EE" .00009999) " 9.999E-05")) (assert (string= (format nil "~11,3,2,,'*,,'EE" .000099999) " 1.000E-04"))
-
- Feb 14, 2008
- Feb 13, 2008
- Feb 09, 2008
-
-
rtoy authored
for linkage-tables, so protect that. o INIT-FOREIGN-LINKAGE is for linkage-tables.
-
- Feb 08, 2008
-
-
rtoy authored
intentionally included multiple times in undefineds.c and is expected to do something each time. o Add mprotect o Add a few more functions for sparc that were missing. (Only matters for non-linkage-table builds. Shouldn't have any affect on linkage-table builds.)
-