mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-16 14:21:48 -08:00
Code Issues Projects Releases Packages Wiki Activity

built-in-class should be an instance of standard-class.

Browse source
This commit is contained in:
Alexander Gavrilov 2009-11-02 11:39:03 +03:00 • committed by Juan Jose Garcia Ripoll
parent 9ce281fcc7
commit 35fd642cd6
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/clos/builtin.lsp
View file

@ -28,7 +28,7 @@
;;; does not work yet, since the class NULL does not exist.
;;;
(setf (find-class 'built-in-class)
(make-instance (find-class 'class)
(make-instance (find-class 'standard-class)
:name 'built-in-class
:direct-superclasses (list (find-class 'class))
:direct-slots nil))