Don't mind calling delete-block twice.
commit4e515c7458cbe92061065a415a4069a1c87c69e4
authorStas Boukarev <stassats@gmail.com>
Mon, 9 Oct 2017 21:29:33 +0000 (10 00:29 +0300)
committerStas Boukarev <stassats@gmail.com>
Mon, 9 Oct 2017 21:29:33 +0000 (10 00:29 +0300)
tree0e378ba636231aa48737b172c7ac3d067a324bb7
parentafc9e273e5fb0a5914d2f769823de22d42f2eb6a
Don't mind calling delete-block twice.

CONTROL-ANALYZE may end up both marking and deleting a block, nothing
criminal in that.

Fixes lp#1722338.
src/compiler/ir1util.lisp
tests/compiler-2.pure.lisp