Re: Dynamic-extent ahead

Raymond Toy <toy@xxxxxxxxxxxxxxx> writes:

> Can you give some examples of the LET case?

(defun foo ()
  (let ((x (list 1 2)))
     (declare (dynamic-extent x))
     (length x)))

where LIST can also be LIST* or CONS.

> Also, is it possible to disable the LET case?

(in-package :c)
(defun dynamic-extent-allocation-p (vars vals) nil)

should work, I think.