- Jun 18, 2003
-
-
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 17, 2003
-
-
gerd authored
slot-missing with value being assigned.
-
gerd authored
(slot-makunbound, slot-exists-p): Declaim ftypes.
-
gerd authored
for the corrected return values of slot-value, (setf slot-value), slot-boundp in the case slot-missing is called.
-
gerd authored
New environments. (defgenericx, defmethodx): New commands. * src/docs/cmu-user/extensions.tex (Primary Method Errors): New subsection.
-
gerd authored
* src/pcl/defcombin.lisp (compute-effective-method): Use %no-primary-method.
-
- Jun 16, 2003
-
-
gerd authored
with the constructor function instead of its name.
-
- Jun 15, 2003
-
-
gerd authored
returning values specified by the standard when SLOT-MISSING/SLOT-UNBOUND are called and return. Found by Paul Dietz. * src/pcl/std-class.lisp (compute-effective-slot-definition): Return slot-unbound's primary value. * src/pcl/slots.lisp (slot-value): Return slot-missing's primary value. (set-slot-value): Always return the new value. (slot-boundp): Return a boolean equivalent of slot-missing's primary value. (slot-makunbound): Always return the instance. (slot-value-using-class): Return slot-unbound's primary value. (slot-unbound-internal): Likewise. * src/pcl/slots-boot.lisp (ensure-accessor): Return slot-missing's primary value for slot-value, a boolean equivalent of its primary value for slot-boundp, and always return the value for setf. (accessor-set-slot-value): Always return the new value. (make-optimized-std-reader-method-function): Return slot-unbound's primary value. (make-optimized-std-slot-value-using-class-method-function) (make-internal-reader-method-function): Likewise. * src/pcl/method-slot-access-optimization.lisp (inline-slot-unbound): Return slot-unbound's primary value.
-
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 13, 2003
- Jun 12, 2003
- Jun 11, 2003
-
-
gerd authored
* src/pcl/defs.lisp (slot-class): Remove unused slot initialize-info. * src/pcl/generic-functions.lisp (setf class-initialize-info) (class-initialize-info): Remove. * src/pcl/braid.lisp (bootstrap-initialize-class): Don't set the slot.
-
toy authored
-
toy authored
purge-files, which is just too vague. (directory): Specify a default-version of :WILD for merge-pathnames to make sure we can match any version when looking for files.
-
emarsden authored
-
emarsden authored
(stream::%charpos etc), to avoid compiler warnings when rebuilding without PCL.
-
emarsden authored
-
emarsden authored
-
emarsden authored
- update for new function names (esp for CLOS code) - XREF-CONTEXT structures are now dumpable (to save information in FASL form) - reverse who-calls now uses a dedicated hash-table instead of looking for source code on disk - add WHO-MACROEXPANDS The code still isn't very clever about discarding compiler-generated function calls in CLOS code.
-
emarsden authored
-
- 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.
-
gerd authored
-
gerd authored
-
gerd authored
* src/pcl/std-class.lisp (ensure-class): Redefine a class only if the specified name is the proper name of the class.
-
- Jun 08, 2003
-
-
gerd authored
From Alexey Dejneka in SBCL. * src/compiler/disassem.lisp (fun-address): Deal with closures and funcallable instances.
-
gerd authored
-
gerd authored
(declaim (optimize (speed 3) (debug 0) (safety 0))) (defparameter x 10) (defun df-square (x) (declare (type double-float x)) (* x x)) used to print a long list of optimization notes because the double-float declaration for X was effectively swept under the carpet. From Alexey Dejneka in SBCL. * src/compiler/ir1tran.lisp (process-type-declaration): Apply type declaration to special variable bindings as well.
-
toy authored
-
- Jun 07, 2003
-
-
toy authored
o An update to fix Gerd's complaint about :simple-streams being on *features* o Corrects a few bugs o Renames all the strategy functions o Gets rid of DEVICE-EXTEND (Duane Rettig tells me it's going away in the next ACL release) o A start on getting stream& composition working.
-
gerd authored
Check return value of syscalls for -1 instead of < 0. * src/code/unix.lisp (quad-t) [#+bsd]: Removed. (int64-t, u-int64-t): Added. (off-t): Define as int64-t for BSDs. (file-offset): New deftype; (signed-byte 64) for BSDs, (signed-byte 32) otherwise. (unix-mmap): Remove FreeBSD version. Move down after the definition of the syscall macro. (%syscall): New macro. Test return value for being -1 instead of being < 0. (syscall): Use it. (off-t-syscall): New macro. (unix-lseek): Remove BSD-specific version. Use off-t-syscall.
-
- Jun 06, 2003