-
-;;; Evaluate FORM in the lexical context of FRAME's current code
-;;; location, returning the results of the evaluation.
-(defun eval-in-frame (frame form)
- (declare (type frame frame))
- (funcall (preprocess-for-eval form (frame-code-location frame)) frame))