/[cmucl]/src/pcl/env.lisp
ViewVC logotype

Log of /src/pcl/env.lisp

Parent Directory Parent Directory | Revision Log Revision Log


Links to HEAD: (view) (annotate)
Links to label-2009-03-16: (view) (annotate)
Sticky Tag:

Revision 1.26 - (view) (annotate) - [select for diffs]
Wed Jun 18 09:23:09 2003 UTC (10 years, 10 months ago) by gerd
Branch: MAIN
CVS Tags: RELEASE_19f, RELEASE_20a, amd64-dd-start, amd64-merge-start, double-double-array-base, double-double-array-checkpoint, double-double-base, double-double-init-%make-sparc, double-double-init-checkpoint-1, double-double-init-ppc, double-double-init-sparc, double-double-init-sparc-2, double-double-init-x86, double-double-irrat-end, double-double-irrat-start, double-double-reader-base, double-double-reader-checkpoint-1, double-double-sparc-checkpoint-1, dynamic-extent-base, intl-2-branch-base, intl-branch-base, label-2009-03-16, label-2009-03-25, lisp-executable-base, merge-sse2-packed, merge-with-19f, merged-unicode-utf16-extfmt-2009-06-11, mod-arith-base, portable-clx-base, portable-clx-import-2009-06-16, ppc_gencgc_snap_2005-05-14, ppc_gencgc_snap_2005-12-17, ppc_gencgc_snap_2006-01-06, pre-merge-intl-branch, pre-telent-clx, prm-before-macosx-merge-tag, release-19a, release-19a-base, release-19a-pre1, release-19a-pre2, release-19a-pre3, release-19b-base, release-19b-pre1, release-19b-pre2, release-19c, release-19c-base, release-19c-pre1, release-19d, release-19d-base, release-19d-pre1, release-19d-pre2, release-19e, release-19e-base, release-19e-pre1, release-19e-pre2, release-19f-base, release-19f-pre1, release-20a-base, release-20a-pre1, snapshot-2003-10, snapshot-2003-11, snapshot-2003-12, snapshot-2004-04, snapshot-2004-05, snapshot-2004-06, snapshot-2004-07, snapshot-2004-08, snapshot-2004-09, snapshot-2004-10, snapshot-2004-11, snapshot-2004-12, snapshot-2005-01, snapshot-2005-02, snapshot-2005-03, snapshot-2005-04, snapshot-2005-05, snapshot-2005-06, snapshot-2005-07, snapshot-2005-08, snapshot-2005-09, snapshot-2005-10, snapshot-2005-11, snapshot-2005-12, snapshot-2006-01, snapshot-2006-02, snapshot-2006-03, snapshot-2006-04, snapshot-2006-05, snapshot-2006-06, snapshot-2006-07, snapshot-2006-08, snapshot-2006-09, snapshot-2006-10, snapshot-2006-11, snapshot-2006-12, snapshot-2007-01, snapshot-2007-02, snapshot-2007-03, snapshot-2007-04, snapshot-2007-05, snapshot-2007-06, snapshot-2007-07, snapshot-2007-08, snapshot-2007-09, snapshot-2007-10, snapshot-2007-11, snapshot-2007-12, snapshot-2008-01, snapshot-2008-02, snapshot-2008-03, snapshot-2008-04, snapshot-2008-05, snapshot-2008-06, snapshot-2008-07, snapshot-2008-08, snapshot-2008-09, snapshot-2008-10, snapshot-2008-11, snapshot-2008-12, snapshot-2009-01, snapshot-2009-02, snapshot-2009-04, snapshot-2009-05, snapshot-2009-07, snapshot-2009-08, snapshot-2009-11, snapshot-2009-12, snapshot-2010-01, snapshot-2010-02, snapshot-2010-03, sparc_gencgc, sparc_gencgc_merge, sse2-base, sse2-checkpoint-2008-10-01, sse2-merge-with-2008-10, sse2-merge-with-2008-11, sse2-packed-2008-11-12, sse2-packed-base, unicode-snapshot-2009-05, unicode-snapshot-2009-06, unicode-string-buffer-base, unicode-string-buffer-impl-base, unicode-utf16-base, unicode-utf16-char-support-2009-03-25, unicode-utf16-char-support-2009-03-26, unicode-utf16-extfmt-2009-03-27, unicode-utf16-extfmt-2009-06-11, unicode-utf16-extfmts-pre-sync-2008-11, unicode-utf16-extfmts-sync-2008-12, unicode-utf16-string-support, unicode-utf16-sync-2008-07, unicode-utf16-sync-2008-09, unicode-utf16-sync-2008-11, unicode-utf16-sync-2008-12, unicode-utf16-sync-label-2009-03-16
Branch point for: RELEASE-19F-BRANCH, RELEASE-20A-BRANCH, amd64-dd-branch, double-double-array-branch, double-double-branch, double-double-reader-branch, dynamic-extent, intl-2-branch, intl-branch, lisp-executable, mod-arith-branch, portable-clx-branch, ppc_gencgc_branch, release-19a-branch, release-19b-branch, release-19c-branch, release-19d-branch, release-19e-branch, sparc_gencgc_branch, sse2-branch, sse2-packed-branch, unicode-string-buffer-branch, unicode-string-buffer-impl-branch, unicode-utf16-branch, unicode-utf16-extfmt-branch
Changes since 1.25: +2 -2 lines
Diff to previous 1.25
	Remove package nicknames USER from COMMON-LISP-USER.  Add a new
	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::.

Revision 1.25 - (view) (annotate) - [select for diffs]
Fri Jun 13 08:53:09 2003 UTC (10 years, 10 months ago) by gerd
Branch: MAIN
Changes since 1.24: +5 -3 lines
Diff to previous 1.24
	* src/pcl/env.lisp (describe-object) <class t>: Print if
	the class is finalized; don's signal an error if not.

Revision 1.24 - (view) (annotate) - [select for diffs]
Sat May 17 19:08:10 2003 UTC (10 years, 11 months ago) by gerd
Branch: MAIN
Changes since 1.23: +1 -3 lines
Diff to previous 1.23
Remove the bogus defgeneric for make-load-form-saving-slots.

Revision 1.23 - (view) (annotate) - [select for diffs]
Sat May 17 19:02:37 2003 UTC (10 years, 11 months ago) by gerd
Branch: MAIN
Changes since 1.22: +17 -6 lines
Diff to previous 1.22
	Bogus MAKE-LOAD-FORM-SAVING-SLOTS detected by Paul Dietz.

	* src/pcl/env.lisp (make-load-form-saving-slots): Rewritten.

Revision 1.22 - (view) (annotate) - [select for diffs]
Sat May 17 16:20:36 2003 UTC (10 years, 11 months ago) by gerd
Branch: MAIN
Changes since 1.21: +9 -1 lines
Diff to previous 1.21
	Missing MAKE-LOAD-FORM methods detected by Paul Dietz.

	* src/pcl/env.lisp (make-load-form): Define default methods
	for standard-object and condition.

