Advertisement
Guest User

Untitled

a guest
Mar 14th, 2021
106
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lisp 0.16 KB | None | 0 0
  1. (defclass s () ((a)))
  2.  
  3. (defmethod ensure-class-using-class :after ((class s) class-name &key)
  4.   (print class-name))
  5.  
  6. (defclass s () ((a)))
  7.  
  8. (make-instance 's)
  9.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement