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

Fixed VALUES IR1 optimizer to do the REOPTIMIZE-CONTINUATION before

PROPAGATE-TO-ARGS so that we know that the first arg won't be deleted
yet.
parent d38cd132
No related branches found
No related tags found
No related merge requests found
......@@ -1276,9 +1276,9 @@
(setf (functional-kind fun) :let)
(flush-dest (first (basic-combination-args dest)))
(unlink-node dest)
(propagate-to-args node fun)
(when vals
(reoptimize-continuation (first vals))))
(reoptimize-continuation (first vals)))
(propagate-to-args node fun))
t)))
......
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