1.0.19.7: refactor stack allocation decisions

[sbcl.git] / src / code / profile.lisp

diff --git a/src/code/profile.lisp b/src/code/profile.lisp
index b6b2a21..ddfd722 100644 (file)
--- a/src/code/profile.lisp
+++ b/src/code/profile.lisp
@@ -145,7 +145,7 @@
     (values
      ;; ENCAPSULATION-FUN
      (lambda (&more arg-context arg-count)
-       (declare (optimize speed safety sb-c::stack-allocate-dynamic-extent))
+       (declare (optimize speed safety))
        ;; Make sure that we're not recursing infinitely.
        (when (boundp '*computing-profiling-data-for*)
          (unprofile-all) ; to avoid further recursion