1.0.25.10: Fix package locks checks for local functions in the interpeter.
authorRichard M Kreuter <kreuter@users.sourceforge.net>
Thu, 5 Feb 2009 18:27:31 +0000 (18:27 +0000)
committerRichard M Kreuter <kreuter@users.sourceforge.net>
Thu, 5 Feb 2009 18:27:31 +0000 (18:27 +0000)
commitd2b9d8bbd2d1489723a4437e64f607585670ed58
tree89a2862e1c7db7bc2d0618ac9131b7135e8fdad7
parent3cbc1e7cfb59875d7ebec4af3c7c744cab0b76ae
1.0.25.10: Fix package locks checks for local functions in the interpeter.

* Package lock checks were being performed in the function binding form's
  body's lexical environment, causing lossage for forms like

  (locally (declare (disable-package-locks foo:bar))
    (flet ((foo:bar ...))
      (declare (enable-package-locks foo:bar))
      ...))

  In particular, this broke some TRACE extensions.
src/code/full-eval.lisp
tests/full-eval.impure.lisp