Skip to content
Snippets Groups Projects
Commit fde761ac authored by ram's avatar ram
Browse files

Use block-home-lambda instead of the obsolete block-lambda.

parent 6b452bb2
No related branches found
No related tags found
No related merge requests found
......@@ -287,10 +287,9 @@
(do ((ref refs (tn-ref-next ref)))
((null ref))
(let* ((lambda (lambda-home
(block-lambda
(ir2-block-block
(vop-block (tn-ref-vop ref))))))
(let* ((lambda (block-home-lambda
(ir2-block-block
(vop-block (tn-ref-vop ref)))))
(tails (lambda-tail-set lambda)))
(flet ((frob (fun)
(setf (ir2-environment-number-stack-p
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment