Skip to content
Snippets Groups Projects
Commit 3bbc7259 authored by gerd's avatar gerd
Browse files

Structure slot names can be any symbol. Found by Paul Dietz.

	* src/pcl/std-class.lisp (*allow-funny-slot-names*): Renamed
	from *allow-keyword-slot-names*.

	* src/pcl/methods.lisp (legal-slot-name-p): Allow any symbol
	if *allow-funny-slot-names* is true.
	(shared-initialize): Print the value of the :slot-name initarg.

	* src/code/defstruct.lisp (parse-1-dsd): Treat nil as symbol
	when used as a slot name.
parent 0c1eb5c1
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