Skip to content
Snippets Groups Projects
Commit 20254db5 authored by gerd's avatar gerd
Browse files

Store user-specified slot names in DEFSTRUCT-SLOT-DESCRIPTIONs,

	which is necessary for conforming SLOT-EXISTS-P and
	MAKE-LOAD-FORM-SAVING-SLOTS.  To bootstrap, using pmai's
	build scripts:

	1. Copy boot10.lisp to target:bootstrap.lisp and do a full
	   build.  Choose the CLOBBER-IT restart when asked
	   (for an unknown reason, it doesn't work to do this
	   programatically.)

	2. Leave the bootstrap file where it is and do a full build
	   with the Lisp produced in step 1.

	3. Remove the bootstrap file and do another full build.

	* src/bootfiles/18e/boot10.lisp: New file.

	* src-dsd/code/defstruct.lisp (defstruct-slot-description):
	Rename slot %name to name.
	(dsd-%name): New function.
	(dsd-name): Function removed.
	(parse-1-dsd): Set dsd-name to the slot symbol.

	* src-dsd/pcl/std-class.lisp (*allow-keyword-slot-names*): New
	variable.
	(initialize-internal-slot-functions) <around
	structure-effective-slot-definition>: New method binding
	*allow-keyword-slot-names* to true.

	* src-dsd/pcl/methods.lisp (legal-slot-name-p): Allow keywords
	if *allow-keyword-slot-names* is true.
parent 1f6e67a6
No related branches found
No related tags found
No related merge requests found
Loading
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment