Plaster
New
List
Login
common-lisp
default
anonymous
2021.06.11 15:32:20
CL-USER> (make-instance 'c2mop:funcallable-standard-object) #<SB-MOP:FUNCALLABLE-STANDARD-OBJECT {1010B71EEB}> CL-USER> (c2mop:set-funcallable-instance-function * (lambda (x) (* x x))) #<FUNCTION (LAMBDA (X)) {53880E6B}> CL-USER> (funcall ** 42) 1764
Raw
Annotate
Repaste
Edit