Skip to content
Snippets Groups Projects
Commit 3279c041 authored by gerd's avatar gerd
Browse files

Update CLOS STRUCTURE-CLASSes on structure changes.

	* pcl/braid.lisp (ensure-non-standard-class): Add optional
	parameter existing-class.
	(reinitialize-structure-class): New function.
	(toplevel): Push it on kernel::*defstruct-hooks*.

	* code/defstruct.lisp (*defstruct-hooks*): New variable.
	(%defstruct): Call these hooks.

	* tools/pclcom.lisp (find-package): Remove
	pcl::reinitialize-structure-class from kernel::*defstruct-hooks*.
parent 869d007b
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