sbcl.sbcl/tests/merge-lambdas.lisp
Stas Boukarev d34f08f171 Don't AVER when merging top-level lambdas which do not return.
In MERGE-TOPLEVEL-LAMBDAS, check that the result receiver is not
deleted before merging. And stop doing anything if it's passed only one lambda.

Fixes lp#1308328.
2015-01-15 20:19:29 +03:00

4 lines
61 B
Common Lisp

(labels ((a (x)))
(error 'program-error)
(a (catch 'c)))