(with-stable-pointer (ptr expr) &body body)
Executes the body with the ptr
variable being bound to a stable pointer whose value is determined by expr
.
Example:
(with-stable-pointer (ptr (lambda (x) (+ x 10))) (print (stable-pointer-value ptr))) ;;Prints: #<FUNCTION (LAMBDA (X)) {1004807E79}>