126.96.36.199: ir1: Declare UNWIND-PROTECT cleanup functions to be dynami…
…c-extent. * Since we now have the analysis to do the right thing for these functions, why not take advantage of it?
|@@ -1083,6 +1083,7 @@ due to normal completion or a non-local exit such as THROW)."|
|;; ,CLEANUP-FUN should probably be declared DYNAMIC-EXTENT,|
|;; and something can be done to make %ESCAPE-FUN have|
|;; dynamic extent too.|
|+ (declare (dynamic-extent #',cleanup-fun))|
|(multiple-value-bind (,next ,start ,count)|