Plaster
New
List
Login
common-lisp
default
anonymous
2021.12.16 08:09:11
; of course this seems to be working as expected... (defpackage :parent (:use :cl)) (in-package :parent) (defclass pclass () ((someslot :reader get-someslot ;; here is where I'm having the problem in my code if I don't specify parent::get-someslot in the reader definition :initform "ok"))) (defpackage :child (:use :cl)) (in-package :child) (defclass cclass (parent::pclass) ()) (defmethod dosomething ((this cclass)) (parent::get-someslot this)) (in-package :cl-user) (child::dosomething (make-instance 'child::cclass))
Raw
Annotate
Repaste
Edit