Fix disassembling closures.
commit58576c26524fc51b847b4cced9a1687606565bde
authorStas Boukarev <stassats@gmail.com>
Tue, 9 Dec 2014 09:43:59 +0000 (9 12:43 +0300)
committerStas Boukarev <stassats@gmail.com>
Tue, 9 Dec 2014 09:43:59 +0000 (9 12:43 +0300)
treebeac7c33faf7b928625b161fa8bc1ba02dd1a96d
parent1779a17f234de63aad3cea5496eedd0dfdffb842
Fix disassembling closures.

When looking for the function information GET-FUN-SEGMENTS used
%SIMPLE-FUN-NAME to match the name, but closures are not simple funs.
Get a simple fun before calling %simple-fun-name.
src/cold/warm.lisp
src/compiler/target-disassem.lisp