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

Made VOP-INFO-SAVE-P :COMPUTE-ONLY compute the save set the same as T.

parent 7f316ea6
No related branches found
No related tags found
No related merge requests found
...@@ -648,7 +648,7 @@ ...@@ -648,7 +648,7 @@
(dolist (tn save-set) (dolist (tn save-set)
(force-tn-to-stack tn) (force-tn-to-stack tn)
(convert-to-environment-tn tn))) (convert-to-environment-tn tn)))
((t) ((t :compute-only)
(setf (first (vop-codegen-info vop)) save-set)))))) (setf (first (vop-codegen-info vop)) save-set))))))
(do ((ref (vop-refs vop) (tn-ref-next-ref ref))) (do ((ref (vop-refs vop) (tn-ref-next-ref ref)))
......
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