Plaster
New
List
Login
common-lisp
default
anonymous
2018.10.05 14:22:27
CL-USER> (find-message-class '(foo bar)) #<MESSAGE-CLASS (FOO BAR) {1003B8EA63}> CL-USER> (make-instance *) #<#<MESSAGE-CLASS (FOO BAR) {1003B8EA63}> {10041C4693}> CL-USER> (type-of *) #<MESSAGE-CLASS (FOO BAR) {1003B8EA63}>
Raw
Annotate
Repaste
Edit