- Jul 24, 2003
-
-
gerd authored
calling (TIME NIL). * src/code/time.lisp (*time-consing*, *last-time-consing*): New vars. (get-time-consing): New function. (%time): Call it to get the additional consing overhead of %time. Subtract *time-consing* from the result unless null. Set *last-time-consing*.
-
- Jul 23, 2003
-
-
gerd authored
of nil. From Alexey Dejneka/SBCL. * src/code/array.lisp (make-array, adjust-array): Add supplied-p parameter for initial-contents and use it. (data-vector-from-inits): Add initial-contents-p parameter.
-
- Jul 21, 2003
-
-
gerd authored
can-set-function-end-breakpoint-p returns false. * src/code/debug-int.lisp (can-set-function-end-breakpoint-p): Return true of compiled-debug-function-returns is :standard.
-
- Jul 20, 2003
-
-
emarsden authored
defaults to nil.
-
emarsden authored
compiler notification function.
-
gerd authored
(declare (optimize (space 0) (speed 3))) (the integer (read-byte s)))) results in ; Warning: This is not a (VALUES INTEGER &REST T): ; NIL From Alexey Dejneka on cmucl-imp. * src/code/sysmacs.lisp (stream-dispatch): Use etypecase.
-
gerd authored
that can be different from the dynamic environment at the point where the user chooses one of the computed restarts. Effect: The debugger offers a restart, but complains that it isn't active when the restart is chosen. * src/code/error.lisp (%invoke-restart-interactively): New function. (invoke-restart-interactively): Use it. * src/code/debug.lisp (make-restart-commands): Use it.
-
- Jul 17, 2003
-
-
gerd authored
ignore element-type.
-
- Jul 16, 2003
-
-
pw authored
when host is "unix" magic host.
-
gerd authored
* src/compiler/fndb.lisp (last, butlast, nbutlast): Accept unsigned-byte counters. * src/code/list.lisp (last, butlast, nbutlast): Likewise.
-
gerd authored
so that we don't need its fdefn in cold init.
-
gerd authored
simple-program-error. * src/compiler/byte-comp.lisp (annotate-full-call): "Inline" slot accessors only if they are called with the right number of arguments.
-
- Jul 15, 2003
-
-
gerd authored
on interpreted functions.
-
gerd authored
type-error for invalid indices.
-
gerd authored
for argument count and keyword argument errors.
-
gerd authored
(parse-defmacro-lambda-list): Use it for min/max argument count checks.
-
emarsden authored
(needed by the byte interpreter). Fixes the following bug: (defun foo (x) (1+ (numerator x))) (let ((c::*byte-compile* t)) (compile 'foo)) (foo 2/3) => undefined function KERNEL:%NUMERATOR
-
gerd authored
Reported by Edi Weitz on cmucl-help. * src/code/defmacro.lisp (restify-dotted-lambda-list): New function. (parse-defmacro-lambda-list): Use it to tranform dotted lambda-list to undotted lambda-lists with &rest. Remove special handling of dotted lambda-lists.
-
- Jul 09, 2003
-
-
gerd authored
in the info database.
-
- Jul 03, 2003
- Jul 02, 2003
-
-
toy authored
of a double-float in multiple-values. This is better than calling double-float-high/low-bits which causes 2 stores to the stack to be done.
-
- Jul 01, 2003
-
-
gerd authored
Found by Paul Dietz, fixed by Alexey Dejneka in SBCL. * src/compiler/fndb.lisp (nth, nthcdr): First arg is unsigned-byte. * src/code/list.lisp (nthcdr): Cope with bignums.
-
- Jun 26, 2003
-
-
toy authored
Non-simple-streams-related changes: * Stop commands which go through invoke-command-interactive from affecting the history variables. * Fix some typos in comments * When the GC closes a lost stream, revert to original contents * Replace #+nil with #+(or) in unix*.lisp [NIL is a potentially valid feature name] Simple-streams-related changes: * Teach reader to handle simple-streams * Add missing package prefixes in OPEN * Add unix:unix-msync for force-output on mmapped files * Add placeholder documentation * Numerous changes in simple-streams implementation * Add "external-formats" directory for external formats Note: :BIG-ENDIAN or :LITTLE-ENDIAN should be put on *features*
-
- Jun 20, 2003
-
-
gerd authored
object that is an obsolete instances. Reported by Andre Valente on cmucl-imp. * src/code/defstruct.lisp (typep-to-layout): Add no-error arg. (%defstruct): Call typep-to-layout with no-error true.
-
- Jun 18, 2003
-
-
gerd authored
2003-06-17. * src/compiler/generic/objdef.lisp (weak-pointer): Add setters for value and broken. * src/code/weak.lisp (setf weak-pointer-value) (c::%set-weak-pointer-value, c::%set-weak-pointer-value): New functions.
-
gerd authored
-
gerd authored
package COMMON-LISP which LISP uses, so that COMMON-LISP no longer has the non-ANSI nickname LISP. To bootstrap, use boot13.lisp as target:bootstrap.lisp with pmai's build scripts, and do a full compile. * src/bootfiles/18e/boot13.lisp: Change for all the package changes. * src/code/exports.lisp: New package common-lisp, which lisp uses. * src/tools/worldload.lisp: * src/tools/setup.lisp: Use cl-user instead of user. Use lisp:: instead of cl::. * src/tools/worldcom.lisp: * src/tools/snapshot-update.lisp: * src/tools/pclcom.lisp: * src/tools/mk-lisp: * src/tools/hemcom.lisp: * src/tools/config.lisp: * src/tools/comcom.lisp: * src/tools/clxcom.lisp: * src/tools/clmcom.lisp: * src/pcl/defsys.lisp: * src/motif/lisp/initial.lisp: * src/interface/initial.lisp: * src/hemlock/lispmode.lisp (setup-lisp-mode): Use cl-user instead of user. * src/code/save.lisp (assert-user-package): * src/code/print.lisp (%with-standard-io-syntax): Find cl-user package instead of user. * src/code/package.lisp (package-locks-init): Add lisp. (package-init): Don't add user nickname to cl-user. * src/code/ntrace.lisp (*trace-encapsulate-package-names*): Add common-lisp. * src/code/hash.lisp (toplevel): * src/code/hash-new.lisp (toplevel): Use in-package :lisp instead of :common-lisp. * src/code/float-trap.lisp (sigfpe-handler): Don't qualify floating-point-inexact with ext:. * src/pcl/simple-streams/strategy.lisp (sc): * src/pcl/simple-streams/null.lisp (null-read-char): * src/pcl/simple-streams/internal.lisp (allocate-buffer) (free-buffer): * src/pcl/simple-streams/impl.lisp (%check, %read-line) (%peek-char, %read-byte): * src/pcl/simple-streams/file.lisp (open-file-stream) (device-close): * src/pcl/simple-streams/classes.lisp (simple-stream) (device-close): * src/pcl/macros.lisp (toplevel): * src/pcl/braid.lisp (lisp::sxhash-instance): * src/pcl/env.lisp (toplevel): * src/compiler/generic/objdef.lisp (symbol-hash): * src/code/stream.lisp (read-sequence, write-sequence): * src/code/macros.lisp (defmacro, deftype): * src/code/eval.lisp (interpreted-function): * src/code/defstruct.lisp (defstruct): * src/code/debug.lisp (debug-eval-print): Use lisp:: instead of cl::.
-
- Jun 16, 2003
-
-
gerd authored
with the constructor function instead of its name.
-
- Jun 15, 2003
-
-
gerd authored
-
- Jun 14, 2003
-
-
gerd authored
* src/code/package.lisp (relative-package-name-to-package): Handle the case of an empty name.
-
gerd authored
Found by Paul Dietz. * src/bootfiles/18e/boot13.lisp: New file. * src/code/reader.lisp (read-token) <RETURN-SYMBOL>: If the package name is "", use *keyword-package*.
-
gerd authored
return 0. From Wolfhard Buß on cmucl-imp. * src/code/seq.lisp (search-compare-list-list) (search-compare-list-vector, search-compare-vector-list) (search-compare-vector-vector): Reverse arguments to compare-elements.
-
- Jun 12, 2003
-
-
gerd authored
compiler.
-
- Jun 11, 2003
- Jun 10, 2003
-
-
toy authored
*default-pathname-defaults* changed from :newest to :unspecific, so merging doesn't automatically create versioned files. (extract-name-type-and-version): When no explicit version is given in a namestring, return version NIL instead of :NEWEST.
-
toy authored
o Fix a number of spelling errors. o Add EXT:PURGE-FILES (hmm, should that be renamed to purge-backup-files?) to delete old versions of files. o Opening a file with :if-exists :append shouldn't set the Unix append flag, else you can't seek back to a point before you started appending. (Actually from Rudi Schlatte.) o Fix a bug in logical pathname parsing. o Fix FASL-file versioning so we don't create versioned fasl files.
-