mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-30 04:10:44 -08:00
Code Issues Projects Releases Packages Wiki Activity

METAOBJECT is now created in boot.lsp as a first step towards the introduction of other classes

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2012-04-22 20:08:38 +02:00
parent 408c53c52a
commit b9dd1309ee
3 changed files with 53 additions and 21 deletions
Download patch file Download diff file Expand all files Collapse all files

9
src/clos/stdmethod.lsp
View file

@ -11,15 +11,6 @@
(in-package "CLOS")
;;; ----------------------------------------------------------------------
;;; Metaobject (an abstract class, not used)
;;; ----------------------------------------------------------------------
;;;
;;; We cannot evaluate this when compiling, because redefining the metaobject
;;; class causes a lot of trouble -- slot definitions have to be finalized
;;; again and as a result a lot of functions break down.
(let () (defclass metaobject (standard-object) ()))
;;; ----------------------------------------------------------------------
;;; Funcallable object
;;; ----------------------------------------------------------------------