Revision 1.21 - (view) (annotate) - [select for diffs]
Sun May 4 13:11:21 2003 UTC (10 years, 11 months ago) by gerd
Branch: MAIN
Changes since 1.20: +3 -3 lines
Diff to previous 1.20
	Code cleanup.  Use EXTENSIONS package to reduce clutter.

	* src/pcl/defsys.lisp ("PCL", "WALKER"): Use ext.
	* src/pcl/pkg.lisp ("PCL", "WALKER"): Use ext.
	* src/pcl/*.lisp: Remove ext: prefixes.

	* src/pcl/low.lisp (symbolicate*): Renamed from symbolicate.
	* src/pcl/std-class.lisp (shared-initialize):
	* src/pcl/defs.lisp (get-built-in-class-symbol)
	(get-built-in-wrapper-symbol):
	* src/pcl/braid.lisp (initial-classes-and-wrappers)
	(bootstrap-meta-braid): Use symbolicate*.

	* src/pcl/macros.lisp (dolist-carefully): Removed.
	(true, false, zero): Moved to defclass.lisp.
	(printing-random-thing-internal): Removed.
	(printing-random-thing): Removed.
	(rassq): Removed.
	(*keyword-package*): Removed.
	(make-keyword): Removed; import from cl.
	(memq, delq, assq): Macros removed, import from ext.
	(get-declaration): Moved to boot.lisp, where it's used.

	* src/pcl/boot.lisp (get-declaration): Moved here from
	macros.lisp.

	* src/pcl/methods.lisp (named-object-print-function, print-object):
	* src/pcl/low.lisp (print-std-instance):
	* src/pcl/dfun.lisp (print-dfun-info):
	* src/pcl/cache.lisp (print-cache, print-wrapper):
	* src/pcl/boot.lisp (make-early-gf):
	Use print-unreadable-object instead of printing-random-thing.

	* src/pcl/defclass.lisp (true, false, zero): Moved here from
	macros.lisp.

	* src/pcl/methods.lisp (legal-qualifiers-p)
	(legal-specializers-p): Use dolist.

Revision 1.20 - (view) (annotate) - [select for diffs]
Wed Mar 26 17:15:22 2003 UTC (11 years ago) by gerd
Branch: MAIN
CVS Tags: remove_negative_zero_not_zero
Changes since 1.19: +11 -4 lines
Diff to previous 1.19
	* pcl/boot.lisp (parse-defmethod): Rewritten for clarity.  Signal
	an error for most cases of null qualifiers.


	Improve DESCRIBE on generic functions.

	* pcl/env.lisp (method-specialized-lambda-list): New function.
	(describe-object): Use it, and use generic-function-lambda-list.

	* pcl/methods.lisp (generic-function-pretty-arglist)
	(method-pretty-arglist): Remove.

	* pcl/generic-functions.lisp (generic-function-pretty-arglist)
	(method-pretty-arglist): Remove.


	AMOP compliance fixes: Reintroduce class METAOBJECT, make
	GENERIC-FUNCTION a subclass of STANDARD-OBJECT, remove STD-OBJECT.
	This basically reverts a change of dtc from 1998.

	* code/describe.lisp (describe-instance): Check for
	standard-object, not pcl::std-object.

	* pcl/pkg.lisp ("PCL", "CLOS-MOP"): Export more stuff.

	* pcl/generic-functions.lisp: Remove some of the useless comments.

	* pcl/slots.lisp (slot-value-using-class, setf slot-value-using-class)
	(slot-boundp-using-class, slot-makunbound-using-class): Specialize
	on standard-object.

	* pcl/slots-boot.lisp (get-optimized-std-accessor-method-function):
	Remove an std-class-p case.

	* pcl/methods.lisp (update-std-or-str-methods): Use
	standard-object instead of std-object.
	(mec-all-classes-internal): Use *the-class-standard-object*
	instead of *the-class-std-object*.
	(class-test): Don't consider *the-class-std-object*.

	* pcl/low.lisp (pcl-instance-p) [deftransform]: Use
	standard-object instead of std-object.

	* pcl/init.lisp (update-instance-for-different-class)
	(update-instance-for-redefined-class): Specialize on
	standard-object instead of std-object.

	* pcl/dfun.lisp (accessor-values-internal, make-accessor-table)
	(make-accessor-table): Use *the-class-standard-object* instead of
	*the-class-std-object*.

	* pcl/defs.lisp (toplevel): Don't declare *the-class-std-object*
	special.
	(standard-object): Single superclass slot-object.
	(metaobject): New class.
	(std-object): Class removed.
	(specializer): Superclass metaobject.
	(definition-source-mixin, plist-mixin): Superclass
	standard-object, no metaclass.
	(documentation-mixin, dependent-update-mixin): No metaclass.
	(slot-definition, method, generic-function, method-combination):
	Superclass metaobject.

	* pcl/cache.lisp (raise-metatype): Don't consider std-class.

	* pcl/braid.lisp (bootstrap-meta-braid): Don't braid std-class.
	(bootstrap-initialize-class): Don't consider std-class.

Revision 1.19 - (view) (annotate) - [select for diffs]
Sat Mar 22 16:15:17 2003 UTC (11 years ago) by gerd
Branch: MAIN
Changes since 1.18: +66 -132 lines
Diff to previous 1.18
* bootfiles/18e/boot[12].lisp: Bootstrap files for the lisp:class
= pcl:class part.  To get it booted from 18e, cross-compile using
boot1.lisp as bootstrap.lisp in pmai's build scripts, then do a
normal compile with boot2.lisp as bootstrap.lisp with the
resulting Lisp.

* code/byte-interp.lisp, code/defstruct.lisp, code/describe.lisp:
* code/error.lisp, code/exports.lisp, code/hash-new.lisp:
* code/hash.lisp, code/macros.lisp, code/misc.lisp:
* code/package.lisp, code/pred.lisp, code/sharpm.lisp, code/type.lisp:
* compiler/dump.lisp, compiler/fndb.lisp, compiler/globaldb.lisp:
* compiler/proclaim.lisp, compiler/typetran.lisp, compiler/xref.lisp:
* compiler/generic/primtype.lisp, compiler/generic/vm-type.lisp:
Changes for to use kernel::class etc.

* code/class.lisp (toplevel): Shadow class, built-in-class etc.
(class): Give it conc-name %class-.
(toplevel) [#+bootstrap-lisp-class=pcl-class]: Define old accessors.
(everywhere): Use new class accessors.

* compiler/generic/vm-fndb.lisp (%make-instance): Change from
unsafe to flushable and movable.

* code/ntrace.lisp (expand-trace, untrace): Changes for method
tracing.

* code/profile.lisp (profile, profile-all, unprofile): Method
profiling.

* pcl/*.text, pcl/bench.lisp, pcl/extensions.lisp:
* pcl/fast-init.lisp, pcl/precom1.lisp, pcl/precom4.lisp:
* pcl/structure-class.lisp, pcl/user-instances.lisp:
Removed.

* tools/pclcom.lisp: Changes for my PCL and lisp:class =
pcl::class.

Revision 1.18 - (view) (annotate) - [select for diffs]
Sat Feb 15 23:41:31 2003 UTC (11 years, 2 months ago) by pmai
Branch: MAIN
CVS Tags: cold-pcl-base, release-18e, release-18e-base, release-18e-pre1, release-18e-pre2
Branch point for: cold-pcl, release-18e-branch
Changes since 1.17: +5 -1 lines
Diff to previous 1.17
Entomotomy Bug: condition-reporting-not-via-print-object

This change causes condition printing (generally) and condition reporting
(in particular) to go via print-object, once PCL is loaded, as required
by ANSI.  Note that the :report option of define-condition still goes
through the old non-print-object mechanism (which is allowed by ANSI),
but that this mechanism is now invoked via a default method of print-object
specialized on condition.  Hence user-defined methods on print-object
are now effective, instead of being bypassed through the old mechanism.

Revision 1.17 - (view) (annotate) - [select for diffs]
Thu Feb 6 15:20:12 2003 UTC (11 years, 2 months ago) by gerd
Branch: MAIN
Changes since 1.16: +27 -17 lines
Diff to previous 1.16
* pcl/defs.lisp (standard-method): Change superclass
plist-mixin to documentation-mixin so that we don't throw
away the method documentation.

* pcl/cmucl-documentation.lisp (setf documentation): Use
set-random-documentation.

* pcl/defcombin.lisp (set-random-documentation): New function.
(load-short-defcombin, load-long-defcombin): Use it.

* pcl/env.lisp (describe-object) <standard-generic-function>:
Print the generic function doc string, if any.  Print method doc
strings.
(describe-object) <class>: Print slots.

* code/describe.lisp (describe-symbol): If a class names
a PCL class, describe-object the PCL class.

Revision 1.16 - (view) (annotate) - [select for diffs]
Thu Nov 28 16:23:33 2002 UTC (11 years, 4 months ago) by pmai
Branch: MAIN
Changes since 1.15: +1 -2 lines
Diff to previous 1.15
Flushed the #+copy-&rest-arg controlled copying of rest arguments, since
the code was both unused in CMUCL, and was erroneous in places, too.  This
brings us in line with SBCL which removed the code early on.

Revision 1.15 - (view) (annotate) - [select for diffs]
Mon Aug 26 02:23:13 2002 UTC (11 years, 7 months ago) by pmai
Branch: MAIN
CVS Tags: LINKAGE_TABLE, PRE_LINKAGE_TABLE, UNICODE-BASE
Branch point for: UNICODE-BRANCH
Changes since 1.14: +5 -5 lines
Diff to previous 1.14
Huge patch by Gerd Moellmann that removes PCL::ITERATE and PCL::GATHER*
in favor of normal CL constructs.  In a similar vein to SBCL, this patch
also replaces all uses of #'(lambda ...) by just (lambda ...), and
removes now-dated looking quotes in front of self-evaluating objects,
like keywords and t/nil.  The patch has been slightly frobbed by me,
to correct a couple of slight oversights, and make more effective use
of the loop facility in a number of places.

Revision 1.14 - (view) (annotate) - [select for diffs]
Wed Jun 5 23:00:11 2002 UTC (11 years, 10 months ago) by pmai
Branch: MAIN
Changes since 1.13: +3 -3 lines
Diff to previous 1.13
Make change-class ANSI-compliant, by allowing the passing of
initargs.  This fix is thanks to Espen S. Johnsen, who noted that
update-instance-for-different-class already supported the passing of
initargs, so that the fix is only to make change-class accept
initargs, and pass them along to u-i-f-d-c.  Also fixes a probably
undetected bug in change-class with a lisp::class second argument
(bogus apply in env.lisp).

Revision 1.13 - (view) (annotate) - [select for diffs]
Wed Mar 14 23:25:16 2001 UTC (13 years, 1 month ago) by pw
Branch: MAIN
Changes since 1.12: +5 -1 lines
Diff to previous 1.12
Add defmethod print-object specialized on structure-object so that ANSI
behaviour (print using #S(...) notation) happens.

Revision 1.12 - (view) (annotate) - [select for diffs]
Sun May 30 23:13:58 1999 UTC (14 years, 10 months ago) by pw
Branch: MAIN
Changes since 1.11: +34 -63 lines
Diff to previous 1.11
Remove all #+ and #- conditionals from the source code. What is left
is essentially Common Lisp except for explicit references to things
in CMUCL specific packages.

Revision 1.11 - (view) (annotate) - [select for diffs]
Thu Mar 11 16:51:05 1999 UTC (15 years, 1 month ago) by pw
Branch: MAIN
Changes since 1.10: +5 -39 lines
Diff to previous 1.10
Cleanup of the PCL directory. Removed files and conditional code
for long dead lisp implementations. Some parts of the code is
now a bit easier to read and (hopefully) understand.

Revision 1.10 - (view) (annotate) - [select for diffs]
Sun Dec 20 04:30:19 1998 UTC (15 years, 4 months ago) by dtc
Branch: MAIN
Changes since 1.9: +4 -0 lines
Diff to previous 1.9
Add CMUCL style file-comments; from Peter Van Eynde.

Revision 1.9 - (view) (annotate) - [select for diffs]
Fri May 30 18:39:12 1997 UTC (16 years, 10 months ago) by pw
Branch: MAIN
CVS Tags: RELEASE_18a, RELEASE_18b
Branch point for: RELENG_18
Changes since 1.8: +1 -1 lines
Diff to previous 1.8
Fix describe-package used-by list (from Alexander Petrov).

Revision 1.8 - (view) (annotate) - [select for diffs]
Thu Feb 6 21:24:08 1997 UTC (17 years, 2 months ago) by pw
Branch: MAIN
Changes since 1.7: +78 -3 lines
Diff to previous 1.7
This commit brings the PCL repository up to release 17f and also includes
the changes in the X86 1.03.7 kit. Although the 1.03.7 changes were
already in the repository, the other files appear to be of early vintage
and do not work with a 17f system. Hopefully all is correctly synched now.

Revision 1.7 - (view) (annotate) - [select for diffs]
Tue Jan 12 18:24:35 1993 UTC (21 years, 3 months ago) by phg
Branch: MAIN
Branch point for: cmu
Changes since 1.6: +10 -4 lines
Diff to previous 1.6
September-16-92-PCL-e has been incorporated into the CMUCL sources thanks
to Rick Harris.

Revision 1.6 - (view) (annotate) - [select for diffs]
Mon Nov 9 15:19:18 1992 UTC (21 years, 5 months ago) by ram
Branch: MAIN
Changes since 1.5: +170 -251 lines
Diff to previous 1.5
This is September 92 PCL.

Revision 1.5 - (view) (annotate) - [select for diffs]
Sat Aug 1 15:28:41 1992 UTC (21 years, 8 months ago) by ram
Branch: MAIN
Changes since 1.4: +251 -119 lines
Diff to previous 1.4
This is July 92 PCL

Revision 1.4 - (view) (annotate) - [select for diffs]
Mon Jun 1 18:37:55 1992 UTC (21 years, 10 months ago) by ram
Branch: MAIN
Branch point for: patch_16
Changes since 1.3: +40 -49 lines
Diff to previous 1.3
This is March-92-PCL-2a.

Revision 1.3 - (view) (annotate) - [select for diffs]
Sat Oct 19 17:22:23 1991 UTC (22 years, 6 months ago) by ram
Branch: MAIN
Changes since 1.2: +3 -39 lines
Diff to previous 1.2
Merged with latest PCL version.

Revision 1.2 - (view) (annotate) - [select for diffs]
Tue Nov 27 15:45:03 1990 UTC (23 years, 4 months ago) by ram
Branch: MAIN
Changes since 1.1: +19 -1 lines
Diff to previous 1.1
Removed "encapsulation" of DESCRIBE, since our describe now calls
DESCRIBE-OBJECT.
Added a DESCRIBE-OBJECT method for STANDARD-GENERIC-FUNCTION which
prints out the methods.

Revision 1.1 - (view) (annotate) - [select for diffs]
Sun Aug 12 03:46:34 1990 UTC (23 years, 8 months ago) by wlott
Branch: MAIN
Initial revision

This form allows you to request diffs between any two revisions of this file. For each of the two "sides" of the diff, select a symbolic revision name using the selection box, or choose 'Use Text Field' and enter a numeric revision.

  Diffs between and
  Type of Diff should be a

Sort log by:

  ViewVC Help
Powered by ViewVC 1.1.5