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

Changed a copy-seq to bit-vector-copy for no particular reason.

parent 1155fa07
No related branches found
No related tags found
No related merge requests found
......@@ -575,7 +575,7 @@
;;;
(defun compute-initial-conflicts (block)
(declare (type ir2-block block))
(let ((live-bits (copy-seq (ir2-block-live-in block)))
(let ((live-bits (bit-vector-copy (ir2-block-live-in block)))
(live-list nil))
(do ((conf (ir2-block-global-tns block)
......
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